pokecrystal-board/maps/Route44.asm

532 lines
11 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 ROUTE44_FISHER1
const ROUTE44_FISHER2
const ROUTE44_YOUNGSTER1
const ROUTE44_SUPER_NERD
const ROUTE44_YOUNGSTER2
const ROUTE44_COOLTRAINER_M
const ROUTE44_COOLTRAINER_F
const ROUTE44_FRUIT_TREE
const ROUTE44_POKE_BALL1
const ROUTE44_POKE_BALL2
const ROUTE44_POKE_BALL3
Route44_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
TrainerBirdKeeperVance1:
trainer BIRD_KEEPER, VANCE1, EVENT_BEAT_BIRD_KEEPER_VANCE, BirdKeeperVance1SeenText, BirdKeeperVance1BeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
writecode VAR_CALLERID, PHONE_BIRDKEEPER_VANCE
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
checkflag ENGINE_VANCE
2018-01-15 19:19:17 -08:00
iftrue .WantsBattle
checkcellnum PHONE_BIRDKEEPER_VANCE
2018-01-15 19:19:17 -08:00
iftrue Route44NumberAcceptedM
checkevent EVENT_VANCE_ASKED_FOR_PHONE_NUMBER
iftrue .AskedAlready
writetext BirdKeeperVanceLegendaryBirdsText
2015-11-29 19:29:45 -08:00
buttonsound
setevent EVENT_VANCE_ASKED_FOR_PHONE_NUMBER
2018-01-15 19:19:17 -08:00
scall Route44AskNumber1M
jump .AskForNumber
.AskedAlready:
2018-01-15 19:19:17 -08:00
scall Route44AskNumber2M
.AskForNumber:
askforphonenumber PHONE_BIRDKEEPER_VANCE
2018-02-02 18:09:17 -08:00
ifequal PHONE_CONTACTS_FULL, Route44PhoneFullM
ifequal PHONE_CONTACT_REFUSED, Route44NumberDeclinedM
2018-01-11 22:40:20 -08:00
trainertotext BIRD_KEEPER, VANCE1, MEM_BUFFER_0
2018-01-15 19:19:17 -08:00
scall Route44RegisteredNumberM
jump Route44NumberAcceptedM
2018-01-15 19:19:17 -08:00
.WantsBattle:
scall Route44RematchM
winlosstext BirdKeeperVance1BeatenText, 0
2015-07-10 13:04:00 -07:00
copybytetovar wVanceFightCount
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 BIRD_KEEPER, VANCE1
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wVanceFightCount, 1
clearflag ENGINE_VANCE
end
.LoadFight1:
loadtrainer BIRD_KEEPER, VANCE2
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wVanceFightCount, 2
clearflag ENGINE_VANCE
end
.LoadFight2:
loadtrainer BIRD_KEEPER, VANCE3
startbattle
reloadmapafterbattle
clearflag ENGINE_VANCE
2013-09-24 00:48:58 -07:00
checkevent EVENT_VANCE_CARBOS
iftrue .Carbos
checkevent EVENT_GOT_CARBOS_FROM_VANCE
iftrue .ReceivedCarbosBefore
2018-01-15 19:19:17 -08:00
scall Route44RematchGiftM
2015-11-04 17:20:14 -08:00
verbosegiveitem CARBOS
iffalse VancePackFull
setevent EVENT_GOT_CARBOS_FROM_VANCE
2018-01-15 19:19:17 -08:00
jump Route44NumberAcceptedM
.ReceivedCarbosBefore:
end
.Carbos:
2015-12-09 15:25:44 -08:00
opentext
writetext BirdKeeperVance2BeatenText
2015-11-25 07:16:29 -08:00
waitbutton
2015-11-04 17:20:14 -08:00
verbosegiveitem CARBOS
iffalse VancePackFull
2013-09-24 00:48:58 -07:00
clearevent EVENT_VANCE_CARBOS
setevent EVENT_GOT_CARBOS_FROM_VANCE
2018-01-15 19:19:17 -08:00
jump Route44NumberAcceptedM
2018-01-15 19:19:17 -08:00
Route44AskNumber1M:
2015-06-24 18:26:24 -07:00
jumpstd asknumber1m
end
2018-01-15 19:19:17 -08:00
Route44AskNumber2M:
2015-06-24 18:26:24 -07:00
jumpstd asknumber2m
end
2018-01-15 19:19:17 -08:00
Route44RegisteredNumberM:
2015-06-24 18:26:24 -07:00
jumpstd registerednumberm
end
2018-01-15 19:19:17 -08:00
Route44NumberAcceptedM:
2015-06-24 18:26:24 -07:00
jumpstd numberacceptedm
end
2018-01-15 19:19:17 -08:00
Route44NumberDeclinedM:
2015-06-24 18:26:24 -07:00
jumpstd numberdeclinedm
end
2018-01-15 19:19:17 -08:00
Route44PhoneFullM:
2015-06-24 18:26:24 -07:00
jumpstd phonefullm
end
2018-01-15 19:19:17 -08:00
Route44RematchM:
2015-06-24 18:26:24 -07:00
jumpstd rematchm
end
2018-01-15 19:19:17 -08:00
Route44GiftM:
2015-06-24 18:26:24 -07:00
jumpstd giftm
end
2018-01-15 19:19:17 -08:00
Route44PackFullM:
2015-06-24 18:26:24 -07:00
jumpstd packfullm
end
VancePackFull:
2013-09-24 00:48:58 -07:00
setevent EVENT_VANCE_CARBOS
2015-06-24 18:26:24 -07:00
jumpstd packfullm
end
2018-01-15 19:19:17 -08:00
Route44RematchGiftM:
2015-06-24 18:26:24 -07:00
jumpstd rematchgiftm
end
2015-07-10 01:20:21 -07:00
TrainerPsychicPhil:
trainer PSYCHIC_T, PHIL, EVENT_BEAT_PSYCHIC_PHIL, PsychicPhilSeenText, PsychicPhilBeatenText, 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 PsychicPhilAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerFisherWilton1:
trainer FISHER, WILTON1, EVENT_BEAT_FISHER_WILTON, FisherWilton1SeenText, FisherWilton1BeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
writecode VAR_CALLERID, PHONE_FISHER_WILTON
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
checkflag ENGINE_WILTON
iftrue .WantsBattle
checkflag ENGINE_WILTON_HAS_ITEM
iftrue .HasItem
checkcellnum PHONE_FISHER_WILTON
2018-01-15 19:19:17 -08:00
iftrue Route44NumberAcceptedM
checkevent EVENT_WILTON_ASKED_FOR_PHONE_NUMBER
iftrue .AskedAlready
writetext FisherWiltonHugePoliwagText
2015-11-29 19:29:45 -08:00
buttonsound
setevent EVENT_WILTON_ASKED_FOR_PHONE_NUMBER
2018-01-15 19:19:17 -08:00
scall Route44AskNumber1M
jump .AskForNumber
.AskedAlready:
2018-01-15 19:19:17 -08:00
scall Route44AskNumber2M
.AskForNumber:
askforphonenumber PHONE_FISHER_WILTON
2018-02-02 18:09:17 -08:00
ifequal PHONE_CONTACTS_FULL, Route44PhoneFullM
ifequal PHONE_CONTACT_REFUSED, Route44NumberDeclinedM
2018-01-11 22:40:20 -08:00
trainertotext FISHER, WILTON1, MEM_BUFFER_0
2018-01-15 19:19:17 -08:00
scall Route44RegisteredNumberM
jump Route44NumberAcceptedM
.WantsBattle:
2018-01-15 19:19:17 -08:00
scall Route44RematchM
2015-11-02 11:37:02 -08:00
winlosstext FisherWilton1BeatenText, 0
2015-07-10 13:04:00 -07:00
copybytetovar wWiltonFightCount
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 FISHER, WILTON1
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wWiltonFightCount, 1
clearflag ENGINE_WILTON
end
.LoadFight1:
loadtrainer FISHER, WILTON2
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wWiltonFightCount, 2
clearflag ENGINE_WILTON
end
.LoadFight2:
loadtrainer FISHER, WILTON3
startbattle
reloadmapafterbattle
clearflag ENGINE_WILTON
end
.HasItem:
2018-01-15 19:19:17 -08:00
scall Route44GiftM
2013-09-24 00:48:58 -07:00
checkevent EVENT_WILTON_HAS_ULTRA_BALL
iftrue .UltraBall
2013-09-24 00:48:58 -07:00
checkevent EVENT_WILTON_HAS_GREAT_BALL
iftrue .GreatBall
2013-09-24 00:48:58 -07:00
checkevent EVENT_WILTON_HAS_POKE_BALL
iftrue .PokeBall
.UltraBall:
2015-11-04 17:20:14 -08:00
verbosegiveitem ULTRA_BALL
2018-01-15 19:19:17 -08:00
iffalse .Route44PackFullM
jump .ItemReceived
.GreatBall:
2015-11-04 17:20:14 -08:00
verbosegiveitem GREAT_BALL
2018-01-15 19:19:17 -08:00
iffalse .Route44PackFullM
jump .ItemReceived
.PokeBall:
2015-11-04 17:20:14 -08:00
verbosegiveitem POKE_BALL
2018-01-15 19:19:17 -08:00
iffalse .Route44PackFullM
.ItemReceived:
clearflag ENGINE_WILTON_HAS_ITEM
2018-01-15 19:19:17 -08:00
jump Route44NumberAcceptedM
2018-01-15 19:19:17 -08:00
.Route44PackFullM:
jump Route44PackFullM
2015-07-10 01:20:21 -07:00
TrainerFisherEdgar:
trainer FISHER, EDGAR, EVENT_BEAT_FISHER_EDGAR, FisherEdgarSeenText, FisherEdgarBeatenText, 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 FisherEdgarAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerCooltrainerfCybil:
trainer COOLTRAINERF, CYBIL, EVENT_BEAT_COOLTRAINERF_CYBIL, CooltrainerfCybilSeenText, CooltrainerfCybilBeatenText, 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 CooltrainerfCybilAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerPokemaniacZach:
trainer POKEMANIAC, ZACH, EVENT_BEAT_POKEMANIAC_ZACH, PokemaniacZachSeenText, PokemaniacZachBeatenText, 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 PokemaniacZachAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerCooltrainermAllen:
trainer COOLTRAINERM, ALLEN, EVENT_BEAT_COOLTRAINERM_ALLEN, CooltrainermAllenSeenText, CooltrainermAllenBeatenText, 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 CooltrainermAllenAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2016-04-06 21:59:45 -07:00
Route44Sign1:
jumptext Route44Sign1Text
2016-04-06 21:59:45 -07:00
Route44Sign2:
jumptext Route44Sign2Text
2018-02-28 13:50:43 -08:00
Route44FruitTree:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_44
2015-12-15 07:55:56 -08:00
Route44MaxRevive:
itemball MAX_REVIVE
2015-12-15 07:55:56 -08:00
Route44UltraBall:
itemball ULTRA_BALL
2015-12-15 07:55:56 -08:00
Route44MaxRepel:
itemball MAX_REPEL
Route44HiddenElixer:
hiddenitem ELIXER, EVENT_ROUTE_44_HIDDEN_ELIXER
2015-07-10 01:20:21 -07:00
FisherWilton1SeenText:
text "Aack! You made me"
line "lose a POLIWAG!"
para "What are you going"
line "to do about it?"
done
2015-07-10 01:20:21 -07:00
FisherWilton1BeatenText:
text "Just forget about"
line "it."
done
FisherWiltonHugePoliwagText:
text "That POLIWAG that"
line "got away…"
cont "It was huge."
para "I swear it must've"
line "been 16 feet long!"
done
2015-07-10 01:20:21 -07:00
FisherEdgarSeenText:
text "I fish until I"
line "can't anymore."
para "I also battle"
line "until I drop."
para "That's my"
line "relationship"
cont "with my #MON."
done
2015-07-10 01:20:21 -07:00
FisherEdgarBeatenText:
text "Hmmmm… "
line "This isn't right."
done
2017-12-10 12:36:58 -08:00
FisherEdgarAfterBattleText:
text "That's 100 wins"
line "to 101 losses."
para "I won't battle"
line "again for a while."
done
BirdKeeperVance1SeenText:
text "Do you know about"
line "the legendary bird"
cont "#MON?"
done
BirdKeeperVance1BeatenText:
text "Whew! You're hot"
line "stuff."
done
BirdKeeperVanceLegendaryBirdsText:
text "ARTICUNO, ZAPDOS"
line "and MOLTRES are"
para "the three legend-"
line "ary bird #MON."
para "I heard there are"
line "other legendary"
cont "birds, though."
done
BirdKeeperVance2BeatenText:
text "Why can't I ever"
line "beat you?"
para "Oh yeah, here you"
line "go. It's that gift"
para "I couldn't give"
line "you last time."
done
2015-07-10 01:20:21 -07:00
PsychicPhilSeenText:
text "I'm gonna win,"
line "for sure!"
done
2015-07-10 01:20:21 -07:00
PsychicPhilBeatenText:
text "Arrgh… That's a"
line "shocking loss…"
done
2017-12-10 12:36:58 -08:00
PsychicPhilAfterBattleText:
text "It's important to"
line "have conviction"
cont "on your side."
done
2015-07-10 01:20:21 -07:00
PokemaniacZachSeenText:
text "I'll do anything"
line "to get my hands on"
cont "rare #MON!"
done
2015-07-10 01:20:21 -07:00
PokemaniacZachBeatenText:
text "Oooh, your #MON"
line "are so appealing."
done
2017-12-10 12:36:58 -08:00
PokemaniacZachAfterBattleText:
text "If a #MON has"
line "different colors"
para "from usual, it's"
line "more valuable."
para "What? You mean"
line "that's not true?"
done
2015-07-10 01:20:21 -07:00
CooltrainermAllenSeenText:
text "I can tell you're"
line "a good trainer by"
cont "looking at you."
para "I'm good at #-"
line "MON, and I can see"
cont "that you are too."
done
2015-07-10 01:20:21 -07:00
CooltrainermAllenBeatenText:
text "Tch! It's a total"
line "loss on my part."
done
2017-12-10 12:36:58 -08:00
CooltrainermAllenAfterBattleText:
text "Wow. You have a"
line "lot of BADGES."
para "No wonder you're"
line "so tough."
para "I wonder if"
line "ECRUTEAK GYM's"
para "MORTY is still in"
line "training?"
para "He really hammered"
line "me."
done
2015-07-10 01:20:21 -07:00
CooltrainerfCybilSeenText:
text "You look strong."
para "Good trainers seek"
line "tough opponents"
cont "instinctively."
done
2015-07-10 01:20:21 -07:00
CooltrainerfCybilBeatenText:
text "Nope! This won't"
line "do at all."
done
2017-12-10 12:36:58 -08:00
CooltrainerfCybilAfterBattleText:
text "We all get better"
line "by experiencing"
cont "many battles."
para "I battled a lot to"
line "become what I am"
cont "today--an elite."
done
2016-04-06 21:59:45 -07:00
Route44Sign1Text:
text "ROUTE 44"
line "ICE PATH AHEAD"
done
2016-04-06 21:59:45 -07:00
Route44Sign2Text:
text "ROUTE 44"
para "MAHOGANY TOWN -"
line "BLACKTHORN CITY"
done
Route44_MapEvents:
db 0, 0 ; filler
db 1 ; warp events
2018-02-01 19:22:07 -08:00
warp_event 56, 7, ICE_PATH_1F, 1
db 0 ; coord events
db 3 ; bg events
2018-02-01 19:22:07 -08:00
bg_event 53, 7, BGEVENT_READ, Route44Sign1
bg_event 6, 10, BGEVENT_READ, Route44Sign2
bg_event 32, 9, BGEVENT_ITEM, Route44HiddenElixer
db 11 ; object events
2018-02-01 19:22:07 -08:00
object_event 35, 3, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 1, TrainerFisherWilton1, -1
object_event 19, 13, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 1, TrainerFisherEdgar, -1
2018-02-01 19:22:07 -08:00
object_event 10, 9, SPRITE_YOUNGSTER, SPRITEMOVEDATA_SPINCLOCKWISE, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerPsychicPhil, -1
object_event 43, 2, SPRITE_SUPER_NERD, SPRITEMOVEDATA_SPINCLOCKWISE, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 3, TrainerPokemaniacZach, -1
object_event 51, 5, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 2, TrainerBirdKeeperVance1, -1
object_event 41, 15, SPRITE_COOLTRAINER_M, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 5, TrainerCooltrainermAllen, -1
object_event 31, 14, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 5, TrainerCooltrainerfCybil, -1
2018-02-28 13:50:43 -08:00
object_event 9, 5, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route44FruitTree, -1
2018-02-01 19:22:07 -08:00
object_event 30, 8, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route44MaxRevive, EVENT_ROUTE_44_MAX_REVIVE
object_event 45, 4, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route44UltraBall, EVENT_ROUTE_44_ULTRA_BALL
object_event 14, 9, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route44MaxRepel, EVENT_ROUTE_44_MAX_REPEL