ref: 83ef3b9a36bf4b11239713df229165e40694421f
dir: /maps/Route30.asm/
const_value set 2 const ROUTE30_YOUNGSTER1 const ROUTE30_YOUNGSTER2 const ROUTE30_YOUNGSTER3 const ROUTE30_BUG_CATCHER const ROUTE30_YOUNGSTER4 const ROUTE30_MONSTER1 const ROUTE30_MONSTER2 const ROUTE30_FRUIT_TREE1 const ROUTE30_FRUIT_TREE2 const ROUTE30_COOLTRAINER_F const ROUTE30_POKE_BALL Route30_MapScriptHeader: .SceneScripts: db 0 .MapCallbacks: db 0 YoungsterJoey_ImportantBattleScript: waitsfx playmusic MUSIC_JOHTO_TRAINER_BATTLE opentext writetext Text_UseTackle pause 30 closetext playsound SFX_TACKLE applymovement ROUTE30_MONSTER2, Route30_JoeysRattataAttacksMovement opentext faceplayer writetext Text_ThisIsABigBattle waitbutton spriteface ROUTE30_YOUNGSTER1, UP closetext playsound SFX_TACKLE applymovement ROUTE30_MONSTER1, Route30_MikeysRattataAttacksMovement special RestartMapMusic end TrainerYoungsterJoey: trainer EVENT_BEAT_YOUNGSTER_JOEY, YOUNGSTER, JOEY1, YoungsterJoey1SeenText, YoungsterJoey1BeatenText, 0, .Script .Script: writecode VAR_CALLERID, PHONE_YOUNGSTER_JOEY end_if_just_battled opentext checkflag ENGINE_JOEY iftrue .Rematch checkcellnum PHONE_YOUNGSTER_JOEY iftrue .NumberAccepted checkevent EVENT_JOEY_ASKED_FOR_PHONE_NUMBER iftrue .AskAgain writetext YoungsterJoey1AfterText buttonsound setevent EVENT_JOEY_ASKED_FOR_PHONE_NUMBER scall .AskNumber1 jump .RequestNumber .AskAgain: scall .AskNumber2 .RequestNumber: askforphonenumber PHONE_YOUNGSTER_JOEY if_equal $1, .PhoneFull if_equal $2, .NumberDeclined trainertotext YOUNGSTER, JOEY1, $0 scall .RegisteredNumber jump .NumberAccepted .Rematch: scall .RematchStd winlosstext YoungsterJoey1BeatenText, 0 copybytetovar wJoeyFightCount if_equal 4, .Fight4 if_equal 3, .Fight3 if_equal 2, .Fight2 if_equal 1, .Fight1 if_equal 0, .LoadFight0 .Fight4: checkevent EVENT_BEAT_ELITE_FOUR iftrue .LoadFight4 .Fight3: checkevent EVENT_CLEARED_RADIO_TOWER iftrue .LoadFight3 .Fight2: checkflag ENGINE_FLYPOINT_OLIVINE iftrue .LoadFight2 .Fight1: checkflag ENGINE_FLYPOINT_GOLDENROD iftrue .LoadFight1 .LoadFight0: loadtrainer YOUNGSTER, JOEY1 startbattle reloadmapafterbattle loadvar wJoeyFightCount, 1 clearflag ENGINE_JOEY end .LoadFight1: loadtrainer YOUNGSTER, JOEY2 startbattle reloadmapafterbattle loadvar wJoeyFightCount, 2 clearflag ENGINE_JOEY end .LoadFight2: loadtrainer YOUNGSTER, JOEY3 startbattle reloadmapafterbattle loadvar wJoeyFightCount, 3 clearflag ENGINE_JOEY end .LoadFight3: loadtrainer YOUNGSTER, JOEY4 startbattle reloadmapafterbattle loadvar wJoeyFightCount, 4 clearflag ENGINE_JOEY end .LoadFight4: loadtrainer YOUNGSTER, JOEY5 startbattle reloadmapafterbattle clearflag ENGINE_JOEY checkevent EVENT_JOEY_HP_UP iftrue .GiveHPUp checkevent EVENT_GOT_HP_UP_FROM_JOEY iftrue .done scall .RematchGift verbosegiveitem HP_UP iffalse .PackFull setevent EVENT_GOT_HP_UP_FROM_JOEY jump .NumberAccepted .done end .GiveHPUp: opentext writetext YoungsterJoeyText_GiveHPUpAfterBattle waitbutton verbosegiveitem HP_UP iffalse .PackFull clearevent EVENT_JOEY_HP_UP setevent EVENT_GOT_HP_UP_FROM_JOEY jump .NumberAccepted .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 .PackFull: setevent EVENT_JOEY_HP_UP jumpstd packfullm end .RematchGift: jumpstd rematchgiftm end TrainerYoungsterMikey: trainer EVENT_BEAT_YOUNGSTER_MIKEY, YOUNGSTER, MIKEY, YoungsterMikeySeenText, YoungsterMikeyBeatenText, 0, .Script .Script: end_if_just_battled opentext writetext YoungsterMikeyAfterText waitbutton closetext end TrainerBugCatcherDon: trainer EVENT_BEAT_BUG_CATCHER_DON, BUG_CATCHER, DON, BugCatcherDonSeenText, BugCatcherDonBeatenText, 0, .Script .Script: end_if_just_battled opentext writetext BugCatcherDonAfterText waitbutton closetext end Route30YoungsterScript: faceplayer opentext checkevent EVENT_GAVE_MYSTERY_EGG_TO_ELM iftrue .CompletedEggQuest writetext Route30YoungsterText_DirectionsToMrPokemonsHouse waitbutton closetext end .CompletedEggQuest: writetext Route30YoungsterText_EveryoneIsBattling waitbutton closetext end Route30CooltrainerFScript: jumptextfaceplayer Route30CooltrainerFText Route30Sign: jumptext Route30SignText MrPokemonsHouseDirectionsSign: jumptext MrPokemonsHouseDirectionsSignText MrPokemonsHouseSign: jumptext MrPokemonsHouseSignText Route30TrainerTips: jumptext Route30TrainerTipsText Route30Antidote: itemball ANTIDOTE Route30FruitTree1: fruittree FRUITTREE_ROUTE_30_1 Route30FruitTree2: fruittree FRUITTREE_ROUTE_30_2 Route30HiddenPotion: dwb EVENT_ROUTE_30_HIDDEN_POTION, POTION Route30_JoeysRattataAttacksMovement: fix_facing big_step UP big_step DOWN step_end Route30_MikeysRattataAttacksMovement: fix_facing big_step DOWN big_step UP step_end Text_UseTackle: text "Go, RATTATA!" para "TACKLE!" done Text_ThisIsABigBattle: text "What? This is a" line "big battle!" cont "Leave me alone!" done YoungsterJoey1SeenText: text "I just lost, so" line "I'm trying to find" cont "more #MON." para "Wait! You look" line "weak! Come on," cont "let's battle!" done YoungsterJoey1BeatenText: text "Ack! I lost again!" line "Doggone it!" done YoungsterJoey1AfterText: text "Do I have to have" line "more #MON in" para "order to battle" line "better?" para "No! I'm sticking" line "with this one no" cont "matter what!" done YoungsterMikeySeenText: text "You're a #MON" line "trainer, right?" para "Then you have to" line "battle!" done YoungsterMikeyBeatenText: text "That's strange." line "I won before." done YoungsterMikeyAfterText: text "Becoming a good" line "trainer is really" cont "tough." para "I'm going to bat-" line "tle other people" cont "to get better." done BugCatcherDonSeenText: text "Instead of a bug" line "#MON, I found" cont "a trainer!" done BugCatcherDonBeatenText: text "Argh! You're too" line "strong!" done BugCatcherDonAfterText: text "I ran out of #" line "BALLS while I was" cont "catching #MON." para "I should've bought" line "some more…" done Route30YoungsterText_DirectionsToMrPokemonsHouse: text "MR.#MON's" line "house? It's a bit" cont "farther ahead." done Route30YoungsterText_EveryoneIsBattling: text "Everyone's having" line "fun battling!" cont "You should too!" done Route30CooltrainerFText: text "I'm not a trainer." para "But if you look" line "one in the eyes," cont "prepare to battle." done Route30SignText: text "ROUTE 30" para "VIOLET CITY -" line "CHERRYGROVE CITY" done MrPokemonsHouseDirectionsSignText: text "MR.#MON'S HOUSE" line "STRAIGHT AHEAD!" done MrPokemonsHouseSignText: text "MR.#MON'S HOUSE" done Route30TrainerTipsText: text "TRAINER TIPS" para "No stealing other" line "people's #MON!" para "# BALLS are to" line "be thrown only at" cont "wild #MON!" done YoungsterJoeyText_GiveHPUpAfterBattle: text "I lost again…" line "Gee, you're tough!" para "Oh yeah, I almost" line "forgot that I had" cont "to give you this." para "Use it to get even" line "tougher, OK?" para "I'm going to get" line "tougher too." done Route30_MapEventHeader: ; filler db 0, 0 .Warps: db 2 warp_def $27, $7, 1, ROUTE_30_BERRY_SPEECH_HOUSE warp_def $5, $11, 1, MR_POKEMONS_HOUSE .CoordEvents: db 0 .BGEvents: db 5 bg_event 43, 9, BGEVENT_READ, Route30Sign bg_event 29, 13, BGEVENT_READ, MrPokemonsHouseDirectionsSign bg_event 5, 15, BGEVENT_READ, MrPokemonsHouseSign bg_event 21, 3, BGEVENT_READ, Route30TrainerTips bg_event 9, 14, BGEVENT_ITEM, Route30HiddenPotion .ObjectEvents: db 11 object_event SPRITE_YOUNGSTER, 26, 5, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, YoungsterJoey_ImportantBattleScript, EVENT_ROUTE_30_BATTLE object_event SPRITE_YOUNGSTER, 28, 2, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerYoungsterJoey, EVENT_ROUTE_30_YOUNGSTER_JOEY object_event SPRITE_YOUNGSTER, 23, 5, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 1, TrainerYoungsterMikey, -1 object_event SPRITE_BUG_CATCHER, 7, 1, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 3, TrainerBugCatcherDon, -1 object_event SPRITE_YOUNGSTER, 30, 7, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 0, 1, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, Route30YoungsterScript, -1 object_event SPRITE_MONSTER, 24, 5, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_ROUTE_30_BATTLE object_event SPRITE_MONSTER, 25, 5, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_ROUTE_30_BATTLE object_event SPRITE_FRUIT_TREE, 39, 5, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route30FruitTree1, -1 object_event SPRITE_FRUIT_TREE, 5, 11, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route30FruitTree2, -1 object_event SPRITE_COOLTRAINER_F, 13, 2, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route30CooltrainerFScript, -1 object_event SPRITE_POKE_BALL, 35, 8, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route30Antidote, EVENT_ROUTE_30_ANTIDOTE