mirror of
https://github.com/Pecusx/Young-lumberjack.git
synced 2026-05-21 21:34:35 +02:00
Opty.
This commit is contained in:
+8
-28
@@ -1648,38 +1648,18 @@ no_branch_l
|
|||||||
;--------------------------------------------------
|
;--------------------------------------------------
|
||||||
.proc AnimateGoLine
|
.proc AnimateGoLine
|
||||||
;--------------------------------------------------
|
;--------------------------------------------------
|
||||||
; .... 3 ....
|
ldy #4 ; 4 lines
|
||||||
ldy #15
|
next_line
|
||||||
@ inw go_addr
|
; .... 3 , 2 , 1 , GO! ....
|
||||||
|
ldx #16 ; 32 characters
|
||||||
|
@ inw go_addr
|
||||||
inw go_addr
|
inw go_addr
|
||||||
WaitForSync
|
WaitForSync
|
||||||
dey
|
dex
|
||||||
bpl @-
|
bne @-
|
||||||
pause 25
|
pause 25
|
||||||
; .... 2 ....
|
|
||||||
ldy #15
|
|
||||||
@ inw go_addr
|
|
||||||
inw go_addr
|
|
||||||
WaitForSync
|
|
||||||
dey
|
dey
|
||||||
bpl @-
|
bne next_line
|
||||||
pause 25
|
|
||||||
; .... 1 ....
|
|
||||||
ldy #15
|
|
||||||
@ inw go_addr
|
|
||||||
inw go_addr
|
|
||||||
WaitForSync
|
|
||||||
dey
|
|
||||||
bpl @-
|
|
||||||
pause 25
|
|
||||||
; .... go! ....
|
|
||||||
ldy #15
|
|
||||||
@ inw go_addr
|
|
||||||
inw go_addr
|
|
||||||
WaitForSync
|
|
||||||
dey
|
|
||||||
bpl @-
|
|
||||||
pause 25
|
|
||||||
rts
|
rts
|
||||||
.endp
|
.endp
|
||||||
;--------------------------------------------------
|
;--------------------------------------------------
|
||||||
|
|||||||
BIN
Binary file not shown.
Reference in New Issue
Block a user