16/xw__/mxsp.asm

   1 .387
   2                 PUBLIC  MXSETPALETTE
   3 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
   4                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
   5 MXSETPALETTE:
   6         push            bp
   7         mov             bp,sp
   8         sub             sp,0
   9         push            ds
  10         push            si
  11         lds             si,dword ptr 0aH[bp]
  12         mov             cx,word ptr 6[bp]
  13         mov             ax,word ptr 8[bp]
  14         mov             dx,3c8H
  15         out             dx,al
  16         inc             dx
  17         cld
  18         cli
  19 L$1:
  20         lodsb
  21         out             dx,al
  22         lodsb
  23         out             dx,al
  24         lodsb
  25         out             dx,al
  26         loop            L$1
  27         sti
  28         pop             si
  29         pop             ds
  30         mov             sp,bp
  31         pop             bp
  32         retf            8
  33 MX_TEXT         ENDS
  34                 END