pokecrystal-board/maps/Route45.asm

558 lines
12 KiB
NASM
Raw Normal View History

2018-01-31 08:38:45 -08:00
const_def 2 ; object constants
2015-11-26 21:22:14 -08:00
const ROUTE45_POKEFAN_M1
const ROUTE45_POKEFAN_M2
const ROUTE45_POKEFAN_M3
const ROUTE45_POKEFAN_M4
const ROUTE45_BLACK_BELT
const ROUTE45_COOLTRAINER_M
const ROUTE45_COOLTRAINER_F
const ROUTE45_FRUIT_TREE
const ROUTE45_POKE_BALL1
const ROUTE45_POKE_BALL2
const ROUTE45_POKE_BALL3
const ROUTE45_POKE_BALL4
const ROUTE45_YOUNGSTER
Route45_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
2015-07-10 01:20:21 -07:00
TrainerBlackbeltKenji:
trainer BLACKBELT_T, KENJI3, EVENT_BEAT_BLACKBELT_KENJI, BlackbeltKenji3SeenText, BlackbeltKenji3BeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
writecode VAR_CALLERID, PHONE_BLACKBELT_KENJI
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
checkcellnum PHONE_BLACKBELT_KENJI
2018-01-15 19:52:19 -08:00
iftrue .Registered
checkevent EVENT_KENJI_ASKED_FOR_PHONE_NUMBER
2018-01-15 19:52:19 -08:00
iftrue .AskedAlready
special SampleKenjiBreakCountdown
2018-01-15 19:52:19 -08:00
writetext BlackbeltKenjiAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
setevent EVENT_KENJI_ASKED_FOR_PHONE_NUMBER
2018-01-15 19:52:19 -08:00
scall Route45AskNumber1M
jump .AskForNumber
2018-01-15 19:52:19 -08:00
.AskedAlready:
scall Route45AskNumber2M
.AskForNumber:
askforphonenumber PHONE_BLACKBELT_KENJI
2018-02-02 18:09:17 -08:00
ifequal PHONE_CONTACTS_FULL, Route45PhoneFullM
ifequal PHONE_CONTACT_REFUSED, Route45NumberDeclinedM
2018-01-11 22:40:20 -08:00
trainertotext BLACKBELT_T, KENJI3, MEM_BUFFER_0
2018-01-15 19:52:19 -08:00
scall Route45RegisteredNumberM
jump Route45NumberAcceptedM
2018-01-15 19:52:19 -08:00
.Registered:
checkcode VAR_KENJI_BREAK
2018-02-02 18:09:17 -08:00
ifnotequal 1, Route45NumberAcceptedM
checktime MORN
2018-01-15 19:52:19 -08:00
iftrue .Morning
checktime NITE
2018-01-15 19:52:19 -08:00
iftrue .Night
checkevent EVENT_KENJI_ON_BREAK
2018-01-15 19:52:19 -08:00
iffalse Route45NumberAcceptedM
scall Route45GiftM
2015-11-04 17:20:14 -08:00
verbosegiveitem PP_UP
2018-01-15 19:52:19 -08:00
iffalse .NoRoom
clearevent EVENT_KENJI_ON_BREAK
special SampleKenjiBreakCountdown
2018-01-15 19:52:19 -08:00
jump Route45NumberAcceptedM
2018-01-15 19:52:19 -08:00
.Morning:
writetext BlackbeltKenjiMorningText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2018-01-15 19:52:19 -08:00
.Night:
writetext BlackbeltKenjiNightText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2018-01-15 19:52:19 -08:00
.NoRoom:
jump Route45PackFullM
2018-01-15 19:52:19 -08:00
Route45AskNumber1M:
2015-06-24 18:26:24 -07:00
jumpstd asknumber1m
end
2018-01-15 19:52:19 -08:00
Route45AskNumber2M:
2015-06-24 18:26:24 -07:00
jumpstd asknumber2m
end
2018-01-15 19:52:19 -08:00
Route45RegisteredNumberM:
2015-06-24 18:26:24 -07:00
jumpstd registerednumberm
end
2018-01-15 19:52:19 -08:00
Route45NumberAcceptedM:
2015-06-24 18:26:24 -07:00
jumpstd numberacceptedm
end
2018-01-15 19:52:19 -08:00
Route45NumberDeclinedM:
2015-06-24 18:26:24 -07:00
jumpstd numberdeclinedm
end
2018-01-15 19:52:19 -08:00
Route45PhoneFullM:
2015-06-24 18:26:24 -07:00
jumpstd phonefullm
end
2018-01-15 19:52:19 -08:00
Route45RematchM:
2015-06-24 18:26:24 -07:00
jumpstd rematchm
end
2018-01-15 19:52:19 -08:00
Route45GiftM:
2015-06-24 18:26:24 -07:00
jumpstd giftm
end
2018-01-15 19:52:19 -08:00
Route45PackFullM:
2015-06-24 18:26:24 -07:00
jumpstd packfullm
end
2018-01-15 19:52:19 -08:00
HikerParryHasIron:
2013-09-24 00:48:58 -07:00
setevent EVENT_PARRY_IRON
2015-06-24 18:26:24 -07:00
jumpstd packfullm
end
2018-01-15 19:52:19 -08:00
Route45RematchGiftM:
2015-06-24 18:26:24 -07:00
jumpstd rematchgiftm
end
2015-07-10 01:20:21 -07:00
TrainerHikerErik:
trainer HIKER, ERIK, EVENT_BEAT_HIKER_ERIK, HikerErikSeenText, HikerErikBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext HikerErikAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerHikerMichael:
trainer HIKER, MICHAEL, EVENT_BEAT_HIKER_MICHAEL, HikerMichaelSeenText, HikerMichaelBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext HikerMichaelAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerHikerParry:
trainer HIKER, PARRY3, EVENT_BEAT_HIKER_PARRY, HikerParry3SeenText, HikerParry3BeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
writecode VAR_CALLERID, PHONE_HIKER_PARRY
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
checkflag ENGINE_PARRY
2018-01-15 19:52:19 -08:00
iftrue .WantsBattle
checkcellnum PHONE_HIKER_PARRY
2018-01-15 19:52:19 -08:00
iftrue Route45NumberAcceptedM
checkevent EVENT_PARRY_ASKED_FOR_PHONE_NUMBER
2018-01-15 19:52:19 -08:00
iftrue .AskedAlready
writetext HikerParryAfterBattleText
2015-11-29 19:29:45 -08:00
buttonsound
setevent EVENT_PARRY_ASKED_FOR_PHONE_NUMBER
2018-01-15 19:52:19 -08:00
scall Route45AskNumber1M
jump .AskForNumber
2018-01-15 19:52:19 -08:00
.AskedAlready:
scall Route45AskNumber2M
.AskForNumber:
askforphonenumber PHONE_HIKER_PARRY
2018-02-02 18:09:17 -08:00
ifequal PHONE_CONTACTS_FULL, Route45PhoneFullM
ifequal PHONE_CONTACT_REFUSED, Route45NumberDeclinedM
2018-01-11 22:40:20 -08:00
trainertotext HIKER, PARRY1, MEM_BUFFER_0
2018-01-15 19:52:19 -08:00
scall Route45RegisteredNumberM
jump Route45NumberAcceptedM
2018-01-15 19:52:19 -08:00
.WantsBattle:
scall Route45RematchM
2015-11-02 11:37:02 -08:00
winlosstext HikerParry3BeatenText, 0
2015-07-10 13:04:00 -07:00
copybytetovar wParryFightCount
2018-02-02 18:09:17 -08:00
ifequal 2, .Fight2
ifequal 1, .Fight1
ifequal 0, .LoadFight0
.Fight2:
2013-09-24 00:48:58 -07:00
checkevent EVENT_RESTORED_POWER_TO_KANTO
iftrue .LoadFight2
.Fight1:
2015-06-24 20:20:04 -07:00
checkevent EVENT_BEAT_ELITE_FOUR
iftrue .LoadFight1
.LoadFight0:
loadtrainer HIKER, PARRY3
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wParryFightCount, 1
clearflag ENGINE_PARRY
end
.LoadFight1:
loadtrainer HIKER, PARRY1
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wParryFightCount, 2
clearflag ENGINE_PARRY
end
.LoadFight2:
loadtrainer HIKER, PARRY2
startbattle
reloadmapafterbattle
clearflag ENGINE_PARRY
2013-09-24 00:48:58 -07:00
checkevent EVENT_PARRY_IRON
2018-01-15 19:52:19 -08:00
iftrue .HasIron
checkevent EVENT_GOT_IRON_FROM_PARRY
2018-01-15 19:52:19 -08:00
iftrue .GotIron
scall Route45RematchGiftM
2015-11-04 17:20:14 -08:00
verbosegiveitem IRON
2018-01-15 19:52:19 -08:00
iffalse HikerParryHasIron
setevent EVENT_GOT_IRON_FROM_PARRY
2018-01-15 19:52:19 -08:00
jump Route45NumberAcceptedM
2018-01-15 19:52:19 -08:00
.GotIron:
end
2018-01-15 19:52:19 -08:00
.HasIron:
2015-12-09 15:25:44 -08:00
opentext
2018-01-15 19:52:19 -08:00
writetext HikerParryGivesIronText
2015-11-25 07:16:29 -08:00
waitbutton
2015-11-04 17:20:14 -08:00
verbosegiveitem IRON
2018-01-15 19:52:19 -08:00
iffalse HikerParryHasIron
2013-09-24 00:48:58 -07:00
clearevent EVENT_PARRY_IRON
setevent EVENT_GOT_IRON_FROM_PARRY
2018-01-15 19:52:19 -08:00
jump Route45NumberAcceptedM
2015-07-10 01:20:21 -07:00
TrainerHikerTimothy:
trainer HIKER, TIMOTHY, EVENT_BEAT_HIKER_TIMOTHY, HikerTimothySeenText, HikerTimothyBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext HikerTimothyAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerCooltrainermRyan:
trainer COOLTRAINERM, RYAN, EVENT_BEAT_COOLTRAINERM_RYAN, CooltrainermRyanSeenText, CooltrainermRyanBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext CooltrainermRyanAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerCooltrainerfKelly:
trainer COOLTRAINERF, KELLY, EVENT_BEAT_COOLTRAINERF_KELLY, CooltrainerfKellySeenText, CooltrainerfKellyBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
2017-12-10 12:36:58 -08:00
writetext CooltrainerfKellyAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2018-01-15 19:52:19 -08:00
TrainerCamperQuentin:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
2015-07-10 01:20:21 -07:00
checkevent EVENT_BEAT_CAMPER_QUENTIN
2018-01-15 19:52:19 -08:00
iftrue .Defeated
writetext CamperQuentinSeenText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2018-01-15 19:52:19 -08:00
winlosstext CamperQuentinBeatenText, 0
loadtrainer CAMPER, QUENTIN
startbattle
reloadmapafterbattle
2015-07-10 01:20:21 -07:00
setevent EVENT_BEAT_CAMPER_QUENTIN
2015-11-25 07:16:29 -08:00
closetext
end
2018-01-15 19:52:19 -08:00
.Defeated:
writetext CamperQuentinAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2018-01-15 19:52:19 -08:00
Route45DummyScript:
writetext Route45DummyText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2016-04-06 21:59:45 -07:00
Route45Sign:
jumptext Route45SignText
2015-07-10 01:20:21 -07:00
FruitTreeScript_0x19e294:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_45
2015-12-15 07:55:56 -08:00
Route45Nugget:
itemball NUGGET
2015-12-15 07:55:56 -08:00
Route45Revive:
itemball REVIVE
2015-12-15 07:55:56 -08:00
Route45Elixer:
itemball ELIXER
2015-12-15 07:55:56 -08:00
Route45MaxPotion:
itemball MAX_POTION
Route45HiddenPpUp:
hiddenitem PP_UP, EVENT_ROUTE_45_HIDDEN_PP_UP
2015-07-10 01:20:21 -07:00
HikerErikSeenText:
text "Be prepared for"
line "anything!"
para "Let me see if your"
line "#MON have been"
cont "raised properly!"
done
2015-07-10 01:20:21 -07:00
HikerErikBeatenText:
text "Oh, I lost that!"
done
2017-12-10 12:36:58 -08:00
HikerErikAfterBattleText:
text "I'll head back to"
line "BLACKTHORN's ICE"
para "PATH and train"
line "some more."
done
2015-07-10 01:20:21 -07:00
HikerMichaelSeenText:
text "Yo! You're spunky!"
line "But you know what?"
para "When it comes to"
line "sheer spunkiness,"
cont "I'm the man!"
done
2015-07-10 01:20:21 -07:00
HikerMichaelBeatenText:
text "My #MON weren't"
line "spunky enough!"
done
2017-12-10 12:36:58 -08:00
HikerMichaelAfterBattleText:
text "Boy, do I love"
line "HP UP! Mmmm, yum!"
para "I keep drinking my"
line "#MON's!"
para "I can't help it!"
done
2015-07-10 01:20:21 -07:00
HikerParry3SeenText:
text "My #MON are"
line "power packed!"
done
2015-07-10 01:20:21 -07:00
HikerParry3BeatenText:
text "Wahahah! I'm the"
line "big loser!"
done
2018-01-15 19:52:19 -08:00
HikerParryAfterBattleText:
text "I'm not much good"
line "at thinking, see?"
para "So, I just plow"
line "ahead with power!"
done
2015-07-10 01:20:21 -07:00
HikerTimothySeenText:
text "Why do I climb"
line "mountains?"
para "Because they're"
line "there."
para "Why do I train"
line "#MON?"
para "Because they're"
line "there!"
done
2015-07-10 01:20:21 -07:00
HikerTimothyBeatenText:
text "Losses…"
line "They're there too!"
done
2017-12-10 12:36:58 -08:00
HikerTimothyAfterBattleText:
text "The best thing to"
line "ever happen to me"
para "was discovering"
line "#MON."
done
2018-01-15 19:52:19 -08:00
HikerParryGivesIronText:
text "I just can't find"
line "a way to win!"
para "Keep it up!"
para "Oh, and take this"
line "--it's the gift"
para "you couldn't take"
line "when we last met."
done
2015-07-10 01:20:21 -07:00
BlackbeltKenji3SeenText:
text "I was training"
line "here alone."
para "Behold the fruits"
line "of my labor!"
done
2015-07-10 01:20:21 -07:00
BlackbeltKenji3BeatenText:
text "Waaaargh!"
done
2018-01-15 19:52:19 -08:00
BlackbeltKenjiAfterBattleText:
text "This calls for"
line "extreme measures."
para "I must take to the"
line "hills and train in"
cont "solitude."
done
2018-01-15 19:52:19 -08:00
BlackbeltKenjiMorningText:
text "I'm going to train"
line "a bit more before"
cont "I break for lunch."
done
2018-01-15 19:52:19 -08:00
BlackbeltKenjiNightText:
text "We had plenty of"
line "rest at lunch, so"
para "now we're all"
line "ready to go again!"
para "We're going to"
line "train again!"
done
2015-07-10 01:20:21 -07:00
CooltrainermRyanSeenText:
text "What are your"
line "thoughts on rais-"
cont "ing #MON?"
done
2015-07-10 01:20:21 -07:00
CooltrainermRyanBeatenText:
text "You've won my"
line "respect."
done
2017-12-10 12:36:58 -08:00
CooltrainermRyanAfterBattleText:
text "I see you're rais-"
line "ing your #MON"
cont "with care."
para "The bond you build"
line "will save you in"
cont "tough situations."
done
2015-07-10 01:20:21 -07:00
CooltrainerfKellySeenText:
text "What is your"
line "battle strategy?"
para "It is foolish to"
line "use strong moves"
cont "indiscriminately."
done
2015-07-10 01:20:21 -07:00
CooltrainerfKellyBeatenText:
text "Fine. I lost."
done
2017-12-10 12:36:58 -08:00
CooltrainerfKellyAfterBattleText:
text "I'm not in favor"
line "of overly power-"
cont "ful moves."
para "I want to win, but"
line "I also don't want"
cont "to harm #MON."
done
2018-01-15 19:52:19 -08:00
Route45DummyText:
text "I'm really, really"
line "tough!"
para "Is there anywhere"
line "I can prove how"
cont "tough I really am?"
done
2018-01-15 19:52:19 -08:00
CamperQuentinSeenText:
text "I'm really, really"
line "tough!"
done
2018-01-15 19:52:19 -08:00
CamperQuentinBeatenText:
text "I was tough at the"
line "BATTLE TOWER…"
done
2018-01-15 19:52:19 -08:00
CamperQuentinAfterBattleText:
text "Have you been to"
line "the BATTLE TOWER?"
para "I never, ever lose"
line "there, but…"
done
2016-04-06 21:59:45 -07:00
Route45SignText:
text "ROUTE 45"
line "MOUNTAIN RD. AHEAD"
done
Route45_MapEvents:
db 0, 0 ; filler
db 1 ; warp events
2018-02-01 19:22:07 -08:00
warp_event 2, 5, DARK_CAVE_BLACKTHORN_ENTRANCE, 1
db 0 ; coord events
db 2 ; bg events
2018-02-01 19:22:07 -08:00
bg_event 10, 4, BGEVENT_READ, Route45Sign
bg_event 13, 80, BGEVENT_ITEM, Route45HiddenPpUp
db 13 ; object events
object_event 10, 16, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 1, TrainerHikerErik, -1
object_event 15, 65, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 2, TrainerHikerMichael, -1
2018-02-01 19:22:07 -08:00
object_event 5, 28, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 2, TrainerHikerParry, -1
object_event 9, 65, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 1, TrainerHikerTimothy, -1
object_event 11, 50, SPRITE_BLACK_BELT, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 2, TrainerBlackbeltKenji, -1
object_event 17, 18, SPRITE_COOLTRAINER_M, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerCooltrainermRyan, -1
2018-02-01 19:22:07 -08:00
object_event 5, 36, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 3, TrainerCooltrainerfKelly, -1
object_event 16, 82, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, FruitTreeScript_0x19e294, -1
2018-02-01 19:22:07 -08:00
object_event 6, 51, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route45Nugget, EVENT_ROUTE_45_NUGGET
object_event 5, 66, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route45Revive, EVENT_ROUTE_45_REVIVE
object_event 6, 20, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route45Elixer, EVENT_ROUTE_45_ELIXER
object_event 7, 33, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route45MaxPotion, EVENT_ROUTE_45_MAX_POTION
object_event 4, 70, SPRITE_YOUNGSTER, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, TrainerCamperQuentin, -1