pokeplatinum/res/field/scripts/scripts_eterna_forest.s
2024-11-03 16:08:01 -08:00

453 lines
6.6 KiB
ArmAsm

#include "macros/scrcmd.inc"
.data
ScriptEntry _0047
ScriptEntry _0108
ScriptEntry _0198
ScriptEntry _03EC
ScriptEntry _03F5
ScriptEntry _03FE
ScriptEntry _0411
ScriptEntry _04E0
ScriptEntry _04F7
ScriptEntry _050C
ScriptEntry _0032
ScriptEntry _051D
.short 0xFD13
_0032:
GoToIfUnset 227, _003F
End
_003F:
SetVar 0x40B1, 0
End
_0047:
LockAll
SetPlayerBike 0
GetPlayerMapPos 0x8004, 0x8005
GoToIfEq 0x8004, 28, _006E
GoToIfEq 0x8004, 29, _007E
End
_006E:
ApplyMovement 0, _00E8
WaitMovement
GoTo _008E
_007E:
ApplyMovement 0, _00F4
WaitMovement
GoTo _008E
_008E:
CallIfUnset 139, _00D8
CallIfSet 139, _00E0
BufferPlayerName 0
PlaySound SEQ_GONIN
Message 1
WaitSound
SetFlag 139
SetVar 0x40B1, 1
Message 2
WaitABXPadPress
CloseMessage
SetVar 0x403F, 0x260
SetHasPartner
ScrCmd_06D 0, 48
ScrCmd_06C 0, 1
ReleaseAll
End
_00D8:
BufferPlayerName 0
Message 0
Return
_00E0:
BufferPlayerName 0
Message 3
Return
.balign 4, 0
_00E8:
MoveAction_099
MoveAction_00D
EndMovement
.balign 4, 0
_00F4:
MoveAction_099
MoveAction_00D
MoveAction_00F
MoveAction_021
EndMovement
_0108:
LockAll
ClearHasPartner
ScrCmd_06D 0, 15
ScrCmd_06C 0, 0
ApplyMovement 0, _0190
WaitMovement
Message 4
CloseMessage
GetPlayerMapPos 0x8004, 0x8005
GoToIfEq 0x8004, 28, _0148
GoToIfEq 0x8004, 29, _0158
End
_0148:
ApplyMovement 0, _0174
WaitMovement
GoTo _0168
_0158:
ApplyMovement 0, _0180
WaitMovement
GoTo _0168
_0168:
SetVar 0x40B1, 0
ReleaseAll
End
.balign 4, 0
_0174:
MoveAction_00C 2
MoveAction_021
EndMovement
.balign 4, 0
_0180:
MoveAction_00C 2
MoveAction_00E
MoveAction_021
EndMovement
.balign 4, 0
_0190:
MoveAction_021
EndMovement
_0198:
LockAll
ApplyMovement 0, _0300
ApplyMovement 0xFF, _0368
WaitMovement
BufferPlayerName 0
Message 5
SetVar 0x8004, 218
SetVar 0x8005, 1
ScrCmd_07D 0x8004, 0x8005, 0x800C
GoToIfEq 0x800C, 0, _01EA
GoTo _01DB
End
_01DB:
Message 6
CallCommonScript 0x7E0
GoTo _01EA
End
_01EA:
CloseMessage
GetPlayerMapPos 0x8004, 0x8005
GoToIfEq 0x8005, 34, _023B
GoToIfEq 0x8005, 35, _0253
GoToIfEq 0x8005, 36, _026B
GoToIfEq 0x8005, 37, _0283
GoToIfEq 0x8005, 38, _029B
GoTo _02B3
End
_023B:
ApplyMovement 0, _030C
ApplyMovement 0xFF, _0374
WaitMovement
GoTo _02CB
_0253:
ApplyMovement 0, _0318
ApplyMovement 0xFF, _0388
WaitMovement
GoTo _02CB
_026B:
ApplyMovement 0, _0324
ApplyMovement 0xFF, _039C
WaitMovement
GoTo _02CB
_0283:
ApplyMovement 0, _0330
ApplyMovement 0xFF, _03B0
WaitMovement
GoTo _02CB
_029B:
ApplyMovement 0, _033C
ApplyMovement 0xFF, _03C4
WaitMovement
GoTo _02CB
_02B3:
ApplyMovement 0, _0348
ApplyMovement 0xFF, _03D8
WaitMovement
GoTo _02CB
_02CB:
ApplyMovement 0, _0354
WaitMovement
Message 7
CloseMessage
ApplyMovement 0, _035C
WaitMovement
PlayFanfare SEQ_SE_DP_KAIDAN2
ClearHasPartner
ScrCmd_065 0
WaitFanfare SEQ_SE_DP_KAIDAN2
SetFlag 227
SetVar 0x40B1, 2
ReleaseAll
End
.balign 4, 0
_0300:
MoveAction_023
MoveAction_099
EndMovement
.balign 4, 0
_030C:
MoveAction_00D 2
MoveAction_00F 5
EndMovement
.balign 4, 0
_0318:
MoveAction_00D
MoveAction_00F 5
EndMovement
.balign 4, 0
_0324:
MoveAction_00D
MoveAction_00F 5
EndMovement
.balign 4, 0
_0330:
MoveAction_00C
MoveAction_00F 5
EndMovement
.balign 4, 0
_033C:
MoveAction_00C
MoveAction_00F 5
EndMovement
.balign 4, 0
_0348:
MoveAction_00C 2
MoveAction_00F 5
EndMovement
.balign 4, 0
_0354:
MoveAction_022
EndMovement
.balign 4, 0
_035C:
MoveAction_03F
MoveAction_023
EndMovement
.balign 4, 0
_0368:
MoveAction_03F 3
MoveAction_022
EndMovement
.balign 4, 0
_0374:
MoveAction_03F 2
MoveAction_021
MoveAction_03F
MoveAction_023
EndMovement
.balign 4, 0
_0388:
MoveAction_03F
MoveAction_021
MoveAction_03F
MoveAction_023
EndMovement
.balign 4, 0
_039C:
MoveAction_03F
MoveAction_021
MoveAction_03F
MoveAction_023
EndMovement
.balign 4, 0
_03B0:
MoveAction_03F
MoveAction_020
MoveAction_03F
MoveAction_023
EndMovement
.balign 4, 0
_03C4:
MoveAction_03F
MoveAction_020
MoveAction_03F
MoveAction_023
EndMovement
.balign 4, 0
_03D8:
MoveAction_03F 2
MoveAction_020
MoveAction_03F
MoveAction_023
EndMovement
_03EC:
LockAll
BufferPlayerName 0
ReleaseAll
End
_03F5:
LockAll
BufferPlayerName 0
ReleaseAll
End
_03FE:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 9
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0411:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 11
CloseMessage
ApplyMovement 24, _04BC
WaitMovement
Message 12
FacePlayer
Message 13
CloseMessage
ScrCmd_1BD 0x800C
GoToIfEq 0x800C, 0, _046C
GoToIfEq 0x800C, 1, _047E
GoToIfEq 0x800C, 2, _0490
GoToIfEq 0x800C, 3, _04A2
End
_046C:
ApplyMovement 24, _04D0
WaitMovement
GoTo _04B4
End
_047E:
ApplyMovement 24, _04C4
WaitMovement
GoTo _04B4
End
_0490:
ApplyMovement 24, _04C4
WaitMovement
GoTo _04B4
End
_04A2:
ApplyMovement 24, _04C4
WaitMovement
GoTo _04B4
End
_04B4:
ScrCmd_065 24
ReleaseAll
End
.balign 4, 0
_04BC:
MoveAction_020
EndMovement
.balign 4, 0
_04C4:
MoveAction_00D 2
MoveAction_00F 9
EndMovement
.balign 4, 0
_04D0:
MoveAction_00E
MoveAction_00D 2
MoveAction_00F 10
EndMovement
_04E0:
ScrCmd_036 14, 2, 0, 0x800C
ScrCmd_038 3
ScrCmd_039
ScrCmd_03B 0x800C
CallCommonScript 0x7D0
End
_04F7:
ScrCmd_037 3, 0
ScrCmd_038 3
ScrCmd_039
ScrCmd_03A 15, 0x800C
CallCommonScript 0x7D0
End
_050C:
PlayFanfare SEQ_SE_CONFIRM
LockAll
Message 10
WaitABXPadPress
CloseMessage
ReleaseAll
End
_051D:
LockAll
SetVar 0x40CD, 2
ApplyMovement 0, _053C
WaitMovement
Message 8
WaitABXPadPress
CloseMessage
ReleaseAll
End
.balign 4, 0
_053C:
MoveAction_020
EndMovement