]> 4ch.mooo.com Git - 16.git/blob - 16/xw__/mxsl.asm
more
[16.git] / 16 / xw__ / mxsl.asm
1 .387
2                 PUBLIC  MXSTARTLINE
3                 EXTRN   MX_BYTESPERLINE:BYTE
4 MX_TEXT         SEGMENT PARA PUBLIC USE16 'CODE'
5                 ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
6 MXSTARTLINE:
7         push            bp
8         mov             bp,sp
9         sub             sp,0
10         mov             ax,word ptr 6[bp]
11         mul             word ptr cs:MX_BYTESPERLINE
12         xchg            ax,bx
13         mov             dx,3daH
14 L$1:
15         in              al,dx
16         test            al,8
17         jne             L$1
18         mov             dx,3d4H
19         mov             al,0cH
20         mov             ah,bh
21         cli
22         out             dx,ax
23         mov             al,0dH
24         mov             ah,bl
25         out             dx,ax
26         sti
27         mov             dx,3daH
28 L$2:
29         in              al,dx
30         test            al,8
31         je              L$2
32         xor             ax,ax
33         mov             sp,bp
34         pop             bp
35         retf            2
36 MX_TEXT         ENDS
37                 END