pokecrystal-board/maps/Route33.asm

217 lines
3.9 KiB
NASM
Raw Normal View History

2015-11-26 21:22:14 -08:00
const_value set 2
const ROUTE33_POKEFAN_M
const ROUTE33_LASS
const ROUTE33_FRUIT_TREE
2015-07-10 01:20:21 -07:00
Route33_MapScriptHeader:
.SceneScripts:
db 0
.MapCallbacks:
db 0
2015-12-16 18:57:42 -08:00
Route33LassScript:
jumptextfaceplayer Route33LassText
2015-07-10 01:20:21 -07:00
TrainerHikerAnthony:
2015-12-16 18:57:42 -08:00
trainer EVENT_BEAT_HIKER_ANTHONY, HIKER, ANTHONY2, HikerAnthony2SeenText, HikerAnthony2BeatenText, 0, .Script
2015-12-16 18:57:42 -08:00
.Script:
writecode VAR_CALLERID, PHONE_HIKER_ANTHONY
2015-11-25 07:16:29 -08:00
end_if_just_battled
2015-12-09 15:25:44 -08:00
opentext
checkflag ENGINE_ANTHONY
2015-12-16 18:57:42 -08:00
iftrue .Rematch
2015-07-10 05:08:03 -07:00
checkflag ENGINE_DUNSPARCE_SWARM
2015-12-16 18:57:42 -08:00
iftrue .Swarm
checkcellnum PHONE_HIKER_ANTHONY
2015-12-16 18:57:42 -08:00
iftrue .NumberAccepted
checkevent EVENT_ANTHONY_ASKED_FOR_PHONE_NUMBER
2015-12-16 18:57:42 -08:00
iftrue .AskAgain
writetext HikerAnthony2AfterText
2015-11-29 19:29:45 -08:00
buttonsound
setevent EVENT_ANTHONY_ASKED_FOR_PHONE_NUMBER
2015-12-16 18:57:42 -08:00
scall .AskNumber1
jump .AskForPhoneNumber
2015-12-16 18:57:42 -08:00
.AskAgain:
scall .AskNumber2
.AskForPhoneNumber:
askforphonenumber PHONE_HIKER_ANTHONY
2015-12-16 18:57:42 -08:00
if_equal $1, .PhoneFull
if_equal $2, .NumberDeclined
trainertotext HIKER, ANTHONY2, $0
2015-12-16 18:57:42 -08:00
scall .RegisteredNumber
jump .NumberAccepted
2015-12-16 18:57:42 -08:00
.Rematch:
scall .RematchStd
2015-11-02 11:37:02 -08:00
winlosstext HikerAnthony2BeatenText, 0
2015-07-10 13:04:00 -07:00
copybytetovar wAnthonyFightCount
if_equal 4, .Fight4
if_equal 3, .Fight3
if_equal 2, .Fight2
if_equal 1, .Fight1
if_equal 0, .LoadFight0
.Fight4:
2013-09-24 00:48:58 -07:00
checkevent EVENT_RESTORED_POWER_TO_KANTO
iftrue .LoadFight4
.Fight3:
2015-06-24 20:20:04 -07:00
checkevent EVENT_BEAT_ELITE_FOUR
iftrue .LoadFight3
.Fight2:
2013-09-24 00:48:58 -07:00
checkevent EVENT_CLEARED_RADIO_TOWER
iftrue .LoadFight2
.Fight1:
checkflag ENGINE_FLYPOINT_OLIVINE
iftrue .LoadFight1
.LoadFight0:
loadtrainer HIKER, ANTHONY2
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wAnthonyFightCount, 1
clearflag ENGINE_ANTHONY
end
.LoadFight1:
loadtrainer HIKER, ANTHONY1
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wAnthonyFightCount, 2
clearflag ENGINE_ANTHONY
end
.LoadFight2:
loadtrainer HIKER, ANTHONY3
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wAnthonyFightCount, 3
clearflag ENGINE_ANTHONY
end
.LoadFight3:
loadtrainer HIKER, ANTHONY4
startbattle
reloadmapafterbattle
2015-07-10 13:04:00 -07:00
loadvar wAnthonyFightCount, 4
clearflag ENGINE_ANTHONY
end
.LoadFight4:
loadtrainer HIKER, ANTHONY5
startbattle
reloadmapafterbattle
clearflag ENGINE_ANTHONY
end
2015-12-16 18:57:42 -08:00
.Swarm:
writetext HikerAnthonyDunsparceText
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-12-16 18:57:42 -08:00
.AskNumber1:
2015-06-24 18:26:24 -07:00
jumpstd asknumber1m
end
2015-12-16 18:57:42 -08:00
.AskNumber2:
2015-06-24 18:26:24 -07:00
jumpstd asknumber2m
end
2015-12-16 18:57:42 -08:00
.RegisteredNumber:
2015-06-24 18:26:24 -07:00
jumpstd registerednumberm
end
2015-12-16 18:57:42 -08:00
.NumberAccepted:
2015-06-24 18:26:24 -07:00
jumpstd numberacceptedm
end
2015-12-16 18:57:42 -08:00
.NumberDeclined:
2015-06-24 18:26:24 -07:00
jumpstd numberdeclinedm
end
2015-12-16 18:57:42 -08:00
.PhoneFull:
2015-06-24 18:26:24 -07:00
jumpstd phonefullm
end
2015-12-16 18:57:42 -08:00
.RematchStd:
2015-06-24 18:26:24 -07:00
jumpstd rematchm
end
2016-04-06 21:59:45 -07:00
Route33Sign:
jumptext Route33SignText
2015-12-16 18:57:42 -08:00
Route33FruitTreeScript:
2015-11-18 07:42:42 -08:00
fruittree FRUITTREE_ROUTE_33
2015-07-10 01:20:21 -07:00
HikerAnthony2SeenText:
text "I came through the"
line "tunnel, but I"
para "still have plenty"
line "of energy left."
done
2015-07-10 01:20:21 -07:00
HikerAnthony2BeatenText:
text "Whoa! You've got"
line "more zip than me!"
done
2015-12-16 18:57:42 -08:00
HikerAnthony2AfterText:
text "We HIKERS are at"
line "our best in the"
cont "mountains."
done
2015-12-16 18:57:42 -08:00
HikerAnthonyDunsparceText:
text "Hey, did you get a"
line "DUNSPARCE?"
para "I caught one too."
para "Take a look at it"
line "in the light. It's"
cont "got a funny face!"
done
2015-12-16 18:57:42 -08:00
Route33LassText:
text "Pant, pant…"
para "I finally got"
line "through that cave."
para "It was much bigger"
line "than I'd expected."
para "I got too tired to"
line "explore the whole"
para "thing, so I came"
line "outside."
done
2016-04-06 21:59:45 -07:00
Route33SignText:
text "ROUTE 33"
done
2015-07-10 01:20:21 -07:00
Route33_MapEventHeader:
; filler
db 0, 0
.Warps:
db 1
warp_def $9, $b, 3, UNION_CAVE_1F
.CoordEvents:
db 0
.BGEvents:
db 1
bg_event 11, 11, BGEVENT_READ, Route33Sign
.ObjectEvents:
db 3
object_event SPRITE_POKEFAN_M, 13, 6, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 2, TrainerHikerAnthony, -1
object_event SPRITE_LASS, 16, 13, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, Route33LassScript, -1
object_event SPRITE_FRUIT_TREE, 16, 14, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route33FruitTreeScript, -1