Faster clearscreen

This commit is contained in:
Pecusx
2023-06-06 12:57:23 +02:00
parent ce12e076cc
commit 8a448a6e4b
4 changed files with 39 additions and 7 deletions
+18
View File
@@ -598,6 +598,24 @@ EndPut4x4
cpw temp #displayC64+screenheight*screenBytes+1
bne @-
rts
ldy #<displayC64
lda #0
sta temp
lda #>displayC64
sta temp+1
Go
loop lda #$ff
sta (temp),y
iny
bne @+
inc temp+1
@ cpy #<(displayC64+screenheight*screenBytes+1)
bne loop
lda temp+1
cmp #>(displayC64+screenheight*screenBytes+1)
bne loop
rts
.endp
;--------------------------------------------------