summaryrefslogtreecommitdiff
path: root/scripts/RocketHideoutElevator.asm
diff options
context:
space:
mode:
authorRangi <remy.oukaour+rangi42@gmail.com>2019-01-01 15:06:23 -0500
committerRangi <remy.oukaour+rangi42@gmail.com>2019-01-01 23:33:10 -0500
commitc7796024590fec48ac79756793c1a6e3b54daf8f (patch)
tree0d61caa7ebe429995a61e800d1d78c3a82aec886 /scripts/RocketHideoutElevator.asm
parent90430e6dee9e207dc0b618d07566f83617343f60 (diff)
Rename map files, labels, and constants to be consistent and work with Polished Map
Diffstat (limited to 'scripts/RocketHideoutElevator.asm')
-rwxr-xr-xscripts/RocketHideoutElevator.asm85
1 files changed, 85 insertions, 0 deletions
diff --git a/scripts/RocketHideoutElevator.asm b/scripts/RocketHideoutElevator.asm
new file mode 100755
index 00000000..9525db3a
--- /dev/null
+++ b/scripts/RocketHideoutElevator.asm
@@ -0,0 +1,85 @@
+RocketHideoutElevator_Script:
+ ld hl, wCurrentMapScriptFlags
+ bit 5, [hl]
+ res 5, [hl]
+ push hl
+ call nz, RocketHideoutElevatorScript_4572c
+ pop hl
+ bit 7, [hl]
+ res 7, [hl]
+ call nz, RocketHideoutElevatorScript_4575f
+ xor a
+ ld [wAutoTextBoxDrawingControl], a
+ inc a
+ ld [wDoNotWaitForButtonPressAfterDisplayingText], a
+ ret
+
+RocketHideoutElevatorScript_4572c:
+ ld hl, wWarpEntries
+ ld a, [wWarpedFromWhichWarp]
+ ld b, a
+ ld a, [wWarpedFromWhichMap]
+ ld c, a
+ call RocketHideoutElevatorScript_4573a
+
+RocketHideoutElevatorScript_4573a:
+ inc hl
+ inc hl
+ ld a, b
+ ld [hli], a
+ ld a, c
+ ld [hli], a
+ ret
+
+RocketHideoutElevatorScript_45741:
+ ld hl, RocketHideoutElavatorFloors
+ call LoadItemList
+ ld hl, RocketHideoutElevatorWarpMaps
+ ld de, wElevatorWarpMaps
+ ld bc, RocketHideoutElevatorWarpMapsEnd - RocketHideoutElevatorWarpMaps
+ call CopyData
+ ret
+
+RocketHideoutElavatorFloors:
+ db $03 ; num elements in list
+ db FLOOR_B1F
+ db FLOOR_B2F
+ db FLOOR_B4F
+ db $FF ; terminator
+
+RocketHideoutElevatorWarpMaps:
+; first byte is warp number
+; second byte is map number
+; These specify where the player goes after getting out of the elevator.
+ db $04, ROCKET_HIDEOUT_B1F
+ db $04, ROCKET_HIDEOUT_B2F
+ db $02, ROCKET_HIDEOUT_B4F
+RocketHideoutElevatorWarpMapsEnd:
+
+RocketHideoutElevatorScript_4575f:
+ call Delay3
+ callba ShakeElevator
+ ret
+
+RocketHideoutElevator_TextPointers:
+ dw RocketHideoutElevatorText1
+
+RocketHideoutElevatorText1:
+ TX_ASM
+ ld b, LIFT_KEY
+ call IsItemInBag
+ jr z, .asm_45782
+ call RocketHideoutElevatorScript_45741
+ ld hl, RocketHideoutElevatorWarpMaps
+ predef DisplayElevatorFloorMenu
+ jr .asm_45788
+.asm_45782
+ ld hl, RocketHideoutElevatorText_4578b
+ call PrintText
+.asm_45788
+ jp TextScriptEnd
+
+RocketHideoutElevatorText_4578b:
+ TX_FAR _RocketElevatorText_4578b
+ TX_WAIT
+ db "@"