refresh wwww

[16.git] / 16 / xw__ / mxsl.asm

diff --git a/16/xw__/mxsl.asm b/16/xw__/mxsl.asm
new file mode 100755 (executable)
index 0000000..2b25844
--- /dev/null
+++ b/16/xw__/mxsl.asm
@@ -0,0 +1,37 @@
+.387
+               PUBLIC  MXSTARTLINE
+               EXTRN   MX_BYTESPERLINE:BYTE
+MX_TEXT                SEGMENT PARA PUBLIC USE16 'CODE'
+               ASSUME CS:MX_TEXT, DS:DGROUP, SS:DGROUP
+MXSTARTLINE:
+       push            bp
+       mov             bp,sp
+       sub             sp,0
+       mov             ax,word ptr 6[bp]
+       mul             word ptr cs:MX_BYTESPERLINE
+       xchg            ax,bx
+       mov             dx,3daH
+L$1:
+       in              al,dx
+       test            al,8
+       jne             L$1
+       mov             dx,3d4H
+       mov             al,0cH
+       mov             ah,bh
+       cli
+       out             dx,ax
+       mov             al,0dH
+       mov             ah,bl
+       out             dx,ax
+       sti
+       mov             dx,3daH
+L$2:
+       in              al,dx
+       test            al,8
+       je              L$2
+       xor             ax,ax
+       mov             sp,bp
+       pop             bp
+       retf            2
+MX_TEXT                ENDS
+               END