Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-21 06:39:40 +02:00
Code Issues Packages Projects Releases Wiki Activity

Faster clearscreen

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files
Atari/gr_basics.asm
+15 -6
View File
@@ -641,13 +641,22 @@ EndPut4x4
;--------------------------------------------------
.proc ClearScreen
;--------------------------------------------------
mwa #display temp
Go ldy #0
@ lda #$ff
ldy #<display
lda #0
sta temp
lda #>display
sta temp+1
Go
loop lda #$ff
sta (temp),y
inw temp
cpw temp #display+screenheight*screenBytes+1
bne @-
iny
bne @+
inc temp+1
@ cpy #<(display+screenheight*screenBytes+1)
bne loop
lda temp+1
cmp #>(display+screenheight*screenBytes+1)
bne loop
rts
.endp