mirror of https://github.com/nmlgc/ReC98.git
133 lines
2.1 KiB
NASM
133 lines
2.1 KiB
NASM
public _grcg_setcolor_rmw
|
|
_grcg_setcolor_rmw proc far
|
|
|
|
@@color = word ptr 6
|
|
|
|
push bp
|
|
mov bp, sp
|
|
mov bx, [bp+@@color]
|
|
GRCG_SETMODE_CLOBBERING dx, GC_RMW
|
|
test bl, 1
|
|
jz short @@bit0_0
|
|
mov al, 0FFh
|
|
jmp short @@bit0_set
|
|
; ---------------------------------------------------------------------------
|
|
|
|
@@bit0_0:
|
|
mov al, 0
|
|
|
|
@@bit0_set:
|
|
mov dx, 7Eh
|
|
out dx, al
|
|
test bl, 2
|
|
jz short @@bit1_0
|
|
mov al, 0FFh
|
|
jmp short @@bit1_set
|
|
; ---------------------------------------------------------------------------
|
|
|
|
@@bit1_0:
|
|
mov al, 0
|
|
|
|
@@bit1_set:
|
|
mov dx, 7Eh
|
|
out dx, al
|
|
test bl, 4
|
|
jz short @@bit2_0
|
|
mov al, 0FFh
|
|
jmp short @@bit2_set
|
|
; ---------------------------------------------------------------------------
|
|
|
|
@@bit2_0:
|
|
mov al, 0
|
|
|
|
@@bit2_set:
|
|
mov dx, 7Eh
|
|
out dx, al
|
|
test bl, 8
|
|
jz short @@bit3_0
|
|
mov al, 0FFh
|
|
jmp short @@bit3_set
|
|
; ---------------------------------------------------------------------------
|
|
|
|
@@bit3_0:
|
|
mov al, 0
|
|
|
|
@@bit3_set:
|
|
mov dx, 7Eh
|
|
out dx, al
|
|
pop bp
|
|
retf
|
|
_grcg_setcolor_rmw endp
|
|
|
|
|
|
public _grcg_setcolor_tdw
|
|
_grcg_setcolor_tdw proc far
|
|
|
|
@@color = word ptr 6
|
|
|
|
push bp
|
|
mov bp, sp
|
|
mov bx, [bp+@@color]
|
|
GRCG_SETMODE_CLOBBERING dx, GC_TDW
|
|
test bl, 1
|
|
jz short @@bit0_0
|
|
mov al, 0FFh
|
|
jmp short @@bit0_set
|
|
; ---------------------------------------------------------------------------
|
|
|
|
@@bit0_0:
|
|
mov al, 0
|
|
|
|
@@bit0_set:
|
|
mov dx, 7Eh
|
|
out dx, al
|
|
test bl, 2
|
|
jz short @@bit1_0
|
|
mov al, 0FFh
|
|
jmp short @@bit1_set
|
|
; ---------------------------------------------------------------------------
|
|
|
|
@@bit1_0:
|
|
mov al, 0
|
|
|
|
@@bit1_set:
|
|
mov dx, 7Eh
|
|
out dx, al
|
|
test bl, 4
|
|
jz short @@bit2_0
|
|
mov al, 0FFh
|
|
jmp short @@bit2_set
|
|
; ---------------------------------------------------------------------------
|
|
|
|
@@bit2_0:
|
|
mov al, 0
|
|
|
|
@@bit2_set:
|
|
mov dx, 7Eh
|
|
out dx, al
|
|
test bl, 8
|
|
jz short @@bit3_0
|
|
mov al, 0FFh
|
|
jmp short @@bit3_set
|
|
; ---------------------------------------------------------------------------
|
|
|
|
@@bit3_0:
|
|
mov al, 0
|
|
|
|
@@bit3_set:
|
|
mov dx, 7Eh
|
|
out dx, al
|
|
pop bp
|
|
retf
|
|
_grcg_setcolor_tdw endp
|
|
|
|
|
|
public _grcg_off_func
|
|
_grcg_off_func proc far
|
|
push bp
|
|
mov bp, sp
|
|
GRCG_OFF_CLOBBERING dx
|
|
pop bp
|
|
retf
|
|
_grcg_off_func endp
|