pokecrystal-board/maps/Route46.asm

271 lines
5.6 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 ROUTE46_POKEFAN_M
const ROUTE46_YOUNGSTER
const ROUTE46_LASS
const ROUTE46_FRUIT_TREE1
const ROUTE46_FRUIT_TREE2
const ROUTE46_POKE_BALL
Route46_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
2015-07-10 01:20:21 -07:00
TrainerCamperTed:
trainer CAMPER, TED, EVENT_BEAT_CAMPER_TED, CamperTedSeenText, CamperTedBeatenText, 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 CamperTedAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:20:21 -07:00
TrainerPicnickerErin1:
trainer PICNICKER, ERIN1, EVENT_BEAT_PICNICKER_ERIN, PicnickerErin1SeenText, PicnickerErin1BeatenText, 0, .Script
2017-12-17 17:45:04 -08:00
.Script:
writecode VAR_CALLERID, PHONE_PICNICKER_ERIN
2018-02-02 18:09:17 -08:00
endifjustbattled
2015-12-09 15:25:44 -08:00
opentext
checkflag ENGINE_ERIN
iftrue .WantsBattle
checkcellnum PHONE_PICNICKER_ERIN
iftrue Route46NumberAcceptedF
checkevent EVENT_ERIN_ASKED_FOR_PHONE_NUMBER
2018-01-15 18:39:07 -08:00
iftrue .AskedAlready
writetext PicnickerErinAfterBattleText
2015-11-29 19:29:45 -08:00
buttonsound
setevent EVENT_ERIN_ASKED_FOR_PHONE_NUMBER
scall Route46AskNumber1F
2018-01-15 18:39:07 -08:00
jump .AskForNumber
2018-01-15 18:39:07 -08:00
.AskedAlready:
scall Route46AskNumber2F
2018-01-15 18:39:07 -08:00
.AskForNumber:
askforphonenumber PHONE_PICNICKER_ERIN
2018-02-02 18:09:17 -08:00
ifequal PHONE_CONTACTS_FULL, Route46PhoneFullF
ifequal PHONE_CONTACT_REFUSED, Route46NumberDeclinedF
2018-01-11 22:40:20 -08:00
trainertotext PICNICKER, ERIN1, MEM_BUFFER_0
scall Route46RegisteredNumberF
jump Route46NumberAcceptedF
.WantsBattle:
scall Route46RematchF
2015-11-02 11:37:02 -08:00
winlosstext PicnickerErin1BeatenText, 0
2015-07-10 13:04:00 -07:00
copybytetovar wErinFightCount
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 PICNICKER, ERIN1
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wErinFightCount, 1
clearflag ENGINE_ERIN
end
.LoadFight1:
loadtrainer PICNICKER, ERIN2
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wErinFightCount, 2
clearflag ENGINE_ERIN
end
.LoadFight2:
loadtrainer PICNICKER, ERIN3
startbattle
reloadmapafterbattle
clearflag ENGINE_ERIN
2013-09-24 00:48:58 -07:00
checkevent EVENT_ERIN_CALCIUM
2018-01-15 18:39:07 -08:00
iftrue .HasCalcium
checkevent EVENT_GOT_CALCIUM_FROM_ERIN
2018-01-15 18:39:07 -08:00
iftrue .GotCalciumAlready
scall Route46RematchGiftF
2015-11-04 17:20:14 -08:00
verbosegiveitem CALCIUM
2018-01-15 18:39:07 -08:00
iffalse ErinNoRoomForCalcium
setevent EVENT_GOT_CALCIUM_FROM_ERIN
jump Route46NumberAcceptedF
2018-01-15 18:39:07 -08:00
.GotCalciumAlready:
end
2018-01-15 18:39:07 -08:00
.HasCalcium:
2015-12-09 15:25:44 -08:00
opentext
2018-01-15 18:39:07 -08:00
writetext PicnickerErin2BeatenText
2015-11-25 07:16:29 -08:00
waitbutton
2015-11-04 17:20:14 -08:00
verbosegiveitem CALCIUM
2018-01-15 18:39:07 -08:00
iffalse ErinNoRoomForCalcium
2013-09-24 00:48:58 -07:00
clearevent EVENT_ERIN_CALCIUM
setevent EVENT_GOT_CALCIUM_FROM_ERIN
jump Route46NumberAcceptedF
Route46AskNumber1F:
2015-06-24 18:26:24 -07:00
jumpstd asknumber1f
end
Route46AskNumber2F:
2015-06-24 18:26:24 -07:00
jumpstd asknumber2f
end
Route46RegisteredNumberF:
2015-06-24 18:26:24 -07:00
jumpstd registerednumberf
end
Route46NumberAcceptedF:
2015-06-24 18:26:24 -07:00
jumpstd numberacceptedf
end
Route46NumberDeclinedF:
2015-06-24 18:26:24 -07:00
jumpstd numberdeclinedf
end
Route46PhoneFullF:
2015-06-24 18:26:24 -07:00
jumpstd phonefullf
end
Route46RematchF:
2015-06-24 18:26:24 -07:00
jumpstd rematchf
end
2018-01-15 18:39:07 -08:00
ErinNoRoomForCalcium:
2013-09-24 00:48:58 -07:00
setevent EVENT_ERIN_CALCIUM
2015-06-24 18:26:24 -07:00
jumpstd packfullf
end
Route46RematchGiftF:
2015-06-24 18:26:24 -07:00
jumpstd rematchgiftf
end
2015-07-10 01:20:21 -07:00
TrainerHikerBailey:
trainer HIKER, BAILEY, EVENT_BEAT_HIKER_BAILEY, HikerBaileySeenText, HikerBaileyBeatenText, 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 HikerBaileyAfterBattleText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2016-04-06 21:59:45 -07:00
Route46Sign:
jumptext Route46SignText
2015-12-15 07:55:56 -08:00
Route46XSpeed:
itemball X_SPEED
2018-02-28 13:50:43 -08:00
Route46FruitTree1:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_46_1
2018-02-28 13:50:43 -08:00
Route46FruitTree2:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_46_2
2015-07-10 01:20:21 -07:00
HikerBaileySeenText:
text "Awright! I'll show"
line "you the power of"
cont "mountain #MON!"
done
2015-07-10 01:20:21 -07:00
HikerBaileyBeatenText:
text "Mercy! You showed"
line "me your power!"
done
2017-12-10 12:36:58 -08:00
HikerBaileyAfterBattleText:
text "It's over. I don't"
line "mind. We HIKERS"
cont "are like that."
done
2015-07-10 01:20:21 -07:00
CamperTedSeenText:
text "I'm raising #-"
line "MON too!"
para "Will you battle"
line "with me?"
done
2015-07-10 01:20:21 -07:00
CamperTedBeatenText:
text "Wha…?"
done
2017-12-10 12:36:58 -08:00
CamperTedAfterBattleText:
text "I did my best but"
line "came up short."
para "No excuses--I"
line "admit I lost."
done
2015-07-10 01:20:21 -07:00
PicnickerErin1SeenText:
text "I raise #MON"
line "too!"
para "Will you battle"
line "with me?"
done
2015-07-10 01:20:21 -07:00
PicnickerErin1BeatenText:
text "Oh, rats!"
done
2018-01-15 18:39:07 -08:00
PicnickerErinAfterBattleText:
text "I've been to many"
line "GYMS, but the GYM"
para "in GOLDENROD is my"
line "favorite."
para "It's filled with"
line "pretty flowers!"
done
2018-01-15 18:39:07 -08:00
PicnickerErin2BeatenText:
text "Aww… I keep losing"
line "all the time!"
para "I'll just have to"
line "try harder!"
para "Anyway, thanks for"
line "battling me again"
para "and again. Here's"
line "that present from"
cont "the other time."
done
2016-04-06 21:59:45 -07:00
Route46SignText:
text "ROUTE 46"
line "MOUNTAIN RD. AHEAD"
done
Route46_MapEvents:
db 0, 0 ; filler
db 3 ; warp events
2018-02-01 19:22:07 -08:00
warp_event 7, 33, ROUTE_29_ROUTE_46_GATE, 1
warp_event 8, 33, ROUTE_29_ROUTE_46_GATE, 2
warp_event 14, 5, DARK_CAVE_VIOLET_ENTRANCE, 3
db 0 ; coord events
db 1 ; bg events
2018-02-01 19:22:07 -08:00
bg_event 9, 27, BGEVENT_READ, Route46Sign
db 6 ; object events
object_event 12, 19, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 2, TrainerHikerBailey, -1
2018-02-01 19:22:07 -08:00
object_event 4, 14, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 2, TrainerCamperTed, -1
object_event 2, 13, SPRITE_LASS, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 2, TrainerPicnickerErin1, -1
2018-02-28 13:50:43 -08:00
object_event 7, 5, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route46FruitTree1, -1
object_event 8, 6, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route46FruitTree2, -1
2018-02-01 19:22:07 -08:00
object_event 1, 15, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route46XSpeed, EVENT_ROUTE_46_X_SPEED