fujirun/wipes-demo.s
2017-07-22 06:27:06 -07:00

23 lines
300 B
ArmAsm

titlepage jsr wipeclear1
jsr wipe2to1 ; copy hidden title page
ldy #$80 ; Loop a bit
?outer
ldx #$ff
?inner
nop
nop
nop
nop
nop
nop
nop
dex
bne ?inner
dey
bne ?outer
rts
titlewipe jsr wipeclear1
jsr wipe2to1
rts