]> 4ch.mooo.com Git - 16.git/blob - 16/xw_/mxwp.asm
wwww
[16.git] / 16 / xw_ / mxwp.asm
1                 PUBLIC  MXWRITEPLANE
2                 PUBLIC  MXREADPLANE
3 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
4                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
5 MXWRITEPLANE:
6         push            bp
7         mov             bp,sp
8         sub             sp,0
9         mov             ah,byte ptr 6[bp]
10         and             ah,0fH
11         mov             al,2
12         mov             dx,3c4H
13         out             dx,ax
14         mov             sp,bp
15         pop             bp
16         retf            2
17 MXREADPLANE:
18         push            bp
19         mov             bp,sp
20         sub             sp,0
21         mov             al,4
22         mov             ah,byte ptr 6[bp]
23         and             ah,3
24         mov             dx,3ceH
25         out             dx,ax
26         mov             sp,bp
27         pop             bp
28         retf            2
29 MX_TEXT         ENDS
30                 END