]> 4ch.mooo.com Git - 16.git/blob - 16/xw_/mxwm.asm
16_ca needs huge amounts of work and I should remember what needs to be done soon...
[16.git] / 16 / xw_ / mxwm.asm
1                 PUBLIC  MXWRITEMODE
2 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
3                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
4 MXWRITEMODE:
5         push            bp
6         mov             bp,sp
7         sub             sp,0
8         mov             dx,3ceH
9         mov             ah,byte ptr 6[bp]
10         and             ah,3
11         or              ah,40H
12         mov             al,5
13         out             dx,ax
14         mov             sp,bp
15         pop             bp
16         retf            2
17 MX_TEXT         ENDS
18                 END