mirror of
https://github.com/pret/pokeplatinum.git
synced 2026-04-26 00:32:20 -05:00
55 lines
1.1 KiB
ArmAsm
55 lines
1.1 KiB
ArmAsm
#include "macros/scrcmd.inc"
|
|
#include "res/text/bank/fullmoon_island_forest.h"
|
|
|
|
|
|
ScriptEntry _000A
|
|
ScriptEntry _000C
|
|
ScriptEntryEnd
|
|
|
|
_000A:
|
|
End
|
|
|
|
_000C:
|
|
PlayFanfare SEQ_SE_CONFIRM
|
|
LockAll
|
|
FacePlayer
|
|
DrawPokemonPreview SPECIES_CRESSELIA, GENDER_FEMALE
|
|
WaitABPress
|
|
ScrCmd_209
|
|
PlayCry SPECIES_CRESSELIA
|
|
GetPlayerDir VAR_RESULT
|
|
CallIfEq VAR_RESULT, 0, _007E
|
|
ReleaseObject 0
|
|
ScrCmd_26A 0, 6, 8
|
|
LockObject 0
|
|
SetFlag FLAG_HIDE_FULLMOON_ISLAND_FOREST_CRESSELIA
|
|
RemoveObject 0
|
|
ActivateRoamingPokemon ROAMING_SLOT_CRESSELIA
|
|
GoToIfEq VAR_ROAMING_CRESSELIA_STATE, ROAMER_STATE_RESET, _0074
|
|
ClearFlag FLAG_OBTAINED_FULLMOON_ISLAND_FOREST
|
|
AddObject 1
|
|
SetFlag FLAG_UNK_0x011F
|
|
Message 0
|
|
WaitABXPadPress
|
|
CloseMessage
|
|
ReleaseAll
|
|
End
|
|
|
|
_0074:
|
|
SetVar VAR_ROAMING_CRESSELIA_STATE, ROAMER_STATE_ROAMING
|
|
ReleaseAll
|
|
End
|
|
|
|
_007E:
|
|
SetObjectEventPos 1, 16, 14
|
|
ApplyMovement 0, _0094
|
|
WaitMovement
|
|
Return
|
|
|
|
.balign 4, 0
|
|
_0094:
|
|
LockDir
|
|
WalkNormalNorth
|
|
UnlockDir
|
|
EndMovement
|