25 lines
253 B
Text
25 lines
253 B
Text
|
|
#IFNDEF __C64_SCR
|
|
#DEFINE __C64_SCR = 1
|
|
GOTO lib_c64scr_skip
|
|
|
|
LABEL lib_c64scr_blank
|
|
ASM
|
|
lda $d011
|
|
and #($ff-$10)
|
|
sta $d011
|
|
ENDASM
|
|
|
|
SUBEND
|
|
|
|
LABEL lib_c64scr_show
|
|
ASM
|
|
lda $d011
|
|
ora #$10
|
|
sta $d011
|
|
ENDASM
|
|
SUBEND
|
|
|
|
LABEL lib_c64scr_skip
|
|
|
|
#IFEND
|