pokefirered/data/maps/SaffronCity_PokemonTrainerFanClub/scripts.inc
2022-08-28 16:51:45 +02:00

430 lines
17 KiB
PHP

.set LOCALID_BATTLE_GIRL, 1
.set LOCALID_LITTLE_GIRL, 2
.set LOCALID_YOUNGSTER, 3
.set LOCALID_GENTLEMAN, 4
.set LOCALID_WOMAN, 5
.set LOCALID_ROCKER, 6
.set LOCALID_BEAUTY, 7
.set LOCALID_BLACK_BELT, 8
SaffronCity_PokemonTrainerFanClub_MapScripts::
map_script MAP_SCRIPT_ON_FRAME_TABLE, SaffronCity_PokemonTrainerFanClub_OnFrame
map_script MAP_SCRIPT_ON_TRANSITION, SaffronCity_PokemonTrainerFanClub_OnTransition
.byte 0
SaffronCity_PokemonTrainerFanClub_OnFrame::
map_script_2 VAR_MAP_SCENE_SAFFRON_CITY_POKEMON_TRAINER_FAN_CLUB, 1, SaffronCity_PokemonTrainerFanClub_EventScript_MeetFirstFans
.2byte 0
SaffronCity_PokemonTrainerFanClub_EventScript_MeetFirstFans::
lockall
textcolor NPC_TEXT_COLOR_FEMALE
applymovement LOCALID_BATTLE_GIRL, Common_Movement_WalkInPlaceFasterDown
waitmovement 0
playse SE_PIN
applymovement LOCALID_BATTLE_GIRL, Common_Movement_ExclamationMark
waitmovement 0
applymovement LOCALID_BATTLE_GIRL, Common_Movement_Delay48
waitmovement 0
msgbox SaffronCity_PokemonTrainerFanClub_Text_HuhYou
closemessage
applymovement LOCALID_BATTLE_GIRL, SaffronCity_PokemonTrainerFanClub_Movement_FanApproachPlayer
waitmovement 0
applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
msgbox SaffronCity_PokemonTrainerFanClub_Text_YourePlayerWereYourFansNow
setvar VAR_MAP_SCENE_SAFFRON_CITY_POKEMON_TRAINER_FAN_CLUB, 2
releaseall
end
SaffronCity_PokemonTrainerFanClub_Movement_FanApproachPlayer::
delay_16
delay_8
walk_down
delay_16
walk_down
delay_8
walk_left
step_end
@ Unused, leftover from RS
LilycoveCity_PokemonTrainerFanClub_Movement_FanApproachPlayer::
delay_8
walk_in_place_faster_down
walk_down
walk_down
walk_down
walk_left
walk_left
step_end
@ Unused, leftover from RS
LilycoveCity_PokemonTrainerFanClub_Movement_LittleGirlWatchPlayer::
walk_fast_left
walk_fast_left
walk_fast_down
walk_fast_down
walk_fast_left
walk_fast_down
step_end
@ Unused, leftover from RS
LilycoveCity_PokemonTrainerFanClub_Movement_LittleGirlMoveCloserToPlayer::
walk_down
walk_in_place_faster_right
step_end
@ Unused, leftover from RS
LilycoveCity_PokemonTrainerFanClub_Movement_LittleGirlHideFromPlayer::
jump_in_place_right
walk_fast_up
walk_fast_up
walk_fast_right
walk_in_place_faster_down
step_end
SaffronCity_PokemonTrainerFanClub_OnTransition::
goto_if_eq VAR_MAP_SCENE_SAFFRON_CITY_POKEMON_TRAINER_FAN_CLUB, 1, SaffronCity_PokemonTrainerFanClub_EventScript_SetMemberPosForFirstMeeting
goto_if_eq VAR_MAP_SCENE_SAFFRON_CITY_POKEMON_TRAINER_FAN_CLUB, 2, SaffronCity_PokemonTrainerFanClub_EventScript_UpdateFanMemberPositions
end
SaffronCity_PokemonTrainerFanClub_EventScript_UpdateFanMemberPositions::
special Script_TryLoseFansFromPlayTime
setvar VAR_0x8004, FANCLUB_MEMBER1
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
call_if_eq VAR_RESULT, FALSE, SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember1ToFarTable
setvar VAR_0x8004, FANCLUB_MEMBER2
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
call_if_eq VAR_RESULT, FALSE, SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember2ToFarTable
setvar VAR_0x8004, FANCLUB_MEMBER3
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
call_if_eq VAR_RESULT, FALSE, SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember3ToFarTable
setvar VAR_0x8004, FANCLUB_MEMBER4
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
call_if_eq VAR_RESULT, FALSE, SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember4ToFarTable
setvar VAR_0x8004, FANCLUB_MEMBER5
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
call_if_eq VAR_RESULT, FALSE, SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember5ToFarTable
setvar VAR_0x8004, FANCLUB_MEMBER6
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
call_if_eq VAR_RESULT, FALSE, SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember6ToFarTable
setvar VAR_0x8004, FANCLUB_MEMBER7
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
call_if_eq VAR_RESULT, FALSE, SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember7ToFarTable
setvar VAR_0x8004, FANCLUB_MEMBER8
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
call_if_eq VAR_RESULT, FALSE, SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember8ToFarTable
end
SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember1ToFarTable::
setobjectxyperm LOCALID_BATTLE_GIRL, 5, 2
setobjectmovementtype LOCALID_BATTLE_GIRL, MOVEMENT_TYPE_FACE_UP
return
SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember2ToFarTable::
setobjectxyperm LOCALID_YOUNGSTER, 7, 4
setobjectmovementtype LOCALID_YOUNGSTER, MOVEMENT_TYPE_FACE_LEFT
return
SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember3ToFarTable::
setobjectxyperm LOCALID_GENTLEMAN, 2, 2
setobjectmovementtype LOCALID_GENTLEMAN, MOVEMENT_TYPE_FACE_UP
return
SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember4ToFarTable::
setobjectxyperm LOCALID_LITTLE_GIRL, 3, 4
setobjectmovementtype LOCALID_LITTLE_GIRL, MOVEMENT_TYPE_FACE_RIGHT
return
SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember5ToFarTable::
setobjectxyperm LOCALID_ROCKER, 4, 6
setobjectmovementtype LOCALID_ROCKER, MOVEMENT_TYPE_FACE_UP
return
SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember6ToFarTable::
setobjectxyperm LOCALID_WOMAN, 10, 3
setobjectmovementtype LOCALID_WOMAN, MOVEMENT_TYPE_FACE_UP
return
SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember7ToFarTable::
setobjectxyperm LOCALID_BEAUTY, 7, 5
setobjectmovementtype LOCALID_BEAUTY, MOVEMENT_TYPE_FACE_LEFT
return
SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember8ToFarTable::
setobjectxyperm LOCALID_BLACK_BELT, 9, 6
setobjectmovementtype LOCALID_BLACK_BELT, MOVEMENT_TYPE_FACE_LEFT
return
SaffronCity_PokemonTrainerFanClub_EventScript_SetMemberPosForFirstMeeting::
call SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember4ToFarTable
call SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember5ToFarTable
call SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember6ToFarTable
call SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember7ToFarTable
call SaffronCity_PokemonTrainerFanClub_EventScript_MoveMember8ToFarTable
end
SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirl::
lock
faceplayer
setvar VAR_0x8004, FANCLUB_MEMBER1
special Script_BufferFanClubTrainerName
goto_if_eq VAR_MAP_SCENE_SAFFRON_CITY_POKEMON_TRAINER_FAN_CLUB, 0, SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirlPlayerNotChampion
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
goto_if_eq VAR_RESULT, TRUE, SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirlPlayersFan
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, (NUM_TRAINER_FAN_CLUB_MEMBERS - 1), SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirlOnlyNonFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_WasYourFanNotAnymore
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirlPlayersFan::
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, 1, SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirlOnlyFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_AlwaysCheerForYou
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirlOnlyFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_IllAlwaysBelieveInYou
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirlOnlyNonFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_EveryonesYourFanButICantBe
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BattleGirlPlayerNotChampion::
msgbox SaffronCity_PokemonTrainerFanClub_Text_TrainersCoolWhenBattling
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirl::
lock
faceplayer
setvar VAR_0x8004, FANCLUB_MEMBER4
special Script_BufferFanClubTrainerName
goto_if_eq VAR_MAP_SCENE_SAFFRON_CITY_POKEMON_TRAINER_FAN_CLUB, 0, SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirlPlayerNotChampion
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
goto_if_eq VAR_RESULT, TRUE, SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirlPlayersFan
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, (NUM_TRAINER_FAN_CLUB_MEMBERS - 1), SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirlOnlyNonFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_WantToBeLikeSabrina
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirlPlayersFan::
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, 1, SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirlOnlyFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_WantToBeLikeYouOneDay
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirlOnlyFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_EveryoneButMeStoppedBeingYourFan
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirlOnlyNonFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_WontStopBeingSabrinasFan
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_LittleGirlPlayerNotChampion::
msgbox SaffronCity_PokemonTrainerFanClub_Text_CanIBecomeCoolTrainerOneDay
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_Youngster::
lock
faceplayer
setvar VAR_0x8004, FANCLUB_MEMBER2
special Script_BufferFanClubTrainerName
goto_if_eq VAR_MAP_SCENE_SAFFRON_CITY_POKEMON_TRAINER_FAN_CLUB, 0, SaffronCity_PokemonTrainerFanClub_EventScript_YoungsterPlayerNotChampion
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
goto_if_eq VAR_RESULT, TRUE, SaffronCity_PokemonTrainerFanClub_EventScript_YoungsterPlayersFan
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, (NUM_TRAINER_FAN_CLUB_MEMBERS - 1), SaffronCity_PokemonTrainerFanClub_EventScript_YoungsterOnlyNonFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_BrocksMyHero
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_YoungsterPlayersFan::
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, 1, SaffronCity_PokemonTrainerFanClub_EventScript_YoungsterOnlyFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_CanYouAutographShorts
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_YoungsterOnlyFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_CountingOnYou
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_YoungsterOnlyNonFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_BrocksFanToBitterEnd
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_YoungsterPlayerNotChampion::
msgbox SaffronCity_PokemonTrainerFanClub_Text_BrocksLastWordOnCool
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_Gentleman::
lock
faceplayer
setvar VAR_0x8004, FANCLUB_MEMBER3
special Script_BufferFanClubTrainerName
goto_if_eq VAR_MAP_SCENE_SAFFRON_CITY_POKEMON_TRAINER_FAN_CLUB, 0, SaffronCity_PokemonTrainerFanClub_EventScript_GentlemanPlayerNotChampion
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
goto_if_eq VAR_RESULT, TRUE, SaffronCity_PokemonTrainerFanClub_EventScript_GentlemanPlayersFan
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, (NUM_TRAINER_FAN_CLUB_MEMBERS - 1), SaffronCity_PokemonTrainerFanClub_EventScript_GentlemanOnlyNonFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_HmmAndYouAre
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_GentlemanPlayersFan::
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, 1, SaffronCity_PokemonTrainerFanClub_EventScript_GentlemanOnlyFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_HadPleasureOfWatchingYouBattle
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_GentlemanOnlyFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_NeverSeenTrainerOfYourMagnificence
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_GentlemanOnlyNonFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_YouveStillAWaysToGo
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_GentlemanPlayerNotChampion::
msgbox SaffronCity_PokemonTrainerFanClub_Text_YoullBeTalkedAboutIfYouKeepWinning
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_Woman::
lock
faceplayer
setvar VAR_0x8004, FANCLUB_MEMBER6
special Script_BufferFanClubTrainerName
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
goto_if_eq VAR_RESULT, TRUE, SaffronCity_PokemonTrainerFanClub_EventScript_WomanPlayersFan
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, (NUM_TRAINER_FAN_CLUB_MEMBERS - 1), SaffronCity_PokemonTrainerFanClub_EventScript_WomanOnlyNonFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_TrainerHasBeenOnFire
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_WomanPlayersFan::
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, 1, SaffronCity_PokemonTrainerFanClub_EventScript_WomanOnlyFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_AdoreWayYouBattle
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_WomanOnlyFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_ImYourNumberOneFan
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_WomanOnlyNonFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_EveryoneTalksAboutYou
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_Rocker::
lock
faceplayer
setvar VAR_0x8004, FANCLUB_MEMBER5
special Script_BufferFanClubTrainerName
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
goto_if_eq VAR_RESULT, TRUE, SaffronCity_PokemonTrainerFanClub_EventScript_RockerPlayersFan
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, (NUM_TRAINER_FAN_CLUB_MEMBERS - 1), SaffronCity_PokemonTrainerFanClub_EventScript_RockerOnlyNonFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_LoveWayTrainerTalks
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_RockerPlayersFan::
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, 1, SaffronCity_PokemonTrainerFanClub_EventScript_RockerOnlyFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_TheWayYouBattleIsCool
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_RockerOnlyFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_ImOnlyOneLeftOfYourFans
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_RockerOnlyNonFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_ImLoneTrainerFan
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_Beauty::
lock
faceplayer
setvar VAR_0x8004, FANCLUB_MEMBER7
special Script_BufferFanClubTrainerName
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
goto_if_eq VAR_RESULT, TRUE, SaffronCity_PokemonTrainerFanClub_EventScript_BeautyPlayersFan
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, (NUM_TRAINER_FAN_CLUB_MEMBERS - 1), SaffronCity_PokemonTrainerFanClub_EventScript_BeautyOnlyNonFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_WhyCantOthersSeeMastersDignity
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BeautyPlayersFan::
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, 1, SaffronCity_PokemonTrainerFanClub_EventScript_BeautyOnlyFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_YouReallyAreAmazing
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BeautyOnlyFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_ImYourOnlyFan
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BeautyOnlyNonFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_BelieveInMasterWithAllMyHeart
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BlackBelt::
lock
faceplayer
setvar VAR_0x8004, FANCLUB_MEMBER8
special Script_BufferFanClubTrainerName
specialvar VAR_RESULT, Script_IsFanClubMemberFanOfPlayer
goto_if_eq VAR_RESULT, TRUE, SaffronCity_PokemonTrainerFanClub_EventScript_BlackBeltPlayersFan
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, (NUM_TRAINER_FAN_CLUB_MEMBERS - 1), SaffronCity_PokemonTrainerFanClub_EventScript_BlackBeltOnlyNonFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_OnlyMasterHasMyRespect
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BlackBeltPlayersFan::
specialvar VAR_RESULT, Script_GetNumFansOfPlayerInTrainerFanClub
goto_if_eq VAR_RESULT, 1, SaffronCity_PokemonTrainerFanClub_EventScript_BlackBeltOnlyFan
msgbox SaffronCity_PokemonTrainerFanClub_Text_YourBattleStyleIsEducational
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BlackBeltOnlyFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_WontStopBeingYourFan
release
end
SaffronCity_PokemonTrainerFanClub_EventScript_BlackBeltOnlyNonFan::
msgbox SaffronCity_PokemonTrainerFanClub_Text_NeverBeFanOfAnyoneButMaster
release
end