16/xw_/mxss.asm

   1                 PUBLIC  MXSPLITSCREEN
   2 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
   3                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
   4 MXSPLITSCREEN:
   5         push            bp
   6         mov             bp,sp
   7         sub             sp,0
   8         mov             ax,word ptr 6[bp]
   9         shl             ax,1
  10         mov             bh,ah
  11         mov             bl,ah
  12         and             bx,201H
  13         mov             cl,4
  14         shl             bx,cl
  15         shl             bh,1
  16         mov             dx,3d4H
  17         mov             ah,al
  18         mov             al,18H
  19         out             dx,ax
  20         mov             al,7
  21         out             dx,al
  22         inc             dx
  23         in              al,dx
  24         dec             dx
  25         mov             ah,al
  26         and             ah,0efH
  27         or              ah,bl
  28         mov             al,7
  29         out             dx,ax
  30         mov             al,9
  31         out             dx,al
  32         inc             dx
  33         in              al,dx
  34         dec             dx
  35         mov             ah,al
  36         and             ah,0bfH
  37         or              ah,bh
  38         mov             al,9
  39         out             dx,ax
  40         mov             sp,bp
  41         pop             bp
  42         retf            2
  43 MX_TEXT         ENDS
  44                 END