refresh wwww

[16.git] / 16 / xw / mxwm.asm

diff --git a/16/xw/mxwm.asm b/16/xw/mxwm.asm
new file mode 100755 (executable)
index 0000000..0615885
--- /dev/null
+++ b/16/xw/mxwm.asm
@@ -0,0 +1,39 @@
+;-----------------------------------------------------------\r
+;\r
+; MXWM.ASM - Set write mode function\r
+; Copyright (c) 1993,1994 by Alessandro Scotti\r
+;\r
+;-----------------------------------------------------------\r
+WARN    PRO\r
+INCLUDE MODEX.DEF\r
+\r
+PUBLIC  mxWriteMode\r
+\r
+MX_TEXT         SEGMENT USE16 PARA PUBLIC 'CODE'\r
+                ASSUME cs:MX_TEXT, ds:NOTHING, es:NOTHING\r
+\r
+;-----------------------------------------------------------\r
+;\r
+; Sets the write mode.\r
+;\r
+; Input:\r
+;       Mode    = write mode (0,1,2,3)\r
+; Output:\r
+;       none\r
+;\r
+mxWriteMode     PROC    FAR\r
+        ARG     Mode:BYTE:2     = ARG_SIZE\r
+        .enter  0\r
+\r
+        mov     dx, GDC\r
+        mov     ah, [Mode]\r
+        and     ah, 00000011b\r
+        or      ah, 01000000b\r
+        mov     al, 05h\r
+        out     dx, ax\r
+\r
+        .leave  ARG_SIZE\r
+mxWriteMode     ENDP\r
+\r
+MX_TEXT         ENDS\r
+END\r