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

206 lines
3.0 KiB
ArmAsm

#include "macros/scrcmd.inc"
.data
ScriptEntry _001E
ScriptEntry _004E
ScriptEntry _01B0
ScriptEntry _01C3
ScriptEntry _01EC
ScriptEntry _0203
ScriptEntry _021A
.short 0xFD13
_001E:
GetPlayerGender 0x4000
GoToIfEq 0x4000, 0, _003E
GoToIfEq 0x4000, 1, _0046
End
_003E:
SetVar 0x4020, 97
End
_0046:
SetVar 0x4020, 0
End
_004E:
LockAll
GetPlayerMapPos 0x8004, 0x8005
ScrCmd_186 18, 0x14B, 0x8005
Call _008E
ApplyMovement 18, _0194
WaitMovement
CallCommonScript 0x7F8
ApplyMovement 18, _01A0
WaitMovement
ApplyMovement 0xFF, _0174
WaitMovement
GoTo _009C
End
_008E:
ClearFlag 0x1CC
ScrCmd_064 18
ScrCmd_062 18
Return
_009C:
GetPlayerGender 0x800C
GoToIfEq 0x800C, 0, _00B3
GoTo _00F1
_00B3:
BufferPlayerName 0
Message 0
ScrCmd_044 30, 13, 0, 0, 0x800C
ScrCmd_33A 1
ScrCmd_046 137, 0xFF, 0
ScrCmd_046 138, 0xFF, 1
ScrCmd_047
Message 1
Call _012F
Message 2
Call _0145
Message 3
GoTo _0156
_00F1:
BufferPlayerName 0
Message 4
ScrCmd_044 30, 13, 0, 0, 0x800C
ScrCmd_33A 1
ScrCmd_046 137, 0xFF, 0
ScrCmd_046 138, 0xFF, 1
ScrCmd_047
Message 5
Call _012F
Message 6
Call _0145
Message 7
GoTo _0156
_012F:
SetFlag 0x97F
SetVar 0x8004, 0x1BB
SetVar 0x8005, 1
CallCommonScript 0x7FC
Return
_0145:
SetVar 0x8004, 6
CallCommonScript 0x7D9
BufferPoketchAppName 1, POKETCH_APPID_DOWSINGMACHINE
Return
_0156:
CloseMessage
ApplyMovement 18, _01A8
WaitMovement
ScrCmd_065 18
CallCommonScript 0x7F9
SetVar 0x408C, 1
ReleaseAll
End
.balign 4, 0
_0174:
MoveAction_022
EndMovement
.byte 63
.byte 0
.byte 8
.byte 0
.byte 34
.byte 0
.byte 1
.byte 0
.byte 254
.byte 0
.byte 0
.byte 0
.byte 63
.byte 0
.byte 1
.byte 0
.byte 32
.byte 0
.byte 1
.byte 0
.byte 254
.byte 0
.byte 0
.byte 0
.balign 4, 0
_0194:
MoveAction_00F 3
MoveAction_04B
EndMovement
.balign 4, 0
_01A0:
MoveAction_00F 5
EndMovement
.balign 4, 0
_01A8:
MoveAction_00E 8
EndMovement
_01B0:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message 8
WaitABXPadPress
CloseMessage
ReleaseAll
End
_01C3:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
GoToIfSet 130, _01E1
Message 9
WaitABXPadPress
CloseMessage
ReleaseAll
End
_01E1:
Message 10
WaitABXPadPress
CloseMessage
ReleaseAll
End
_01EC:
ScrCmd_036 11, 1, 0, 0x800C
ScrCmd_038 3
ScrCmd_039
ScrCmd_03B 0x800C
CallCommonScript 0x7D0
End
_0203:
ScrCmd_036 12, 1, 0, 0x800C
ScrCmd_038 3
ScrCmd_039
ScrCmd_03B 0x800C
CallCommonScript 0x7D0
End
_021A:
ScrCmd_037 3, 0
ScrCmd_038 3
ScrCmd_039
ScrCmd_03A 13, 0x800C
CallCommonScript 0x7D0
End
.byte 0