Merge pull request #11046 from KorPhaeron/escape

Midround Escape Pod Launch

code/controllers/subsystem/shuttles/emergency.dm

@@ -106,7 +106,8 @@
 			if(time_left <= 0 && !SSshuttle.emergencyNoEscape)
 				//move each escape pod to its corresponding transit dock
 				for(var/obj/docking_port/mobile/pod/M in SSshuttle.mobile)
-					M.enterTransit()
+					if(M.z == ZLEVEL_STATION) //Will not launch from the mine/planet
+						M.enterTransit()
 				//now move the actual emergency shuttle to its transit dock
 				enterTransit()
 				mode = SHUTTLE_ESCAPE
@@ -131,16 +132,13 @@
 	width = 3
 	height = 4
 
-	New()
-		if(id == "pod")
-			WARNING("[type] id has not been changed from the default. Use the id convention \"pod1\" \"pod2\" etc.")
-		..()
+/obj/docking_port/mobile/pod/New()
+	if(id == "pod")
+		WARNING("[type] id has not been changed from the default. Use the id convention \"pod1\" \"pod2\" etc.")
+	..()
 
-	request()
-		return
-
-	cancel()
-		return
+/obj/docking_port/mobile/pod/cancel()
+	return
 
 /*
 	findTransitDock()
@@ -148,3 +146,27 @@
 		if(.)	return .
 		return ..()
 */
+
+/obj/machinery/computer/shuttle/pod
+	name = "pod control computer"
+	admin_controlled = 1
+	shuttleId = "pod"
+	possible_destinations = "pod_asteroid"
+	icon = 'icons/obj/terminals.dmi'
+	icon_state = "dorm_available"
+	density = 0
+
+/obj/machinery/computer/shuttle/pod/update_icon()
+	return
+
+/obj/machinery/computer/shuttle/pod/emag_act(mob/user as mob)
+	user << "<span class='warning'> Access requirements overridden. The pod may now be launched manually at any time.</span>"
+	admin_controlled = 0
+	icon_state = "dorm_emag"
+
+/obj/docking_port/stationary/random/initialize()
+	..()
+	var/target_area = /area/mine/unexplored
+	var/turfs = get_area_turfs(target_area)
+	var/T=pick(turfs)
+	src.loc = T