pokeplatinum/res/field/scripts/scripts_wifi_plaza_entrance.s

182 lines
2.9 KiB
ArmAsm

#include "macros/scrcmd.inc"
#include "res/text/bank/wifi_plaza_entrance.h"
#include "constants/map_object.h"
ScriptEntry _0006
ScriptEntryEnd
_0006:
LockAll
GetRandom VAR_0x8000, 5
SetVar VAR_0x8008, VAR_0x8000
GoToIfEq VAR_0x8008, 0, _0057
GoToIfEq VAR_0x8008, 1, _0071
GoToIfEq VAR_0x8008, 2, _008B
GoToIfEq VAR_0x8008, 3, _00A5
GoToIfEq VAR_0x8008, 4, _00BF
End
_0057:
ApplyMovement LOCALID_PLAYER, _0148
ApplyMovement 0, _01F0
WaitMovement
GoTo _00D9
End
_0071:
ApplyMovement LOCALID_PLAYER, _0154
ApplyMovement 0, _0200
WaitMovement
GoTo _00D9
End
_008B:
ApplyMovement LOCALID_PLAYER, _0160
ApplyMovement 0, _0210
WaitMovement
GoTo _00D9
End
_00A5:
ApplyMovement LOCALID_PLAYER, _016C
ApplyMovement 0, _0220
WaitMovement
GoTo _00D9
End
_00BF:
ApplyMovement LOCALID_PLAYER, _0178
ApplyMovement 0, _0230
WaitMovement
GoTo _00D9
End
_00D9:
Message 0
WaitABPress
CloseMessage
ApplyMovement LOCALID_PLAYER, _0184
ApplyMovement 0, _0240
WaitMovement
PlayFanfare SEQ_SE_DP_TELE2
ApplyMovement LOCALID_PLAYER, _01E8
WaitMovement
FadeScreenOut
WaitFadeScreen
SetVar VAR_MAP_LOCAL_3, 1
Warp 0x405C, 0, 5, 2, 1
WaitForTransition
ScrCmd_0B3 VAR_RESULT
SetVar VAR_0x8004, VAR_RESULT
ScrCmd_2F7 VAR_0x8004
ReturnToField
SetVar VAR_UNK_0x4080, 1
HideObject LOCALID_PLAYER
FadeScreenIn
WaitFadeScreen
End
.balign 4, 0
_0148:
WalkNormalNorth 7
WalkNormalWest 11
EndMovement
.balign 4, 0
_0154:
WalkNormalNorth 7
WalkNormalWest 9
EndMovement
.balign 4, 0
_0160:
WalkNormalNorth 7
WalkNormalWest 7
EndMovement
.balign 4, 0
_016C:
WalkNormalNorth 7
WalkNormalWest 5
EndMovement
.balign 4, 0
_0178:
WalkNormalNorth 7
WalkNormalWest 3
EndMovement
.balign 4, 0
_0184:
WalkNormalNorth
FaceWest
Delay2
FaceSouth
Delay2
FaceEast
Delay2
FaceNorth
Delay2
FaceWest
Delay2
FaceSouth
Delay2
FaceEast
Delay2
FaceNorth
Delay2
FaceWest
Delay2
FaceSouth
Delay2
FaceEast
Delay2
FaceNorth
EndMovement
.balign 4, 0
_01E8:
WarpOut
EndMovement
.balign 4, 0
_01F0:
WalkNormalNorth 6
WalkNormalWest 12
WalkOnSpotNormalEast
EndMovement
.balign 4, 0
_0200:
WalkNormalNorth 6
WalkNormalWest 10
WalkOnSpotNormalEast
EndMovement
.balign 4, 0
_0210:
WalkNormalNorth 6
WalkNormalWest 8
WalkOnSpotNormalEast
EndMovement
.balign 4, 0
_0220:
WalkNormalNorth 6
WalkNormalWest 6
WalkOnSpotNormalEast
EndMovement
.balign 4, 0
_0230:
WalkNormalNorth 6
WalkNormalWest 4
WalkOnSpotNormalEast
EndMovement
.balign 4, 0
_0240:
WalkOnSpotNormalNorth
EndMovement