Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-10-24 23:25:28 +00:00
Code Issues Projects Releases Wiki Activity

fix screen clearing

Browse Source
This commit is contained in:
Peter Ferrie 2019-06-03 09:15:46 -07:00
parent d4db364c29
commit 1496e2cc5d
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pt3_player/gr_fast_clear.s
View File

@ -5,7 +5,7 @@ clear_screens:
lda #$0 lda #$0
jsr clear_top jsr clear_top
jsr clear_bottom jsr clear_bottom0
;=================================== ;===================================
; Clear top/bottom of page 1 ; Clear top/bottom of page 1
@ -13,7 +13,7 @@ clear_screens:
lda #$4 lda #$4
jsr clear_top jsr clear_top
jmp clear_bottom jmp clear_bottom4
@ -85,6 +85,7 @@ clear_bottoms:
; Clear bottom of page 1 ; Clear bottom of page 1
;=================================== ;===================================
clear_bottom4:
lda #$4 lda #$4
; fall through ; fall through
@ -95,6 +96,7 @@ clear_bottoms:
clear_bottom: clear_bottom:
sta DRAW_PAGE ; 3 sta DRAW_PAGE ; 3
clear_bottom0:
clc ; 2 clc ; 2
adc #6 ; 2 adc #6 ; 2