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