2014-05-18 18:19:10 +00:00
|
|
|
RocketHideoutElevatorScript: ; 45710 (11:5710)
|
2014-05-26 21:04:56 +00:00
|
|
|
ld hl, wd126
|
2014-05-18 18:19:10 +00:00
|
|
|
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
|
2014-09-13 07:50:56 +00:00
|
|
|
ld [wAutoTextBoxDrawingControl], a
|
2014-05-18 18:19:10 +00:00
|
|
|
inc a
|
2014-09-13 07:50:56 +00:00
|
|
|
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
|
2014-05-18 18:19:10 +00:00
|
|
|
ret
|
|
|
|
|
|
|
|
RocketHideoutElevatorScript_4572c: ; 4572c (11:572c)
|
2014-09-13 07:50:56 +00:00
|
|
|
ld hl, wWarpEntries
|
2014-05-26 21:04:56 +00:00
|
|
|
ld a, [wd73b]
|
2014-05-18 18:19:10 +00:00
|
|
|
ld b, a
|
2014-05-26 21:04:56 +00:00
|
|
|
ld a, [wd73c]
|
2014-05-18 18:19:10 +00:00
|
|
|
ld c, a
|
|
|
|
call RocketHideoutElevatorScript_4573a
|
|
|
|
|
|
|
|
RocketHideoutElevatorScript_4573a: ; 4573a (11:573a)
|
|
|
|
inc hl
|
|
|
|
inc hl
|
|
|
|
ld a, b
|
|
|
|
ld [hli], a
|
|
|
|
ld a, c
|
|
|
|
ld [hli], a
|
|
|
|
ret
|
|
|
|
|
|
|
|
RocketHideoutElevatorScript_45741: ; 45741 (11:5741)
|
2015-07-03 19:38:12 +00:00
|
|
|
ld hl, RocketHideoutElavatorFloors
|
2014-05-18 18:19:10 +00:00
|
|
|
call LoadItemList
|
2015-07-03 19:38:12 +00:00
|
|
|
ld hl, RocketHideoutElevatorWarpMaps
|
2014-05-26 21:04:56 +00:00
|
|
|
ld de, wcc5b
|
2014-05-18 18:19:10 +00:00
|
|
|
ld bc, $0006
|
|
|
|
call CopyData
|
|
|
|
ret
|
|
|
|
|
|
|
|
RocketHideoutElavatorFloors: ; 45754 (11:5754)
|
|
|
|
db $03 ; num elements in list
|
|
|
|
db $55, $54, $61 ; "B1F", "B2F", "B4F"
|
|
|
|
db $FF ; terminator
|
|
|
|
|
|
|
|
RocketHideoutElevatorWarpMaps: ; 45759 (11:5759)
|
|
|
|
; 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_1
|
|
|
|
db $04, ROCKET_HIDEOUT_2
|
|
|
|
db $02, ROCKET_HIDEOUT_4
|
|
|
|
|
|
|
|
RocketHideoutElevatorScript_4575f: ; 4575f (11:575f)
|
|
|
|
call Delay3
|
2014-05-19 14:38:20 +00:00
|
|
|
callba ShakeElevator
|
2014-05-18 18:19:10 +00:00
|
|
|
ret
|
|
|
|
|
|
|
|
RocketHideoutElevatorTextPointers: ; 4576b (11:576b)
|
|
|
|
dw RocketHideoutElevatorText1
|
|
|
|
|
|
|
|
RocketHideoutElevatorText1: ; 4576d (11:576d)
|
2015-07-03 19:58:50 +00:00
|
|
|
TX_ASM
|
2014-05-18 18:19:10 +00:00
|
|
|
ld b, LIFT_KEY
|
|
|
|
call IsItemInBag
|
2015-07-03 19:38:12 +00:00
|
|
|
jr z, .asm_45782
|
2014-05-18 18:19:10 +00:00
|
|
|
call RocketHideoutElevatorScript_45741
|
2015-07-03 19:38:12 +00:00
|
|
|
ld hl, RocketHideoutElevatorWarpMaps
|
2014-06-16 20:57:26 +00:00
|
|
|
predef Func_1c9c6
|
2015-07-03 19:38:12 +00:00
|
|
|
jr .asm_45788
|
|
|
|
.asm_45782
|
2014-05-18 18:19:10 +00:00
|
|
|
ld hl, RocketHideoutElevatorText_4578b
|
|
|
|
call PrintText
|
2015-07-03 19:38:12 +00:00
|
|
|
.asm_45788
|
2014-05-18 18:19:10 +00:00
|
|
|
jp TextScriptEnd
|
|
|
|
|
|
|
|
RocketHideoutElevatorText_4578b: ; 4578b (11:578b)
|
2015-07-03 19:38:12 +00:00
|
|
|
TX_FAR _RocketElevatorText_4578b
|
2014-05-18 18:19:10 +00:00
|
|
|
db $d, "@"
|