mirror of
https://github.com/CHOMPStation2/CHOMPStation2.git
synced 2025-12-10 10:12:45 +00:00
222 lines
7.2 KiB
Plaintext
222 lines
7.2 KiB
Plaintext
/obj/machinery/computer/shuttle_control/specops
|
|
name = "special operations shuttle console"
|
|
shuttle_tag = "Special Operations"
|
|
req_access = list(access_cent_specops)
|
|
|
|
/obj/machinery/computer/shuttle_control/specops/attack_ai(user as mob)
|
|
user << "\red Access Denied."
|
|
return 1
|
|
|
|
//for shuttles that may use a different docking port at each location
|
|
/datum/shuttle/ferry/multidock
|
|
var/docking_controller_tag_station
|
|
var/docking_controller_tag_offsite
|
|
var/datum/computer/file/embedded_program/docking/docking_controller_station
|
|
var/datum/computer/file/embedded_program/docking/docking_controller_offsite
|
|
|
|
/datum/shuttle/ferry/multidock/init_docking_controllers()
|
|
if(docking_controller_tag_station)
|
|
docking_controller_station = locate(docking_controller_tag_station)
|
|
if(!istype(docking_controller_station))
|
|
world << "<span class='danger'>warning: shuttle with docking tag [docking_controller_station] could not find it's controller!</span>"
|
|
if(docking_controller_tag_offsite)
|
|
docking_controller_offsite = locate(docking_controller_tag_offsite)
|
|
if(!istype(docking_controller_offsite))
|
|
world << "<span class='danger'>warning: shuttle with docking tag [docking_controller_offsite] could not find it's controller!</span>"
|
|
if (!location)
|
|
docking_controller = docking_controller_station
|
|
else
|
|
docking_controller = docking_controller_offsite
|
|
|
|
/datum/shuttle/ferry/multidock/move(var/area/origin,var/area/destination)
|
|
..(origin, destination)
|
|
if (!location)
|
|
docking_controller = docking_controller_station
|
|
else
|
|
docking_controller = docking_controller_offsite
|
|
|
|
/datum/shuttle/ferry/multidock/specops
|
|
var/specops_return_delay = 6000 //After moving, the amount of time that must pass before the shuttle may move again
|
|
var/specops_countdown_time = 600 //Length of the countdown when moving the shuttle
|
|
|
|
var/obj/item/device/radio/intercom/announcer = null
|
|
var/reset_time = 0 //the world.time at which the shuttle will be ready to move again.
|
|
var/launch_prep = 0
|
|
var/cancel_countdown = 0
|
|
|
|
/datum/shuttle/ferry/multidock/specops/New()
|
|
..()
|
|
announcer = new /obj/item/device/radio/intercom(null)//We need a fake AI to announce some stuff below. Otherwise it will be wonky.
|
|
announcer.config(list("Response Team" = 0))
|
|
|
|
/datum/shuttle/ferry/multidock/specops/proc/radio_announce(var/message)
|
|
if(announcer)
|
|
announcer.autosay(message, "A.L.I.C.E.", "Response Team")
|
|
|
|
|
|
/datum/shuttle/ferry/multidock/specops/launch(var/user)
|
|
if (!can_launch())
|
|
return
|
|
|
|
if (istype(user, /obj/machinery/computer))
|
|
var/obj/machinery/computer/C = user
|
|
|
|
if(world.time <= reset_time)
|
|
C.visible_message("\blue Central Command will not allow the Special Operations shuttle to launch yet.")
|
|
if (((world.time - reset_time)/10) > 60)
|
|
C.visible_message("\blue [-((world.time - reset_time)/10)/60] minutes remain!")
|
|
else
|
|
C.visible_message("\blue [-(world.time - reset_time)/10] seconds remain!")
|
|
return
|
|
|
|
C.visible_message("\blue The Special Operations shuttle will depart in [(specops_countdown_time/10)] seconds.")
|
|
|
|
if (location) //returning
|
|
radio_announce("THE SPECIAL OPERATIONS SHUTTLE IS PREPARING TO RETURN")
|
|
else
|
|
radio_announce("THE SPECIAL OPERATIONS SHUTTLE IS PREPARING FOR LAUNCH")
|
|
|
|
sleep_until_launch()
|
|
|
|
//launch
|
|
radio_announce("ALERT: INITIATING LAUNCH SEQUENCE")
|
|
..(user)
|
|
|
|
/datum/shuttle/ferry/multidock/specops/move(var/area/origin,var/area/destination)
|
|
..(origin, destination)
|
|
if (!location) //just arrived home
|
|
for(var/turf/T in get_area_turfs(destination))
|
|
var/mob/M = locate(/mob) in T
|
|
M << "\red You have arrived at Central Command. Operation has ended!"
|
|
else //just left for the station
|
|
launch_mauraders()
|
|
for(var/turf/T in get_area_turfs(destination))
|
|
var/mob/M = locate(/mob) in T
|
|
M << "\red You have arrived at [station_name]. Commence operation!"
|
|
|
|
reset_time = world.time + specops_return_delay //set the timeout
|
|
|
|
/datum/shuttle/ferry/multidock/specops/cancel_launch()
|
|
if (!can_cancel())
|
|
return
|
|
|
|
cancel_countdown = 1
|
|
radio_announce("ALERT: LAUNCH SEQUENCE ABORTED")
|
|
if (istype(in_use, /obj/machinery/computer))
|
|
var/obj/machinery/computer/C = in_use
|
|
C.visible_message("\red Launch sequence aborted.")
|
|
|
|
..()
|
|
|
|
|
|
|
|
/datum/shuttle/ferry/multidock/specops/can_launch()
|
|
if(launch_prep)
|
|
return 0
|
|
return ..()
|
|
|
|
//should be fine to allow forcing. process_state only becomes WAIT_LAUNCH after the countdown is over.
|
|
///datum/shuttle/ferry/multidock/specops/can_force()
|
|
// return 0
|
|
|
|
/datum/shuttle/ferry/multidock/specops/can_cancel()
|
|
if(launch_prep)
|
|
return 1
|
|
return ..()
|
|
|
|
/datum/shuttle/ferry/multidock/specops/proc/sleep_until_launch()
|
|
var/message_tracker[] = list(0,1,2,3,5,10,30,45)//Create a a list with potential time values.
|
|
|
|
var/launch_time = world.time + specops_countdown_time
|
|
var/time_until_launch
|
|
|
|
cancel_countdown = 0
|
|
launch_prep = 1
|
|
while(!cancel_countdown && (launch_time - world.time) > 0)
|
|
var/ticksleft = launch_time - world.time
|
|
|
|
//if(ticksleft > 1e5)
|
|
// launch_time = world.timeofday + 10 // midnight rollover
|
|
time_until_launch = (ticksleft / 10)
|
|
|
|
//All this does is announce the time before launch.
|
|
var/rounded_time_left = round(time_until_launch)//Round time so that it will report only once, not in fractions.
|
|
if(rounded_time_left in message_tracker)//If that time is in the list for message announce.
|
|
radio_announce("ALERT: [rounded_time_left] SECOND[(rounded_time_left!=1)?"S":""] REMAIN")
|
|
message_tracker -= rounded_time_left//Remove the number from the list so it won't be called again next cycle.
|
|
//Should call all the numbers but lag could mean some issues. Oh well. Not much I can do about that.
|
|
|
|
sleep(5)
|
|
|
|
launch_prep = 0
|
|
|
|
|
|
/proc/launch_mauraders()
|
|
var/area/centcom/specops/special_ops = locate()//Where is the specops area located?
|
|
//Begin Marauder launchpad.
|
|
spawn(0)//So it parallel processes it.
|
|
for(var/obj/machinery/door/blast/M in special_ops)
|
|
switch(M.id)
|
|
if("ASSAULT0")
|
|
spawn(10)//1 second delay between each.
|
|
M.open()
|
|
if("ASSAULT1")
|
|
spawn(20)
|
|
M.open()
|
|
if("ASSAULT2")
|
|
spawn(30)
|
|
M.open()
|
|
if("ASSAULT3")
|
|
spawn(40)
|
|
M.open()
|
|
|
|
sleep(10)
|
|
|
|
var/spawn_marauder[] = new()
|
|
for(var/obj/effect/landmark/L in world)
|
|
if(L.name == "Marauder Entry")
|
|
spawn_marauder.Add(L)
|
|
for(var/obj/effect/landmark/L in world)
|
|
if(L.name == "Marauder Exit")
|
|
var/obj/effect/portal/P = new(L.loc)
|
|
P.invisibility = 101//So it is not seen by anyone.
|
|
P.failchance = 0//So it has no fail chance when teleporting.
|
|
P.target = pick(spawn_marauder)//Where the marauder will arrive.
|
|
spawn_marauder.Remove(P.target)
|
|
|
|
sleep(10)
|
|
|
|
for(var/obj/machinery/mass_driver/M in special_ops)
|
|
switch(M.id)
|
|
if("ASSAULT0")
|
|
spawn(10)
|
|
M.drive()
|
|
if("ASSAULT1")
|
|
spawn(20)
|
|
M.drive()
|
|
if("ASSAULT2")
|
|
spawn(30)
|
|
M.drive()
|
|
if("ASSAULT3")
|
|
spawn(40)
|
|
M.drive()
|
|
|
|
sleep(50)//Doors remain open for 5 seconds.
|
|
|
|
for(var/obj/machinery/door/blast/M in special_ops)
|
|
switch(M.id)//Doors close at the same time.
|
|
if("ASSAULT0")
|
|
spawn(0)
|
|
M.close()
|
|
if("ASSAULT1")
|
|
spawn(0)
|
|
M.close()
|
|
if("ASSAULT2")
|
|
spawn(0)
|
|
M.close()
|
|
if("ASSAULT3")
|
|
spawn(0)
|
|
M.close()
|
|
special_ops.readyreset()//Reset firealarm after the team launched.
|
|
//End Marauder launchpad.
|