jep-hack/maps/PewterMuseumOfScience2F.asm
2023-10-20 16:28:18 -04:00

179 lines
3.8 KiB
NASM

PewterMuseumOfScience2F_MapScriptHeader:
def_scene_scripts
def_callbacks
def_warp_events
warp_event 7, 7, PEWTER_MUSEUM_OF_SCIENCE_1F, 5
def_coord_events
def_bg_events
bg_event 3, 6, BGEVENT_READ, Museum2FMoonStoneSignpostScript
bg_event 11, 2, BGEVENT_JUMPTEXT, Museum2FSpaceShuttleSignpostText
def_object_events
object_event 7, 5, SPRITE_SCIENTIST, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_COMMAND, jumptextfaceplayer, Museum2FScientistText, -1
object_event 1, 7, SPRITE_CHILD, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_COMMAND, jumptextfaceplayer, Museum2FChildText, -1
object_event 2, 7, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_COMMAND, jumptextfaceplayer, Museum2FTeacherText, -1
object_event 2, 1, SPRITE_CUTE_GIRL, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_COMMAND, jumptextfaceplayer, Museum2FLassText, -1
object_event 12, 5, SPRITE_HIKER, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Museum2FPokefanMScript, -1
Museum2FPokefanMScript:
faceplayer
opentext
checkevent EVENT_LISTENED_TO_SEISMIC_TOSS_INTRO
iftrue Museum2FTutorSeismicTossScript
checkunits
iftrue .metric
writetext Museum2FPokefanMImperialText
sjump .ok
.metric
writetext Museum2FPokefanMMetricText
.ok
waitbutton
setevent EVENT_LISTENED_TO_SEISMIC_TOSS_INTRO
Museum2FTutorSeismicTossScript:
writetext Text_Museum2FTutorSeismicToss
waitbutton
checkitem SILVER_LEAF
iffalse .NoSilverLeaf
writetext Text_Museum2FTutorQuestion
yesorno
iffalse .TutorRefused
setval SEISMIC_TOSS
writetext ClearText
special Special_MoveTutor
ifequal $0, .TeachMove
.TutorRefused
jumpopenedtext Text_Museum2FTutorRefused
.NoSilverLeaf
jumpopenedtext Text_Museum2FTutorNoSilverLeaf
.TeachMove
takeitem SILVER_LEAF
jumpopenedtext Text_Museum2FTutorTaught
Museum2FMoonStoneSignpostScript:
refreshscreen
trainerpic METEORITE
waitbutton
closepokepic
jumptext Museum2FMoonStoneSignpostText
Museum2FScientistText:
text "Meteorites struck"
line "Mt.Moon near"
cont "Pewter City."
para "We have one"
line "on display."
para "It seems to emit"
line "strange energy…"
done
Museum2FLassText:
text "#mon revived"
line "from fossils are"
para "all part Rock-"
line "type."
para "Were they always"
line "that way, or is it"
para "a result of the"
line "fossilization"
cont "process?"
done
Museum2FPokefanMImperialText:
text "This space shuttle"
line "used to fly 160"
para "miles above the"
line "earth, defying"
cont "gravity!"
para "You know what else"
line "can defy gravity?"
para "Seismic Toss,"
line "of course!"
done
Museum2FChildText:
text "Stuff and rocks"
line "and rocks and"
para "stuff. Can we go"
line "already?"
done
Museum2FTeacherText:
text "Sigh… My son isn't"
line "enjoying the mu-"
para "seum as much as I"
line "hoped he would."
para "Kids, huh?"
done
Museum2FPokefanMMetricText:
text "This space shuttle"
line "used to fly 250"
para "kilometers above"
line "the earth, defy-"
cont "ing gravity!"
para "You know what else"
line "can defy gravity?"
para "Seismic Toss,"
line "of course!"
done
Text_Museum2FTutorSeismicToss:
text "I can teach your"
line "#mon to use"
para "Seismic Toss for"
line "one Silver Leaf."
done
Text_Museum2FTutorNoSilverLeaf:
text "You don't have a"
line "Silver Leaf!"
done
Text_Museum2FTutorQuestion:
text "Should I teach"
line "your #mon"
cont "Seismic Toss?"
done
Text_Museum2FTutorRefused:
text "If you say so."
done
Text_Museum2FTutorTaught:
text "Now your #mon"
line "knows how to use"
cont "Seismic Toss!"
done
Museum2FMoonStoneSignpostText:
text "Meteorite that"
line "fell on Mt.Moon."
cont "(Moon Stone)"
done
Museum2FSpaceShuttleSignpostText:
text "Space Shuttle"
done