Files
2026-06-08 18:24:42 +09:30

166 lines
5.2 KiB
C++

MtMoon_B2F_MapScripts::
map_script MAP_SCRIPT_ON_TRANSITION, MtMoon_B2F_OnTransition
.byte 0
MtMoon_B2F_OnTransition::
call_if_unset FLAG_GOT_FOSSIL_FROM_MT_MOON, MtMoon_B2F_EventScript_ShowFossils
end
MtMoon_B2F_EventScript_ShowFossils::
clearflag FLAG_HIDE_DOME_FOSSIL
clearflag FLAG_HIDE_HELIX_FOSSIL
return
MtMoon_B2F_EventScript_MiguelTrigger::
lockall
applymovement LOCALID_MIGUEL, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
call MtMoon_B2F_EventScript_BattleMiguel
releaseall
end
MtMoon_B2F_EventScript_Miguel::
lock
faceplayer
goto_if_set FLAG_GOT_FOSSIL_FROM_MT_MOON, MtMoon_B2F_EventScript_MiguelFossilPicked
goto_if_defeated TRAINER_SUPER_NERD_MIGUEL, MtMoon_B2F_EventScript_MiguelGoPickFossil
call MtMoon_B2F_EventScript_BattleMiguel
release
end
MtMoon_B2F_EventScript_BattleMiguel::
textcolor NPC_TEXT_COLOR_MALE
message MtMoon_B2F_Text_MiguelIntro
waitmessage
playbgm MUS_ENCOUNTER_GYM_LEADER, 0
waitbuttonpress
setvar VAR_LAST_TALKED, LOCALID_MIGUEL
trainerbattle_no_intro TRAINER_SUPER_NERD_MIGUEL, MtMoon_B2F_Text_MiguelDefeat
setvar VAR_MAP_SCENE_MT_MOON_B2F, 1
msgbox MtMoon_B2F_Text_WellEachTakeAFossil
return
MtMoon_B2F_EventScript_MiguelFossilPicked::
msgbox MtMoon_B2F_Text_LabOnCinnabarRegeneratesFossils
release
end
MtMoon_B2F_EventScript_MiguelGoPickFossil::
msgbox MtMoon_B2F_Text_WellEachTakeAFossil
release
end
MtMoon_B2F_EventScript_DomeFossil::
lock
faceplayer
msgbox MtMoon_B2F_Text_YouWantDomeFossil, MSGBOX_YESNO
goto_if_eq VAR_RESULT, NO, MtMoon_B2F_EventScript_DontTakeFossil
removeobject LOCALID_DOME_FOSSIL
giveitem_msg MtMoon_B2F_Text_ObtainedDomeFossil, ITEM_DOME_FOSSIL, 1, MUS_OBTAIN_KEY_ITEM
closemessage
special QuestLog_CutRecording
delay 10
applymovement LOCALID_MIGUEL, MtMoon_B2F_Movement_MiguelToHelixFossil
waitmovement 0
copyobjectxytoperm LOCALID_MIGUEL
textcolor NPC_TEXT_COLOR_MALE
playfanfare MUS_OBTAIN_KEY_ITEM
message MtMoon_B2F_Text_ThenThisFossilIsMine
waitmessage
waitfanfare
removeobject LOCALID_HELIX_FOSSIL
setflag FLAG_GOT_DOME_FOSSIL
setflag FLAG_GOT_FOSSIL_FROM_MT_MOON
release
end
MtMoon_B2F_Movement_MiguelToHelixFossil::
walk_right
walk_up
walk_up
walk_up
step_end
MtMoon_B2F_EventScript_HelixFossil::
lock
faceplayer
msgbox MtMoon_B2F_Text_YouWantHelixFossil, MSGBOX_YESNO
goto_if_eq VAR_RESULT, NO, MtMoon_B2F_EventScript_DontTakeFossil
removeobject LOCALID_HELIX_FOSSIL
giveitem_msg MtMoon_B2F_Text_ObtainedHelixFossil, ITEM_HELIX_FOSSIL, 1, MUS_OBTAIN_KEY_ITEM
closemessage
special QuestLog_CutRecording
delay 10
applymovement LOCALID_MIGUEL, MtMoon_B2F_Movement_MiguelToDomeFossil
waitmovement 0
copyobjectxytoperm LOCALID_MIGUEL
textcolor NPC_TEXT_COLOR_MALE
playfanfare MUS_OBTAIN_KEY_ITEM
message MtMoon_B2F_Text_ThenThisFossilIsMine
waitmessage
waitfanfare
removeobject LOCALID_DOME_FOSSIL
setflag FLAG_GOT_HELIX_FOSSIL
setflag FLAG_GOT_FOSSIL_FROM_MT_MOON
release
end
MtMoon_B2F_EventScript_DontTakeFossil::
release
end
MtMoon_B2F_Movement_MiguelToDomeFossil::
walk_up
walk_up
walk_up
step_end
MtMoon_B2F_EventScript_Grunt1::
trainerbattle_single TRAINER_TEAM_ROCKET_GRUNT, MtMoon_B2F_Text_Grunt1Intro, MtMoon_B2F_Text_Grunt1Defeat
specialvar VAR_RESULT, ShouldTryRematchBattle
goto_if_eq VAR_RESULT, TRUE, MtMoon_B2F_EventScript_Grunt1Rematch
msgbox MtMoon_B2F_Text_Grunt1PostBattle, MSGBOX_AUTOCLOSE
end
MtMoon_B2F_EventScript_Grunt1Rematch::
trainerbattle_rematch TRAINER_TEAM_ROCKET_GRUNT, MtMoon_B2F_Text_Grunt1Intro, MtMoon_B2F_Text_Grunt1Defeat
msgbox MtMoon_B2F_Text_Grunt1PostBattle, MSGBOX_AUTOCLOSE
end
MtMoon_B2F_EventScript_Grunt2::
trainerbattle_single TRAINER_TEAM_ROCKET_GRUNT_2, MtMoon_B2F_Text_Grunt2Intro, MtMoon_B2F_Text_Grunt2Defeat
specialvar VAR_RESULT, ShouldTryRematchBattle
goto_if_eq VAR_RESULT, TRUE, MtMoon_B2F_EventScript_Grunt2Rematch
msgbox MtMoon_B2F_Text_Grunt2PostBattle, MSGBOX_AUTOCLOSE
end
MtMoon_B2F_EventScript_Grunt2Rematch::
trainerbattle_rematch TRAINER_TEAM_ROCKET_GRUNT_2, MtMoon_B2F_Text_Grunt2Intro, MtMoon_B2F_Text_Grunt2Defeat
msgbox MtMoon_B2F_Text_Grunt2PostBattle, MSGBOX_AUTOCLOSE
end
MtMoon_B2F_EventScript_Grunt3::
trainerbattle_single TRAINER_TEAM_ROCKET_GRUNT_3, MtMoon_B2F_Text_Grunt3Intro, MtMoon_B2F_Text_Grunt3Defeat
specialvar VAR_RESULT, ShouldTryRematchBattle
goto_if_eq VAR_RESULT, TRUE, MtMoon_B2F_EventScript_Grunt3Rematch
msgbox MtMoon_B2F_Text_Grunt3PostBattle, MSGBOX_AUTOCLOSE
end
MtMoon_B2F_EventScript_Grunt3Rematch::
trainerbattle_rematch TRAINER_TEAM_ROCKET_GRUNT_3, MtMoon_B2F_Text_Grunt3Intro, MtMoon_B2F_Text_Grunt3Defeat
msgbox MtMoon_B2F_Text_Grunt3PostBattle, MSGBOX_AUTOCLOSE
end
MtMoon_B2F_EventScript_Grunt4::
trainerbattle_single TRAINER_TEAM_ROCKET_GRUNT_4, MtMoon_B2F_Text_Grunt4Intro, MtMoon_B2F_Text_Grunt4Defeat
specialvar VAR_RESULT, ShouldTryRematchBattle
goto_if_eq VAR_RESULT, TRUE, MtMoon_B2F_EventScript_Grunt4Rematch
msgbox MtMoon_B2F_Text_Grunt4PostBattle, MSGBOX_AUTOCLOSE
end
MtMoon_B2F_EventScript_Grunt4Rematch::
trainerbattle_rematch TRAINER_TEAM_ROCKET_GRUNT_4, MtMoon_B2F_Text_Grunt4Intro, MtMoon_B2F_Text_Grunt4Defeat
msgbox MtMoon_B2F_Text_Grunt4PostBattle, MSGBOX_AUTOCLOSE
end