.set LOCALID_NURSE, 1 .set LOCALID_MART_CLERK, 2 .set LOCALID_RECEPTIONIST, 3 .set LOCALID_COOLTRAINER_F, 4 .set LOCALID_BALDING_MAN, 5 TrainerTower_Lobby_MapScripts:: map_script MAP_SCRIPT_ON_RESUME, TrainerTower_Lobby_OnResume map_script MAP_SCRIPT_ON_RETURN_TO_FIELD, TrainerTower_Lobby_OnReturnToField map_script MAP_SCRIPT_ON_TRANSITION, TrainerTower_Lobby_OnTransition map_script MAP_SCRIPT_ON_LOAD, TrainerTower_Lobby_OnLoad map_script MAP_SCRIPT_ON_FRAME_TABLE, TrainerTower_Lobby_OnFrame .byte 0 TrainerTower_Lobby_OnResume:: setvar VAR_TEMP_2, 0 ttower_resumetimer ttower_shouldexit goto_if_eq VAR_RESULT, FALSE, TrainerTower_Lobby_OnResumeEnd @ Never reached, above always FALSE setvar VAR_TEMP_0, 0 setobjectxy OBJ_EVENT_ID_PLAYER, 9, 7 applymovement OBJ_EVENT_ID_PLAYER, TrainerTower_Lobby_Movement_FaceReceptionist TrainerTower_Lobby_OnResumeEnd:: end TrainerTower_Lobby_OnReturnToField:: addobject LOCALID_NURSE addobject LOCALID_MART_CLERK addobject LOCALID_RECEPTIONIST addobject LOCALID_COOLTRAINER_F addobject LOCALID_BALDING_MAN end TrainerTower_Lobby_OnLoad:: call_if_eq VAR_TEMP_D, 17, TrainerTower_Lobby_OpenCounterBarrier end TrainerTower_Lobby_OpenCounterBarrier:: setmetatile 17, 10, METATILE_TrainerTower_Floor_ShadeBottomLeft, 0 return TrainerTower_Lobby_OnTransition:: setworldmapflag FLAG_WORLD_MAP_TRAINER_TOWER_LOBBY getplayerxy VAR_TEMP_D, VAR_RESULT end TrainerTower_Lobby_OnFrame:: map_script_2 VAR_TEMP_0, 0, TrainerTower_Lobby_EventScript_Enter map_script_2 VAR_TEMP_D, 17, TrainerTower_Lobby_EventScript_ExitElevator .2byte 0 TrainerTower_Lobby_EventScript_ExitElevator:: lockall applymovement OBJ_EVENT_ID_PLAYER, TrainerTower_Lobby_Movement_ExitElevator waitmovement 0 setmetatile 17, 10, METATILE_TrainerTower_CounterBarrier, 1 special DrawWholeMapView playse SE_CLICK waitse setvar VAR_TEMP_D, 0 releaseall end TrainerTower_Lobby_Movement_ExitElevator:: walk_down walk_down step_end TrainerTower_Lobby_EventScript_Enter:: setvar VAR_TEMP_0, 1 ttower_getchallengestatus switch VAR_RESULT case CHALLENGE_STATUS_LOST, TrainerTower_Lobby_EventScript_LostChallenge case CHALLENGE_STATUS_UNK, TrainerTower_Lobby_EventScript_ExitChallengeSpeakToReceptionist case CHALLENGE_STATUS_NORMAL, TrainerTower_Lobby_EventScript_EnterEnd TrainerTower_Lobby_EventScript_LostChallenge:: lock faceplayer applymovement OBJ_EVENT_ID_PLAYER, TrainerTower_Lobby_Movement_FaceReceptionist textcolor NPC_TEXT_COLOR_FEMALE msgbox TrainerTower_Lobby_Text_TooBadComeBackTryAgain goto TrainerTower_Lobby_EventScript_ExitChallenge @ Presumably E-Reader related TrainerTower_Lobby_EventScript_ExitChallengeSpeakToReceptionist:: lock faceplayer applymovement OBJ_EVENT_ID_PLAYER, TrainerTower_Lobby_Movement_FaceReceptionist textcolor NPC_TEXT_COLOR_FEMALE msgbox TrainerTower_Lobby_Text_MoveCounterHereWhenTrainersSwitch TrainerTower_Lobby_EventScript_ExitChallenge:: closemessage applymovement OBJ_EVENT_ID_PLAYER, TrainerTower_Lobby_Movement_WalkDown waitmovement 0 setvar VAR_MAP_SCENE_TRAINER_TOWER, 0 release TrainerTower_Lobby_EventScript_EnterEnd:: end TrainerTower_Lobby_EventScript_Nurse:: lock faceplayer call EventScript_PkmnCenterNurse release end TrainerTower_Lobby_EventScript_Receptionist:: lock faceplayer ttower_getbeatchallenge goto_if_eq VAR_RESULT, TRUE, TrainerTower_Lobby_EventScript_ThanksForCompeting msgbox TrainerTower_Lobby_Text_GiveItYourBest goto TrainerTower_Lobby_EventScript_ReceptionistEnd TrainerTower_Lobby_EventScript_ThanksForCompeting:: msgbox TrainerTower_Lobby_Text_ThanksForCompeting TrainerTower_Lobby_EventScript_ReceptionistEnd:: release end TrainerTower_Lobby_EventScript_MartClerk:: goto_if_questlog EventScript_ReleaseEnd lock faceplayer message Text_MayIHelpYou waitmessage pokemart TrainerTower_Lobby_Mart_Items msgbox Text_PleaseComeAgain release end .align 2 TrainerTower_Lobby_Mart_Items:: .2byte ITEM_ULTRA_BALL .2byte ITEM_GREAT_BALL .2byte ITEM_FULL_RESTORE .2byte ITEM_MAX_POTION .2byte ITEM_HYPER_POTION .2byte ITEM_REVIVE .2byte ITEM_FULL_HEAL .2byte ITEM_ESCAPE_ROPE .2byte ITEM_MAX_REPEL .2byte ITEM_NONE release end TrainerTower_Lobby_EventScript_EntryTrigger:: lockall applymovement OBJ_EVENT_ID_PLAYER, TrainerTower_Lobby_Movement_FaceReceptionist textcolor NPC_TEXT_COLOR_FEMALE msgbox TrainerTower_Lobby_Text_WelcomeToTrainerTower ttower_getnumfloors goto_if_eq VAR_RESULT, FALSE, TrainerTower_Lobby_EventScript_AllFloorsUsed msgbox TrainerTower_Lobby_Text_TrainersUpToFloorNum goto TrainerTower_Lobby_EventScript_AskEnterChallenge TrainerTower_Lobby_EventScript_AllFloorsUsed:: msgbox TrainerTower_Lobby_Text_TrainersUpEighthFloor TrainerTower_Lobby_EventScript_AskEnterChallenge:: message TrainerTower_Lobby_Text_LikeToChallengeTrainers waitmessage multichoice 18, 6, MULTICHOICE_YES_NO_INFO, FALSE switch VAR_RESULT case 0, TrainerTower_Lobby_EventScript_ChooseChallenge case 1, TrainerTower_Lobby_EventScript_DeclineChallenge case 2, TrainerTower_Lobby_EventScript_ChallengeInfo case SCR_MENU_CANCEL, TrainerTower_Lobby_EventScript_DeclineChallenge end TrainerTower_Lobby_EventScript_ChallengeInfo:: msgbox TrainerTower_Lobby_Text_ExplainTrainerTower goto TrainerTower_Lobby_EventScript_AskEnterChallenge end TrainerTower_Lobby_EventScript_ChooseChallenge:: multichoice 13, 3, MULTICHOICE_TRAINER_TOWER_MODE, FALSE switch VAR_RESULT case 0, TrainerTower_Lobby_EventScript_BeginChallenge case 1, TrainerTower_Lobby_EventScript_BeginChallenge case 2, TrainerTower_Lobby_EventScript_BeginChallenge case 3, TrainerTower_Lobby_EventScript_BeginChallenge case 4, TrainerTower_Lobby_EventScript_DeclineChallenge case SCR_MENU_CANCEL, TrainerTower_Lobby_EventScript_DeclineChallenge end TrainerTower_Lobby_EventScript_BeginChallenge:: copyvar VAR_0x8005, VAR_RESULT setvar VAR_MAP_SCENE_TRAINER_TOWER, 1 special HealPlayerParty msgbox TrainerTower_Lobby_Text_StartClockGetSetGo ttower_startchallenge releaseall end TrainerTower_Lobby_EventScript_DeclineChallenge:: msgbox TrainerTower_Lobby_Text_PleaseVisitUsAgain closemessage applymovement OBJ_EVENT_ID_PLAYER, TrainerTower_Lobby_Movement_WalkDown waitmovement 0 releaseall end TrainerTower_Lobby_Movement_FaceReceptionist:: face_right step_end TrainerTower_Lobby_Movement_WalkDown:: walk_down step_end TrainerTower_Lobby_EventScript_ShowRecords:: lockall fadescreen FADE_TO_BLACK setvar VAR_0x8004, 1 special ShowBattleRecords waitstate releaseall end TrainerTower_Lobby_EventScript_CooltrainerF:: msgbox TrainerTower_Lobby_Text_WonderWhatKindsOfTrainers, MSGBOX_NPC end TrainerTower_Lobby_EventScript_BaldingMan:: msgbox TrainerTower_Lobby_Text_StairsTougherThanAnyBattle, MSGBOX_NPC end