pokefirered/data/maps/RocketHideout_Elevator/scripts.inc
2020-02-16 12:05:13 -05:00

93 lines
3.2 KiB
PHP

RocketHideout_Elevator_MapScripts:: @ 81614D8
.byte 0
RocketHideout_Elevator_EventScript_FloorSelect:: @ 81614D9
lockall
goto_if_unset FLAG_CAN_USE_ROCKET_HIDEOUT_LIFT, RocketHideout_Elevator_EventScript_NeedKey
setvar VAR_0x8004, 2
call_if_unset FLAG_TEMP_2, EventScript_GetElevatorFloor
copyvar VAR_0x8005, VAR_ELEVATOR_FLOOR
special Special_DrawElevatorCurrentFloorWindow
message Text_WantWhichFloor
waitmessage
setvar VAR_0x8004, 2
specialvar VAR_RESULT, Special_InitElevatorFloorSelectMenuPos
switch VAR_RESULT
case 0, RocketHideout_Elevator_EventScript_FloorSelectFromB1F
case 1, RocketHideout_Elevator_EventScript_FloorSelectFromB2F
case 2, RocketHideout_Elevator_EventScript_FloorSelectFromB4F
end
RocketHideout_Elevator_EventScript_FloorSelectFromB1F:: @ 8161530
multichoicedefault 0, 0, MULTICHOICE_ROCKET_HIDEOUT_ELEVATOR, 0, FALSE
goto RocketHideout_Elevator_EventScript_ChooseFloor
end
RocketHideout_Elevator_EventScript_FloorSelectFromB2F:: @ 816153C
multichoicedefault 0, 0, MULTICHOICE_ROCKET_HIDEOUT_ELEVATOR, 1, FALSE
goto RocketHideout_Elevator_EventScript_ChooseFloor
end
RocketHideout_Elevator_EventScript_FloorSelectFromB4F:: @ 8161548
multichoicedefault 0, 0, MULTICHOICE_ROCKET_HIDEOUT_ELEVATOR, 2, FALSE
goto RocketHideout_Elevator_EventScript_ChooseFloor
end
RocketHideout_Elevator_EventScript_ChooseFloor:: @ 8161554
switch VAR_RESULT
case 0, RocketHideout_Elevator_EventScript_ToB1F
case 1, RocketHideout_Elevator_EventScript_ToB2F
case 2, RocketHideout_Elevator_EventScript_ToB4F
case 3, RocketHideout_Elevator_EventScript_ExitFloorSelect
case 127, RocketHideout_Elevator_EventScript_ExitFloorSelect
end
RocketHideout_Elevator_EventScript_ToB1F:: @ 8161591
setvar VAR_0x8006, 3
setdynamicwarp MAP_ROCKET_HIDEOUT_B1F, 255, 24, 25
compare VAR_ELEVATOR_FLOOR, 3
goto_if_eq RocketHideout_Elevator_EventScript_ExitFloorSelect
call RocketHideout_Elevator_EventScript_MoveElevator
setvar VAR_ELEVATOR_FLOOR, 3
goto RocketHideout_Elevator_EventScript_ExitFloorSelect
end
RocketHideout_Elevator_EventScript_ToB2F:: @ 81615B9
setvar VAR_0x8006, 2
setdynamicwarp MAP_ROCKET_HIDEOUT_B2F, 255, 28, 16
compare VAR_ELEVATOR_FLOOR, 2
goto_if_eq RocketHideout_Elevator_EventScript_ExitFloorSelect
call RocketHideout_Elevator_EventScript_MoveElevator
setvar VAR_ELEVATOR_FLOOR, 2
goto RocketHideout_Elevator_EventScript_ExitFloorSelect
end
RocketHideout_Elevator_EventScript_ToB4F:: @ 81615E1
setvar VAR_0x8006, 0
setdynamicwarp MAP_ROCKET_HIDEOUT_B4F, 255, 20, 23
compare VAR_ELEVATOR_FLOOR, 0
goto_if_eq RocketHideout_Elevator_EventScript_ExitFloorSelect
call RocketHideout_Elevator_EventScript_MoveElevator
setvar VAR_ELEVATOR_FLOOR, 0
goto RocketHideout_Elevator_EventScript_ExitFloorSelect
end
RocketHideout_Elevator_EventScript_ExitFloorSelect:: @ 8161609
special Special_CloseElevatorCurrentFloorWindow
releaseall
end
RocketHideout_Elevator_EventScript_MoveElevator:: @ 816160E
special Special_CloseElevatorCurrentFloorWindow
closemessage
waitse
special Special_AnimateElevator
waitstate
setflag FLAG_TEMP_2
return
RocketHideout_Elevator_EventScript_NeedKey:: @ 816161B
msgbox RocketHideout_Elevator_Text_AppearsToNeedAKey
releaseall
end