Research Biohazard Lockdown (#4067)

# About the pull request
Adds a unique lockdown system for research biohazards.
<!-- Remove this text and explain what the purpose of your PR is.

Mention if you have tested your changes. If you changed a map, make sure
you used the mapmerge tool.
If this is an Issue Correction, you can type "Fixes Issue #169420" to
link the PR to the corresponding Issue number #169420.

Remember: something that is self-evident to you might not be to others.
Explain your rationale fully, even if you feel it goes without saying.
-->

# Explain why it's good for the game
Adds some nice flavour to research.
# Testing Photographs and Procedure
<details>
<summary>Screenshots & Videos</summary>

Put screenshots and videos here with an empty line between the
screenshots and the `<details>` tags.

</details>


# Changelog
:cl:
add: Added a new lockdown system to research.
add: Added an admin button to interact with above.
/:cl:

---------

Co-authored-by: harryob <[email protected]>

code/__DEFINES/dcs/signals/signals_global.dm

@@ -59,3 +59,7 @@
 
 /// From
 #define COMSIG_GLOB_YAUTJA_ARMORY_OPENED "yautja_armory_opened"
+
+/// From /proc/biohazard_lockdown()
+#define COMSIG_GLOB_RESEARCH_LOCKDOWN "research_lockdown_closed"
+#define COMSIG_GLOB_RESEARCH_LIFT "research_lockdown_opened"

code/game/machinery/biohazard_lockdown.dm

@@ -0,0 +1,109 @@
+#define LOCKDOWN_READY 0
+#define LOCKDOWN_ACTIVE 1
+GLOBAL_VAR_INIT(lockdown_state, LOCKDOWN_READY)
+
+/obj/structure/machinery/biohazard_lockdown
+	name = "Emergency Containment Breach"
+	icon_state = "big_red_button_tablev"
+	unslashable = TRUE
+	unacidable = TRUE
+	COOLDOWN_DECLARE(containment_lockdown)
+
+/obj/structure/machinery/biohazard_lockdown/ex_act(severity)
+	return FALSE
+
+/obj/structure/machinery/biohazard_lockdown/attack_remote(mob/user as mob)
+	return FALSE
+
+/obj/structure/machinery/biohazard_lockdown/attack_alien(mob/user as mob)
+	return FALSE
+
+/obj/structure/machinery/biohazard_lockdown/attackby(obj/item/attacking_item, mob/user)
+	return attack_hand(user)
+
+/obj/structure/machinery/biohazard_lockdown/attack_hand(mob/living/user)
+	if(isxeno(user))
+		return FALSE
+	if(!allowed(user))
+		to_chat(user, SPAN_DANGER("Access Denied"))
+		flick(initial(icon_state) + "-denied", src)
+		return FALSE
+
+	if(!COOLDOWN_FINISHED(src, containment_lockdown))
+		to_chat(user, SPAN_BOLDWARNING("Biohazard Lockdown procedures are on cooldown! They will be ready in [COOLDOWN_SECONDSLEFT(src, containment_lockdown)] seconds!"))
+		return FALSE
+
+	add_fingerprint(user)
+	biohazard_lockdown(user)
+	COOLDOWN_START(src, containment_lockdown, 5 MINUTES)
+
+/obj/structure/machinery/door/poddoor/almayer/biohazard
+	name = "Biohazard Containment Airlock"
+	density = FALSE
+
+/obj/structure/machinery/door/poddoor/almayer/biohazard/Initialize()
+	. = ..()
+	RegisterSignal(SSdcs, COMSIG_GLOB_RESEARCH_LOCKDOWN, PROC_REF(close))
+	RegisterSignal(SSdcs, COMSIG_GLOB_RESEARCH_LIFT, PROC_REF(open))
+
+/obj/structure/machinery/door/poddoor/almayer/biohazard/white
+	icon_state = "w_almayer_pdoor1"
+	base_icon_state = "w_almayer_pdoor"
+
+/client/proc/admin_biohazard_alert()
+	set name = "Containment Breach Alert"
+	set category = "Admin.Ship"
+
+	if(!admin_holder ||!check_rights(R_EVENT))
+		return FALSE
+
+	var/prompt = tgui_alert(src, "Are you sure you want to trigger a containment breach alert? This will force red alert, and lockdown research.", "Choose.", list("Yes", "No"), 20 SECONDS)
+	if(prompt != "Yes")
+		return FALSE
+
+	prompt = tgui_alert(src, "Do you want to use a custom announcement?", "Choose.", list("Yes", "No"), 20 SECONDS)
+	if(prompt == "Yes")
+		var/whattoannounce = tgui_input_text(src, "Please enter announcement text.", "what?")
+		biohazard_lockdown(usr, whattoannounce, TRUE)
+	else
+		biohazard_lockdown(usr, admin = TRUE)
+	return TRUE
+
+/proc/biohazard_lockdown(mob/user, message, admin = FALSE)
+	if(IsAdminAdvancedProcCall())
+		return PROC_BLOCKED
+
+	var/log = "[key_name(user)] triggered research bio lockdown!"
+	var/ares_log = "[user.name] triggered Medical Research Biohazard Containment Lockdown."
+	if(!message)
+		message = "ATTENTION! \n\nBIOHAZARD CONTAINMENT BREACH. \n\nRESEARCH DEPARTMENT UNDER LOCKDOWN."
+	else
+		log = "[key_name(user)] triggered research bio lockdown! (Using a custom announcement)."
+	if(admin)
+		log += " (Admin Triggered)."
+		ares_log = "[MAIN_AI_SYSTEM] triggered Medical Research Biohazard Containment Lockdown."
+
+	switch(GLOB.lockdown_state)
+		if(LOCKDOWN_READY)
+			GLOB.lockdown_state = LOCKDOWN_ACTIVE
+			set_security_level(SEC_LEVEL_RED, TRUE, FALSE)
+			SEND_GLOBAL_SIGNAL(COMSIG_GLOB_RESEARCH_LOCKDOWN)
+		if(LOCKDOWN_ACTIVE)
+			GLOB.lockdown_state = LOCKDOWN_READY
+			message = "ATTENTION! \n\nBIOHAZARD CONTAINMENT LOCKDOWN LIFTED."
+			log = "[key_name(user)] lifted research bio lockdown!"
+			ares_log = "[user.name] lifted Medical Research Biohazard Containment Lockdown."
+			if(admin)
+				log += " (Admin Triggered)."
+				ares_log = "[MAIN_AI_SYSTEM] lifted Medical Research Biohazard Containment Lockdown."
+
+			set_security_level(SEC_LEVEL_BLUE, TRUE, FALSE)
+			SEND_GLOBAL_SIGNAL(COMSIG_GLOB_RESEARCH_LIFT)
+
+	shipwide_ai_announcement(message, MAIN_AI_SYSTEM, 'sound/effects/biohazard.ogg')
+	message_admins(log)
+	var/datum/ares_link/link = GLOB.ares_link
+	link.log_ares_security("Containment Lockdown", ares_log)
+
+#undef LOCKDOWN_READY
+#undef LOCKDOWN_ACTIVE

code/modules/admin/admin_verbs.dm

@@ -133,7 +133,8 @@ var/list/admin_verbs_minor_event = list(
 	/client/proc/toggle_shipside_sd,
 	/client/proc/shakeshipverb,
 	/client/proc/adminpanelweapons,
-	/client/proc/adminpanelgq,
+	/client/proc/admin_general_quarters,
+	/client/proc/admin_biohazard_alert,
 	/client/proc/toggle_hardcore_perma
 )
 

code/modules/admin/verbs/adminpanelgq.dm

@@ -1,22 +1,24 @@
-/client/proc/adminpanelgq()
+/client/proc/admin_general_quarters()
 	set name = "Call General Quarters"
 	set category = "Admin.Ship"
 
 	if(security_level == SEC_LEVEL_RED || security_level == SEC_LEVEL_DELTA)
 		tgui_alert(src, "Security is already red or above, General Quarters cannot be called.", "Acknowledge!", list("ok."), 10 SECONDS)
-	else
-		var/whattoannounce = "ATTENTION! GENERAL QUARTERS. ALL HANDS, MAN YOUR BATTLESTATIONS."
-		var/prompt = tgui_alert(src, "Do you want to leave the announcement as the default one?", "Choose.", list("Yes", "No"), 20 SECONDS)
-		if(prompt == "No")
-			whattoannounce = tgui_input_text(src, "Please enter announcement text.", "what?")
-			prompt = tgui_alert(src, "Are you sure you want to send General Quarters? This will force red alert.", "Choose.", list("Yes", "No"), 20 SECONDS)
-			if(prompt == "Yes")
-				set_security_level(2, no_sound=1, announce=0)
-				shipwide_ai_announcement(whattoannounce, MAIN_AI_SYSTEM, 'sound/effects/GQfullcall.ogg')
-				message_admins("[key_name_admin(src)] Sent General Quarters with a custom announcement!")
-		else
-			prompt = tgui_alert(src, "Are you sure you want to send General Quarters? This will force red alert.", "Choose.", list("Yes", "No"), 20 SECONDS)
-			if(prompt == "Yes")
-				set_security_level(2, no_sound=1, announce=0)
-				shipwide_ai_announcement(whattoannounce, MAIN_AI_SYSTEM, 'sound/effects/GQfullcall.ogg')
-				message_admins("[key_name_admin(src)] Sent General Quarters!")
+		return FALSE
+
+	var/prompt = tgui_alert(src, "Are you sure you want to send General Quarters? This will force red alert.", "Choose.", list("Yes", "No"), 20 SECONDS)
+	if(prompt != "Yes")
+		return FALSE
+
+	var/whattoannounce = "ATTENTION! GENERAL QUARTERS. ALL HANDS, MAN YOUR BATTLESTATIONS."
+	var/log = "[key_name_admin(src)] Sent General Quarters!"
+
+	prompt = tgui_alert(src, "Do you want to use a custom announcement?", "Choose.", list("Yes", "No"), 20 SECONDS)
+	if(prompt == "Yes")
+		whattoannounce = tgui_input_text(src, "Please enter announcement text.", "what?")
+		log = "[key_name_admin(src)] Sent General Quarters! (Using a custom announcement)"
+
+	set_security_level(SEC_LEVEL_RED, TRUE, FALSE)
+	shipwide_ai_announcement(whattoannounce, MAIN_AI_SYSTEM, 'sound/effects/GQfullcall.ogg')
+	message_admins(log)
+	return TRUE

colonialmarines.dme

@@ -741,6 +741,7 @@
 #include "code\game\machinery\autolathe_datums.dm"
 #include "code\game\machinery\Beacon.dm"
 #include "code\game\machinery\bio-dome_floodlights.dm"
+#include "code\game\machinery\biohazard_lockdown.dm"
 #include "code\game\machinery\bioprinter.dm"
 #include "code\game\machinery\buttons.dm"
 #include "code\game\machinery\cell_charger.dm"