pokeplatinum/res/field/scripts/scripts_resort_area.s
2024-07-22 13:38:35 -04:00

452 lines
7.0 KiB
ArmAsm

#include "macros/scrcmd.inc"
.data
ScriptEntry _00DA
ScriptEntry _00ED
ScriptEntry _0100
ScriptEntry _0130
ScriptEntry _0143
ScriptEntry _015A
ScriptEntry _0171
ScriptEntry _0184
ScriptEntry _03D4
ScriptEntry _043C
ScriptEntry _049C
ScriptEntry _04FC
ScriptEntry _055C
ScriptEntry _003E
ScriptEntry _05BC
.short 0xFD13
_003E:
SetFlag 0x2AA
SetFlag 0x2AD
SetFlag 0x2AF
SetFlag 0x2B2
SetFlag 0x2B5
GoToIfEq 0x404E, 0xFF, _00BA
GoToIfEq 0x40C8, 0, _00BA
GoToIfSet 0x9AB, _00BA
CallIfEq 0x404E, 2, _00BC
CallIfEq 0x404E, 4, _00C2
CallIfEq 0x404E, 5, _00C8
CallIfEq 0x404E, 7, _00CE
CallIfEq 0x404E, 9, _00D4
End
_00BA:
End
_00BC:
ClearFlag 0x2AA
Return
_00C2:
ClearFlag 0x2AD
Return
_00C8:
ClearFlag 0x2AF
Return
_00CE:
ClearFlag 0x2B2
Return
_00D4:
ClearFlag 0x2B5
Return
_00DA:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 0
WaitABXPadPress
CloseMessage
ReleaseAll
End
_00ED:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 1
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0100:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
CallIfUnset 250, _0126
CallIfSet 250, _012B
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0126:
Message 2
Return
_012B:
Message 3
Return
_0130:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 4
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0143:
ScrCmd_036 25, 0, 0, 0x800C
ScrCmd_038 3
ScrCmd_039
ScrCmd_03B 0x800C
CallCommonScript 0x7D0
End
_015A:
ScrCmd_036 26, 2, 0, 0x800C
ScrCmd_038 3
ScrCmd_039
ScrCmd_03B 0x800C
CallCommonScript 0x7D0
End
_0171:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 5
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0184:
LockAll
GetPlayerMapPos 0x8004, 0x8005
CallIfEq 0x8005, 0x1D8, _0266
CallIfEq 0x8005, 0x1D9, _0272
CallIfEq 0x8005, 0x1DA, _0274
Message 6
ScrCmd_03E 0x800C
GoToIfEq 0x800C, 1, _02BC
ScrCmd_30C
Message 7
CloseMessage
CallIfEq 0x8005, 0x1D8, _0280
CallIfEq 0x8005, 0x1D9, _0294
CallIfEq 0x8005, 0x1DA, _02A8
Message 9
CloseMessage
ApplyMovement 13, _0388
WaitMovement
ScrCmd_168 25, 14, 22, 21, 77
ScrCmd_16B 77
ScrCmd_169 77
ApplyMovement 13, _0390
ApplyMovement 0xFF, _03C0
WaitMovement
ScrCmd_16C 77
ScrCmd_169 77
ScrCmd_16A 77
ScrCmd_065 13
SetVar 0x40C8, 1
SetVar 0x404E, 0xFF
FadeScreen 6, 1, 0, 0
WaitFadeScreen
Warp MAP_HEADER_VILLA, 0, 10, 6, 2
FadeScreen 6, 1, 1, 0
WaitFadeScreen
End
_0266:
ApplyMovement 13, _0328
WaitMovement
Return
_0272:
Return
_0274:
ApplyMovement 13, _0334
WaitMovement
Return
_0280:
ApplyMovement 13, _0358
ApplyMovement 0xFF, _039C
WaitMovement
Return
_0294:
ApplyMovement 13, _0368
ApplyMovement 0xFF, _03A8
WaitMovement
Return
_02A8:
ApplyMovement 13, _0378
ApplyMovement 0xFF, _03B4
WaitMovement
Return
_02BC:
Message 8
CloseMessage
GetPlayerMapPos 0x8004, 0x8005
CallIfEq 0x8005, 0x1D8, _02F2
CallIfEq 0x8005, 0x1D9, _0306
CallIfEq 0x8005, 0x1DA, _0312
ReleaseAll
End
_02F2:
ApplyMovement 13, _0340
ApplyMovement 0xFF, _03CC
WaitMovement
Return
_0306:
ApplyMovement 0xFF, _03CC
WaitMovement
Return
_0312:
ApplyMovement 13, _034C
ApplyMovement 0xFF, _03CC
WaitMovement
Return
.balign 4, 0
_0328:
MoveAction_00C
MoveAction_022
EndMovement
.balign 4, 0
_0334:
MoveAction_00D
MoveAction_022
EndMovement
.balign 4, 0
_0340:
MoveAction_00D
MoveAction_022
EndMovement
.balign 4, 0
_034C:
MoveAction_00C
MoveAction_022
EndMovement
.balign 4, 0
_0358:
MoveAction_00F 6
MoveAction_00C 2
MoveAction_021
EndMovement
.balign 4, 0
_0368:
MoveAction_00F 6
MoveAction_00C 3
MoveAction_021
EndMovement
.balign 4, 0
_0378:
MoveAction_00F 6
MoveAction_00C 4
MoveAction_021
EndMovement
.balign 4, 0
_0388:
MoveAction_020
EndMovement
.balign 4, 0
_0390:
MoveAction_00C
MoveAction_045
EndMovement
.balign 4, 0
_039C:
MoveAction_00F 7
MoveAction_00C
EndMovement
.balign 4, 0
_03A8:
MoveAction_00F 7
MoveAction_00C 2
EndMovement
.balign 4, 0
_03B4:
MoveAction_00F 7
MoveAction_00C 3
EndMovement
.balign 4, 0
_03C0:
MoveAction_00C 2
MoveAction_045
EndMovement
.balign 4, 0
_03CC:
MoveAction_00E
EndMovement
_03D4:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 10
ScrCmd_03E 0x800C
GoToIfEq 0x800C, 1, _0429
Message 11
CloseMessage
SetFlag 0x2AA
SetVar 0x404E, 2
SetFlag 0x9AB
FadeScreen 6, 1, 0, 0
WaitFadeScreen
Warp MAP_HEADER_VILLA, 0, 11, 11, 0
FadeScreen 6, 1, 1, 0
WaitFadeScreen
End
_0429:
Message 12
GoTo _0434
End
_0434:
WaitABXPadPress
CloseMessage
ReleaseAll
End
_043C:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 13
ScrCmd_03E 0x800C
GoToIfEq 0x800C, 1, _0491
Message 14
CloseMessage
SetFlag 0x2AD
SetVar 0x404E, 4
SetFlag 0x9AB
FadeScreen 6, 1, 0, 0
WaitFadeScreen
Warp MAP_HEADER_VILLA, 0, 11, 11, 0
FadeScreen 6, 1, 1, 0
WaitFadeScreen
End
_0491:
Message 15
GoTo _0434
End
_049C:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 16
ScrCmd_03E 0x800C
GoToIfEq 0x800C, 1, _04F1
Message 17
CloseMessage
SetFlag 0x2AF
SetVar 0x404E, 5
SetFlag 0x9AB
FadeScreen 6, 1, 0, 0
WaitFadeScreen
Warp MAP_HEADER_VILLA, 0, 11, 11, 0
FadeScreen 6, 1, 1, 0
WaitFadeScreen
End
_04F1:
Message 18
GoTo _0434
End
_04FC:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 19
ScrCmd_03E 0x800C
GoToIfEq 0x800C, 1, _0551
Message 20
CloseMessage
SetFlag 0x2B2
SetVar 0x404E, 7
SetFlag 0x9AB
FadeScreen 6, 1, 0, 0
WaitFadeScreen
Warp MAP_HEADER_VILLA, 0, 11, 11, 0
FadeScreen 6, 1, 1, 0
WaitFadeScreen
End
_0551:
Message 21
GoTo _0434
End
_055C:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 22
ScrCmd_03E 0x800C
GoToIfEq 0x800C, 1, _05B1
Message 23
CloseMessage
SetFlag 0x2B5
SetVar 0x404E, 9
SetFlag 0x9AB
FadeScreen 6, 1, 0, 0
WaitFadeScreen
Warp MAP_HEADER_VILLA, 0, 11, 11, 0
FadeScreen 6, 1, 1, 0
WaitFadeScreen
End
_05B1:
Message 24
GoTo _0434
End
_05BC:
ScrCmd_036 27, 2, 0, 0x800C
ScrCmd_038 3
ScrCmd_039
ScrCmd_03B 0x800C
CallCommonScript 0x7D0
End
.byte 0