Made c64scr.c65 use functions. Backwards compatible with GOSUB
This commit is contained in:
parent
d717002b27
commit
5f4b34e7c0
1 changed files with 14 additions and 14 deletions
|
|
@ -3,22 +3,22 @@
|
||||||
#DEFINE __C64_SCR = 1
|
#DEFINE __C64_SCR = 1
|
||||||
GOTO lib_c64scr_skip
|
GOTO lib_c64scr_skip
|
||||||
|
|
||||||
LABEL lib_c64scr_blank
|
FUNC lib_c64scr_blank
|
||||||
ASM
|
ASM
|
||||||
lda $d011
|
lda $d011
|
||||||
and #($ff-$10)
|
and #($ff-$10)
|
||||||
sta $d011
|
sta $d011
|
||||||
ENDASM
|
ENDASM
|
||||||
|
FEND
|
||||||
|
|
||||||
SUBEND
|
|
||||||
|
|
||||||
LABEL lib_c64scr_show
|
FUNC lib_c64scr_show
|
||||||
ASM
|
ASM
|
||||||
lda $d011
|
lda $d011
|
||||||
ora #$10
|
ora #$10
|
||||||
sta $d011
|
sta $d011
|
||||||
ENDASM
|
ENDASM
|
||||||
SUBEND
|
FEND
|
||||||
|
|
||||||
LABEL lib_c64scr_skip
|
LABEL lib_c64scr_skip
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue