mirror of
https://github.com/pret/pokefirered.git
synced 2026-05-11 14:35:05 -05:00
155 lines
5.0 KiB
PHP
155 lines
5.0 KiB
PHP
SilphCo_Elevator_MapScripts:: @ 8161F6E
|
|
.byte 0
|
|
|
|
SilphCo_Elevator_EventScript_FloorSelect:: @ 8161F6F
|
|
lockall
|
|
setvar VAR_0x8004, 1
|
|
call_if_unset FLAG_TEMP_2, EventScript_GetElevatorFloor
|
|
copyvar VAR_0x8005, VAR_ELEVATOR_FLOOR
|
|
special Special_DrawElevatorCurrentFloorWindow
|
|
message Text_WantWhichFloor
|
|
waitmessage
|
|
setvar VAR_0x8004, LISTMENU_SILPHCO_FLOORS
|
|
specialvar VAR_RESULT, Special_InitElevatorFloorSelectMenuPos
|
|
special Special_ListMenu
|
|
waitstate
|
|
switch VAR_RESULT
|
|
case 0, SilphCo_Elevator_EventScript_To11F
|
|
case 1, SilphCo_Elevator_EventScript_To10F
|
|
case 2, SilphCo_Elevator_EventScript_To9F
|
|
case 3, SilphCo_Elevator_EventScript_To8F
|
|
case 4, SilphCo_Elevator_EventScript_To7F
|
|
case 5, SilphCo_Elevator_EventScript_To6F
|
|
case 6, SilphCo_Elevator_EventScript_To5F
|
|
case 7, SilphCo_Elevator_EventScript_To4F
|
|
case 8, SilphCo_Elevator_EventScript_To3F
|
|
case 9, SilphCo_Elevator_EventScript_To2F
|
|
case 10, SilphCo_Elevator_EventScript_To1F
|
|
case 11, SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
case 127, SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To1F:: @ 816202F
|
|
setvar VAR_0x8006, 4
|
|
setdynamicwarp MAP_SILPH_CO_1F, 255, 22, 3
|
|
compare VAR_ELEVATOR_FLOOR, 4
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 4
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To2F:: @ 8162057
|
|
setvar VAR_0x8006, 5
|
|
setdynamicwarp MAP_SILPH_CO_2F, 255, 22, 3
|
|
compare VAR_ELEVATOR_FLOOR, 5
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 5
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To3F:: @ 816207F
|
|
setvar VAR_0x8006, 6
|
|
setdynamicwarp MAP_SILPH_CO_3F, 255, 22, 3
|
|
compare VAR_ELEVATOR_FLOOR, 6
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 6
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To4F:: @ 81620A7
|
|
setvar VAR_0x8006, 7
|
|
setdynamicwarp MAP_SILPH_CO_4F, 255, 22, 3
|
|
compare VAR_ELEVATOR_FLOOR, 7
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 7
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To5F:: @ 81620CF
|
|
setvar VAR_0x8006, 8
|
|
setdynamicwarp MAP_SILPH_CO_5F, 255, 22, 3
|
|
compare VAR_ELEVATOR_FLOOR, 8
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 8
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To6F:: @ 81620F7
|
|
setvar VAR_0x8006, 9
|
|
setdynamicwarp MAP_SILPH_CO_6F, 255, 20, 3
|
|
compare VAR_ELEVATOR_FLOOR, 9
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 9
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To7F:: @ 816211F
|
|
setvar VAR_0x8006, 10
|
|
setdynamicwarp MAP_SILPH_CO_7F, 255, 23, 3
|
|
compare VAR_ELEVATOR_FLOOR, 10
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 10
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To8F:: @ 8162147
|
|
setvar VAR_0x8006, 11
|
|
setdynamicwarp MAP_SILPH_CO_8F, 255, 22, 3
|
|
compare VAR_ELEVATOR_FLOOR, 11
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 11
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To9F:: @ 816216F
|
|
setvar VAR_0x8006, 12
|
|
setdynamicwarp MAP_SILPH_CO_9F, 255, 24, 3
|
|
compare VAR_ELEVATOR_FLOOR, 12
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 12
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To10F:: @ 8162197
|
|
setvar VAR_0x8006, 13
|
|
setdynamicwarp MAP_SILPH_CO_10F, 255, 13, 3
|
|
compare VAR_ELEVATOR_FLOOR, 13
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 13
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_To11F:: @ 81621BF
|
|
setvar VAR_0x8006, 14
|
|
setdynamicwarp MAP_SILPH_CO_11F, 255, 13, 3
|
|
compare VAR_ELEVATOR_FLOOR, 14
|
|
goto_if_eq SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
call SilphCo_Elevator_EventScript_MoveElevator
|
|
setvar VAR_ELEVATOR_FLOOR, 14
|
|
goto SilphCo_Elevator_EventScript_ExitFloorSelect
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_ExitFloorSelect:: @ 81621E7
|
|
special Special_CloseElevatorCurrentFloorWindow
|
|
releaseall
|
|
end
|
|
|
|
SilphCo_Elevator_EventScript_MoveElevator:: @ 81621EC
|
|
special Special_CloseElevatorCurrentFloorWindow
|
|
closemessage
|
|
waitse
|
|
special Special_AnimateElevator
|
|
waitstate
|
|
setflag FLAG_TEMP_2
|
|
return
|