Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-02-05 21:34:30 +00:00
Code Issues Projects Releases Wiki Activity

optimize clear_bottom

Browse Source
This commit is contained in:
Peter Ferrie 2019-06-01 01:51:31 -04:00 committed by Vince Weaver
parent 85c7341e26
commit 01f3e24e82
1 changed files with 18 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
pt3_player/gr_fast_clear.s
View File

@ -15,28 +15,8 @@ clear_screens:
lda #$4
sta DRAW_PAGE
jsr clear_top
jsr clear_bottom
jmp clear_bottom
rts
clear_bottoms:
;===================================
; Clear bottom of page 0
;===================================
lda #$0
sta DRAW_PAGE
jsr clear_bottom
;===================================
; Clear bottom of page 1
;===================================
lda #$4
sta DRAW_PAGE
jsr clear_bottom
rts
@ -94,6 +74,22 @@ no_draw_bottom:
clear_bottoms:
;===================================
; Clear bottom of page 0
;===================================
lda #$0
sta DRAW_PAGE
jsr clear_bottom
;===================================
; Clear bottom of page 1
;===================================
lda #$4
sta DRAW_PAGE
; fall through
;=========================================================
; clear_bottom
@ -143,9 +139,7 @@ clear_screens_notext:
lda #$4
sta DRAW_PAGE
jsr clear_all
rts
; fall through
;=========================================================