ref: e1fabcfbff78533cd1a5f75f4da3ede3b8a04d8f
dir: /maps/Route39.asm/
const_def 2 ; object constants const ROUTE39_SAILOR const ROUTE39_POKEFAN_M const ROUTE39_POKEFAN_F1 const ROUTE39_MILTANK1 const ROUTE39_MILTANK2 const ROUTE39_MILTANK3 const ROUTE39_MILTANK4 const ROUTE39_PSYCHIC_NORMAN const ROUTE39_FRUIT_TREE const ROUTE39_POKEFAN_F2 Route39_MapScripts: db 0 ; scene scripts db 0 ; callbacks Route39Miltank: opentext writetext Route39MiltankText cry MILTANK waitbutton closetext end TrainerPokefanmDerek: trainer POKEFANM, DEREK1, EVENT_BEAT_POKEFANM_DEREK, PokefanmDerekSeenText, PokefanmDerekBeatenText, 0, .Script .Script: writecode VAR_CALLERID, PHONE_POKEFANM_DEREK endifjustbattled opentext checkflag ENGINE_DEREK_HAS_NUGGET iftrue .HasNugget checkcellnum PHONE_POKEFANM_DEREK iftrue .NumberAccepted checkpoke PIKACHU iffalse .WantsPikachu checkevent EVENT_DEREK_ASKED_FOR_PHONE_NUMBER iftrue .AskedAlready writetext PokefanMDerekText_NotBragging buttonsound setevent EVENT_DEREK_ASKED_FOR_PHONE_NUMBER scall .AskNumber1 jump .AskForNumber .AskedAlready: scall .AskNumber2 .AskForNumber: askforphonenumber PHONE_POKEFANM_DEREK ifequal PHONE_CONTACTS_FULL, .PhoneFull ifequal PHONE_CONTACT_REFUSED, .NumberDeclined trainertotext POKEFANM, DEREK1, MEM_BUFFER_0 scall .RegisteredNumber jump .NumberAccepted .HasNugget: scall .Gift verbosegiveitem NUGGET iffalse .NoRoom clearflag ENGINE_DEREK_HAS_NUGGET jump .NumberAccepted .NoRoom: jump .PackFull .WantsPikachu: writetext PokefanMDerekPikachuIsItText 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 .Gift: jumpstd giftm end .PackFull: jumpstd packfullm end TrainerPokefanfRuth: trainer POKEFANF, RUTH, EVENT_BEAT_POKEFANF_RUTH, PokefanfRuthSeenText, PokefanfRuthBeatenText, 0, .Script .Script: endifjustbattled opentext writetext PokefanfRuthAfterBattleText waitbutton closetext end TrainerSailorEugene: trainer SAILOR, EUGENE, EVENT_BEAT_SAILOR_EUGENE, SailorEugeneSeenText, SailorEugeneBeatenText, 0, .Script .Script: endifjustbattled opentext writetext SailorEugeneAfterBattleText waitbutton closetext end TrainerPsychicNorman: trainer PSYCHIC_T, NORMAN, EVENT_BEAT_PSYCHIC_NORMAN, PsychicNormanSeenText, PsychicNormanBeatenText, 0, .Script .Script: endifjustbattled opentext writetext PsychicNormanAfterBattleText waitbutton closetext end TrainerPokefanfJaime: faceplayer opentext checktime NITE iffalse .NotNight checkevent EVENT_BEAT_POKEFANF_JAIME iftrue .Beaten writetext PokefanfJaimeSeenText waitbutton closetext winlosstext PokefanfJaimeBeatenText, 0 loadtrainer POKEFANF, JAIME startbattle reloadmapafterbattle setevent EVENT_BEAT_POKEFANF_JAIME closetext end .Beaten: writetext PokefanfJaimeAfterBattleText waitbutton closetext end .NotNight: writetext PokefanfJaimeHopeItGetsDarkText waitbutton closetext end Route39Sign: jumptext Route39SignText MoomooFarmSign: jumptext MoomooFarmSignText Route39TrainerTips: jumptext Route39TrainerTipsText Route39FruitTree: fruittree FRUITTREE_ROUTE_39 Route39HiddenNugget: hiddenitem NUGGET, EVENT_ROUTE_39_HIDDEN_NUGGET Route39MiltankText: text "MILTANK: Mooo!" done SailorEugeneSeenText: text "I just got back to" line "OLIVINE." para "So how about a" line "#MON battle?" done SailorEugeneBeatenText: text "Awaaargh!" done SailorEugeneAfterBattleText: text "My #MON were" line "caught and raised" cont "overseas." para "They're my compan-" line "ions on those long" cont "voyages." done PokefanmDerekSeenText: text "This is a good" line "time to brag about" cont "my PIKACHU!" done PokefanmDerekBeatenText: text "I had no time to" line "show off PIKACHU…" done PokefanMDerekText_NotBragging: text "I'm not listening" line "to your bragging!" para "We # FANS have" line "a policy of not" para "listening to other" line "people brag!" done PokefanfRuthSeenText: text "Such darling" line "#MON." para "Let's show our" line "#MON together" cont "at the same time." done PokefanfRuthBeatenText: text "I don't mind" line "losing." done PokefanfRuthAfterBattleText: text "Do you know about" line "baby #MON?" para "I bet they're just" line "adorable!" done PokefanMDerekPikachuIsItText: text "PIKACHU is it!" line "Don't you agree?" done PsychicNormanSeenText: text "Let me see what" line "your #MON are" cont "capable of." done PsychicNormanBeatenText: text "Ooh, your #MON" line "have potential." done PsychicNormanAfterBattleText: text "You know how #-" line "MON have different" cont "abilities?" para "People are like" line "that too. Every-" cont "one has different" cont "potential." done PokefanfJaimeHopeItGetsDarkText: text "Ufufufu… I hope it" line "gets dark soon." done PokefanfJaimeSeenText: text "You came at just" line "the right time." para "Let's battle." done PokefanfJaimeBeatenText: text "Oh, how disap-" line "pointing…" done PokefanfJaimeAfterBattleText: text "I met my MEOWTH at" line "night, right here" cont "on ROUTE 39." para "I'm not sure why," line "but it seems to" para "like it when I" line "train here." para "It seems to become" line "friendlier by" para "training here than" line "anywhere else." done Route39SignText: text "ROUTE 39" para "OLIVINE CITY -" line "ECRUTEAK CITY" done MoomooFarmSignText: text "MOOMOO FARM" para "Enjoy Our Fresh" line "and Tasty Milk" done Route39TrainerTipsText: text "TRAINER TIPS" para "Use HEADBUTT on" line "trees to shake" cont "#MON out." para "Different kinds of" line "#MON drop out" cont "of trees." para "Use HEADBUTT on" line "any tree you see!" done Route39_MapEvents: db 0, 0 ; filler db 2 ; warp events warp_event 1, 3, ROUTE_39_BARN, 1 warp_event 5, 3, ROUTE_39_FARMHOUSE, 1 db 0 ; coord events db 4 ; bg events bg_event 5, 31, BGEVENT_READ, Route39TrainerTips bg_event 9, 5, BGEVENT_READ, MoomooFarmSign bg_event 15, 7, BGEVENT_READ, Route39Sign bg_event 5, 13, BGEVENT_ITEM, Route39HiddenNugget db 10 ; object events object_event 13, 29, SPRITE_SAILOR, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 5, TrainerSailorEugene, -1 object_event 10, 22, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 4, TrainerPokefanmDerek, -1 object_event 11, 19, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 4, TrainerPokefanfRuth, -1 object_event 3, 12, SPRITE_TAUROS, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39Miltank, -1 object_event 6, 11, SPRITE_TAUROS, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39Miltank, -1 object_event 4, 15, SPRITE_TAUROS, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39Miltank, -1 object_event 8, 13, SPRITE_TAUROS, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39Miltank, -1 object_event 13, 7, SPRITE_STANDING_YOUNGSTER, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 1, TrainerPsychicNorman, -1 object_event 9, 3, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route39FruitTree, -1 object_event 4, 22, SPRITE_POKEFAN_F, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, TrainerPokefanfJaime, -1