sb: properly page flip

This commit is contained in:
Vince Weaver 2023-03-15 02:02:51 -04:00
parent aaed2d1b39
commit cc4f67099e
1 changed files with 13 additions and 1 deletions

View File

@ -40,9 +40,13 @@ duck_pond:
bit SET_GR
bit PAGE1
lda #$0
lda #$4
sta DRAW_PAGE
lda #$0
sta FRAME
sta FRAMEH
sta DISP_PAGE
;===================
; TITLE SCREEN
@ -63,6 +67,8 @@ title_screen:
bit TEXTGR
jsr page_flip
wait_until_keypress:
lda KEYPRESS ; 4
bpl wait_until_keypress ; 3
@ -180,6 +186,12 @@ check_bracket:
done_keyboard:
; increment frame
inc FRAME
bne frame_noflo
inc FRAMEH
frame_noflo:
done_loop: