pokecrystal/maps/SaffronPokecenter1F.asm

129 lines
2.9 KiB
NASM

object_const_def ; object_event constants
const SAFFRONPOKECENTER1F_NURSE
const SAFFRONPOKECENTER1F_TEACHER
const SAFFRONPOKECENTER1F_FISHER
const SAFFRONPOKECENTER1F_YOUNGSTER
SaffronPokecenter1F_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
SaffronPokecenter1FNurseScript:
jumpstd pokecenternurse
SaffronPokecenter1FTeacherScript:
special Mobile_DummyReturnFalse
iftrue .mobile
jumptextfaceplayer SaffronPokecenter1FTeacherText
.mobile
jumptextfaceplayer SaffronPokecenter1FTeacherMobileText
SaffronPokecenter1FFisherScript:
faceplayer
opentext
checkevent EVENT_RETURNED_MACHINE_PART
iftrue .SolvedKantoPowerCrisis
writetext SaffronPokecenter1FFisherText
waitbutton
closetext
end
.SolvedKantoPowerCrisis:
writetext SaffronPokecenter1FFisherReturnedMachinePartText
waitbutton
closetext
end
SaffronPokecenter1FYoungsterScript:
jumptextfaceplayer SaffronPokecenter1FYoungsterText
SaffronPokecenter1FTeacherText:
text "What are JOHTO's"
line "#MON CENTERS"
cont "like?"
para "…Oh, I see. So"
line "they're not much"
para "different from the"
line "ones in KANTO."
para "I can go to JOHTO"
line "without worrying,"
cont "then!"
done
SaffronPokecenter1FTeacherMobileText:
text "What are JOHTO's"
line "#MON CENTERS"
cont "like?"
para "…Oh, I see."
line "So they let you"
para "link with people"
line "far away?"
para "Then I'll get my"
line "friend in JOHTO to"
para "catch a MARILL and"
line "trade it to me!"
done
SaffronPokecenter1FFisherText:
text "I just happened to"
line "come through ROCK"
para "TUNNEL. There was"
line "some commotion at"
cont "the POWER PLANT."
done
SaffronPokecenter1FFisherReturnedMachinePartText:
text "Caves collapse"
line "easily."
para "Several caves have"
line "disappeared in the"
para "past few years,"
line "like the one out-"
cont "side CERULEAN."
para "As a pro HIKER,"
line "that's common"
cont "knowledge."
done
SaffronPokecenter1FYoungsterText:
text "SILPH CO.'s HEAD"
line "OFFICE and the"
para "MAGNET TRAIN STA-"
line "TION--they're the"
para "places to see in"
line "SAFFRON."
done
SaffronPokecenter1F_MapEvents:
db 0, 0 ; filler
db 3 ; warp events
warp_event 3, 7, SAFFRON_CITY, 4
warp_event 4, 7, SAFFRON_CITY, 4
warp_event 0, 7, POKECENTER_2F, 1
db 0 ; coord events
db 0 ; bg events
db 4 ; object events
object_event 3, 1, SPRITE_NURSE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SaffronPokecenter1FNurseScript, -1
object_event 7, 2, SPRITE_TEACHER, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, SaffronPokecenter1FTeacherScript, -1
object_event 8, 6, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, SaffronPokecenter1FFisherScript, -1
object_event 1, 4, SPRITE_YOUNGSTER, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, SaffronPokecenter1FYoungsterScript, -1