diff options
Diffstat (limited to 'src/engine/sequences')
| -rw-r--r-- | src/engine/sequences/credits_sequence_commands.asm | 21 | ||||
| -rw-r--r-- | src/engine/sequences/opening_sequence_commands.asm | 15 |
2 files changed, 19 insertions, 17 deletions
diff --git a/src/engine/sequences/credits_sequence_commands.asm b/src/engine/sequences/credits_sequence_commands.asm index 630760e..dece700 100644 --- a/src/engine/sequences/credits_sequence_commands.asm +++ b/src/engine/sequences/credits_sequence_commands.asm @@ -1,21 +1,22 @@ -Func_1d7fc: ; 1d7fc (7:57fc)
+SetCreditsSequenceCmdPtr: ; 1d7fc (7:57fc)
ld a, LOW(CreditsSequence)
ld [wSequenceCmdPtr + 0], a
ld a, HIGH(CreditsSequence)
ld [wSequenceCmdPtr + 1], a
xor a
- ld [wd633], a
+ ld [wSequenceDelay], a
ret
; 0x1d80b
-Func_1d80b: ; 1d80b (7:580b)
- ld a, [wd633]
+ExecuteCreditsSequenceCmd: ; 1d80b (7:580b)
+ ld a, [wSequenceDelay]
or a
jr z, .call_func
cp $ff
- ret z
- dec a
- ld [wd633], a
+ ret z ; sequence ended
+
+ dec a ; still waiting
+ ld [wSequenceDelay], a
ret
.call_func
@@ -38,7 +39,7 @@ Func_1d80b: ; 1d80b (7:580b) ld d, a
pop hl
call CallHL2
- jr Func_1d80b
+ jr ExecuteCreditsSequenceCmd
; 0x1d834
ret ; stray ret
@@ -77,7 +78,7 @@ AdvanceCreditsSequenceCmdPtr: ; 1d847 (7:5847) CreditsSequenceCmd_Wait: ; 1d853 (7:5853)
ld a, c
- ld [wd633], a
+ ld [wSequenceDelay], a
jp AdvanceCreditsSequenceCmdPtrBy3
; 0x1d85a
@@ -453,7 +454,7 @@ CreditsSequenceCmd_TransformOverlay: ; 1daa5 (7:5aa5) or a
jr z, .advance_sequence
ld a, $01
- ld [wd633], a
+ ld [wSequenceDelay], a
ret
.advance_sequence
diff --git a/src/engine/sequences/opening_sequence_commands.asm b/src/engine/sequences/opening_sequence_commands.asm index 6f82387..be8639d 100644 --- a/src/engine/sequences/opening_sequence_commands.asm +++ b/src/engine/sequences/opening_sequence_commands.asm @@ -1,11 +1,12 @@ -Func_1d408: ; 1d408 (7:5408)
- ld a, [wd633]
+ExecuteOpeningSequenceCmd: ; 1d408 (7:5408)
+ ld a, [wSequenceDelay]
or a
jr z, .call_function
cp $ff
- ret z
- dec a
- ld [wd633], a
+ ret z ; sequence ended
+
+ dec a ; still waiting
+ ld [wSequenceDelay], a
ret
.call_function
@@ -24,7 +25,7 @@ Func_1d408: ; 1d408 (7:5408) ld l, e
ld h, d
call CallHL2
- jr c, Func_1d408
+ jr c, ExecuteOpeningSequenceCmd
ret
; 0x1d42e
@@ -75,7 +76,7 @@ OpeningSequenceCmd_WaitOrbsAnimation: ; 1d444 (7:5444) OpeningSequenceCmd_Wait: ; 1d460 (7:5460)
ld a, c
- ld [wd633], a
+ ld [wSequenceDelay], a
call AdvanceOpeningSequenceCmdPtrBy3
scf
ret
|