Predaliens and Kings can pry open dropships and lock them + ERT shuttles can be interacted by Queen/Predalien/King

code/__DEFINES/xeno.dm

@@ -107,6 +107,9 @@
 
 #define XENO_STARTING_CRYSTAL 100 //How much building resource the queen gets to start with
 
+/// Whether the xeno in question is capable of prying open dropships, starting hijack (queen) and disabling ERT shuttles
+#define IS_XENO_DROPSHIP_CAPABLE(X) (X.hive_pos == XENO_QUEEN || X.caste_type == XENO_CASTE_PREDALIEN || X.caste_type == XENO_CASTE_KING)
+
 // Queen permission toggles
 #define COOLDOWN_TOGGLE_SLASH "cooldown_toggle_slash"
 #define COOLDOWN_TOGGLE_CONSTRUCTION "cooldown_toggle_construction"

code/game/machinery/doors/airlock_types.dm

@@ -621,6 +621,29 @@
 	name = "Press Office"
 	req_access = list(ACCESS_PRESS)
 
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle
+	name = "\improper Shuttle Airlock"
+	no_panel = TRUE
+	not_weldable = TRUE
+	unslashable = TRUE
+	unacidable = TRUE
+
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle/attack_alien(mob/living/carbon/xenomorph/xeno)
+	if(!IS_XENO_DROPSHIP_CAPABLE(xeno))
+		return ..()
+
+	if(!locked)
+		return ..()
+
+	if(xeno.action_busy)
+		return
+
+	to_chat(xeno, SPAN_NOTICE("You try and force the doors open!"))
+	if(do_after(xeno, 5 SECONDS, INTERRUPT_ALL, BUSY_ICON_HOSTILE))
+		unlock(TRUE)
+		open(TRUE)
+		lock(TRUE)
+
 /obj/structure/machinery/door/airlock/almayer/marine
 	name = "\improper Airlock"
 	icon = 'icons/obj/structures/doors/prepdoor.dmi'
@@ -906,7 +929,7 @@
 	return ..()
 
 /obj/structure/machinery/door/airlock/dropship_hatch/attack_alien(mob/living/carbon/xenomorph/xeno)
-	if(xeno.hive_pos != XENO_QUEEN)
+	if(!IS_XENO_DROPSHIP_CAPABLE(xeno))
 		return ..()
 
 	if(!locked)

code/game/machinery/doors/multi_tile.dm

@@ -272,10 +272,10 @@
 	queen_pryable = TRUE
 
 /obj/structure/machinery/door/airlock/multi_tile/almayer/containment/attack_alien(mob/living/carbon/xenomorph/xeno)
-	if(!queen_pryable)
+	if(!IS_XENO_DROPSHIP_CAPABLE(xeno))
 		return ..()
 
-	if(xeno.hive_pos != XENO_QUEEN)
+	if(!queen_pryable)
 		return ..()
 
 	if(xeno.action_busy)
@@ -347,7 +347,7 @@
 	return ..()
 
 /obj/structure/machinery/door/airlock/multi_tile/almayer/dropshiprear/attack_alien(mob/living/carbon/xenomorph/xeno)
-	if(xeno.hive_pos != XENO_QUEEN)
+	if(!IS_XENO_DROPSHIP_CAPABLE(xeno))
 		return ..()
 
 	if(!queen_pryable)
@@ -703,6 +703,29 @@
 /obj/structure/machinery/door/airlock/multi_tile/almayer/generic2/glass/autoname
 	autoname = TRUE
 
+/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2/shuttle
+	name = "\improper Shuttle Airlock"
+	no_panel = TRUE
+	not_weldable = TRUE
+	unslashable = TRUE
+	unacidable = TRUE
+
+/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2/shuttle/attack_alien(mob/living/carbon/xenomorph/xeno)
+	if(!IS_XENO_DROPSHIP_CAPABLE(xeno))
+		return ..()
+
+	if(!locked)
+		return ..()
+
+	if(xeno.action_busy)
+		return
+
+	to_chat(xeno, SPAN_NOTICE("You try and force the doors open!"))
+	if(do_after(xeno, 5 SECONDS, INTERRUPT_ALL, BUSY_ICON_HOSTILE))
+		unlock(TRUE)
+		open(TRUE)
+		lock(TRUE)
+
 // Hybrisa
 
 /obj/structure/machinery/door/airlock/multi_tile/hybrisa

code/modules/mob/living/carbon/xenomorph/castes/King.dm

@@ -2,6 +2,7 @@
 	caste_type = XENO_CASTE_KING
 	caste_desc = "The end of the line."
 	tier = 4
+	is_intelligent = TRUE
 
 	melee_damage_lower = XENO_DAMAGE_TIER_6
 	melee_damage_upper = XENO_DAMAGE_TIER_8

code/modules/shuttle/computer.dm

@@ -340,6 +340,19 @@
 		return TRUE
 	tgui_interact(user)
 
+/obj/structure/machinery/computer/shuttle/ert/attack_alien(mob/living/carbon/xenomorph/xeno)
+	// If the attacking xeno isn't the queen or predalien.
+	if(IS_XENO_DROPSHIP_CAPABLE(xeno))
+		xeno.animation_attack_on(src)
+		disabled = TRUE
+		to_chat(xeno, SPAN_XENONOTICE("We slash at [src], rendering it inoperable!"))
+		playsound(loc, 'sound/machines/terminal_shutdown.ogg', 20)
+	else
+		to_chat(xeno, SPAN_NOTICE("Lights flash from the terminal but we can't comprehend their meaning."))
+		playsound(loc, 'sound/machines/terminal_error.ogg', KEYBOARD_SOUND_VOLUME, TRUE)
+	return XENO_NONCOMBAT_ACTION
+
+
 /obj/structure/machinery/computer/shuttle/ert/small
 	name = "transport shuttle"
 	desc = "A transport shuttle flight computer."

code/modules/shuttle/computers/dropship_computer.dm

@@ -289,10 +289,9 @@
 		shuttleId = pick(alternatives)["id"]
 
 	var/obj/docking_port/mobile/marine_dropship/dropship = SSshuttle.getShuttle(shuttleId)
-
-	// If the attacking xeno isn't the queen.
-	if(xeno.hive_pos != XENO_QUEEN)
-		// If the 'about to launch' alarm is playing, a xeno can whack the computer to stop it.
+	// If the attacking xeno isn't the queen, king or predalien.
+	if(!IS_XENO_DROPSHIP_CAPABLE(xeno))
+	// If the 'about to launch' alarm is playing, a xeno can whack the computer to stop it.
 		if(dropship.playing_launch_announcement_alarm)
 			stop_playing_launch_announcement_alarm()
 			xeno.animation_attack_on(src)
@@ -336,6 +335,11 @@
 		SScmtv.spectate_event("Dropship Locked", src)
 		return
 
+	// Only the queen should have the authority to start hijack.
+	if(xeno.caste_type != XENO_CASTE_QUEEN)
+		to_chat(xeno, SPAN_XENODANGER("We shouldn't be tampering with the controls any further."))
+		return
+
 	if(dropship_control_lost)
 		//keyboard
 		for(var/i = 0; i < 5; i++)

maps/map_files/USS_Almayer/USS_Almayer.dmm

@@ -40786,8 +40786,8 @@
 	id = "Containment Cell 3";
 	dir = 2;
 	req_one_access = list(28,206,207);
-	queen_pryable = 0;
-	locked = 1
+	locked = 1;
+	queen_pryable = 0
 	},
 /obj/structure/machinery/door/poddoor/almayer/biohazard/white{
 	dir = 4
@@ -43051,8 +43051,8 @@
 	id = "Containment Cell 2";
 	dir = 2;
 	req_one_access = list(28,206,207);
-	queen_pryable = 0;
-	locked = 1
+	locked = 1;
+	queen_pryable = 0
 	},
 /obj/structure/machinery/door/poddoor/almayer/biohazard/white{
 	dir = 4

maps/shuttles/ert_pmc_shuttle.dmm

@@ -76,7 +76,7 @@
 	},
 /area/shuttle/ert)
 "q" = (
-/obj/structure/machinery/door/airlock/almayer/generic{
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle{
 	dir = 2
 	},
 /turf/open/shuttle/dropship/light_grey_single_wide_left_to_right,
@@ -90,7 +90,7 @@
 /turf/open/shuttle/dropship/light_grey_single_wide_up_to_down,
 /area/shuttle/ert)
 "t" = (
-/obj/structure/machinery/door/airlock/almayer/generic,
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle,
 /turf/open/shuttle/dropship/light_grey_single_wide_up_to_down,
 /area/shuttle/ert)
 "u" = (

maps/shuttles/ert_response_shuttle.dmm

@@ -13,7 +13,7 @@
 /turf/template_noop,
 /area/shuttle/ert)
 "d" = (
-/obj/structure/machinery/door/airlock/almayer/generic{
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle{
 	dir = 2
 	},
 /turf/open/shuttle/dropship/light_grey_single_wide_left_to_right,
@@ -76,7 +76,7 @@
 	},
 /area/shuttle/ert)
 "y" = (
-/obj/structure/machinery/door/airlock/almayer/generic,
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle,
 /turf/open/shuttle/dropship/light_grey_single_wide_up_to_down,
 /area/shuttle/ert)
 "z" = (

maps/shuttles/ert_shuttle_big.dmm

@@ -327,7 +327,7 @@
 /turf/open/floor/almayer/plate,
 /area/shuttle/ert)
 "uO" = (
-/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2{
+/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2/shuttle{
 	dir = 1;
 	id = "starboard_door"
 	},
@@ -684,7 +684,7 @@
 /turf/open/floor/almayer/plate,
 /area/shuttle/ert)
 "Ro" = (
-/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2{
+/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2/shuttle{
 	dir = 1;
 	id = "port_door"
 	},

maps/shuttles/ert_small_shuttle_north.dmm

@@ -137,7 +137,7 @@
 /turf/open/floor/almayer/tcomms,
 /area/shuttle/ert)
 "F" = (
-/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2{
+/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2/shuttle{
 	dir = 1;
 	id = "port_door"
 	},
@@ -190,7 +190,7 @@
 /turf/open/floor/almayer/tcomms,
 /area/shuttle/ert)
 "W" = (
-/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2{
+/obj/structure/machinery/door/airlock/multi_tile/almayer/generic2/shuttle{
 	dir = 1;
 	id = "starboard_door"
 	},

maps/shuttles/ert_twe_shuttle.dmm

@@ -96,7 +96,7 @@
 	},
 /area/shuttle/ert)
 "D" = (
-/obj/structure/machinery/door/airlock/almayer/generic,
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle,
 /turf/open/shuttle/dropship/light_grey_single_wide_up_to_down,
 /area/shuttle/ert)
 "E" = (
@@ -133,7 +133,7 @@
 /turf/open/shuttle/dropship/light_grey_top_left,
 /area/shuttle/ert)
 "M" = (
-/obj/structure/machinery/door/airlock/almayer/generic{
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle{
 	dir = 2
 	},
 /turf/open/shuttle/dropship/light_grey_single_wide_left_to_right,

maps/shuttles/ert_upp_shuttle.dmm

@@ -127,7 +127,7 @@
 /turf/template_noop,
 /area/shuttle/ert)
 "G" = (
-/obj/structure/machinery/door/airlock/almayer/generic,
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle,
 /turf/open/shuttle/dropship/light_grey_single_wide_up_to_down,
 /area/shuttle/ert)
 "I" = (
@@ -186,7 +186,7 @@
 /turf/open/shuttle/dropship/medium_grey_single_wide_up_to_down,
 /area/shuttle/ert)
 "Y" = (
-/obj/structure/machinery/door/airlock/almayer/generic{
+/obj/structure/machinery/door/airlock/almayer/generic/shuttle{
 	dir = 2
 	},
 /turf/open/shuttle/dropship/light_grey_single_wide_left_to_right,