mirror of
https://github.com/ParadiseSS13/Paradise.git
synced 2025-12-28 11:11:52 +00:00
77a71abdc7
If you called shuttle and then recalled it, you had to listen to the siren anyway, every 90 seconds till the round end.
170 lines
4.7 KiB
Plaintext
170 lines
4.7 KiB
Plaintext
// Controls the emergency shuttle
|
|
|
|
|
|
// these define the time taken for the shuttle to get to SS13
|
|
// and the time before it leaves again
|
|
#define SHUTTLEARRIVETIME 600 // 10 minutes = 600 seconds
|
|
#define SHUTTLELEAVETIME 180 // 3 minutes = 180 seconds
|
|
|
|
var/global/datum/shuttle_controller/emergency_shuttle/emergency_shuttle
|
|
|
|
datum/shuttle_controller
|
|
var
|
|
location = 0 //0 = somewhere far away, 1 = at SS13, 2 = returned from SS13
|
|
online = 0
|
|
direction = 1 //-1 = going back to central command, 1 = going back to SS13
|
|
|
|
endtime // timeofday that shuttle arrives
|
|
timelimit //important when the shuttle gets called for more than shuttlearrivetime
|
|
//timeleft = 360 //600
|
|
fake_recall = 0 //Used in rounds to prevent "ON NOES, IT MUST [INSERT ROUND] BECAUSE SHUTTLE CAN'T BE CALLED"
|
|
deny_shuttle = 0 //for admins not allowing it to be called.
|
|
departed = 0
|
|
sound_siren = 1 //if siren should go off
|
|
// call the shuttle
|
|
// if not called before, set the endtime to T+600 seconds
|
|
// otherwise if outgoing, switch to incoming
|
|
proc/incall(coeff = 1)
|
|
if(deny_shuttle)
|
|
return
|
|
|
|
if(endtime)
|
|
if(direction == -1)
|
|
setdirection(1)
|
|
else
|
|
settimeleft(SHUTTLEARRIVETIME*coeff)
|
|
online = 1
|
|
//turning on the red lights in hallways and siren
|
|
for(var/area/A in world)
|
|
if(istype(A, /area/hallway))
|
|
A.readyalert()
|
|
sound_siren = 1
|
|
|
|
|
|
|
|
proc/recall()
|
|
if(direction == 1)
|
|
var/timeleft = timeleft()
|
|
if(timeleft >= 600)
|
|
world << "\blue <B>Shuttle is at Centcom. Unable to recall.</B>"
|
|
return
|
|
world << "\blue <B>Alert: The shuttle is going back!</B>"
|
|
world << sound('shuttlerecalled.ogg')
|
|
setdirection(-1)
|
|
online = 1
|
|
//turning off the red lights in hallways and siren
|
|
for(var/area/A in world)
|
|
if(istype(A, /area/hallway))
|
|
A.readyreset()
|
|
sound_siren = 0
|
|
|
|
|
|
// returns the time (in seconds) before shuttle arrival
|
|
// note if direction = -1, gives a count-up to SHUTTLEARRIVETIME
|
|
proc/timeleft()
|
|
if(online)
|
|
var/timeleft = round((endtime - world.timeofday)/10 ,1)
|
|
if(direction == 1)
|
|
return timeleft
|
|
else
|
|
return SHUTTLEARRIVETIME-timeleft
|
|
else
|
|
return SHUTTLEARRIVETIME
|
|
|
|
// sets the time left to a given delay (in seconds)
|
|
proc/settimeleft(var/delay)
|
|
endtime = world.timeofday + delay * 10
|
|
timelimit = delay
|
|
|
|
// sets the shuttle direction
|
|
// 1 = towards SS13, -1 = back to centcom
|
|
proc/setdirection(var/dirn)
|
|
if(direction == dirn)
|
|
return
|
|
direction = dirn
|
|
// if changing direction, flip the timeleft by SHUTTLEARRIVETIME
|
|
var/ticksleft = endtime - world.timeofday
|
|
endtime = world.timeofday + (SHUTTLEARRIVETIME*10 - ticksleft)
|
|
return
|
|
|
|
proc/process()
|
|
|
|
emergency_shuttle
|
|
process()
|
|
if(!online) return
|
|
var/timeleft = timeleft()
|
|
if(timeleft > 1e5) // midnight rollover protection
|
|
timeleft = 0
|
|
if (sound_siren && (direction == 1)) //playing siren every 90 seconds
|
|
sound_siren = 0
|
|
world << sound('siren.ogg')
|
|
spawn(900)
|
|
sound_siren = 1
|
|
switch(location)
|
|
if(0)
|
|
if(timeleft>timelimit)
|
|
online = 0
|
|
direction = 1
|
|
endtime = null
|
|
|
|
return 0
|
|
|
|
else if((fake_recall != 0) && (timeleft <= fake_recall))
|
|
recall()
|
|
|
|
return 0
|
|
|
|
else if(timeleft <= 0)
|
|
location = 1
|
|
var/area/start_location = locate(/area/shuttle/escape/centcom)
|
|
var/area/end_location = locate(/area/shuttle/escape/station)
|
|
|
|
var/list/dstturfs = list()
|
|
var/throwy = world.maxy
|
|
|
|
for(var/turf/T in end_location)
|
|
dstturfs += T
|
|
if(T.y < throwy)
|
|
throwy = T.y
|
|
|
|
// hey you, get out of the way!
|
|
for(var/turf/T in dstturfs)
|
|
// find the turf to move things to
|
|
var/turf/D = locate(T.x, throwy - 1, 1)
|
|
//var/turf/E = get_step(D, SOUTH)
|
|
for(var/atom/movable/AM as mob|obj in T)
|
|
AM.Move(D)
|
|
// NOTE: Commenting this out to avoid recreating mass driver glitch
|
|
/*
|
|
spawn(0)
|
|
AM.throw_at(E, 1, 1)
|
|
return
|
|
*/
|
|
if(istype(T, /turf/simulated))
|
|
del(T)
|
|
|
|
start_location.move_contents_to(end_location)
|
|
settimeleft(SHUTTLELEAVETIME)
|
|
world << "<B>The Emergency Shuttle has docked with the station! You have [timeleft()/60] minutes to board the Emergency Shuttle.</B>"
|
|
world << sound('shuttledock.ogg')
|
|
|
|
return 1
|
|
|
|
if(1)
|
|
if(timeleft>0)
|
|
return 0
|
|
|
|
else
|
|
departed = 1
|
|
location = 2
|
|
var/area/start_location = locate(/area/shuttle/escape/station)
|
|
var/area/end_location = locate(/area/shuttle/escape/centcom)
|
|
|
|
start_location.move_contents_to(end_location)
|
|
online = 0
|
|
|
|
return 1
|
|
|
|
else
|
|
return 1
|