pokeplatinum/res/field/scripts/scripts_hearthome_city_pokemon_fan_club.s

159 lines
2.6 KiB
ArmAsm

#include "macros/scrcmd.inc"
#include "res/text/bank/hearthome_city_pokemon_fan_club.h"
ScriptEntry _0039
ScriptEntry _0098
ScriptEntry _0155
ScriptEntry _0174
ScriptEntry _0193
ScriptEntry _001A
ScriptEntryEnd
_001A:
CheckTVInterviewEligible TV_PROGRAM_SEGMENT_YOUR_POKEMON_CORNER, VAR_MAP_LOCAL_0
GoToIfEq VAR_MAP_LOCAL_0, 0, _0033
ClearFlag FLAG_UNK_0x0210
End
_0033:
SetFlag FLAG_UNK_0x0210
End
_0039:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
GoToIfSet FLAG_UNK_0x008D, _0083
Message 0
SetVar VAR_0x8004, ITEM_POFFIN_CASE
SetVar VAR_0x8005, 1
GoToIfCannotFitItem VAR_0x8004, VAR_0x8005, VAR_RESULT, _008E
Common_GiveItemQuantity
SetFlag FLAG_UNK_0x008D
Message 1
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0083:
Message 2
WaitABXPadPress
CloseMessage
ReleaseAll
End
_008E:
Common_MessageBagIsFull
CloseMessage
ReleaseAll
End
_0098:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
GetFirstNonEggInParty VAR_0x8000
BufferPartyMonNickname 0, VAR_0x8000
Message 3
GetPartyMonFriendship VAR_RESULT, VAR_0x8000
GoToIfGe VAR_RESULT, 0xFF, _0108
GoToIfGe VAR_RESULT, 200, _0113
GoToIfGe VAR_RESULT, 150, _011E
GoToIfGe VAR_RESULT, 100, _0129
GoToIfGe VAR_RESULT, 50, _0134
GoToIfGe VAR_RESULT, 1, _013F
GoTo _014A
End
_0108:
Message 4
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0113:
Message 5
WaitABXPadPress
CloseMessage
ReleaseAll
End
_011E:
Message 6
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0129:
Message 7
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0134:
Message 8
WaitABXPadPress
CloseMessage
ReleaseAll
End
_013F:
Message 9
WaitABXPadPress
CloseMessage
ReleaseAll
End
_014A:
Message 10
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0155:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
WaitFanfare SEQ_SE_CONFIRM
PlayCry SPECIES_PSYDUCK
Message 11
WaitCry
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0174:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
WaitFanfare SEQ_SE_CONFIRM
PlayCry SPECIES_BUNEARY
Message 12
WaitCry
WaitABXPadPress
CloseMessage
ReleaseAll
End
_0193:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
WaitFanfare SEQ_SE_CONFIRM
PlayCry SPECIES_CLEFAIRY
Message 13
WaitCry
WaitABXPadPress
CloseMessage
ReleaseAll
End
.balign 4, 0