jep-hack/maps/PewterMuseumOfScience2F.asm
2023-10-22 18:15:19 -04:00

184 lines
3.8 KiB
NASM

PewterMuseumOfScience2F_MapScripts:
def_scene_scripts
def_callbacks
Museum2FScientistScript:
jumptextfaceplayer Museum2FScientistText
Museum2FChildScript:
jumptextfaceplayer Museum2FChildText
Museum2FTeacherScript:
jumptextfaceplayer Museum2FTeacherText
Museum2FLassScript:
jumptextfaceplayer Museum2FLassText
Museum2FPokefanMScript:
faceplayer
opentext
checkevent EVENT_LISTENED_TO_SEISMIC_TOSS_INTRO
iftrue Museum2FTutorSeismicTossScript
sjump .ok
.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 Text_Museum2FTutorMoveText
special MoveTutor
ifequal $0, .TeachMove
.TutorRefused
jumptext Text_Museum2FTutorRefused
.NoSilverLeaf
jumptext Text_Museum2FTutorNoSilverLeaf
.TeachMove
takeitem SILVER_LEAF
jumptext Text_Museum2FTutorTaught
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_Museum2FTutorMoveText:
text_start
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
PewterMuseumOfScience2F_MapEvents:
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, Museum2FMoonStoneSignpostText
bg_event 11, 2, BGEVENT_READ, Museum2FSpaceShuttleSignpostText
def_object_events
object_event 7, 5, SPRITE_SCIENTIST, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, Museum2FScientistScript, -1
object_event 1, 7, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, Museum2FChildScript, -1
object_event 2, 7, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, Museum2FTeacherScript, -1
object_event 2, 1, SPRITE_LASS, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, Museum2FLassScript, -1
object_event 12, 5, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Museum2FPokefanMScript, -1