mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-12-27 02:31:00 +00:00
fix screen clearing
This commit is contained in:
parent
d4db364c29
commit
1496e2cc5d
@ -5,7 +5,7 @@ clear_screens:
|
||||
|
||||
lda #$0
|
||||
jsr clear_top
|
||||
jsr clear_bottom
|
||||
jsr clear_bottom0
|
||||
|
||||
;===================================
|
||||
; Clear top/bottom of page 1
|
||||
@ -13,7 +13,7 @@ clear_screens:
|
||||
|
||||
lda #$4
|
||||
jsr clear_top
|
||||
jmp clear_bottom
|
||||
jmp clear_bottom4
|
||||
|
||||
|
||||
|
||||
@ -85,6 +85,7 @@ clear_bottoms:
|
||||
; Clear bottom of page 1
|
||||
;===================================
|
||||
|
||||
clear_bottom4:
|
||||
lda #$4
|
||||
; fall through
|
||||
|
||||
@ -95,6 +96,7 @@ clear_bottoms:
|
||||
|
||||
clear_bottom:
|
||||
sta DRAW_PAGE ; 3
|
||||
clear_bottom0:
|
||||
clc ; 2
|
||||
|
||||
adc #6 ; 2
|
||||
|
Loading…
Reference in New Issue
Block a user