mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-01-16 11:30:55 +00:00
18 lines
319 B
ArmAsm
18 lines
319 B
ArmAsm
|
;============================
|
||
|
|
; flip pages
|
||
|
|
;============================
|
||
|
|
flip_pages:
|
||
|
|
lda DRAW_PAGE ; 3
|
||
|
|
beq was_page1 ; 2/3
|
||
|
|
was_page2:
|
||
|
|
bit PAGE2 ; 4
|
||
|
|
lda #$0 ; 2
|
||
|
|
beq done_pageflip ; 2/3
|
||
|
|
was_page1:
|
||
|
|
bit PAGE1 ; 4
|
||
|
|
lda #$4 ; 2
|
||
|
|
done_pageflip:
|
||
|
|
sta DRAW_PAGE ; 3
|
||
|
|
|
||
|
|
rts
|