pokecrystal/maps/AzaleaTown.asm

505 lines
11 KiB
NASM

const_value set 2
const AZALEATOWN_AZALEA_ROCKET1
const AZALEATOWN_GRAMPS
const AZALEATOWN_TEACHER
const AZALEATOWN_YOUNGSTER
const AZALEATOWN_SLOWPOKE1
const AZALEATOWN_SLOWPOKE2
const AZALEATOWN_SLOWPOKE3
const AZALEATOWN_SLOWPOKE4
const AZALEATOWN_FRUIT_TREE
const AZALEATOWN_SILVER
const AZALEATOWN_AZALEA_ROCKET3
const AZALEATOWN_KURT_OUTSIDE
AzaleaTown_MapScriptHeader:
.SceneScripts:
db 3
scene_script .DummyScene0
scene_script .DummyScene1
scene_script .DummyScene2
.MapCallbacks:
db 1
dbw MAPCALLBACK_NEWMAP, .Flypoint
.DummyScene0:
end
.DummyScene1:
end
.DummyScene2:
end
.Flypoint:
setflag ENGINE_FLYPOINT_AZALEA
return
AzaleaTownRivalBattleScene1:
moveobject AZALEATOWN_SILVER, $b, $b
spriteface PLAYER, RIGHT
showemote EMOTE_SHOCK, PLAYER, 15
special Special_FadeOutMusic
pause 15
appear AZALEATOWN_SILVER
applymovement AZALEATOWN_SILVER, AzaleaTownRivalBattleApproachMovement1
spriteface PLAYER, DOWN
jump AzaleaTownRivalBattleScript
AzaleaTownRivalBattleScene2:
spriteface PLAYER, RIGHT
showemote EMOTE_SHOCK, PLAYER, 15
special Special_FadeOutMusic
pause 15
appear AZALEATOWN_SILVER
applymovement AZALEATOWN_SILVER, AzaleaTownRivalBattleApproachMovement2
spriteface PLAYER, UP
AzaleaTownRivalBattleScript:
playmusic MUSIC_RIVAL_ENCOUNTER
opentext
writetext AzaleaTownRivalBeforeText
waitbutton
closetext
setevent EVENT_RIVAL_AZALEA_TOWN
checkevent EVENT_GOT_TOTODILE_FROM_ELM
iftrue .Totodile
checkevent EVENT_GOT_CHIKORITA_FROM_ELM
iftrue .Chikorita
winlosstext AzaleaTownRivalWinText, AzaleaTownRivalLossText
setlasttalked AZALEATOWN_SILVER
loadtrainer RIVAL1, RIVAL1_2_TOTODILE
startbattle
dontrestartmapmusic
reloadmapafterbattle
jump .AfterBattle
.Totodile:
winlosstext AzaleaTownRivalWinText, AzaleaTownRivalLossText
setlasttalked AZALEATOWN_SILVER
loadtrainer RIVAL1, RIVAL1_2_CHIKORITA
startbattle
dontrestartmapmusic
reloadmapafterbattle
jump .AfterBattle
.Chikorita:
winlosstext AzaleaTownRivalWinText, AzaleaTownRivalLossText
setlasttalked AZALEATOWN_SILVER
loadtrainer RIVAL1, RIVAL1_2_CYNDAQUIL
startbattle
dontrestartmapmusic
reloadmapafterbattle
jump .AfterBattle
.AfterBattle:
playmusic MUSIC_RIVAL_AFTER
opentext
writetext AzaleaTownRivalAfterText
waitbutton
closetext
spriteface PLAYER, LEFT
applymovement AZALEATOWN_SILVER, AzaleaTownRivalBattleExitMovement
playsound SFX_EXIT_BUILDING
disappear AZALEATOWN_SILVER
setscene $0
waitsfx
playmapmusic
end
AzaleaTownRocket1Script:
jumptextfaceplayer AzaleaTownRocket1Text
AzaleaTownRocket2Script:
jumptextfaceplayer AzaleaTownRocket2Text
AzaleaTownGrampsScript:
faceplayer
opentext
checkevent EVENT_CLEARED_SLOWPOKE_WELL
iftrue .ClearedWell
writetext AzaleaTownGrampsTextBefore
waitbutton
closetext
end
.ClearedWell:
writetext AzaleaTownGrampsTextAfter
waitbutton
closetext
end
AzaleaTownTeacherScript:
jumptextfaceplayer AzaleaTownTeacherText
AzaleaTownYoungsterScript:
jumptextfaceplayer AzaleaTownYoungsterText
AzaleaTownSlowpokeScript:
opentext
writetext AzaleaTownSlowpokeText1
pause 60
writetext AzaleaTownSlowpokeText2
cry SLOWPOKE
waitbutton
closetext
end
WoosterScript:
; unused
faceplayer
opentext
writetext WoosterText
cry QUAGSIRE
waitbutton
closetext
end
AzaleaTownCelebiScene:
applymovement PLAYER, AzaleaTownPlayerLeavesKurtsHouseMovement
opentext
writetext AzaleaTownKurtText1
buttonsound
spriteface AZALEATOWN_KURT_OUTSIDE, RIGHT
writetext AzaleaTownKurtText2
buttonsound
writetext AzaleaTownKurtText3
waitbutton
verbosegiveitem GS_BALL
spriteface AZALEATOWN_KURT_OUTSIDE, LEFT
setflag ENGINE_HAVE_EXAMINED_GS_BALL
clearevent EVENT_ILEX_FOREST_LASS
setevent EVENT_ROUTE_34_ILEX_FOREST_GATE_LASS
setscene $0
closetext
end
AzaleaTownKurtScript:
faceplayer
opentext
writetext AzaleaTownKurtText3
waitbutton
spriteface AZALEATOWN_KURT_OUTSIDE, LEFT
closetext
end
AzaleaTownSign:
jumptext AzaleaTownSignText
KurtsHouseSign:
jumptext KurtsHouseSignText
AzaleaGymSign:
jumptext AzaleaGymSignText
SlowpokeWellSign:
jumptext SlowpokeWellSignText
CharcoalKilnSign:
jumptext CharcoalKilnSignText
AzaleaTownIlextForestSign:
jumptext AzaleaTownIlexForestSignText
AzaleaTownPokecenterSign:
jumpstd pokecentersign
AzaleaTownMartSign:
jumpstd martsign
WhiteApricornTree:
fruittree FRUITTREE_AZALEA_TOWN
AzaleaTownHiddenFullHeal:
dwb EVENT_AZALEA_TOWN_HIDDEN_FULL_HEAL, FULL_HEAL
AzaleaTownRivalBattleApproachMovement1:
step LEFT
step LEFT
step LEFT
step LEFT
step LEFT
step LEFT
turn_head UP
step_end
AzaleaTownRivalBattleApproachMovement2:
step LEFT
step LEFT
step LEFT
step LEFT
step LEFT
step LEFT
turn_head DOWN
step_end
AzaleaTownRivalBattleExitMovement:
step LEFT
step LEFT
step LEFT
step_end
AzaleaTownPlayerLeavesKurtsHouseMovement:
step LEFT
step LEFT
step UP
turn_head LEFT
step_end
AzaleaTownRivalBeforeText:
text "…Tell me some-"
line "thing."
para "Is it true that"
line "TEAM ROCKET has"
cont "returned?"
para "What? You beat"
line "them? Hah! Quit"
cont "lying."
para "You're not joking?"
line "Then let's see how"
cont "good you are."
done
AzaleaTownRivalWinText:
text "… Humph! Useless"
line "#MON!"
para "Listen, you. You"
line "only won because"
para "my #MON were"
line "weak."
done
AzaleaTownRivalAfterText:
text "I hate the weak."
para "#MON, trainers."
line "It doesn't matter"
cont "who or what."
para "I'm going to be"
line "strong and wipe"
cont "out the weak."
para "That goes for TEAM"
line "ROCKET too."
para "They act big and"
line "tough in a group."
para "But get them"
line "alone, and they're"
cont "weak."
para "I hate them all."
para "You stay out of my"
line "way. A weakling"
para "like you is only a"
line "distraction."
done
AzaleaTownRivalLossText:
text "…Humph! I knew"
line "you were lying."
done
AzaleaTownRocket1Text:
text "It's unsafe to go"
line "in there, so I'm"
cont "standing guard."
para "Aren't I a good"
line "Samaritan?"
done
AzaleaTownRocket2Text:
text "Do you know about"
line "SLOWPOKETAIL? I"
cont "heard it's tasty!"
para "Aren't you glad I"
line "told you that?"
done
AzaleaTownGrampsTextBefore:
text "The SLOWPOKE have"
line "disappeared from"
cont "town…"
para "I heard their"
line "TAILS are being"
cont "sold somewhere."
done
AzaleaTownGrampsTextAfter:
text "The SLOWPOKE have"
line "returned."
para "Knowing them, they"
line "could've just been"
para "goofing off some-"
line "where."
done
AzaleaTownTeacherText:
text "Did you come to"
line "get KURT to make"
cont "some BALLS?"
para "A lot of people do"
line "just that."
done
AzaleaTownYoungsterText:
text "Cut through AZALEA"
line "and you'll be in"
cont "ILEX FOREST."
para "But these skinny"
line "trees make it"
para "impossible to get"
line "through."
para "The CHARCOAL MAN's"
line "#MON can CUT"
cont "down trees."
done
AzaleaTownSlowpokeText1:
text "SLOWPOKE: …"
para "<......> <......> <......>"
done
AzaleaTownSlowpokeText2:
text "<......> <......>Yawn?"
done
WoosterText:
text "WOOSTER: Gugyoo…"
done
AzaleaTownKurtText1:
text "ILEX FOREST is"
line "restless!"
para "What is going on?"
done
AzaleaTownKurtText2:
text "<PLAYER>, here's"
line "your GS BALL back!"
done
AzaleaTownKurtText3:
text "Could you go see"
line "why ILEX FOREST is"
cont "so restless?"
done
AzaleaTownSignText:
text "AZALEA TOWN"
line "Where People and"
para "#MON Live in"
line "Happy Harmony"
done
KurtsHouseSignText:
text "KURT'S HOUSE"
done
AzaleaGymSignText:
text "AZALEA TOWN"
line "#MON GYM"
cont "LEADER: BUGSY"
para "The Walking"
line "Bug #MON"
cont "Encyclopedia"
done
SlowpokeWellSignText:
text "SLOWPOKE WELL"
para "Also known as the"
line "RAINMAKER WELL."
para "Locals believe"
line "that a SLOWPOKE's"
cont "yawn summons rain."
para "Records show that"
line "a SLOWPOKE's yawn"
para "ended a drought"
line "400 years ago."
done
CharcoalKilnSignText:
text "CHARCOAL KILN"
done
AzaleaTownIlexForestSignText:
text "ILEX FOREST"
para "Enter through the"
line "gate."
done
AzaleaTown_MapEventHeader:
; filler
db 0, 0
.Warps:
db 8
warp_def $9, $f, 1, AZALEA_POKECENTER_1F
warp_def $d, $15, 1, CHARCOAL_KILN
warp_def $5, $15, 2, AZALEA_MART
warp_def $5, $9, 1, KURTS_HOUSE
warp_def $f, $a, 1, AZALEA_GYM
warp_def $7, $1f, 1, SLOWPOKE_WELL_B1F
warp_def $a, $2, 3, ILEX_FOREST_AZALEA_GATE
warp_def $b, $2, 4, ILEX_FOREST_AZALEA_GATE
.CoordEvents:
db 3
coord_event 1, $a, $5, AzaleaTownRivalBattleScene1
coord_event 1, $b, $5, AzaleaTownRivalBattleScene2
coord_event 2, $6, $9, AzaleaTownCelebiScene
.BGEvents:
db 9
bg_event 9, 19, BGEVENT_READ, AzaleaTownSign
bg_event 9, 10, BGEVENT_READ, KurtsHouseSign
bg_event 15, 14, BGEVENT_READ, AzaleaGymSign
bg_event 7, 29, BGEVENT_READ, SlowpokeWellSign
bg_event 13, 19, BGEVENT_READ, CharcoalKilnSign
bg_event 9, 16, BGEVENT_READ, AzaleaTownPokecenterSign
bg_event 5, 22, BGEVENT_READ, AzaleaTownMartSign
bg_event 9, 3, BGEVENT_READ, AzaleaTownIlextForestSign
bg_event 6, 31, BGEVENT_ITEM, AzaleaTownHiddenFullHeal
.ObjectEvents:
db 12
object_event SPRITE_AZALEA_ROCKET, 9, 31, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, AzaleaTownRocket1Script, EVENT_AZALEA_TOWN_SLOWPOKETAIL_ROCKET
object_event SPRITE_GRAMPS, 9, 21, SPRITEMOVEDATA_WANDER, 2, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, AzaleaTownGrampsScript, -1
object_event SPRITE_TEACHER, 13, 15, SPRITEMOVEDATA_WALK_UP_DOWN, 2, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, AzaleaTownTeacherScript, -1
object_event SPRITE_YOUNGSTER, 9, 7, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 0, 1, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, AzaleaTownYoungsterScript, -1
object_event SPRITE_SLOWPOKE, 17, 8, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, AzaleaTownSlowpokeScript, EVENT_AZALEA_TOWN_SLOWPOKES
object_event SPRITE_SLOWPOKE, 9, 18, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, AzaleaTownSlowpokeScript, EVENT_AZALEA_TOWN_SLOWPOKES
object_event SPRITE_SLOWPOKE, 9, 29, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, AzaleaTownSlowpokeScript, EVENT_AZALEA_TOWN_SLOWPOKES
object_event SPRITE_SLOWPOKE, 15, 15, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, AzaleaTownSlowpokeScript, EVENT_AZALEA_TOWN_SLOWPOKES
object_event SPRITE_FRUIT_TREE, 2, 8, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, WhiteApricornTree, -1
object_event SPRITE_AZALEA_ROCKET, 10, 11, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_RIVAL_AZALEA_TOWN
object_event SPRITE_AZALEA_ROCKET, 16, 10, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, AzaleaTownRocket2Script, EVENT_SLOWPOKE_WELL_ROCKETS
object_event SPRITE_KURT_OUTSIDE, 5, 6, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, AzaleaTownKurtScript, EVENT_AZALEA_TOWN_KURT