ref: 3648afda1694fcb4d6fe6625b14f5a3f8bc29c38
dir: /maps/KogasRoom.asm/
object_const_def const KOGASROOM_KOGA KogasRoom_MapScripts: def_scene_scripts scene_script .LockDoor ; SCENE_DEFAULT scene_script .DummyScene ; SCENE_FINISHED def_callbacks callback MAPCALLBACK_TILES, .KogasRoomDoors .LockDoor: sdefer .KogasDoorLocksBehindYou end .DummyScene: end .KogasRoomDoors: checkevent EVENT_KOGAS_ROOM_ENTRANCE_CLOSED iffalse .KeepEntranceOpen changeblock 4, 14, $2a ; wall .KeepEntranceOpen: checkevent EVENT_KOGAS_ROOM_EXIT_OPEN iffalse .KeepExitClosed changeblock 4, 2, $16 ; open door .KeepExitClosed: endcallback .KogasDoorLocksBehindYou: applymovement PLAYER, KogasRoom_EnterMovement refreshscreen $86 playsound SFX_STRENGTH earthquake 80 changeblock 4, 14, $2a ; wall reloadmappart closetext setscene SCENE_FINISHED setevent EVENT_KOGAS_ROOM_ENTRANCE_CLOSED waitsfx end KogaScript_Battle: faceplayer opentext checkevent EVENT_BEAT_ELITE_4_KOGA iftrue KogaScript_AfterBattle writetext KogaScript_KogaBeforeText waitbutton closetext winlosstext KogaScript_KogaBeatenText, 0 loadtrainer KOGA, KOGA1 startbattle reloadmapafterbattle setevent EVENT_BEAT_ELITE_4_KOGA opentext writetext KogaScript_KogaDefeatText waitbutton closetext playsound SFX_ENTER_DOOR changeblock 4, 2, $16 ; open door reloadmappart closetext setevent EVENT_KOGAS_ROOM_EXIT_OPEN waitsfx end KogaScript_AfterBattle: writetext KogaScript_KogaDefeatText waitbutton closetext end KogasRoom_EnterMovement: step UP step UP step UP step UP step_end KogaScript_KogaBeforeText: text "Fwahahahaha!" para "I am KOGA of the" line "ELITE FOUR." para "I live in shadows," line "a ninja!" para "My intricate style" line "will confound and" cont "destroy you!" para "Confusion, sleep," line "poison…" para "Prepare to be the" line "victim of my sin-" cont "ister technique!" para "Fwahahahaha!" para "#MON is not" line "merely about brute" para "force--you shall" line "see soon enough!" done KogaScript_KogaBeatenText: text "Ah!" line "You have proven" cont "your worth!" done KogaScript_KogaDefeatText: text "I subjected you to" line "everything I could" cont "muster." para "But my efforts" line "failed. I must" cont "hone my skills." para "Go on to the next" line "room, and put your" cont "abilities to test!" done KogasRoom_MapEvents: db 0, 0 ; filler def_warp_events warp_event 4, 17, WILLS_ROOM, 2 warp_event 5, 17, WILLS_ROOM, 3 warp_event 4, 2, BRUNOS_ROOM, 1 warp_event 5, 2, BRUNOS_ROOM, 2 def_coord_events def_bg_events def_object_events object_event 5, 7, SPRITE_KOGA, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, KogaScript_Battle, -1