pokeplatinum/res/field/scripts/scripts_jubilife_tv_3f.s
2026-02-21 08:21:02 -07:00

126 lines
3.8 KiB
ArmAsm

#include "macros/scrcmd.inc"
#include "res/text/bank/jubilife_tv_3f.h"
#include "res/field/events/events_jubilife_tv_3f.h"
ScriptEntry JubilifeTV3F_Beauty1
ScriptEntry JubilifeTV3F_Beauty2
ScriptEntry JubilifeTV3F_GymGuide1
ScriptEntry JubilifeTV3F_GymGuide2
ScriptEntryEnd
JubilifeTV3F_Beauty1:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
ApplyMovement LOCALID_BEAUTY_1, JubilifeTV3F_Movement_BeautyFaceEastGroupRankingRoom
WaitMovement
Message JubilifeTV3F_Text_TheRoomClosestToTheStairsIsTheGroupRankingRoom
CloseMessage
WaitTime 8, VAR_RESULT
ApplyMovement LOCALID_BEAUTY_1, JubilifeTV3F_Movement_BeautyFaceWestGlobalRankingRoom
WaitMovement
Message JubilifeTV3F_Text_TheRoomOnTheOppositeSideIsTheGlobalRankingRoom
WaitABXPadPress
CloseMessage
ReleaseAll
End
.balign 4, 0
JubilifeTV3F_Movement_BeautyFaceEastGroupRankingRoom:
FaceEast
EndMovement
.balign 4, 0
JubilifeTV3F_Movement_BeautyFaceWestGlobalRankingRoom:
FaceWest
EndMovement
JubilifeTV3F_Beauty2:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message JubilifeTV3F_Text_TheMoreTradesIMakeTheBetterMyOddsOfWinningThePokemonLottery
WaitABXPadPress
CloseMessage
ReleaseAll
End
JubilifeTV3F_GymGuide1:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message JubilifeTV3F_Text_RecordsAreFineThings
WaitABXPadPress
CloseMessage
ReleaseAll
End
JubilifeTV3F_GymGuide2:
PlayFanfare SEQ_SE_CONFIRM
LockAll
FacePlayer
Message JubilifeTV3F_Text_WillYouTellMeYourOpinionOnTV
ShowYesNoMenu VAR_RESULT
GoToIfEq VAR_RESULT, MENU_YES, JubilifeTV3F_ChooseCustomMessageWords
GoTo JubilifeTV3F_OhAllRightICanUnderstandHowBusyItMustGetForYou
JubilifeTV3F_ChooseCustomMessageWords:
FadeScreenOut
WaitFadeScreen
CloseMessage
ChooseTwoCustomMessageWords 0, VAR_RESULT, VAR_0x8000, VAR_0x8001
ReturnToField
FadeScreenIn
WaitFadeScreen
GoToIfEq VAR_RESULT, FALSE, JubilifeTV3F_OhAllRightICanUnderstandHowBusyItMustGetForYou
Message JubilifeTV3F_Text_MovingRightAlongWhatFeedbackCanYouGiveMeAboutTV
FadeScreenOut
WaitFadeScreen
CloseMessage
ChooseTwoCustomMessageWords 0, VAR_RESULT, VAR_0x8002, VAR_0x8003
ReturnToField
FadeScreenIn
WaitFadeScreen
GoToIfEq VAR_RESULT, FALSE, JubilifeTV3F_OhAllRightICanUnderstandHowBusyItMustGetForYou
GetWallpaperFromCustomMessageWords VAR_RESULT, VAR_0x8000, VAR_0x8001, VAR_0x8002, VAR_0x8003
GoToIfEq VAR_RESULT, 0xFF, JubilifeTV3F_CheckIsMysteryGiftPhrase
GoToIfEq VAR_RESULT, 0, JubilifeTV3F_CheckIsMysteryGiftPhrase
GoTo JubilifeTV3F_IThinkICanSwingADealToGetYouANewWallpaperForYourPCBoxes
JubilifeTV3F_CheckIsMysteryGiftPhrase:
CheckIsMysteryGiftPhrase VAR_RESULT, VAR_0x8000, VAR_0x8001, VAR_0x8002, VAR_0x8003
GoToIfEq VAR_RESULT, FALSE, JubilifeTV3F_ThanksForAnsweringMyQuestion
GoTo JubilifeTV3F_IThinkICanSwingADealSoYouCanReceiveAMysteryGift
JubilifeTV3F_ThanksForAnsweringMyQuestion:
Message JubilifeTV3F_Text_ThanksForAnsweringMyQuestion
WaitABXPadPress
CloseMessage
ReleaseAll
End
JubilifeTV3F_OhAllRightICanUnderstandHowBusyItMustGetForYou:
Message JubilifeTV3F_Text_OhAllRightICanUnderstandHowBusyItMustGetForYou
WaitABXPadPress
CloseMessage
ReleaseAll
End
JubilifeTV3F_IThinkICanSwingADealToGetYouANewWallpaperForYourPCBoxes:
Message JubilifeTV3F_Text_IThinkICanSwingADealToGetYouANewWallpaperForYourPCBoxes
WaitABXPadPress
CloseMessage
ReleaseAll
End
JubilifeTV3F_IThinkICanSwingADealSoYouCanReceiveAMysteryGift:
Message JubilifeTV3F_Text_IThinkICanSwingADealSoYouCanReceiveAMysteryGift
WaitABXPadPress
UnlockMysteryGift
CloseMessage
ReleaseAll
End
.balign 4, 0