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