mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-02-10 10:30:57 +00:00
22 lines
216 B
ArmAsm
22 lines
216 B
ArmAsm
;==========
|
|
; gr flip page
|
|
;==========
|
|
gr_flip_page:
|
|
lda DRAW_PAGE
|
|
beq gr_draw_page2
|
|
gr_draw_page1:
|
|
bit PAGE2
|
|
lda #0
|
|
|
|
beq gr_done_flip
|
|
|
|
gr_draw_page2:
|
|
bit PAGE1
|
|
lda #$4
|
|
|
|
gr_done_flip:
|
|
sta DRAW_PAGE
|
|
|
|
rts
|
|
|