ref: 115a5c236d727adec155817626a418c2f66fa498
dir: /maps/Route43.asm/
const_value set 2 const ROUTE43_SUPER_NERD1 const ROUTE43_SUPER_NERD2 const ROUTE43_SUPER_NERD3 const ROUTE43_FISHER const ROUTE43_LASS const ROUTE43_YOUNGSTER const ROUTE43_FRUIT_TREE const ROUTE43_POKE_BALL Route43_MapScriptHeader: .SceneScripts: db 0 .MapCallbacks: db 1 dbw MAPCALLBACK_NEWMAP, .CheckIfRockets .CheckIfRockets: checkevent EVENT_CLEARED_ROCKET_HIDEOUT iftrue .NoRockets setmapscene ROUTE_43_GATE, $0 return .NoRockets: setmapscene ROUTE_43_GATE, $1 return TrainerCamperSpencer: trainer EVENT_BEAT_CAMPER_SPENCER, CAMPER, SPENCER, CamperSpencerSeenText, CamperSpencerBeatenText, 0, .Script .Script: end_if_just_battled opentext writetext CamperSpencerAfterBattleText waitbutton closetext end TrainerPokemaniacBen: trainer EVENT_BEAT_POKEMANIAC_BEN, POKEMANIAC, BEN, PokemaniacBenSeenText, PokemaniacBenBeatenText, 0, .Script .Script: end_if_just_battled opentext writetext PokemaniacBenAfterBattleText waitbutton closetext end TrainerPokemaniacBrent: trainer EVENT_BEAT_POKEMANIAC_BRENT, POKEMANIAC, BRENT1, PokemaniacBrentSeenText, PokemaniacBrentBeatenText, 0, .Script .Script: writecode VAR_CALLERID, PHONE_POKEMANIAC_BRENT end_if_just_battled opentext checkflag ENGINE_BRENT iftrue .WantsBattle checkcellnum PHONE_POKEMANIAC_BRENT iftrue .NumberAcceptedM checkevent EVENT_BRENT_ASKED_FOR_PHONE_NUMBER iftrue .AskedAlready writetext PokemaniacBrentAfterBattleText buttonsound setevent EVENT_BRENT_ASKED_FOR_PHONE_NUMBER scall .AskNumber1M jump .AskForNumber .AskedAlready: scall .AskNumber2M .AskForNumber: askforphonenumber PHONE_POKEMANIAC_BRENT if_equal $1, .PhoneFullM if_equal $2, .NumberDeclinedM trainertotext POKEMANIAC, BRENT1, $0 scall .RegisteredNumberM jump .NumberAcceptedM .WantsBattle: scall .RematchM winlosstext PokemaniacBrentBeatenText, 0 copybytetovar wBrentFightCount if_equal 3, .Fight3 if_equal 2, .Fight2 if_equal 1, .Fight1 if_equal 0, .LoadFight0 .Fight3: checkevent EVENT_RESTORED_POWER_TO_KANTO iftrue .LoadFight3 .Fight2: checkevent EVENT_BEAT_ELITE_FOUR iftrue .LoadFight2 .Fight1: checkevent EVENT_CLEARED_ROCKET_HIDEOUT iftrue .LoadFight1 .LoadFight0: loadtrainer POKEMANIAC, BRENT1 startbattle reloadmapafterbattle loadvar wBrentFightCount, 1 clearflag ENGINE_BRENT end .LoadFight1: loadtrainer POKEMANIAC, BRENT2 startbattle reloadmapafterbattle loadvar wBrentFightCount, 2 clearflag ENGINE_BRENT end .LoadFight2: loadtrainer POKEMANIAC, BRENT3 startbattle reloadmapafterbattle loadvar wBrentFightCount, 3 clearflag ENGINE_BRENT end .LoadFight3: loadtrainer POKEMANIAC, BRENT4 startbattle reloadmapafterbattle clearflag ENGINE_BRENT end .AskNumber1M: jumpstd asknumber1m end .AskNumber2M: jumpstd asknumber2m end .RegisteredNumberM: jumpstd registerednumberm end .NumberAcceptedM: jumpstd numberacceptedm end .NumberDeclinedM: jumpstd numberdeclinedm end .PhoneFullM: jumpstd phonefullm end .RematchM: jumpstd rematchm end TrainerPokemaniacRon: trainer EVENT_BEAT_POKEMANIAC_RON, POKEMANIAC, RON, PokemaniacRonSeenText, PokemaniacRonBeatenText, 0, .Script .Script: end_if_just_battled opentext writetext PokemaniacRonAfterBattleText waitbutton closetext end TrainerFisherMarvin: trainer EVENT_BEAT_FISHER_MARVIN, FISHER, MARVIN, FisherMarvinSeenText, FisherMarvinBeatenText, 0, .Script .Script: end_if_just_battled opentext writetext FisherMarvinAfterBattleText waitbutton closetext end TrainerPicnickerTiffany: trainer EVENT_BEAT_PICNICKER_TIFFANY, PICNICKER, TIFFANY3, PicnickerTiffanySeenText, PicnickerTiffanyBeatenText, 0, .Script .Script: writecode VAR_CALLERID, PHONE_PICNICKER_TIFFANY end_if_just_battled opentext checkflag ENGINE_TIFFANY iftrue .WantsBattle checkflag ENGINE_TIFFANY_HAS_PINK_BOW iftrue .HasPinkBow checkcellnum PHONE_PICNICKER_TIFFANY iftrue .NumberAcceptedF checkpoke CLEFAIRY iffalse .NoClefairy checkevent EVENT_TIFFANY_ASKED_FOR_PHONE_NUMBER iftrue .AskedAlready writetext PicnickerTiffanyWantsPicnicText buttonsound setevent EVENT_TIFFANY_ASKED_FOR_PHONE_NUMBER scall .AskNumber1F jump .AskForNumber .AskedAlready: scall .AskNumber2F .AskForNumber: askforphonenumber PHONE_PICNICKER_TIFFANY if_equal $1, .PhoneFullF if_equal $2, .NumberDeclinedF trainertotext PICNICKER, TIFFANY3, $0 scall .RegisteredNumberF jump .NumberAcceptedF .WantsBattle: scall .RematchF winlosstext PicnickerTiffanyBeatenText, 0 copybytetovar wTiffanyFightCount if_equal 3, .Fight3 if_equal 2, .Fight2 if_equal 1, .Fight1 if_equal 0, .LoadFight0 .Fight3: checkevent EVENT_RESTORED_POWER_TO_KANTO iftrue .LoadFight3 .Fight2: checkevent EVENT_BEAT_ELITE_FOUR iftrue .LoadFight2 .Fight1: checkevent EVENT_CLEARED_RADIO_TOWER iftrue .LoadFight1 .LoadFight0: loadtrainer PICNICKER, TIFFANY3 startbattle reloadmapafterbattle loadvar wTiffanyFightCount, 1 clearflag ENGINE_TIFFANY end .LoadFight1: loadtrainer PICNICKER, TIFFANY1 startbattle reloadmapafterbattle loadvar wTiffanyFightCount, 2 clearflag ENGINE_TIFFANY end .LoadFight2: loadtrainer PICNICKER, TIFFANY2 startbattle reloadmapafterbattle loadvar wTiffanyFightCount, 3 clearflag ENGINE_TIFFANY end .LoadFight3: loadtrainer PICNICKER, TIFFANY4 startbattle reloadmapafterbattle clearflag ENGINE_TIFFANY end .HasPinkBow: scall .GiftF verbosegiveitem PINK_BOW iffalse .NoRoom clearflag ENGINE_TIFFANY_HAS_PINK_BOW setevent EVENT_TIFFANY_GAVE_PINK_BOW jump .NumberAcceptedF .NoRoom: jump .PackFullF .NoClefairy: writetext PicnickerTiffanyClefairyText waitbutton closetext end .AskNumber1F: jumpstd asknumber1f end .AskNumber2F: jumpstd asknumber2f end .RegisteredNumberF: jumpstd registerednumberf end .NumberAcceptedF: jumpstd numberacceptedf end .NumberDeclinedF: jumpstd numberdeclinedf end .PhoneFullF: jumpstd phonefullf end .RematchF: jumpstd rematchf end .GiftF: jumpstd giftf end .PackFullF: jumpstd packfullf end Route43Sign1: jumptext Route43Sign1Text Route43Sign2: jumptext Route43Sign2Text Route43TrainerTips: jumptext Route43TrainerTipsText FruitTreeScript_0x19d266: fruittree FRUITTREE_ROUTE_43 Route43MaxEther: itemball MAX_ETHER PokemaniacBenSeenText: text "I love #MON!" para "That's why I" line "started--and why" para "I'll keep on col-" line "lecting #MON!" done PokemaniacBenBeatenText: text "How could you do" line "this to me?" done PokemaniacBenAfterBattleText: text "What else do I" line "like besides" cont "#MON?" para "MARY on the radio." line "I bet she's cute!" done PokemaniacBrentSeenText: text "Hey! Do you have" line "any rare #MON?" done PokemaniacBrentBeatenText: text "Oh, my poor #-" line "MON! Darlings!" done PokemaniacBrentAfterBattleText: text "I'd be happy just" line "to own a single" cont "rare #MON." done PokemaniacRonSeenText: text "Would you get" line "this?" para "Some <RIVAL> guy" line "made fun of my" cont "#MON!" para "Darn it! My #-" line "MON's great!" done PokemaniacRonBeatenText: text "My NIDOKING did" line "pretty right on!" done PokemaniacRonAfterBattleText: text "It's okay for" line "people to like" para "different types" line "of #MON." para "#MON isn't just" line "about having the" cont "most powerful one." done FisherMarvinSeenText: text "I'm in a slump." para "Maybe it's the" line "gear I'm using." para "Let's battle for a" line "change of pace!" done FisherMarvinBeatenText: text "I lost, but I feel" line "better anyway." done FisherMarvinAfterBattleText: text "KURT's LURE BALL" line "is the best for" para "catching hooked" line "#MON." para "It's much more" line "effective than a" cont "ULTRA BALL." done CamperSpencerSeenText: text "I can do so much" line "with my #MON--" cont "it's super-fun!" done CamperSpencerBeatenText: text "Losing isn't fun" line "at all…" done CamperSpencerAfterBattleText: text "What is going on" line "at LAKE OF RAGE?" para "We were planning" line "to camp there." done PicnickerTiffanySeenText: text "Are you going to" line "LAKE OF RAGE too?" para "Let's play for a " line "little while!" done PicnickerTiffanyBeatenText: text "I played too much!" done PicnickerTiffanyWantsPicnicText: text "I'm having a pic-" line "nic with #MON." para "Won't you join us?" done PicnickerTiffanyClefairyText: text "Isn't my CLEFAIRY" line "just the most" cont "adorable thing?" done Route43Sign1Text: text "ROUTE 43" para "LAKE OF RAGE -" line "MAHOGANY TOWN" done Route43Sign2Text: text "ROUTE 43" para "LAKE OF RAGE -" line "MAHOGANY TOWN" done Route43TrainerTipsText: text "TRAINER TIPS" para "All #MON have" line "pros and cons" para "depending on their" line "types." para "If their types" line "differ, a higher-" para "level #MON may" line "lose in battle." para "Learn which types" line "are strong and" para "weak against your" line "#MON's type." done Route43_MapEventHeader: ; filler db 0, 0 .Warps: db 5 warp_def 9, 51, 1, ROUTE_43_MAHOGANY_GATE warp_def 10, 51, 2, ROUTE_43_MAHOGANY_GATE warp_def 17, 35, 3, ROUTE_43_GATE warp_def 17, 31, 1, ROUTE_43_GATE warp_def 18, 31, 2, ROUTE_43_GATE .CoordEvents: db 0 .BGEvents: db 3 bg_event 13, 3, BGEVENT_READ, Route43Sign1 bg_event 11, 49, BGEVENT_READ, Route43Sign2 bg_event 16, 38, BGEVENT_READ, Route43TrainerTips .ObjectEvents: db 8 object_event 13, 5, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 2, TrainerPokemaniacBen, -1 object_event 13, 20, SPRITE_SUPER_NERD, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerPokemaniacBrent, -1 object_event 14, 7, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 2, TrainerPokemaniacRon, -1 object_event 4, 16, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 4, TrainerFisherMarvin, -1 object_event 9, 25, SPRITE_LASS, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 2, TrainerPicnickerTiffany, -1 object_event 13, 40, SPRITE_YOUNGSTER, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 3, TrainerCamperSpencer, -1 object_event 1, 26, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, FruitTreeScript_0x19d266, -1 object_event 12, 32, SPRITE_POKE_BALL, SPRITEMOVEDATA_ITEM_TREE, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, Route43MaxEther, EVENT_ROUTE_43_MAX_ETHER