pokeemerald-expansion/data/maps/PewterCity_Museum_1F_Frlg/scripts.inc
Bassoonian 310f746565
Some checks are pending
CI / build (push) Waiting to run
CI / docs_validate (push) Waiting to run
CI / allcontributors (push) Waiting to run
Fix space indentation in .s and .inc files (#9371)
2026-02-27 12:45:00 -08:00

278 lines
8.4 KiB
PHP

PewterCity_Museum_1F_Frlg_MapScripts::
.byte 0
PewterCity_Museum_1F_EventScript_Scientist1::
lock
faceplayer
goto_if_eq VAR_FACING, DIR_WEST, PewterCity_Museum_1F_EventScript_Scientist1BehindCounter
goto_if_eq VAR_FACING, DIR_SOUTH, PewterCity_Museum_1F_EventScript_Scientist1BehindCounter
goto_if_eq VAR_FACING, DIR_NORTH, PewterCity_Museum_1F_EventScript_Scientist1BehindCounter
msgbox PewterCity_Museum_1F_Text_PleaseEnjoyYourself
release
end
PewterCity_Museum_1F_EventScript_Scientist1BehindCounter::
msgbox PewterCity_Museum_1F_Text_DoYouKnowWhatAmberIs, MSGBOX_YESNO
goto_if_eq VAR_RESULT, YES, PewterCity_Museum_1F_EventScript_AmberHasGeneticMatter
goto_if_eq VAR_RESULT, NO, PewterCity_Museum_1F_EventScript_ExplainAmber
end
PewterCity_Museum_1F_EventScript_AmberHasGeneticMatter::
msgbox PewterCity_Museum_1F_Text_AmberContainsGeneticMatter
applymovement LOCALID_MUSEUM_SCIENTIST1, Common_Movement_FaceOriginalDirection
waitmovement 0
release
end
PewterCity_Museum_1F_EventScript_ExplainAmber::
msgbox PewterCity_Museum_1F_Text_AmberIsFossilizedSap
applymovement LOCALID_MUSEUM_SCIENTIST1, Common_Movement_FaceOriginalDirection
waitmovement 0
release
end
PewterCity_Museum_1F_EventScript_EntranceTriggerLeft::
lockall
setvar VAR_TEMP_1, 0
applymovement LOCALID_PLAYER, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
goto PewterCity_Museum_1F_EventScript_EntranceTrigger
end
PewterCity_Museum_1F_EventScript_EntranceTriggerMid::
lockall
setvar VAR_TEMP_1, 1
applymovement LOCALID_PLAYER, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
goto PewterCity_Museum_1F_EventScript_EntranceTrigger
end
PewterCity_Museum_1F_EventScript_EntranceTriggerRight::
lockall
setvar VAR_TEMP_1, 2
applymovement LOCALID_PLAYER, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
goto PewterCity_Museum_1F_EventScript_EntranceTrigger
end
PewterCity_Museum_1F_EventScript_EntranceTrigger::
textcolor NPC_TEXT_COLOR_MALE
showmoneybox 0, 0
msgbox PewterCity_Museum_1F_Text_Its50YForChildsTicket, MSGBOX_YESNO
goto_if_eq VAR_RESULT, YES, PewterCity_Museum_1F_EventScript_TryPayForTicket
msgbox PewterCity_Museum_1F_Text_ComeAgain
closemessage
hidemoneybox
applymovement LOCALID_PLAYER, PewterCity_Museum_1F_Movement_ForcePlayerExit
waitmovement 0
releaseall
end
PewterCity_Museum_1F_EventScript_TryPayForTicket::
checkmoney 50
goto_if_eq VAR_RESULT, FALSE, PewterCity_Museum_1F_EventScript_NotEnoughMoney
closemessage
call_if_eq VAR_TEMP_1, 0, PewterCity_Museum_1F_EventScript_PlayerApproachCounterLeft
call_if_eq VAR_TEMP_1, 1, PewterCity_Museum_1F_EventScript_PlayerApproachCounterMid
call_if_eq VAR_TEMP_1, 2, PewterCity_Museum_1F_EventScript_PlayerApproachCounterRight
playse SE_SHOP
removemoney 50
updatemoneybox
waitse
msgbox PewterCity_Museum_1F_Text_Right50YThankYou
setvar VAR_MAP_SCENE_PEWTER_CITY_MUSEUM_1F, 1
hidemoneybox
releaseall
end
PewterCity_Museum_1F_EventScript_PlayerApproachCounterLeft::
applymovement LOCALID_PLAYER, PewterCity_Museum_1F_Movement_ApproachCounterLeft
waitmovement 0
return
PewterCity_Museum_1F_EventScript_PlayerApproachCounterMid::
applymovement LOCALID_PLAYER, PewterCity_Museum_1F_Movement_ApproachCounterMid
waitmovement 0
return
PewterCity_Museum_1F_EventScript_PlayerApproachCounterRight::
applymovement LOCALID_PLAYER, PewterCity_Museum_1F_Movement_ApproachCounterRight
waitmovement 0
return
PewterCity_Museum_1F_EventScript_NotEnoughMoney::
msgbox PewterCity_Museum_1F_Text_DontHaveEnoughMoney
closemessage
hidemoneybox
applymovement LOCALID_PLAYER, PewterCity_Museum_1F_Movement_ForcePlayerExit
waitmovement 0
releaseall
end
PewterCity_Museum_1F_Movement_ForcePlayerExit::
walk_down
step_end
PewterCity_Museum_1F_Movement_ApproachCounterLeft::
walk_right
walk_right
delay_8
walk_in_place_right
step_end
PewterCity_Museum_1F_Movement_ApproachCounterMid::
walk_right
delay_8
walk_in_place_right
step_end
PewterCity_Museum_1F_Movement_ApproachCounterRight::
delay_8
walk_in_place_right
step_end
PewterCity_Museum_1F_EventScript_Scientist2::
msgbox PewterCity_Museum_1F_Text_WeHaveTwoFossilsOnExhibit, MSGBOX_NPC
end
PewterCity_Museum_1F_EventScript_OldMan::
msgbox PewterCity_Museum_1F_Text_ShouldBeGratefulForLongLife, MSGBOX_NPC
end
PewterCity_Museum_1F_EventScript_OldAmberScientist::
lock
faceplayer
goto_if_set FLAG_GOT_OLD_AMBER, PewterCity_Museum_1F_EventScript_AlreadyGotOldAmber
msgbox PewterCity_Museum_1F_Text_WantYouToGetAmberExamined
checkitemspace ITEM_OLD_AMBER
goto_if_eq VAR_RESULT, FALSE, PewterCity_Museum_1F_EventScript_NoRoomForOldAmber
setflag FLAG_GOT_OLD_AMBER
removeobject LOCALID_OLD_AMBER
giveitem_msg PewterCity_Museum_1F_Text_ReceivedOldAmberFromMan, ITEM_OLD_AMBER, 1, MUS_RG_OBTAIN_KEY_ITEM
release
end
PewterCity_Museum_1F_EventScript_NoRoomForOldAmber::
msgbox PewterCity_Museum_1F_Text_DontHaveSpaceForThis
release
end
PewterCity_Museum_1F_EventScript_AlreadyGotOldAmber::
msgbox PewterCity_Museum_1F_Text_GetOldAmberChecked
release
end
PewterCity_Museum_1F_EventScript_OldAmber::
msgbox PewterCity_Museum_1F_Text_BeautifulPieceOfAmber, MSGBOX_NPC
end
PewterCity_Museum_1F_EventScript_AerodactylFossil::
lockall
setvar VAR_0x8004, SPECIES_AERODACTYL
setvar VAR_0x8005, 10
setvar VAR_0x8006, 3
special OpenMuseumFossilPic
msgbox PewterCity_Museum_1F_Text_AerodactylFossil
special CloseMuseumFossilPic
releaseall
end
PewterCity_Museum_1F_EventScript_KabutopsFossil::
lockall
setvar VAR_0x8004, SPECIES_KABUTOPS
setvar VAR_0x8005, 10
setvar VAR_0x8006, 3
special OpenMuseumFossilPic
msgbox PewterCity_Museum_1F_Text_KabutopsFossil
special CloseMuseumFossilPic
releaseall
end
PewterCity_Museum_1F_Text_Its50YForChildsTicket::
.string "Yes, yes.\n"
.string "It's ¥50 for a child's ticket.\p"
.string "Would you like to come in?$"
PewterCity_Museum_1F_Text_ComeAgain::
.string "Come again!$"
PewterCity_Museum_1F_Text_Right50YThankYou::
.string "Right, ¥50!\n"
.string "Thank you!$"
PewterCity_Museum_1F_Text_DontHaveEnoughMoney::
.string "You don't have enough money.$"
PewterCity_Museum_1F_Text_PleaseEnjoyYourself::
.string "Please enjoy yourself.$"
PewterCity_Museum_1F_Text_DoYouKnowWhatAmberIs::
.string "You can't sneak in the back way!\n"
.string "Nice try, kid, but no.\p"
.string "Oh, whatever!\n"
.string "Do you know what AMBER is?$"
PewterCity_Museum_1F_Text_AmberContainsGeneticMatter::
.string "AMBER contains the genetic matter\n"
.string "of ancient POKéMON.\p"
.string "There's a LAB somewhere trying to\n"
.string "resurrect POKéMON from AMBER.$"
PewterCity_Museum_1F_Text_AmberIsFossilizedSap::
.string "AMBER is actually sap, that gooey\n"
.string "stuff that oozes from trees.\p"
.string "The ancient sap fossilized over\n"
.string "time to become rock-hard AMBER.$"
@ Unused
PewterCity_Museum_1F_Text_PleaseGoAround::
.string "あちらへ おまわりください$"
PewterCity_Museum_1F_Text_ShouldBeGratefulForLongLife::
.string "I should be grateful for my long\n"
.string "life.\p"
.string "Never did I think I would get to\n"
.string "see the bones of a dragon!$"
PewterCity_Museum_1F_Text_WantYouToGetAmberExamined::
.string "Ssh! Listen, I need to share a\n"
.string "secret with someone.\p"
.string "I think that this chunk of AMBER\n"
.string "contains POKéMON DNA!\p"
.string "It would be a shattering scientific\n"
.string "breakthrough if POKéMON could be\l"
.string "resurrected from it.\p"
.string "But, my colleagues just ignore\n"
.string "what I have to say.\p"
.string "So, I have a favor to ask!\p"
.string "I want you to get this examined at\n"
.string "a POKéMON LAB somewhere.$"
PewterCity_Museum_1F_Text_ReceivedOldAmberFromMan::
.string "{PLAYER} received the OLD AMBER\n"
.string "from the man.$"
PewterCity_Museum_1F_Text_GetOldAmberChecked::
.string "Ssh!\n"
.string "Get the OLD AMBER checked!$"
PewterCity_Museum_1F_Text_DontHaveSpaceForThis::
.string "You don't have space for this.$"
PewterCity_Museum_1F_Text_WeHaveTwoFossilsOnExhibit::
.string "We have two fossils of rare,\n"
.string "prehistoric POKéMON on exhibit.$"
PewterCity_Museum_1F_Text_BeautifulPieceOfAmber::
.string "There is a beautiful piece of\n"
.string "AMBER in a clear gold color.$"
PewterCity_Museum_1F_Text_AerodactylFossil::
.string "AERODACTYL Fossil\n"
.string "A primitive and rare POKéMON.$"
PewterCity_Museum_1F_Text_KabutopsFossil::
.string "KABUTOPS Fossil\n"
.string "A primitive and rare POKéMON.$"