First Commit

Upload literally everything from the pokecrystal16 expand-move-ID branch

maps/BrunosRoom.asm

@@ -0,0 +1,139 @@
+	object_const_def
+	const BRUNOSROOM_BRUNO
+
+BrunosRoom_MapScripts:
+	def_scene_scripts
+	scene_script BrunosRoomLockDoorScene, SCENE_BRUNOSROOM_LOCK_DOOR
+	scene_script BrunosRoomNoopScene,     SCENE_BRUNOSROOM_NOOP
+
+	def_callbacks
+	callback MAPCALLBACK_TILES, BrunosRoomDoorsCallback
+
+BrunosRoomLockDoorScene:
+	sdefer BrunosRoomDoorLocksBehindYouScript
+	end
+
+BrunosRoomNoopScene:
+	end
+
+BrunosRoomDoorsCallback:
+	checkevent EVENT_BRUNOS_ROOM_ENTRANCE_CLOSED
+	iffalse .KeepEntranceOpen
+	changeblock 4, 14, $2a ; wall
+.KeepEntranceOpen:
+	checkevent EVENT_BRUNOS_ROOM_EXIT_OPEN
+	iffalse .KeepExitClosed
+	changeblock 4, 2, $16 ; open door
+.KeepExitClosed:
+	endcallback
+
+BrunosRoomDoorLocksBehindYouScript:
+	applymovement PLAYER, BrunosRoom_EnterMovement
+	refreshscreen $86
+	playsound SFX_STRENGTH
+	earthquake 80
+	changeblock 4, 14, $2a ; wall
+	reloadmappart
+	closetext
+	setscene SCENE_BRUNOSROOM_NOOP
+	setevent EVENT_BRUNOS_ROOM_ENTRANCE_CLOSED
+	waitsfx
+	end
+
+BrunoScript_Battle:
+	faceplayer
+	opentext
+	checkevent EVENT_BEAT_ELITE_4_BRUNO
+	iftrue BrunoScript_AfterBattle
+	writetext BrunoScript_BrunoBeforeText
+	waitbutton
+	closetext
+	winlosstext BrunoScript_BrunoBeatenText, 0
+	loadtrainer BRUNO, BRUNO1
+	startbattle
+	reloadmapafterbattle
+	setevent EVENT_BEAT_ELITE_4_BRUNO
+	opentext
+	writetext BrunoScript_BrunoDefeatText
+	waitbutton
+	closetext
+	playsound SFX_ENTER_DOOR
+	changeblock 4, 2, $16 ; open door
+	reloadmappart
+	closetext
+	setevent EVENT_BRUNOS_ROOM_EXIT_OPEN
+	waitsfx
+	end
+
+BrunoScript_AfterBattle:
+	writetext BrunoScript_BrunoDefeatText
+	waitbutton
+	closetext
+	end
+
+BrunosRoom_EnterMovement:
+	step UP
+	step UP
+	step UP
+	step UP
+	step_end
+
+BrunoScript_BrunoBeforeText:
+	text "I am BRUNO of the"
+	line "ELITE FOUR."
+
+	para "I always train to"
+	line "the extreme be-"
+	cont "cause I believe in"
+	cont "our potential."
+
+	para "That is how we"
+	line "became strong."
+
+	para "Can you withstand"
+	line "our power?"
+
+	para "Hm? I see no fear"
+	line "in you. You look"
+
+	para "determined. Per-"
+	line "fect for battle!"
+
+	para "Ready, <PLAYER>?"
+	line "You will bow down"
+
+	para "to our overwhelm-"
+	line "ing power!"
+
+	para "Hoo hah!"
+	done
+
+BrunoScript_BrunoBeatenText:
+	text "Why? How could we"
+	line "lose?"
+	done
+
+BrunoScript_BrunoDefeatText:
+	text "Having lost, I"
+	line "have no right to"
+	cont "say anything…"
+
+	para "Go face your next"
+	line "challenge!"
+	done
+
+BrunosRoom_MapEvents:
+	db 0, 0 ; filler
+
+	def_warp_events
+	warp_event  4, 17, KOGAS_ROOM, 3
+	warp_event  5, 17, KOGAS_ROOM, 4
+	warp_event  4,  2, KARENS_ROOM, 1
+	warp_event  5,  2, KARENS_ROOM, 2
+
+	def_coord_events
+
+	def_bg_events
+
+	def_object_events
+	object_event  5,  7, SPRITE_BRUNO, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, BrunoScript_Battle, -1