ref: e32e5212af3783f530af884852570d8003e69486
dir: /maps/BlackthornCity.asm/
const_def 2 ; object constants const BLACKTHORNCITY_SUPER_NERD1 const BLACKTHORNCITY_SUPER_NERD2 const BLACKTHORNCITY_GRAMPS1 const BLACKTHORNCITY_GRAMPS2 const BLACKTHORNCITY_BLACK_BELT const BLACKTHORNCITY_COOLTRAINER_F1 const BLACKTHORNCITY_YOUNGSTER1 const BLACKTHORNCITY_SANTOS const BLACKTHORNCITY_COOLTRAINER_F2 BlackthornCity_MapScripts: db 0 ; scene scripts db 2 ; callbacks callback MAPCALLBACK_NEWMAP, .FlyPoint callback MAPCALLBACK_OBJECTS, .Santos .FlyPoint: setflag ENGINE_FLYPOINT_BLACKTHORN return .Santos: checkcode VAR_WEEKDAY ifequal SATURDAY, .SantosAppears disappear BLACKTHORNCITY_SANTOS return .SantosAppears: appear BLACKTHORNCITY_SANTOS return BlackthornSuperNerdScript: faceplayer opentext checkevent EVENT_BEAT_CLAIR iftrue .BeatClair checkevent EVENT_CLEARED_RADIO_TOWER iftrue .ClearedRadioTower writetext Text_ClairIsOut waitbutton closetext end .ClearedRadioTower: writetext Text_ClairIsIn waitbutton closetext end .BeatClair: writetext Text_ClairIsBeaten waitbutton closetext end BlackthornGramps1Script: jumptextfaceplayer BlackthornGrampsRefusesEntryText BlackthornGramps2Script: jumptextfaceplayer BlackthornGrampsGrantsEntryText BlackthornBlackBeltScript: faceplayer opentext checkevent EVENT_CLEARED_RADIO_TOWER iftrue .ClearedRadioTower writetext BlackBeltText_WeirdRadio waitbutton closetext end .ClearedRadioTower: writetext BlackBeltText_VoicesInMyHead waitbutton closetext end BlackthornCooltrainerF1Script: jumptextfaceplayer BlackthornCooltrainerF1Text BlackthornYoungsterScript: jumptextfaceplayer BlackthornYoungsterText BlackthornCooltrainerF2Script: jumptextfaceplayer BlackthornCooltrainerF2Text SantosScript: faceplayer opentext checkevent EVENT_GOT_SPELL_TAG_FROM_SANTOS iftrue .Saturday checkcode VAR_WEEKDAY ifnotequal SATURDAY, .NotSaturday checkevent EVENT_MET_SANTOS_OF_SATURDAY iftrue .MetSantos writetext MeetSantosText buttonsound setevent EVENT_MET_SANTOS_OF_SATURDAY .MetSantos: writetext SantosGivesGiftText buttonsound verbosegiveitem SPELL_TAG iffalse .Done setevent EVENT_GOT_SPELL_TAG_FROM_SANTOS writetext SantosGaveGiftText waitbutton closetext end .Saturday: writetext SantosSaturdayText waitbutton .Done: closetext end .NotSaturday: writetext SantosNotSaturdayText waitbutton closetext end BlackthornCitySign: jumptext BlackthornCitySignText BlackthornGymSign: jumptext BlackthornGymSignText MoveDeletersHouseSign: jumptext MoveDeletersHouseSignText DragonDensSign: jumptext DragonDensSignText BlackthornCityTrainerTips: jumptext BlackthornCityTrainerTipsText BlackthornCityPokecenterSign: jumpstd pokecentersign BlackthornCityMartSign: jumpstd martsign Text_ClairIsOut: text "I am sorry." para "CLAIR, our GYM" line "LEADER, entered" para "the DRAGON'S DEN" line "behind the GYM." para "I have no idea" line "when our LEADER" cont "will return." done Text_ClairIsIn: text "CLAIR, our GYM" line "LEADER, is waiting" cont "for you." para "However, it would" line "be impossible for" para "a run-of-the-mill" line "trainer to win." done Text_ClairIsBeaten: text "You defeated" line "CLAIR?" para "That's amazing!" para "I've never heard" line "of her losing to" para "anyone other than" line "LANCE." done BlackthornGrampsRefusesEntryText: text "No. Only chosen" line "trainers may train" para "here." line "Please leave." done BlackthornGrampsGrantsEntryText: text "If CLAIR allows" line "it, her grand-" cont "father--our MASTER" cont "--will also." para "You may enter." done BlackBeltText_WeirdRadio: text "My radio's busted?" line "Lately, I only get" cont "this weird signal." done BlackBeltText_VoicesInMyHead: text "Arooo! Voices in" line "my head!" para "Huh? I'm listening" line "to my radio!" done BlackthornCooltrainerF1Text: text "Are you going to" line "make your #MON" cont "forget some moves?" done BlackthornYoungsterText: text "Dragon masters all" line "come from the city" cont "of BLACKTHORN." done MeetSantosText: text "SANTOS: …" para "It's Saturday…" para "I'm SANTOS of" line "Saturday…" done SantosGivesGiftText: text "You can have this…" done SantosGaveGiftText: text "SANTOS: …" para "SPELL TAG…" para "Ghost-type moves" line "get stronger…" para "It will frighten" line "you…" done SantosSaturdayText: text "SANTOS: …" para "See you again on" line "another Saturday…" para "I won't have any" line "more gifts…" done SantosNotSaturdayText: text "SANTOS: Today's" line "not Saturday…" done BlackthornCooltrainerF2Text: text "Wow, you came" line "through the ICE" cont "PATH?" para "You must be a real" line "hotshot trainer!" done BlackthornCitySignText: text "BLACKTHORN CITY" para "A Quiet Mountain" line "Retreat" done BlackthornGymSignText: text "BLACKTHORN CITY" line "#MON GYM" cont "LEADER: CLAIR" para "The Blessed User" line "of Dragon #MON" done MoveDeletersHouseSignText: text "MOVE DELETER'S" line "HOUSE" done DragonDensSignText: text "DRAGON'S DEN" line "AHEAD" done BlackthornCityTrainerTipsText: text "TRAINER TIPS" para "A #MON holding" line "a MIRACLEBERRY" para "will cure itself" line "of any status" cont "problem." done BlackthornCity_MapEvents: db 0, 0 ; filler db 8 ; warp events warp_event 18, 11, BLACKTHORN_GYM_1F, 1 warp_event 13, 21, BLACKTHORN_DRAGON_SPEECH_HOUSE, 1 warp_event 29, 23, BLACKTHORN_EMYS_HOUSE, 1 warp_event 15, 29, BLACKTHORN_MART, 2 warp_event 21, 29, BLACKTHORN_POKECENTER_1F, 1 warp_event 9, 31, MOVE_DELETERS_HOUSE, 1 warp_event 36, 9, ICE_PATH_1F, 2 warp_event 20, 1, DRAGONS_DEN_1F, 1 db 0 ; coord events db 7 ; bg events bg_event 34, 24, BGEVENT_READ, BlackthornCitySign bg_event 17, 13, BGEVENT_READ, BlackthornGymSign bg_event 7, 31, BGEVENT_READ, MoveDeletersHouseSign bg_event 21, 3, BGEVENT_READ, DragonDensSign bg_event 5, 25, BGEVENT_READ, BlackthornCityTrainerTips bg_event 16, 29, BGEVENT_READ, BlackthornCityMartSign bg_event 22, 29, BGEVENT_READ, BlackthornCityPokecenterSign db 9 ; object events object_event 18, 12, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, BlackthornSuperNerdScript, EVENT_BLACKTHORN_CITY_SUPER_NERD_BLOCKS_GYM object_event 19, 12, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, BlackthornSuperNerdScript, EVENT_BLACKTHORN_CITY_SUPER_NERD_DOES_NOT_BLOCK_GYM object_event 20, 2, SPRITE_GRAMPS, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BlackthornGramps1Script, EVENT_BLACKTHORN_CITY_GRAMPS_BLOCKS_DRAGONS_DEN object_event 21, 2, SPRITE_GRAMPS, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BlackthornGramps2Script, EVENT_BLACKTHORN_CITY_GRAMPS_NOT_BLOCKING_DRAGONS_DEN object_event 24, 31, SPRITE_BLACK_BELT, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 1, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, BlackthornBlackBeltScript, -1 object_event 9, 25, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 2, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, BlackthornCooltrainerF1Script, -1 object_event 13, 15, SPRITE_YOUNGSTER, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 1, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, BlackthornYoungsterScript, -1 object_event 22, 20, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SantosScript, EVENT_BLACKTHORN_CITY_SANTOS_OF_SATURDAY object_event 35, 19, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, BlackthornCooltrainerF2Script, -1