pokeplatinum/res/field/scripts/scripts_valor_cavern.s
2024-08-18 08:57:35 -04:00

106 lines
1.5 KiB
ArmAsm

#include "macros/scrcmd.inc"
.data
ScriptEntry _0012
ScriptEntry _0042
ScriptEntry _0077
ScriptEntry _00D3
.short 0xFD13
_0012:
SetFlag 0x9E1
GoToIfUnset 0x15E, _002E
GoToIfSet 0x15E, _0038
End
_002E:
ScrCmd_18A 1, 10, 29
End
_0038:
ScrCmd_18A 0, 10, 29
End
_0042:
SetFlag 0x9E1
CallIfSet 142, _0069
GoToIfUnset 0x15E, _002E
GoToIfSet 0x15E, _0038
End
_0069:
SetFlag 0x1E0
ScrCmd_065 0
ClearFlag 142
Return
_0077:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
ScrCmd_04C 0x1E2, 0
Message 3
CloseMessage
SetFlag 142
ScrCmd_2BD 0x1E2, 50
ClearFlag 142
CheckWonBattle 0x800C
GoToIfEq 0x800C, 0, _00CD
CheckDidNotCapture 0x800C
GoToIfEq 0x800C, 1, _00C2
SetFlag 0x126
ReleaseAll
End
_00C2:
Message 4
WaitABXPadPress
CloseMessage
ReleaseAll
End
_00CD:
ScrCmd_0EB
ReleaseAll
End
_00D3:
PlayFanfare SEQ_SE_CONFIRM
LockAll
Message 0
CloseMessage
FacePlayer
ApplyMovement 1, _013C
WaitMovement
WaitTime 30, 0x800C
Message 1
CloseMessage
ScrCmd_0E5 0x198, 0
CheckWonBattle 0x800C
GoToIfEq 0x800C, 0, _0144
Message 2
CloseMessage
FadeScreen 6, 1, 0, 0
WaitFadeScreen
ScrCmd_065 1
SetFlag 0x13E
SetFlag 0x984
FadeScreen 6, 1, 1, 0
WaitFadeScreen
ReleaseAll
End
.balign 4, 0
_013C:
MoveAction_04B
EndMovement
_0144:
ScrCmd_0EB
ReleaseAll
End
.byte 0
.byte 0