]> 4ch.mooo.com Git - 16.git/blob - 16/xw__/mxwr.asm
16_ca needs huge amounts of work and I should remember what needs to be done soon...
[16.git] / 16 / xw__ / mxwr.asm
1 .387
2                 PUBLIC  MXWAITRETRACE
3 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
4                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
5 MXWAITRETRACE:
6         mov             dx,3daH
7 L$1:
8         in              al,dx
9         test            al,8
10         je              L$1
11         retf
12 MX_TEXT         ENDS
13                 END