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
|
||||
GOTO lib_c64scr_skip
|
||||
|
||||
LABEL lib_c64scr_blank
|
||||
ASM
|
||||
lda $d011
|
||||
and #($ff-$10)
|
||||
sta $d011
|
||||
ENDASM
|
||||
FUNC lib_c64scr_blank
|
||||
ASM
|
||||
lda $d011
|
||||
and #($ff-$10)
|
||||
sta $d011
|
||||
ENDASM
|
||||
FEND
|
||||
|
||||
SUBEND
|
||||
|
||||
LABEL lib_c64scr_show
|
||||
ASM
|
||||
lda $d011
|
||||
ora #$10
|
||||
sta $d011
|
||||
ENDASM
|
||||
SUBEND
|
||||
FUNC lib_c64scr_show
|
||||
ASM
|
||||
lda $d011
|
||||
ora #$10
|
||||
sta $d011
|
||||
ENDASM
|
||||
FEND
|
||||
|
||||
LABEL lib_c64scr_skip
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue