ref: 3648afda1694fcb4d6fe6625b14f5a3f8bc29c38
dir: /maps/MahoganyTown.asm/
DEF MAHOGANYTOWN_RAGECANDYBAR_PRICE EQU 300 object_const_def const MAHOGANYTOWN_POKEFAN_M const MAHOGANYTOWN_GRAMPS const MAHOGANYTOWN_FISHER const MAHOGANYTOWN_LASS MahoganyTown_MapScripts: def_scene_scripts scene_script .DummyScene0 ; SCENE_DEFAULT scene_script .DummyScene1 ; SCENE_FINISHED def_callbacks callback MAPCALLBACK_NEWMAP, .FlyPoint .DummyScene0: end .DummyScene1: end .FlyPoint: setflag ENGINE_FLYPOINT_MAHOGANY endcallback MahoganyTownTryARageCandyBarScript: showemote EMOTE_SHOCK, MAHOGANYTOWN_POKEFAN_M, 15 applymovement MAHOGANYTOWN_POKEFAN_M, MahoganyTownRageCandyBarMerchantBlocksYouMovement follow PLAYER, MAHOGANYTOWN_POKEFAN_M applymovement PLAYER, MahoganyTownPlayerStepLeftMovement stopfollow turnobject PLAYER, RIGHT scall RageCandyBarMerchantScript applymovement MAHOGANYTOWN_POKEFAN_M, MahoganyTownRageCandyBarMerchantReturnsMovement end MahoganyTownPokefanMScript: faceplayer RageCandyBarMerchantScript: checkevent EVENT_CLEARED_ROCKET_HIDEOUT iftrue .ClearedRocketHideout scall .SellRageCandyBars end .ClearedRocketHideout: opentext writetext RageCandyBarMerchantSoldOutText waitbutton closetext end .SellRageCandyBars: opentext writetext RageCandyBarMerchantTryOneText special PlaceMoneyTopRight yesorno iffalse .Refused checkmoney YOUR_MONEY, MAHOGANYTOWN_RAGECANDYBAR_PRICE ifequal HAVE_LESS, .NotEnoughMoney giveitem RAGECANDYBAR iffalse .NoRoom waitsfx playsound SFX_TRANSACTION takemoney YOUR_MONEY, MAHOGANYTOWN_RAGECANDYBAR_PRICE special PlaceMoneyTopRight writetext RageCandyBarMerchantSavorItText waitbutton closetext end .NotEnoughMoney: writetext RageCandyBarMerchantNotEnoughMoneyText waitbutton closetext end .Refused: writetext RageCandyBarMerchantRefusedText waitbutton closetext end .NoRoom: writetext RageCandyBarMerchantNoRoomText waitbutton closetext end MahoganyTownGrampsScript: faceplayer opentext checkevent EVENT_CLEARED_ROCKET_HIDEOUT iftrue .ClearedRocketHideout writetext MahoganyTownGrampsText waitbutton closetext end .ClearedRocketHideout: writetext MahoganyTownGrampsText_ClearedRocketHideout waitbutton closetext end MahoganyTownFisherScript: jumptextfaceplayer MahoganyTownFisherText MahoganyTownLassScript: jumptextfaceplayer MahoganyTownLassText MahoganyTownSign: jumptext MahoganyTownSignText MahoganyTownRagecandybarSign: jumptext MahoganyTownRagecandybarSignText MahoganyGymSign: jumptext MahoganyGymSignText MahoganyTownPokecenterSign: jumpstd PokecenterSignScript MahoganyTownCollideDownFaceLeftMovement: ; unreferenced step DOWN big_step UP turn_head DOWN MahoganyTownPlayerStepLeftMovement: step LEFT step_end MahoganyTownRageCandyBarMerchantBlocksYouMovement: step RIGHT step DOWN turn_head LEFT step_end MahoganyTownRageCandyBarMerchantReturnsMovement: step UP turn_head DOWN step_end RageCandyBarMerchantTryOneText: text "Hiya, kid!" para "I see you're new" line "in MAHOGANY TOWN." para "Since you're new," line "you should try a" para "yummy RAGECANDY-" line "BAR!" para "Right now, it can" line "be yours for just" cont "¥300! Want one?" done RageCandyBarMerchantSavorItText: text "Good! Savor it!" done RageCandyBarMerchantNotEnoughMoneyText: text "You don't have" line "enough money." done RageCandyBarMerchantRefusedText: text "Oh, fine then…" done RageCandyBarMerchantNoRoomText: text "You don't have" line "room for this." done RageCandyBarMerchantSoldOutText: text "RAGECANDYBAR's" line "sold out." para "I'm packing up." line "Don't bother me," cont "kiddo." done MahoganyTownGrampsText: text "Are you off to see" line "the GYARADOS ram-" cont "page at the LAKE?" done MahoganyTownGrampsText_ClearedRocketHideout: text "MAGIKARP have" line "returned to LAKE" cont "OF RAGE." para "That should be" line "good news for the" cont "anglers there." done MahoganyTownFisherText: text "Since you came" line "this far, take the" para "time to do some" line "sightseeing." para "You should head" line "north and check" para "out LAKE OF RAGE" line "right now." done MahoganyTownLassText: text "Visit Grandma's" line "shop. She sells" para "stuff that nobody" line "else has." done MahoganyTownSignText: text "MAHOGANY TOWN" para "Welcome to the" line "Home of the Ninja" done MahoganyTownRagecandybarSignText: text "While visiting" line "MAHOGANY TOWN, try" cont "a RAGECANDYBAR!" done MahoganyGymSignText: text "MAHOGANY TOWN" line "#MON GYM" cont "LEADER: PRYCE" para "The Teacher of" line "Winter's Harshness" done MahoganyTown_MapEvents: db 0, 0 ; filler def_warp_events warp_event 11, 7, MAHOGANY_MART_1F, 1 warp_event 17, 7, MAHOGANY_RED_GYARADOS_SPEECH_HOUSE, 1 warp_event 6, 13, MAHOGANY_GYM, 1 warp_event 15, 13, MAHOGANY_POKECENTER_1F, 1 warp_event 9, 1, ROUTE_43_MAHOGANY_GATE, 3 def_coord_events coord_event 19, 8, SCENE_DEFAULT, MahoganyTownTryARageCandyBarScript coord_event 19, 9, SCENE_DEFAULT, MahoganyTownTryARageCandyBarScript def_bg_events bg_event 1, 5, BGEVENT_READ, MahoganyTownSign bg_event 9, 7, BGEVENT_READ, MahoganyTownRagecandybarSign bg_event 3, 13, BGEVENT_READ, MahoganyGymSign bg_event 16, 13, BGEVENT_READ, MahoganyTownPokecenterSign def_object_events object_event 19, 8, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, MahoganyTownPokefanMScript, EVENT_MAHOGANY_TOWN_POKEFAN_M_BLOCKS_EAST object_event 6, 9, SPRITE_GRAMPS, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 1, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, MahoganyTownGrampsScript, -1 object_event 6, 14, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, MahoganyTownFisherScript, EVENT_MAHOGANY_TOWN_POKEFAN_M_BLOCKS_GYM object_event 12, 8, SPRITE_LASS, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, MahoganyTownLassScript, EVENT_MAHOGANY_MART_OWNERS