]> 4ch.mooo.com Git - 16.git/blob - 16/xw_/mxsa.asm
trying to translate that lib into open watcom...
[16.git] / 16 / xw_ / mxsa.asm
1                 PUBLIC  MXSTARTADDRESS
2 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
3                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
4 MXSTARTADDRESS:
5         push            bp
6         mov             bp,sp
7         sub             sp,0
8         mov             bx,word ptr 6[bp]
9         mov             dx,3d4H
10         mov             al,0cH
11         mov             ah,bh
12         cli
13         out             dx,ax
14         mov             al,0dH
15         mov             ah,bl
16         out             dx,ax
17         sti
18         mov             sp,bp
19         pop             bp
20         retf            2
21 MX_TEXT         ENDS
22                 END