home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Interactive Guide / c-cplusplus-interactive-guide.iso / c_ref / csource4 / 255_01 / gpcolor.asm < prev    next >
Encoding:
Assembly Source File  |  1988-03-30  |  768 b   |  38 lines
  1.           page   80,132
  2.           page
  3. ;
  4. ;         Kent Cedola
  5. ;         2015 Meadow Lake Court
  6. ;         Norfolk, Virginia  23518
  7. ;
  8.  
  9. dgroup    group  _data
  10.  
  11. _data     segment word public 'data'
  12.           assume ds:dgroup
  13.  
  14.           extrn  _gdcolor:byte,_gds_flg:byte
  15.  
  16. _data     ends
  17.  
  18. _text     segment byte public 'code'
  19.  
  20.           assume cs:_text,ds:dgroup
  21.           public _gpcolor
  22. _gpcolor  proc   near
  23.  
  24.           push   bp
  25.           mov    bp,sp
  26.  
  27.           mov    al,[bp+4]
  28.           mov    _gdcolor,al
  29.           mov    _gds_flg,0
  30.  
  31.           pop    bp
  32.           ret
  33.  
  34. _gpcolor  endp
  35.  
  36. _text     ends
  37.           end
  38.