sb: keyboard early out
This commit is contained in:
parent
960339242d
commit
7fbebb9895
|
@ -1,10 +1,10 @@
|
|||
;================================
|
||||
; HGR vscroll
|
||||
; HGR logo vscroll
|
||||
;================================
|
||||
; image to scroll in is in $4000
|
||||
;
|
||||
|
||||
hgr_vscroll:
|
||||
hgr_logo_vscroll:
|
||||
|
||||
ldx #191 ; 2
|
||||
stx SCROLL ; SCROLL = 0 ; 3
|
||||
|
@ -79,10 +79,19 @@ vscroll_out_smc:
|
|||
|
||||
done_scroll:
|
||||
|
||||
;=====================
|
||||
; exit early if keypress
|
||||
|
||||
lda KEYPRESS
|
||||
bmi vscroll_early_exit
|
||||
|
||||
;=====================
|
||||
; scroll whole screen
|
||||
|
||||
dec SCROLL
|
||||
bne vscroll_loop
|
||||
|
||||
vscroll_early_exit:
|
||||
bit KEYRESET
|
||||
|
||||
rts
|
||||
|
|
|
@ -98,7 +98,7 @@ scroll_logo:
|
|||
; scroll up vertically
|
||||
;======================
|
||||
|
||||
jsr hgr_vscroll
|
||||
jsr hgr_logo_vscroll
|
||||
|
||||
|
||||
;===================
|
||||
|
|
Loading…
Reference in New Issue