ref: 395ebd83866161a93276f030bbf67f6ac0895f0f
dir: /maps/Route33.asm/
object_const_def ; object_event constants const ROUTE33_POKEFAN_M const ROUTE33_LASS const ROUTE33_FRUIT_TREE Route33_MapScripts: db 0 ; scene scripts db 0 ; callbacks Route33LassScript: jumptextfaceplayer Route33LassText TrainerHikerAnthony: trainer HIKER, ANTHONY2, EVENT_BEAT_HIKER_ANTHONY, HikerAnthony2SeenText, HikerAnthony2BeatenText, 0, .Script .Script: loadvar VAR_CALLERID, PHONE_HIKER_ANTHONY endifjustbattled opentext checkflag ENGINE_ANTHONY iftrue .Rematch checkflag ENGINE_DUNSPARCE_SWARM iftrue .Swarm checkcellnum PHONE_HIKER_ANTHONY iftrue .NumberAccepted checkevent EVENT_ANTHONY_ASKED_FOR_PHONE_NUMBER iftrue .AskAgain writetext HikerAnthony2AfterText promptbutton setevent EVENT_ANTHONY_ASKED_FOR_PHONE_NUMBER scall .AskNumber1 sjump .AskForPhoneNumber .AskAgain: scall .AskNumber2 .AskForPhoneNumber: askforphonenumber PHONE_HIKER_ANTHONY ifequal PHONE_CONTACTS_FULL, .PhoneFull ifequal PHONE_CONTACT_REFUSED, .NumberDeclined gettrainername STRING_BUFFER_3, HIKER, ANTHONY2 scall .RegisteredNumber sjump .NumberAccepted .Rematch: scall .RematchStd winlosstext HikerAnthony2BeatenText, 0 readmem wAnthonyFightCount ifequal 4, .Fight4 ifequal 3, .Fight3 ifequal 2, .Fight2 ifequal 1, .Fight1 ifequal 0, .LoadFight0 .Fight4: checkevent EVENT_RESTORED_POWER_TO_KANTO iftrue .LoadFight4 .Fight3: checkevent EVENT_BEAT_ELITE_FOUR iftrue .LoadFight3 .Fight2: checkevent EVENT_CLEARED_RADIO_TOWER iftrue .LoadFight2 .Fight1: checkflag ENGINE_FLYPOINT_OLIVINE iftrue .LoadFight1 .LoadFight0: loadtrainer HIKER, ANTHONY2 startbattle reloadmapafterbattle loadmem wAnthonyFightCount, 1 clearflag ENGINE_ANTHONY end .LoadFight1: loadtrainer HIKER, ANTHONY1 startbattle reloadmapafterbattle loadmem wAnthonyFightCount, 2 clearflag ENGINE_ANTHONY end .LoadFight2: loadtrainer HIKER, ANTHONY3 startbattle reloadmapafterbattle loadmem wAnthonyFightCount, 3 clearflag ENGINE_ANTHONY end .LoadFight3: loadtrainer HIKER, ANTHONY4 startbattle reloadmapafterbattle loadmem wAnthonyFightCount, 4 clearflag ENGINE_ANTHONY end .LoadFight4: loadtrainer HIKER, ANTHONY5 startbattle reloadmapafterbattle clearflag ENGINE_ANTHONY end .Swarm: writetext HikerAnthonyDunsparceText waitbutton closetext end .AskNumber1: jumpstd asknumber1m end .AskNumber2: jumpstd asknumber2m end .RegisteredNumber: jumpstd registerednumberm end .NumberAccepted: jumpstd numberacceptedm end .NumberDeclined: jumpstd numberdeclinedm end .PhoneFull: jumpstd phonefullm end .RematchStd: jumpstd rematchm end Route33Sign: jumptext Route33SignText Route33FruitTree: fruittree FRUITTREE_ROUTE_33 HikerAnthony2SeenText: text "I came through the" line "tunnel, but I" para "still have plenty" line "of energy left." done HikerAnthony2BeatenText: text "Whoa! You've got" line "more zip than me!" done HikerAnthony2AfterText: text "We HIKERS are at" line "our best in the" cont "mountains." done 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 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 Route33SignText: text "ROUTE 33" done Route33_MapEvents: db 0, 0 ; filler db 1 ; warp events warp_event 11, 9, UNION_CAVE_1F, 3 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, Route33FruitTree, -1