16/xw__/mxgc.asm

   1 .387
   2                 PUBLIC  MXGETCOLOR
   3 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
   4                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
   5 MXGETCOLOR:
   6         push            bp
   7         mov             bp,sp
   8         sub             sp,0
   9         push            ds
  10         push            si
  11         mov             ax,word ptr 12H[bp]
  12         mov             dx,3c7H
  13         out             dx,al
  14         inc             dx
  15         inc             dx
  16         lds             si,dword ptr 0eH[bp]
  17         in              al,dx
  18         mov             byte ptr [si],al
  19         lds             si,dword ptr 0aH[bp]
  20         in              al,dx
  21         mov             byte ptr [si],al
  22         lds             si,dword ptr 6[bp]
  23         in              al,dx
  24         mov             byte ptr [si],al
  25         pop             si
  26         pop             ds
  27         mov             sp,bp
  28         pop             bp
  29         retf            0eH
  30 MX_TEXT         ENDS
  31                 END