pokecrystal-board/maps/CinnabarIsland.asm

144 lines
2.7 KiB
NASM
Raw Normal View History

object_const_def ; object_event constants
2015-11-26 21:22:14 -08:00
const CINNABARISLAND_BLUE
CinnabarIsland_MapScripts:
db 0 ; scene scripts
db 1 ; callbacks
callback MAPCALLBACK_NEWMAP, .FlyPoint
.FlyPoint:
2015-06-25 22:30:16 -07:00
setflag ENGINE_FLYPOINT_CINNABAR
return
2015-06-25 21:01:08 -07:00
CinnabarIslandBlue:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2015-06-25 21:01:08 -07:00
writetext CinnabarIslandBlueText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
playsound SFX_WARP_TO
2015-11-26 21:22:14 -08:00
applymovement CINNABARISLAND_BLUE, CinnabarIslandBlueTeleport
disappear CINNABARISLAND_BLUE
clearevent EVENT_VIRIDIAN_GYM_BLUE
end
2015-06-25 21:01:08 -07:00
CinnabarIslandGymSign:
jumptext CinnabarIslandGymSignText
2015-06-25 21:01:08 -07:00
CinnabarIslandSign:
jumptext CinnabarIslandSignText
CinnabarIslandPokecenterSign:
2015-06-23 14:02:58 -07:00
jumpstd pokecentersign
CinnabarIslandHiddenRareCandy:
hiddenitem RARE_CANDY, EVENT_CINNABAR_ISLAND_HIDDEN_RARE_CANDY
2015-06-25 21:01:08 -07:00
CinnabarIslandBlueTeleport:
teleport_from
step_end
2015-06-25 21:01:08 -07:00
CinnabarIslandBlueText:
text "Who are you?"
para "Well, it's plain"
line "to see that you're"
cont "a trainer…"
para "My name's BLUE."
para "I was once the"
line "CHAMPION, although"
para "it was for only a"
line "short time…"
para "That meddling RED"
line "did me in…"
para "Anyway, what do"
line "you want? You want"
para "to challenge me or"
line "something?"
para "…I hate to say"
line "it, but I'm not in"
para "the mood for a"
line "battle now."
para "Take a good look"
line "around you…"
para "A volcano erupts,"
line "and just like"
para "that, a whole town"
line "disappears."
para "We can go on win-"
line "ning and losing in"
para "#MON. But if"
line "nature so much as"
para "twitches, we can"
line "lose in a second."
para "…"
para "That's the way it"
line "is…"
para "But, anyway, I'm"
line "still a trainer."
para "If I see a strong"
line "opponent, it makes"
cont "me want to battle."
para "If you want to"
line "battle me, come to"
cont "the VIRIDIAN GYM."
para "I'll take you on"
line "then."
done
2015-06-25 21:01:08 -07:00
CinnabarIslandGymSignText:
text "There's a notice"
line "here…"
para "CINNABAR GYM has"
line "relocated to SEA-"
cont "FOAM ISLANDS."
para "BLAINE"
done
2015-06-25 21:01:08 -07:00
CinnabarIslandSignText:
text "CINNABAR ISLAND"
para "The Fiery Town of"
line "Burning Desire"
done
CinnabarIsland_MapEvents:
db 0, 0 ; filler
db 1 ; warp events
2018-02-01 18:54:00 -08:00
warp_event 11, 11, CINNABAR_POKECENTER_1F, 1
db 0 ; coord events
db 4 ; bg events
bg_event 12, 11, BGEVENT_READ, CinnabarIslandPokecenterSign
2018-02-01 19:22:07 -08:00
bg_event 9, 11, BGEVENT_READ, CinnabarIslandGymSign
bg_event 7, 7, BGEVENT_READ, CinnabarIslandSign
bg_event 9, 1, BGEVENT_ITEM, CinnabarIslandHiddenRareCandy
db 1 ; object events
2018-02-01 19:22:07 -08:00
object_event 9, 6, SPRITE_BLUE, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, CinnabarIslandBlue, EVENT_BLUE_IN_CINNABAR