Update nascom.asm

Make CLS clear vdu screen
This commit is contained in:
b1ackmai1er
2020-03-08 20:48:56 +08:00
parent aeb4bc6245
commit b91871114a

View File

@@ -4467,6 +4467,9 @@ GETINP:
POP BC
RET
CLS:
#IF VDUGFX
CALL VDU_INIT ; Clear VDU screen
#ENDIF
#IF VT100
LD HL,VT_CLS ; Output zero terminated
VT0OUT: LD A,(HL) ; VT100 escape sequence