mirror of
https://github.com/pret/pokeplatinum.git
synced 2026-08-15 13:54:02 -05:00
134 lines
3.4 KiB
ArmAsm
134 lines
3.4 KiB
ArmAsm
#include "macros/scrcmd.inc"
|
|
#include "res/text/bank/verity_cavern.h"
|
|
|
|
#define LOCALID_MESPRIT 0
|
|
#define LOCALID_ROWAN 1
|
|
|
|
.data
|
|
|
|
ScriptEntry _000A
|
|
ScriptEntry VerityCavern_Mesprit
|
|
ScriptEntryEnd
|
|
|
|
_000A:
|
|
SetFlag FLAG_UNK_0x09DF
|
|
End
|
|
|
|
VerityCavern_Mesprit:
|
|
PlayFanfare SEQ_SE_CONFIRM
|
|
LockAll
|
|
FacePlayer
|
|
DrawPokemonPreview SPECIES_MESPRIT, GENDER_MALE
|
|
WaitABPress
|
|
ScrCmd_209
|
|
PlayCry SPECIES_MESPRIT
|
|
Message VerityCavern_Text_MespritCry
|
|
CloseMessage
|
|
SetFlag FLAG_MESPRIT_DISAPPEARED
|
|
RemoveObject LOCALID_MESPRIT
|
|
WaitTime 8, VAR_RESULT
|
|
ClearFlag FLAG_MESPRIT_DISAPPEARED
|
|
AddObject LOCALID_MESPRIT
|
|
WaitTime 8, VAR_RESULT
|
|
SetFlag FLAG_MESPRIT_DISAPPEARED
|
|
RemoveObject LOCALID_MESPRIT
|
|
WaitTime 8, VAR_RESULT
|
|
ClearFlag FLAG_MESPRIT_DISAPPEARED
|
|
AddObject LOCALID_MESPRIT
|
|
WaitTime 8, VAR_RESULT
|
|
SetFlag FLAG_MESPRIT_DISAPPEARED
|
|
RemoveObject LOCALID_MESPRIT
|
|
WaitTime 8, VAR_RESULT
|
|
ClearFlag FLAG_MESPRIT_DISAPPEARED
|
|
AddObject LOCALID_MESPRIT
|
|
WaitTime 8, VAR_RESULT
|
|
SetFlag FLAG_MESPRIT_DISAPPEARED
|
|
RemoveObject LOCALID_MESPRIT
|
|
ActivateRoamingPokemon ROAMING_SLOT_MESPRIT
|
|
Message VerityCavern_Text_MespritFlewOff
|
|
CloseMessage
|
|
GoToIfEq VAR_ROAMING_MESPRIT_STATE, 3, VerityCavern_ResetRoamingMespritState
|
|
WaitTime 30, VAR_RESULT
|
|
GetPlayerDir VAR_RESULT
|
|
GoToIfEq VAR_RESULT, DIR_NORTH, VerityCavern_EnterProfessorRowanNorth
|
|
GoToIfEq VAR_RESULT, DIR_SOUTH, VerityCavern_EnterProfessorRowanSouth
|
|
GoToIfEq VAR_RESULT, DIR_WEST, VerityCavern_EnterProfessorRowanWest
|
|
GoToIfEq VAR_RESULT, DIR_EAST, VerityCavern_EnterProfessorRowanEast
|
|
End
|
|
|
|
VerityCavern_EnterProfessorRowanNorth:
|
|
SetObjectEventPos LOCALID_ROWAN, 12, 22
|
|
GoTo VerityCavern_EnterProfessorRowan
|
|
End
|
|
|
|
VerityCavern_EnterProfessorRowanSouth:
|
|
SetObjectEventPos LOCALID_ROWAN, 12, 20
|
|
GoTo VerityCavern_EnterProfessorRowan
|
|
End
|
|
|
|
VerityCavern_EnterProfessorRowanWest:
|
|
SetObjectEventPos LOCALID_ROWAN, 13, 21
|
|
GoTo VerityCavern_EnterProfessorRowan
|
|
End
|
|
|
|
VerityCavern_EnterProfessorRowanEast:
|
|
SetObjectEventPos LOCALID_ROWAN, 11, 21
|
|
GoTo VerityCavern_EnterProfessorRowan
|
|
End
|
|
|
|
VerityCavern_EnterProfessorRowan:
|
|
ClearFlag FLAG_UNK_0x0296
|
|
AddObject LOCALID_ROWAN
|
|
ApplyMovement LOCALID_ROWAN, _0190
|
|
WaitMovement
|
|
ApplyMovement LOCALID_PLAYER, _01B0
|
|
WaitMovement
|
|
BufferPlayerName 0
|
|
Message VerityCavern_Text_RowanThatWasMesprit
|
|
CloseMessage
|
|
ApplyMovement LOCALID_ROWAN, _0198
|
|
WaitMovement
|
|
BufferPlayerName 0
|
|
Message VerityCavern_Text_RowanChaseAfterMesprit
|
|
CheckPoketchAppRegistered POKETCH_APPID_MARKINGMAP, VAR_RESULT
|
|
CallIfEq VAR_RESULT, 0, VerityCavern_ProfessorRowanNoMarkingMap
|
|
BufferPlayerName 0
|
|
Message VerityCavern_Text_RowanGoOn
|
|
CloseMessage
|
|
ApplyMovement LOCALID_ROWAN, _01A8
|
|
WaitMovement
|
|
RemoveObject LOCALID_ROWAN
|
|
ReleaseAll
|
|
End
|
|
|
|
VerityCavern_ProfessorRowanNoMarkingMap:
|
|
Message VerityCavern_Text_RowanNoMarkingMap
|
|
Return
|
|
|
|
VerityCavern_ResetRoamingMespritState:
|
|
SetVar VAR_ROAMING_MESPRIT_STATE, 0
|
|
ReleaseAll
|
|
End
|
|
|
|
.balign 4, 0
|
|
_0190:
|
|
WalkNormalNorth 7
|
|
EndMovement
|
|
|
|
.balign 4, 0
|
|
_0198:
|
|
WalkOnSpotNormalSouth
|
|
Delay8 2
|
|
WalkOnSpotNormalNorth
|
|
EndMovement
|
|
|
|
.balign 4, 0
|
|
_01A8:
|
|
WalkNormalSouth 9
|
|
EndMovement
|
|
|
|
.balign 4, 0
|
|
_01B0:
|
|
FaceSouth
|
|
EndMovement
|