pokecrystal-board/maps/Route26.asm

435 lines
8.9 KiB
NASM
Raw Normal View History

object_const_def ; object_event constants
2015-11-26 21:22:14 -08:00
const ROUTE26_COOLTRAINER_M1
const ROUTE26_COOLTRAINER_M2
const ROUTE26_COOLTRAINER_F1
const ROUTE26_COOLTRAINER_F2
const ROUTE26_YOUNGSTER
const ROUTE26_FISHER
const ROUTE26_FRUIT_TREE
const ROUTE26_POKE_BALL
Route26_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
2015-07-10 01:20:21 -07:00
TrainerCooltrainermJake:
trainer COOLTRAINERM, JAKE, EVENT_BEAT_COOLTRAINERM_JAKE, CooltrainermJakeSeenText, CooltrainermJakeBeatenText, 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 CooltrainermJakeAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerCooltrainermGaven3:
trainer COOLTRAINERM, GAVEN3, EVENT_BEAT_COOLTRAINERM_GAVEN, CooltrainermGaven3SeenText, CooltrainermGaven3BeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
loadvar VAR_CALLERID, PHONE_COOLTRAINERM_GAVEN
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
checkflag ENGINE_GAVEN
2018-01-15 19:25:11 -08:00
iftrue .WantsBattle
checkcellnum PHONE_COOLTRAINERM_GAVEN
iftrue .NumberAccepted
checkevent EVENT_GAVEN_ASKED_FOR_PHONE_NUMBER
2018-01-15 19:25:11 -08:00
iftrue .AskedAlready
writetext CooltrainermGavenAfterText
2019-11-03 09:48:54 -08:00
promptbutton
setevent EVENT_GAVEN_ASKED_FOR_PHONE_NUMBER
scall .AskNumber1
sjump .AskForNumber
2018-01-15 19:25:11 -08:00
.AskedAlready:
scall .AskNumber2
2018-01-15 19:25:11 -08:00
.AskForNumber:
askforphonenumber PHONE_COOLTRAINERM_GAVEN
2018-02-02 18:09:17 -08:00
ifequal PHONE_CONTACTS_FULL, .PhoneFull
ifequal PHONE_CONTACT_REFUSED, .NumberDeclined
gettrainername STRING_BUFFER_3, COOLTRAINERM, GAVEN3
scall .RegisteredNumber
sjump .NumberAccepted
2018-01-15 19:25:11 -08:00
.WantsBattle:
scall .Rematch
2015-11-02 11:37:02 -08:00
winlosstext CooltrainermGaven3BeatenText, 0
readmem wGavenFightCount
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 COOLTRAINERM, GAVEN3
startbattle
reloadmapafterbattle
loadmem wGavenFightCount, 1
clearflag ENGINE_GAVEN
end
.LoadFight1:
loadtrainer COOLTRAINERM, GAVEN1
startbattle
reloadmapafterbattle
loadmem wGavenFightCount, 2
clearflag ENGINE_GAVEN
end
.LoadFight2:
loadtrainer COOLTRAINERM, GAVEN2
startbattle
reloadmapafterbattle
clearflag ENGINE_GAVEN
end
.AskNumber1:
2015-06-24 18:26:24 -07:00
jumpstd asknumber1m
end
.AskNumber2:
2015-06-24 18:26:24 -07:00
jumpstd asknumber2m
end
.RegisteredNumber:
2015-06-24 18:26:24 -07:00
jumpstd registerednumberm
end
.NumberAccepted:
2015-06-24 18:26:24 -07:00
jumpstd numberacceptedm
end
.NumberDeclined:
2015-06-24 18:26:24 -07:00
jumpstd numberdeclinedm
end
.PhoneFull:
2015-06-24 18:26:24 -07:00
jumpstd phonefullm
end
.Rematch:
2015-06-24 18:26:24 -07:00
jumpstd rematchm
end
2015-07-10 01:20:21 -07:00
TrainerCooltrainerfJoyce:
trainer COOLTRAINERF, JOYCE, EVENT_BEAT_COOLTRAINERF_JOYCE, CooltrainerfJoyceSeenText, CooltrainerfJoyceBeatenText, 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 CooltrainerfJoyceAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerCooltrainerfBeth1:
trainer COOLTRAINERF, BETH1, EVENT_BEAT_COOLTRAINERF_BETH, CooltrainerfBeth1SeenText, CooltrainerfBeth1BeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
loadvar VAR_CALLERID, PHONE_COOLTRAINERF_BETH
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
checkflag ENGINE_BETH
2018-01-15 19:25:11 -08:00
iftrue .WantsBattle
checkcellnum PHONE_COOLTRAINERF_BETH
iftrue .NumberAccepted
checkevent EVENT_BETH_ASKED_FOR_PHONE_NUMBER
2018-01-15 19:25:11 -08:00
iftrue .AskedAlready
writetext CooltrainerfBethAfterText
2019-11-03 09:48:54 -08:00
promptbutton
setevent EVENT_BETH_ASKED_FOR_PHONE_NUMBER
scall .AskNumber1
sjump .AskForNumber
2018-01-15 19:25:11 -08:00
.AskedAlready:
scall .AskNumber2
2018-01-15 19:25:11 -08:00
.AskForNumber:
askforphonenumber PHONE_COOLTRAINERF_BETH
2018-02-02 18:09:17 -08:00
ifequal PHONE_CONTACTS_FULL, .PhoneFull
ifequal PHONE_CONTACT_REFUSED, .NumberDeclined
gettrainername STRING_BUFFER_3, COOLTRAINERF, BETH1
scall .RegisteredNumber
sjump .NumberAccepted
2018-01-15 19:25:11 -08:00
.WantsBattle:
scall .Rematch
2015-11-02 11:37:02 -08:00
winlosstext CooltrainerfBeth1BeatenText, 0
readmem wBethFightCount
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 COOLTRAINERF, BETH1
startbattle
reloadmapafterbattle
loadmem wBethFightCount, 1
clearflag ENGINE_BETH
end
.LoadFight1:
loadtrainer COOLTRAINERF, BETH2
startbattle
reloadmapafterbattle
loadmem wBethFightCount, 2
clearflag ENGINE_BETH
end
.LoadFight2:
loadtrainer COOLTRAINERF, BETH3
startbattle
reloadmapafterbattle
clearflag ENGINE_BETH
end
.AskNumber1:
2015-06-24 18:26:24 -07:00
jumpstd asknumber1f
end
.AskNumber2:
2015-06-24 18:26:24 -07:00
jumpstd asknumber2f
end
.RegisteredNumber:
2015-06-24 18:26:24 -07:00
jumpstd registerednumberf
end
.NumberAccepted:
2015-06-24 18:26:24 -07:00
jumpstd numberacceptedf
end
.NumberDeclined:
2015-06-24 18:26:24 -07:00
jumpstd numberdeclinedf
end
.PhoneFull:
2015-06-24 18:26:24 -07:00
jumpstd phonefullf
end
.Rematch:
2015-06-24 18:26:24 -07:00
jumpstd rematchf
end
2015-07-10 01:20:21 -07:00
TrainerPsychicRichard:
trainer PSYCHIC_T, RICHARD, EVENT_BEAT_PSYCHIC_RICHARD, PsychicRichardSeenText, PsychicRichardBeatenText, 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 PsychicRichardAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerFisherScott:
trainer FISHER, SCOTT, EVENT_BEAT_FISHER_SCOTT, FisherScottSeenText, FisherScottBeatenText, 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 FisherScottAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2016-04-06 21:59:45 -07:00
Route26Sign:
jumptext Route26SignText
2018-02-28 13:50:43 -08:00
Route26FruitTree:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_26
2015-12-15 07:55:56 -08:00
Route26MaxElixer:
itemball MAX_ELIXER
2015-07-10 01:20:21 -07:00
CooltrainermJakeSeenText:
text "I'm making my"
line "final preparations"
para "for the #MON"
line "LEAGUE."
done
2015-07-10 01:20:21 -07:00
CooltrainermJakeBeatenText:
text "I blew it!"
done
2017-12-10 12:36:58 -08:00
CooltrainermJakeAfterBattleText:
text "It's going to be"
line "tough to win at"
cont "the LEAGUE."
para "I need to do some"
line "more training."
para "I hear that the"
line "LEAGUE's ELITE"
para "FOUR are tougher"
line "than GYM LEADERS."
done
2015-07-10 01:20:21 -07:00
CooltrainermGaven3SeenText:
text "By experiencing"
line "tough battles, you"
cont "gain power."
done
2015-07-10 01:20:21 -07:00
CooltrainermGaven3BeatenText:
text "Gaah! Life is even"
line "tougher!"
done
2018-01-15 19:25:11 -08:00
CooltrainermGavenAfterText:
text "To get to #MON"
line "LEAGUE, you have"
para "to get through"
line "VICTORY ROAD."
para "But VICTORY ROAD"
line "is tough."
para "Practically nobody"
line "goes there!"
done
2015-07-10 01:20:21 -07:00
CooltrainerfJoyceSeenText:
text "Since you've come"
line "this far, you must"
cont "be good."
para "I'm going to give"
line "this battle every-"
cont "thing I've got!"
done
2015-07-10 01:20:21 -07:00
CooltrainerfJoyceBeatenText:
text "No! I don't"
line "believe this!"
done
2017-12-10 12:36:58 -08:00
CooltrainerfJoyceAfterBattleText:
text "I've defeated"
line "eight GYM LEADERS,"
para "so I was feeling"
line "confident."
para "I'll have to try"
line "harder next time."
done
2015-07-10 01:20:21 -07:00
CooltrainerfBeth1SeenText:
text "I lost to a train-"
line "er named <RIVAL>."
para "He was really"
line "strong, but…"
para "It was as if he"
line "absolutely had to"
cont "win at any cost."
para "I felt sorry for"
line "his #MON."
done
2015-07-10 01:20:21 -07:00
CooltrainerfBeth1BeatenText:
text "#MON aren't"
line "tools of war."
done
2018-01-15 19:25:11 -08:00
CooltrainerfBethAfterText:
text "#MON are in-"
line "valuable, lifelong"
cont "partners."
done
2015-07-10 01:20:21 -07:00
PsychicRichardSeenText:
text "Wow, look at all"
line "those BADGES!"
cont "I'm impressed."
para "But you're not"
line "satisfied by just"
para "collecting them,"
line "right?"
done
2015-07-10 01:20:21 -07:00
PsychicRichardBeatenText:
text "Good battle!"
done
2017-12-10 12:36:58 -08:00
PsychicRichardAfterBattleText:
text "People and #MON"
line "grow from their"
cont "experiences."
para "Don't get lazy and"
line "complacent."
done
2015-07-10 01:20:21 -07:00
FisherScottSeenText:
text "I'm feeling great"
line "today!"
para "I feel like I"
line "could boot even"
cont "the LEAGUE CHAMP!"
done
2015-07-10 01:20:21 -07:00
FisherScottBeatenText:
text "No! Not in this"
line "battle!"
done
2017-12-10 12:36:58 -08:00
FisherScottAfterBattleText:
text "Just like in fish-"
line "ing, it's all over"
para "in #MON if you"
line "give up."
done
2016-04-06 21:59:45 -07:00
Route26SignText:
text "ROUTE 26"
para "#MON LEAGUE"
line "RECEPTION GATE"
done
Route26_MapEvents:
db 0, 0 ; filler
db 3 ; warp events
2018-02-01 19:22:07 -08:00
warp_event 7, 5, VICTORY_ROAD_GATE, 3
2018-02-01 18:54:00 -08:00
warp_event 15, 57, ROUTE_26_HEAL_HOUSE, 1
2018-02-01 19:22:07 -08:00
warp_event 5, 71, DAY_OF_WEEK_SIBLINGS_HOUSE, 1
db 0 ; coord events
db 1 ; bg events
2018-02-01 19:22:07 -08:00
bg_event 8, 6, BGEVENT_READ, Route26Sign
db 8 ; object events
object_event 14, 24, SPRITE_COOLTRAINER_M, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 2, TrainerCooltrainermJake, -1
2018-02-01 19:22:07 -08:00
object_event 9, 38, SPRITE_COOLTRAINER_M, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 3, TrainerCooltrainermGaven3, -1
object_event 10, 56, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 3, TrainerCooltrainerfJoyce, -1
2018-02-01 19:22:07 -08:00
object_event 5, 8, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 4, TrainerCooltrainerfBeth1, -1
object_event 13, 79, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 2, TrainerPsychicRichard, -1
object_event 10, 92, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 3, TrainerFisherScott, -1
2018-02-28 13:50:43 -08:00
object_event 14, 54, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route26FruitTree, -1
2018-02-01 19:22:07 -08:00
object_event 9, 15, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route26MaxElixer, EVENT_ROUTE_26_MAX_ELIXER