]> 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 .387
2                 PUBLIC  MXWRITEMODE
3 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
4                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
5 MXWRITEMODE:
6         push            bp
7         mov             bp,sp
8         sub             sp,0
9         mov             dx,3ceH
10         mov             ah,byte ptr 6[bp]
11         and             ah,3
12         or              ah,40H
13         mov             al,5
14         out             dx,ax
15         mov             sp,bp
16         pop             bp
17         retf            2
18 MX_TEXT         ENDS
19                 END