+++ /dev/null
-;-----------------------------------------------------------\r
-;\r
-; MXWP.ASM - Set write/read plane functions\r
-; Copyright (c) 1993,1994 by Alessandro Scotti\r
-;\r
-;-----------------------------------------------------------\r
-WARN PRO\r
-INCLUDE MODEX.DEF\r
-\r
-PUBLIC mxWritePlane\r
-PUBLIC mxReadPlane\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 plane(s).\r
-;\r
-; Input:\r
-; Plane = write plane(s) to set (bit 0 enables plane 0,\r
-; bit 1 enables plane 1 and so on, different planes\r
-; may be selected at the same time)\r
-; Output:\r
-; none\r
-;\r
-mxWritePlane PROC FAR\r
- ARG Plane:BYTE:2 = ARG_SIZE\r
- .enter 0\r
-\r
- mov ah, [Plane]\r
- and ah, 00001111b ; Mask off unused bits\r
- mov al, 02h\r
- mov dx, TS\r
- out dx, ax\r
-\r
- .leave ARG_SIZE\r
-mxWritePlane ENDP\r
-\r
-;-----------------------------------------------------------\r
-;\r
-; Sets the read plane.\r
-;\r
-; Input:\r
-; Plane = read plane to set (0,1,2,3)\r
-; Output:\r
-; none\r
-;\r
-mxReadPlane PROC FAR\r
- ARG Plane:BYTE:2 = ARG_SIZE\r
- ASSUME ds:NOTHING\r
- .enter 0\r
- mov al, 04h\r
- mov ah, [Plane]\r
- and ah, 0000011b ; Mask off unused bits\r
- mov dx, GDC\r
- out dx, ax\r
- .leave ARG_SIZE\r
-mxReadPlane ENDP\r
-\r
-MX_TEXT ENDS\r
-END\r