pokecrystal-board/maps/Route33.asm

210 lines
4.0 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 ROUTE33_POKEFAN_M
const ROUTE33_LASS
const ROUTE33_FRUIT_TREE
Route33_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
2015-12-16 18:57:42 -08:00
Route33LassScript:
jumptextfaceplayer Route33LassText
2015-07-10 01:20:21 -07:00
TrainerHikerAnthony:
trainer HIKER, ANTHONY2, EVENT_BEAT_HIKER_ANTHONY, 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
2018-01-11 22:40:20 -08:00
if_equal PHONE_CONTACTS_FULL, .PhoneFull
if_equal PHONE_CONTACT_REFUSED, .NumberDeclined
trainertotext HIKER, ANTHONY2, MEM_BUFFER_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
Route33_MapEvents:
db 0, 0 ; filler
db 1 ; warp events
warp_event 11, 9, 3, UNION_CAVE_1F
db 0 ; coord events
db 1 ; bg events
bg_event 11, 11, BGEVENT_READ, Route33Sign
db 3 ; object events
object_event 6, 13, SPRITE_POKEFAN_M, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 2, TrainerHikerAnthony, -1
object_event 13, 16, SPRITE_LASS, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, Route33LassScript, -1
object_event 14, 16, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route33FruitTreeScript, -1