dos33fsprogs/demos/second/hgr_page_flip.s
2023-10-29 20:27:56 -04:00

19 lines
206 B
ArmAsm

hgr_page_flip:
lda DRAW_PAGE
beq flip_to_page1
flip_to_page2:
bit PAGE2
lda #0
beq done_hgr_page_flip ; bra
flip_to_page1:
bit PAGE1
lda #$20
done_hgr_page_flip:
sta DRAW_PAGE
rts