ref: d31ba05aebed61b499e242f133cfbd4095eee09e
dir: /maps/Route33.asm/
const_def 2 ; object 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: writecode 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 buttonsound setevent EVENT_ANTHONY_ASKED_FOR_PHONE_NUMBER scall .AskNumber1 jump .AskForPhoneNumber .AskAgain: scall .AskNumber2 .AskForPhoneNumber: askforphonenumber PHONE_HIKER_ANTHONY ifequal PHONE_CONTACTS_FULL, .PhoneFull ifequal PHONE_CONTACT_REFUSED, .NumberDeclined trainertotext HIKER, ANTHONY2, MEM_BUFFER_0 scall .RegisteredNumber jump .NumberAccepted .Rematch: scall .RematchStd winlosstext HikerAnthony2BeatenText, 0 copybytetovar 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 loadvar wAnthonyFightCount, 1 clearflag ENGINE_ANTHONY end .LoadFight1: loadtrainer HIKER, ANTHONY1 startbattle reloadmapafterbattle loadvar wAnthonyFightCount, 2 clearflag ENGINE_ANTHONY end .LoadFight2: loadtrainer HIKER, ANTHONY3 startbattle reloadmapafterbattle loadvar wAnthonyFightCount, 3 clearflag ENGINE_ANTHONY end .LoadFight3: loadtrainer HIKER, ANTHONY4 startbattle reloadmapafterbattle loadvar 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