.set LOCALID_RIVAL, 1 .set LOCALID_WORKER_M2, 8 SilphCo_7F_MapScripts:: map_script MAP_SCRIPT_ON_LOAD, SilphCo_7F_OnLoad map_script MAP_SCRIPT_ON_TRANSITION, SilphCo_7F_OnTransition .byte 0 SilphCo_7F_OnLoad:: call_if_unset FLAG_SILPH_7F_DOOR_1, EventScript_Close7FDoor1 call_if_unset FLAG_SILPH_7F_DOOR_2, EventScript_Close7FDoor2 call_if_unset FLAG_SILPH_7F_DOOR_3, EventScript_Close7FDoor3 end SilphCo_7F_OnTransition:: call_if_ge VAR_MAP_SCENE_SILPH_CO_11F, 1, SilphCo_7F_EventScript_SetObjRocketsGone end SilphCo_7F_EventScript_SetObjRocketsGone:: setobjectmovementtype LOCALID_WORKER_M2, MOVEMENT_TYPE_FACE_UP return SilphCo_7F_EventScript_RivalTriggerTop:: lockall setvar VAR_TEMP_1, 0 goto SilphCo_7F_EventScript_RivalScene end SilphCo_7F_EventScript_RivalTriggerBottom:: lockall setvar VAR_TEMP_1, 1 goto SilphCo_7F_EventScript_RivalScene end SilphCo_7F_EventScript_RivalScene:: textcolor NPC_TEXT_COLOR_MALE playbgm MUS_ENCOUNTER_RIVAL, 0 applymovement LOCALID_RIVAL, Common_Movement_ExclamationMark waitmovement 0 applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_WalkInPlaceFasterDown applymovement LOCALID_RIVAL, Common_Movement_Delay48 waitmovement 0 msgbox SilphCo_7F_Text_RivalWhatKeptYou call_if_eq VAR_TEMP_1, 0, SilphCo_7F_EventScript_RivalApproachTop call_if_eq VAR_TEMP_1, 1, SilphCo_7F_EventScript_RivalApproachBottom msgbox SilphCo_7F_Text_RivalIntro setvar VAR_LAST_TALKED, LOCALID_RIVAL call_if_eq VAR_STARTER_MON, 2, SilphCo_7F_EventScript_RivalSquirtle call_if_eq VAR_STARTER_MON, 1, SilphCo_7F_EventScript_RivalBulbasaur call_if_eq VAR_STARTER_MON, 0, SilphCo_7F_EventScript_RivalCharmander msgbox SilphCo_7F_Text_RivalPostBattle closemessage playbgm MUS_RIVAL_EXIT, 0 call_if_eq VAR_TEMP_1, 0, SilphCo_7F_EventScript_RivalExitTop call_if_eq VAR_TEMP_1, 1, SilphCo_7F_EventScript_RivalExitBottom playse SE_WARP_IN fadedefaultbgm removeobject LOCALID_RIVAL waitse setvar VAR_MAP_SCENE_SILPH_CO_7F, 1 releaseall end SilphCo_7F_EventScript_RivalApproachTop:: closemessage applymovement LOCALID_RIVAL, SilphCo_7F_Movement_RivalApproachTop waitmovement 0 return SilphCo_7F_EventScript_RivalApproachBottom:: return SilphCo_7F_EventScript_RivalSquirtle:: trainerbattle_no_intro TRAINER_RIVAL_SILPH_SQUIRTLE, SilphCo_7F_Text_RivalDefeat return SilphCo_7F_EventScript_RivalBulbasaur:: trainerbattle_no_intro TRAINER_RIVAL_SILPH_BULBASAUR, SilphCo_7F_Text_RivalDefeat return SilphCo_7F_EventScript_RivalCharmander:: trainerbattle_no_intro TRAINER_RIVAL_SILPH_CHARMANDER, SilphCo_7F_Text_RivalDefeat return SilphCo_7F_EventScript_RivalExitTop:: applymovement LOCALID_RIVAL, SilphCo_7F_Movement_RivalExitTop waitmovement 0 return SilphCo_7F_EventScript_RivalExitBottom:: applymovement LOCALID_RIVAL, SilphCo_7F_Movement_RivalExitBottom waitmovement 0 return SilphCo_7F_Movement_RivalApproachTop:: walk_up step_end SilphCo_7F_Movement_RivalExitTop:: walk_right walk_right walk_right walk_up delay_16 step_end SilphCo_7F_Movement_RivalExitBottom:: walk_left walk_up walk_up walk_right walk_right walk_right walk_right delay_16 step_end SilphCo_7F_EventScript_LaprasGuy:: lock faceplayer goto_if_set FLAG_GOT_LAPRAS_FROM_SILPH, SilphCo_7F_EventScript_AlreadyGotLapras msgbox SilphCo_7F_Text_HaveMonForSavingUs setvar VAR_TEMP_1, SPECIES_LAPRAS givemon SPECIES_LAPRAS, 25 goto_if_eq VAR_RESULT, 0, SilphCo_7F_EventScript_ReceiveLaprasParty goto_if_eq VAR_RESULT, 1, SilphCo_7F_EventScript_ReceiveLaprasPC goto_if_eq VAR_RESULT, 2, EventScript_NoMoreRoomForPokemon release end SilphCo_7F_EventScript_ReceiveLaprasParty:: textcolor NPC_TEXT_COLOR_NEUTRAL playfanfare MUS_LEVEL_UP message SilphCo_7F_Text_ObtainedLaprasFromEmployee waitmessage waitfanfare bufferspeciesname STR_VAR_1, SPECIES_LAPRAS msgbox Text_GiveNicknameToThisMon, MSGBOX_YESNO goto_if_eq VAR_RESULT, NO, SilphCo_7F_EventScript_EndReceiveLapras call EventScript_GetGiftMonPartySlot call EventScript_ChangePokemonNickname goto SilphCo_7F_EventScript_EndReceiveLapras end SilphCo_7F_EventScript_ReceiveLaprasPC:: textcolor NPC_TEXT_COLOR_NEUTRAL playfanfare MUS_LEVEL_UP message SilphCo_7F_Text_ObtainedLaprasFromEmployee waitmessage waitfanfare bufferspeciesname STR_VAR_1, SPECIES_LAPRAS msgbox Text_GiveNicknameToThisMon, MSGBOX_YESNO goto_if_eq VAR_RESULT, NO, SilphCo_7F_EventScript_LaprasTransferredToPC call EventScript_NameReceivedBoxMon goto SilphCo_7F_EventScript_LaprasTransferredToPC end SilphCo_7F_EventScript_LaprasTransferredToPC:: call EventScript_TransferredToPC goto SilphCo_7F_EventScript_EndReceiveLapras end SilphCo_7F_EventScript_EndReceiveLapras:: textcolor NPC_TEXT_COLOR_MALE msgbox SilphCo_7F_Text_ExplainLapras setflag FLAG_GOT_LAPRAS_FROM_SILPH release end SilphCo_7F_EventScript_AlreadyGotLapras:: msgbox SilphCo_7F_Text_RocketBossWentToBoardroom release end SilphCo_7F_EventScript_WorkerM1:: lock faceplayer goto_if_ge VAR_MAP_SCENE_SILPH_CO_11F, 1, SilphCo_7F_EventScript_WorkerM1RocketsGone msgbox SilphCo_7F_Text_RocketsAfterMasterBall release end SilphCo_7F_EventScript_WorkerM1RocketsGone:: msgbox SilphCo_7F_Text_CanceledMasterBallProject release end SilphCo_7F_EventScript_WorkerM2:: lock faceplayer goto_if_ge VAR_MAP_SCENE_SILPH_CO_11F, 1, SilphCo_7F_EventScript_WorkerM2RocketsGone msgbox SilphCo_7F_Text_BadIfTeamRocketTookOver release end SilphCo_7F_EventScript_WorkerM2RocketsGone:: msgbox SilphCo_7F_Text_WowYouChasedOffTeamRocket release end SilphCo_7F_EventScript_WorkerF:: lock faceplayer goto_if_ge VAR_MAP_SCENE_SILPH_CO_11F, 1, SilphCo_7F_EventScript_WorkerFRocketsGone msgbox SilphCo_7F_Text_ReallyDangerousHere release end SilphCo_7F_EventScript_WorkerFRocketsGone:: msgbox SilphCo_7F_Text_ThankYouSoMuch release end SilphCo_7F_EventScript_FloorSign:: msgbox SilphCo_7F_Text_FloorSign, MSGBOX_SIGN end SilphCo_7F_EventScript_Joshua:: trainerbattle_single TRAINER_SCIENTIST_JOSHUA, SilphCo_7F_Text_JoshuaIntro, SilphCo_7F_Text_JoshuaDefeat msgbox SilphCo_7F_Text_JoshuaPostBattle, MSGBOX_AUTOCLOSE end SilphCo_7F_EventScript_Grunt1:: trainerbattle_single TRAINER_TEAM_ROCKET_GRUNT_33, SilphCo_7F_Text_Grunt1Intro, SilphCo_7F_Text_Grunt1Defeat msgbox SilphCo_7F_Text_Grunt1PostBattle, MSGBOX_AUTOCLOSE end SilphCo_7F_EventScript_Grunt2:: trainerbattle_single TRAINER_TEAM_ROCKET_GRUNT_34, SilphCo_7F_Text_Grunt2Intro, SilphCo_7F_Text_Grunt2Defeat msgbox SilphCo_7F_Text_Grunt2PostBattle, MSGBOX_AUTOCLOSE end SilphCo_7F_EventScript_Grunt3:: trainerbattle_single TRAINER_TEAM_ROCKET_GRUNT_35, SilphCo_7F_Text_Grunt3Intro, SilphCo_7F_Text_Grunt3Defeat msgbox SilphCo_7F_Text_Grunt3PostBattle, MSGBOX_AUTOCLOSE end