2025-04-26 21:51:46 +08:00

336 lines
11 KiB
PHP
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

.set LOCALID_RIVAL_ON_BIKE, 7
.set LOCALID_RIVAL, 8
LavaridgeTown_MapScripts::
map_script MAP_SCRIPT_ON_TRANSITION, LavaridgeTown_OnTransition
map_script MAP_SCRIPT_ON_FRAME_TABLE, LavaridgeTown_OnFrame
.byte 0
LavaridgeTown_OnTransition:
setflag FLAG_VISITED_LAVARIDGE_TOWN
call_if_set FLAG_WHITEOUT_TO_LAVARIDGE, LavaridgeTown_EventScript_ClearLavaridgeWhiteOut
call_if_set FLAG_DEFEATED_EVIL_TEAM_MT_CHIMNEY, LavaridgeTown_EventScript_ShowMtChimneyTrainers
call Common_EventScript_SetupRivalGfxId
call Common_EventScript_SetupRivalOnBikeGfxId
call_if_eq VAR_LAVARIDGE_TOWN_STATE, 1, LavaridgeTown_EventScript_CheckSetRivalPos
call_if_eq VAR_LAVARIDGE_TOWN_STATE, 1, LavaridgeTown_EventScript_HideMapNamePopup
end
LavaridgeTown_EventScript_ClearLavaridgeWhiteOut::
clearflag FLAG_WHITEOUT_TO_LAVARIDGE
return
LavaridgeTown_EventScript_CheckSetRivalPos::
getplayerxy VAR_0x8004, VAR_0x8005
goto_if_eq VAR_0x8004, 9, LavaridgeTown_EventScript_SetRivalPos
return
LavaridgeTown_EventScript_SetRivalPos::
setobjectxyperm LOCALID_RIVAL, 11, 9
setobjectxyperm LOCALID_RIVAL_ON_BIKE, 9, 8
setobjectmovementtype LOCALID_RIVAL_ON_BIKE, MOVEMENT_TYPE_FACE_UP
clearflag FLAG_HIDE_LAVARIDGE_TOWN_RIVAL
return
LavaridgeTown_EventScript_ShowMtChimneyTrainers::
clearflag FLAG_HIDE_MT_CHIMNEY_TRAINERS
return
LavaridgeTown_EventScript_HideMapNamePopup::
setflag FLAG_HIDE_MAP_NAME_POPUP
return
LavaridgeTown_OnFrame:
map_script_2 VAR_LAVARIDGE_TOWN_STATE, 1, LavaridgeTown_EventScript_RivalGiveGoGoggles
.2byte 0
LavaridgeTown_EventScript_RivalGiveGoGoggles::
lockall
getplayerxy VAR_0x8008, VAR_0x8009
call_if_eq VAR_0x8008, 9, LavaridgeTown_EventScript_RivalNoticePlayer
call_if_ne VAR_0x8008, 9, LavaridgeTown_EventScript_RivalExitHerbShop
delay 20
checkplayergender
call_if_eq VAR_RESULT, MALE, LavaridgeTown_EventScript_PlayMayMusic
call_if_eq VAR_RESULT, FEMALE, LavaridgeTown_EventScript_PlayBrendanMusic
call_if_eq VAR_0x8008, 9, LavaridgeTown_EventScript_RivalApproachPlayer1
call_if_ne VAR_0x8008, 9, LavaridgeTown_EventScript_RivalApproachPlayer2
checkplayergender
goto_if_eq VAR_RESULT, MALE, LavaridgeTown_EventScript_MayGiveGoGoggles
goto_if_eq VAR_RESULT, FEMALE, LavaridgeTown_EventScript_BrendanGiveGoGoggles
end
LavaridgeTown_EventScript_MayGiveGoGoggles::
msgbox LavaridgeTown_Text_MayNiceBadgesTakeThis, MSGBOX_DEFAULT
giveitem ITEM_GO_GOGGLES
setflag FLAG_RECEIVED_GO_GOGGLES
msgbox LavaridgeTown_Text_MayExplainGoGogglesChallengeDad, MSGBOX_DEFAULT
goto LavaridgeTown_EventScript_RivalExit
end
LavaridgeTown_EventScript_BrendanGiveGoGoggles::
msgbox LavaridgeTown_Text_BrendanNiceBadgesTakeThis, MSGBOX_DEFAULT
giveitem ITEM_GO_GOGGLES
setflag FLAG_RECEIVED_GO_GOGGLES
msgbox LavaridgeTown_Text_BrendanExplainGoGogglesChallengeDad, MSGBOX_DEFAULT
goto LavaridgeTown_EventScript_RivalExit
end
LavaridgeTown_EventScript_RivalExit::
closemessage
removeobject LOCALID_RIVAL
addobject LOCALID_RIVAL_ON_BIKE
delay 30
call_if_eq VAR_0x8008, 9, LavaridgeTown_EventScript_RivalExit1
call_if_ne VAR_0x8008, 9, LavaridgeTown_EventScript_RivalExit2
removeobject LOCALID_RIVAL_ON_BIKE
setvar VAR_LAVARIDGE_TOWN_STATE, 2
clearflag FLAG_HIDE_MAP_NAME_POPUP
savebgm MUS_DUMMY
fadedefaultbgm
releaseall
end
LavaridgeTown_EventScript_PlayMayMusic::
playbgm MUS_ENCOUNTER_MAY, TRUE
return
LavaridgeTown_EventScript_PlayBrendanMusic::
playbgm MUS_ENCOUNTER_BRENDAN, TRUE
return
LavaridgeTown_EventScript_RivalNoticePlayer::
applymovement LOCALID_RIVAL, Common_Movement_WalkInPlaceFasterUp
waitmovement 0
playse SE_PIN
applymovement LOCALID_RIVAL, Common_Movement_ExclamationMark
waitmovement 0
applymovement LOCALID_RIVAL, Common_Movement_Delay48
waitmovement 0
return
LavaridgeTown_EventScript_RivalExitHerbShop::
opendoor 12, 15
waitdooranim
addobject LOCALID_RIVAL
applymovement LOCALID_RIVAL, LavaridgeTown_Movement_RivalExitHerbShop
waitmovement 0
closedoor 12, 15
waitdooranim
applymovement LOCALID_RIVAL, Common_Movement_WalkInPlaceFasterLeft
waitmovement 0
playse SE_PIN
applymovement LOCALID_RIVAL, Common_Movement_ExclamationMark
waitmovement 0
applymovement LOCALID_RIVAL, Common_Movement_Delay48
waitmovement 0
applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
return
LavaridgeTown_EventScript_RivalApproachPlayer1::
applymovement LOCALID_RIVAL, LavaridgeTown_Movement_RivalApproachPlayer1
waitmovement 0
return
LavaridgeTown_EventScript_RivalApproachPlayer2::
applymovement LOCALID_RIVAL, LavaridgeTown_Movement_RivalApproachPlayer2
waitmovement 0
return
LavaridgeTown_EventScript_RivalExit1::
applymovement OBJ_EVENT_ID_PLAYER, LavaridgeTown_Movement_PlayerWatchRivalExit
applymovement LOCALID_RIVAL_ON_BIKE, LavaridgeTown_Movement_RivalExit1
waitmovement 0
return
LavaridgeTown_EventScript_RivalExit2::
applymovement LOCALID_RIVAL_ON_BIKE, LavaridgeTown_Movement_RivalExit2
waitmovement 0
return
LavaridgeTown_Movement_RivalExit2:
walk_fast_right
walk_fast_right
walk_fast_right
walk_fast_up
walk_fast_up
walk_fast_up
walk_fast_up
walk_fast_up
walk_fast_up
walk_fast_up
step_end
LavaridgeTown_Movement_PlayerWatchRivalExit:
delay_16
delay_8
walk_in_place_faster_right
step_end
LavaridgeTown_Movement_RivalExit1:
walk_fast_down
walk_fast_right
walk_fast_right
walk_fast_right
walk_fast_right
walk_fast_right
walk_fast_right
walk_fast_right
walk_fast_right
step_end
LavaridgeTown_Movement_RivalApproachPlayer2:
walk_left
walk_left
walk_left
walk_left
walk_left
walk_left
step_end
LavaridgeTown_Movement_RivalApproachPlayer1:
walk_left
walk_left
walk_up
step_end
LavaridgeTown_Movement_RivalExitHerbShop:
walk_down
step_end
LavaridgeTown_EventScript_HotSpringsTrigger::
specialvar VAR_RESULT, GetPlayerFacingDirection
goto_if_eq VAR_RESULT, DIR_SOUTH, LavaridgeTown_EventScript_EnteredHotSprings
end
LavaridgeTown_EventScript_EnteredHotSprings::
incrementgamestat GAME_STAT_ENTERED_HOT_SPRINGS
end
LavaridgeTown_EventScript_ExpertM::
msgbox LavaridgeTown_Text_HotSpringsNeverRunDry, MSGBOX_NPC
end
LavaridgeTown_EventScript_OldMan::
msgbox LavaridgeTown_Text_PokemonNippedBackside, MSGBOX_SIGN
end
LavaridgeTown_EventScript_Twin::
msgbox LavaridgeTown_Text_BatheInHotSpringsEveryDay, MSGBOX_NPC
end
LavaridgeTown_EventScript_HotSpringsOldWoman1::
msgbox LavaridgeTown_Text_IfPokemonInHotSprings, MSGBOX_NPC
end
LavaridgeTown_EventScript_HotSpringsOldWoman2::
msgbox LavaridgeTown_Text_HotSpringsClaims, MSGBOX_NPC
end
LavaridgeTown_EventScript_ExpertF::
msgbox LavaridgeTown_Text_OhYouLikeHotSprings, MSGBOX_NPC
end
LavaridgeTown_EventScript_EggWoman::
lock
faceplayer
goto_if_set FLAG_RECEIVED_LAVARIDGE_EGG, LavaridgeTown_EventScript_ReceivedEgg
msgbox LavaridgeTown_Text_HaveEggWillYouTakeIt, MSGBOX_YESNO
goto_if_eq VAR_RESULT, NO, LavaridgeTown_EventScript_DeclineEgg
getpartysize
goto_if_eq VAR_RESULT, PARTY_SIZE, LavaridgeTown_EventScript_NoRoomForEgg
msgbox LavaridgeTown_Text_HopeYoullWalkPlentyWithEgg, MSGBOX_DEFAULT
setflag FLAG_RECEIVED_LAVARIDGE_EGG
playfanfare MUS_OBTAIN_ITEM
message LavaridgeTown_Text_ReceivedTheEgg
waitfanfare
giveegg SPECIES_WYNAUT
release
end
LavaridgeTown_EventScript_ReceivedEgg::
msgbox LavaridgeTown_Text_EverySoOftenEggFoundAtDayCare, MSGBOX_DEFAULT
release
end
LavaridgeTown_EventScript_NoRoomForEgg::
msgbox LavaridgeTown_Text_NoRoomForThisEgg, MSGBOX_DEFAULT
release
end
LavaridgeTown_EventScript_DeclineEgg::
msgbox LavaridgeTown_Text_AsYouWishThen, MSGBOX_DEFAULT
release
end
LavaridgeTown_EventScript_TownSign::
msgbox LavaridgeTown_Text_TownSign, MSGBOX_SIGN
end
LavaridgeTown_EventScript_GymSign::
msgbox LavaridgeTown_Text_GymSign, MSGBOX_SIGN
end
LavaridgeTown_EventScript_HerbShopSign::
msgbox LavaridgeTown_Text_HerbShopSign, MSGBOX_SIGN
end
LavaridgeTown_Text_MayNiceBadgesTakeThis:
.string "小遥:{PLAYER}{KUN}!好久不见了!\p哦看来我去温泉的时候\n你已经拿到釜炎镇道馆徽章了。\p你一定收集了不少\n优秀的宝可梦……\l不我想是你训练得好的缘故。\p我想把这个给你\n没什么问题。$"
LavaridgeTown_Text_MayExplainGoGogglesChallengeDad:
.string "小遥有这个GOGO护目镜的话\n穿过111号道路上的沙漠\l就很轻松了。\p但真的{PLAYER}{KUN}在\n挑战道馆……\p为了不输给我\n你真的很努力呢!\p{PLAYER}{KUN},我现在打算\n去橙华市道馆挑战你爸爸。\p回头见$"
LavaridgeTown_Text_BrendanNiceBadgesTakeThis:
.string "小悠:{PLAYER},嗨,又见面了,\n还顺利吗?\p唔……\n你收集了不少徽章了啊。\p那好\n这个也给你吧。$"
LavaridgeTown_Text_BrendanExplainGoGogglesChallengeDad:
.string "小悠:打算\n过111号道路上的沙漠的话\l就用它吧。\p沙漠里应该也有一些\n不怕风沙的宝可梦,\l你可以去找找。\p至于我……\n我打算去挑战橙华市的\l道馆馆主千里。\p{PLAYER},你老爸和你不一样,\n他看上去相当强。\p下次见了$"
LavaridgeTown_Text_HaveEggWillYouTakeIt:
.string "我这儿有个蛋,\p我本来指望用温泉边温暖的沙子\n盖起它来会孵化的,\l但看来这样还不够……\p听说最好能\n让它跟宝可梦\l在一起。\p你是个训练家对吗\n而且你的宝可梦看上去活力十足。\p怎么样\n你愿意带上这个蛋孵化它吗?$"
LavaridgeTown_Text_HopeYoullWalkPlentyWithEgg:
.string "好!希望你能带上\n这个蛋一起旅行!$"
LavaridgeTown_Text_ReceivedTheEgg:
.string "{PLAYER}得到蛋。$"
LavaridgeTown_Text_NoRoomForThisEgg:
.string "嗯?你带了太多宝可梦,\n没法再带上这个蛋了……$"
LavaridgeTown_Text_AsYouWishThen:
.string "那么请便吧……\p如果你改变主意了\n再来这儿找我。$"
LavaridgeTown_Text_EverySoOftenEggFoundAtDayCare:
.string "有时宝可梦培育屋里\n会发现蛋,\p至少传闻中是这样。$"
LavaridgeTown_Text_HotSpringsNeverRunDry:
.string "我们不断地汲取热水,\n但温泉却从未干涸,\p很神奇不是吗\p这些温泉都很接近活火山\n地下水脉被岩浆加热,\l从地表冒出来\l就形成了温泉。$"
LavaridgeTown_Text_PokemonNippedBackside:
.string "埋在沙里的感觉……\n哎……\p说不出的温暖美妙……\p呃啊噢\p有宝可梦咬了我$"
LavaridgeTown_Text_OhYouLikeHotSprings:
.string "你喜欢温泉吗?\p对像你这样的年轻人来说\n还真是少见。$"
LavaridgeTown_Text_BatheInHotSpringsEveryDay:
.string "我每天都来泡温泉,因为\p我也想成为一个亚莎那样\n既漂亮又强大的道馆馆主。$"
LavaridgeTown_Text_IfPokemonInHotSprings:
.string "如果把宝可梦放进温泉,\n它就会变得很奇怪。\p哈有时候可能变成电气浴\n或者泡沫浴,甚至岩浆浴……$"
LavaridgeTown_Text_HotSpringsClaims:
.string "据说温泉可以放松\n紧张的神经,\l减轻身体的疲劳解决\l爱情问题还有\l增加收入……$"
LavaridgeTown_Text_TownSign:
.string "釜炎镇\p“宝可梦中心温泉\n最佳的放松地!”$"
LavaridgeTown_Text_GymSign:
.string "釜炎镇宝可梦道馆\n馆主:亚莎\l“拥有火焰般燃烧的激情的人$"
LavaridgeTown_Text_HerbShopSign:
.string "宝可梦中药店\n“良药苦口。”$"