Files
lba1-classic/SOURCES/MCGA.ASM
Gwen Gourevich c5f4f6ba25 Initial commit
2021-10-27 10:34:18 +02:00

54 lines
1.1 KiB
NASM

;----------------------------------------------------------------------------
;
;' MCGA.ASM 386
;' (c) Adeline 1994
;
;----------------------------------------------------------------------------
.386P
.model SMALL, SYSCALL
JUMPS
;----------------------------------------------------------------------------
.data
;----------------------------------------------------------------------------
include \projet\lib386\lib_svga\svga.ash
;----------------------------------------------------------------------------
public NoLanguage Mcga_Cls
public NoLanguage Mcga_Flip
.code
;//--------------------------------------------------------------------------
Mcga_Cls proc uses edi
xor eax, eax
mov edi, Log
mov ecx, 64000/4
rep stosd
ret
Mcga_Cls endp
;//--------------------------------------------------------------------------
Mcga_Flip proc uses esi edi
mov esi, Log
mov edi, Phys
mov ecx, 64000/4
rep movsd
ret
Mcga_Flip endp
;----------------------------------------------------------------------------
; The
End