16/xw__/mxsc.asm

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