pokecrystal-board/maps/Route42.asm

349 lines
7.5 KiB
NASM
Raw Normal View History

object_const_def
2015-11-26 21:22:14 -08:00
const ROUTE42_FISHER
const ROUTE42_POKEFAN_M
const ROUTE42_SUPER_NERD
const ROUTE42_FRUIT_TREE1
const ROUTE42_FRUIT_TREE2
const ROUTE42_FRUIT_TREE3
const ROUTE42_POKE_BALL1
const ROUTE42_POKE_BALL2
const ROUTE42_SUICUNE
Route42_MapScripts:
def_scene_scripts
scene_script .DummyScene0 ; SCENE_ROUTE42_NOTHING
scene_script .DummyScene1 ; SCENE_ROUTE42_SUICUNE
def_callbacks
.DummyScene0:
end
.DummyScene1:
end
2016-04-06 21:59:45 -07:00
Route42SuicuneScript:
showemote EMOTE_SHOCK, PLAYER, 15
pause 15
playsound SFX_WARP_FROM
2018-02-28 13:50:43 -08:00
applymovement ROUTE42_SUICUNE, Route42SuicuneMovement
2015-11-26 21:22:14 -08:00
disappear ROUTE42_SUICUNE
pause 10
setscene SCENE_ROUTE42_NOTHING
2013-09-24 00:48:58 -07:00
clearevent EVENT_SAW_SUICUNE_ON_ROUTE_36
setmapscene ROUTE_36, SCENE_ROUTE36_SUICUNE
end
2018-01-15 20:09:56 -08:00
TrainerFisherTully:
trainer FISHER, TULLY1, EVENT_BEAT_FISHER_TULLY, FisherTullySeenText, FisherTullyBeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
loadvar VAR_CALLERID, PHONE_FISHER_TULLY
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
checkflag ENGINE_TULLY_READY_FOR_REMATCH
2018-01-15 20:09:56 -08:00
iftrue .WantsBattle
checkflag ENGINE_TULLY_HAS_WATER_STONE
2018-01-15 20:09:56 -08:00
iftrue .HasWaterStone
checkcellnum PHONE_FISHER_TULLY
iftrue .NumberAccepted
checkevent EVENT_TULLY_ASKED_FOR_PHONE_NUMBER
2018-01-15 20:09:56 -08:00
iftrue .AskedAlready
writetext FisherTullyAfterBattleText
2019-11-03 09:48:54 -08:00
promptbutton
setevent EVENT_TULLY_ASKED_FOR_PHONE_NUMBER
scall .AskNumber1
sjump .AskForNumber
2018-01-15 20:09:56 -08:00
.AskedAlready:
scall .AskNumber2
2018-01-15 20:09:56 -08:00
.AskForNumber:
askforphonenumber PHONE_FISHER_TULLY
2018-02-02 18:09:17 -08:00
ifequal PHONE_CONTACTS_FULL, .PhoneFull
ifequal PHONE_CONTACT_REFUSED, .NumberDeclined
gettrainername STRING_BUFFER_3, FISHER, TULLY1
scall .RegisteredNumber
sjump .NumberAccepted
2018-01-15 20:09:56 -08:00
.WantsBattle:
scall .Rematch
2018-01-15 20:09:56 -08:00
winlosstext FisherTullyBeatenText, 0
readmem wTullyFightCount
2018-02-02 18:09:17 -08:00
ifequal 3, .Fight3
ifequal 2, .Fight2
ifequal 1, .Fight1
ifequal 0, .LoadFight0
.Fight3:
2013-09-24 00:48:58 -07:00
checkevent EVENT_RESTORED_POWER_TO_KANTO
iftrue .LoadFight3
.Fight2:
2015-06-24 20:20:04 -07:00
checkevent EVENT_BEAT_ELITE_FOUR
iftrue .LoadFight2
.Fight1:
2013-09-24 00:48:58 -07:00
checkevent EVENT_CLEARED_ROCKET_HIDEOUT
iftrue .LoadFight1
.LoadFight0:
loadtrainer FISHER, TULLY1
startbattle
reloadmapafterbattle
loadmem wTullyFightCount, 1
clearflag ENGINE_TULLY_READY_FOR_REMATCH
end
.LoadFight1:
loadtrainer FISHER, TULLY2
startbattle
reloadmapafterbattle
loadmem wTullyFightCount, 2
clearflag ENGINE_TULLY_READY_FOR_REMATCH
end
.LoadFight2:
loadtrainer FISHER, TULLY3
startbattle
reloadmapafterbattle
loadmem wTullyFightCount, 3
clearflag ENGINE_TULLY_READY_FOR_REMATCH
end
.LoadFight3:
loadtrainer FISHER, TULLY4
startbattle
reloadmapafterbattle
clearflag ENGINE_TULLY_READY_FOR_REMATCH
end
2018-01-15 20:09:56 -08:00
.HasWaterStone:
scall .Gift
2015-11-04 17:20:14 -08:00
verbosegiveitem WATER_STONE
2018-01-15 20:09:56 -08:00
iffalse .NoRoom
clearflag ENGINE_TULLY_HAS_WATER_STONE
setevent EVENT_TULLY_GAVE_WATER_STONE
sjump .NumberAccepted
2018-01-15 20:09:56 -08:00
.NoRoom:
sjump .PackFull
.AskNumber1:
jumpstd AskNumber1MScript
end
.AskNumber2:
jumpstd AskNumber2MScript
end
.RegisteredNumber:
jumpstd RegisteredNumberMScript
end
.NumberAccepted:
jumpstd NumberAcceptedMScript
end
.NumberDeclined:
jumpstd NumberDeclinedMScript
end
.PhoneFull:
jumpstd PhoneFullMScript
end
.Rematch:
jumpstd RematchMScript
end
.Gift:
jumpstd GiftMScript
end
.PackFull:
jumpstd PackFullMScript
end
2015-07-10 01:20:21 -07:00
TrainerPokemaniacShane:
trainer POKEMANIAC, SHANE, EVENT_BEAT_POKEMANIAC_SHANE, PokemaniacShaneSeenText, PokemaniacShaneBeatenText, 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 PokemaniacShaneAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerHikerBenjamin:
trainer HIKER, BENJAMIN, EVENT_BEAT_HIKER_BENJAMIN, HikerBenjaminSeenText, HikerBenjaminBeatenText, 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 HikerBenjaminAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2016-04-06 21:59:45 -07:00
Route42Sign1:
jumptext Route42Sign1Text
2016-04-06 21:59:45 -07:00
MtMortarSign1:
jumptext MtMortarSign1Text
2016-04-06 21:59:45 -07:00
MtMortarSign2:
jumptext MtMortarSign2Text
2016-04-06 21:59:45 -07:00
Route42Sign2:
jumptext Route42Sign2Text
2015-12-15 07:55:56 -08:00
Route42UltraBall:
itemball ULTRA_BALL
2015-12-15 07:55:56 -08:00
Route42SuperPotion:
itemball SUPER_POTION
2018-02-28 13:50:43 -08:00
Route42FruitTree1:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_42_1
2018-02-28 13:50:43 -08:00
Route42FruitTree2:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_42_2
2018-02-28 13:50:43 -08:00
Route42FruitTree3:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_42_3
Route42HiddenMaxPotion:
hiddenitem MAX_POTION, EVENT_ROUTE_42_HIDDEN_MAX_POTION
2018-02-28 13:50:43 -08:00
Route42SuicuneMovement:
set_sliding
2016-05-14 10:46:14 -07:00
fast_jump_step UP
fast_jump_step UP
fast_jump_step UP
fast_jump_step RIGHT
fast_jump_step RIGHT
fast_jump_step RIGHT
remove_sliding
step_end
2018-01-15 20:09:56 -08:00
FisherTullySeenText:
text "Let me demonstrate"
line "the power of the"
cont "#MON I caught!"
done
2018-01-15 20:09:56 -08:00
FisherTullyBeatenText:
text "What? That's not"
line "right."
done
2018-01-15 20:09:56 -08:00
FisherTullyAfterBattleText:
text "I want to become"
line "the trainer CHAMP"
para "using the #MON"
line "I caught."
para "That's the best"
line "part of fishing!"
done
2015-07-10 01:20:21 -07:00
HikerBenjaminSeenText:
text "Ah, it's good to"
line "be outside!"
cont "I feel so free!"
done
2015-07-10 01:20:21 -07:00
HikerBenjaminBeatenText:
text "Gahahah!"
done
2017-12-10 12:36:58 -08:00
HikerBenjaminAfterBattleText:
text "Losing feels in-"
line "significant if you"
para "look up at the big"
line "sky!"
done
2015-07-10 01:20:21 -07:00
PokemaniacShaneSeenText:
text "HEY!"
para "This is my secret"
line "place! Get lost,"
cont "you outsider!"
done
2015-07-10 01:20:21 -07:00
PokemaniacShaneBeatenText:
text "I should have used"
line "my MOON STONE…"
done
2017-12-10 12:36:58 -08:00
PokemaniacShaneAfterBattleText:
text "You're working on"
line "a #DEX?"
para "Wow, you must know"
line "some pretty rare"
cont "#MON!"
para "May I please see"
line "it. Please?"
done
2016-04-06 21:59:45 -07:00
Route42Sign1Text:
text "ROUTE 42"
para "ECRUTEAK CITY -"
line "MAHOGANY TOWN"
done
2016-04-06 21:59:45 -07:00
MtMortarSign1Text:
text "MT.MORTAR"
para "WATERFALL CAVE"
line "INSIDE"
done
2016-04-06 21:59:45 -07:00
MtMortarSign2Text:
text "MT.MORTAR"
para "WATERFALL CAVE"
line "INSIDE"
done
2016-04-06 21:59:45 -07:00
Route42Sign2Text:
text "ROUTE 42"
para "ECRUTEAK CITY -"
line "MAHOGANY TOWN"
done
Route42_MapEvents:
db 0, 0 ; filler
def_warp_events
2018-02-01 19:22:07 -08:00
warp_event 0, 8, ROUTE_42_ECRUTEAK_GATE, 3
warp_event 0, 9, ROUTE_42_ECRUTEAK_GATE, 4
warp_event 10, 5, MOUNT_MORTAR_1F_OUTSIDE, 1
warp_event 28, 9, MOUNT_MORTAR_1F_OUTSIDE, 2
warp_event 46, 7, MOUNT_MORTAR_1F_OUTSIDE, 3
def_coord_events
coord_event 24, 14, SCENE_ROUTE42_SUICUNE, Route42SuicuneScript
def_bg_events
2018-02-01 19:22:07 -08:00
bg_event 4, 10, BGEVENT_READ, Route42Sign1
bg_event 7, 5, BGEVENT_READ, MtMortarSign1
bg_event 45, 9, BGEVENT_READ, MtMortarSign2
bg_event 54, 8, BGEVENT_READ, Route42Sign2
bg_event 16, 11, BGEVENT_ITEM, Route42HiddenMaxPotion
def_object_events
2018-01-15 20:09:56 -08:00
object_event 40, 10, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 1, TrainerFisherTully, -1
2018-02-01 19:22:07 -08:00
object_event 51, 9, SPRITE_POKEFAN_M, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 3, TrainerHikerBenjamin, -1
object_event 47, 8, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerPokemaniacShane, -1
2018-02-28 13:50:43 -08:00
object_event 27, 16, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route42FruitTree1, -1
object_event 28, 16, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route42FruitTree2, -1
object_event 29, 16, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route42FruitTree3, -1
2018-02-01 19:22:07 -08:00
object_event 6, 4, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route42UltraBall, EVENT_ROUTE_42_ULTRA_BALL
object_event 33, 8, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route42SuperPotion, EVENT_ROUTE_42_SUPER_POTION
object_event 26, 16, SPRITE_SUICUNE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_SAW_SUICUNE_ON_ROUTE_42