Bugfixes for airlocks

Added detective work manual, that spawns on top of the detective's computer
Added RadioAlert proc
Added the capability to title the NanoTrasen updates

code/modules/admin/admin_verbs.dm

@@ -177,6 +177,7 @@
 			verbs += /client/proc/cmd_admin_godmode
 			verbs += /client/proc/delbook
 			verbs += /client/proc/Force_Event_admin
+			verbs += /client/proc/radioalert
 
 		if (holder.level >= 4)//Badmin********************************************************************
 			verbs += /obj/admins/proc/adrev					//toggle admin revives
@@ -418,6 +419,7 @@
 	verbs -= /client/proc/cmd_admin_godmode
 	verbs -= /client/proc/delbook
 	verbs -= /client/proc/Force_Event_admin
+	verbs -= /client/proc/radioalert
 
 	return
 
@@ -860,3 +862,13 @@
 	M.update_body()
 	M.update_face()
 	M.update_clothing()
+
+
+/client/proc/radioalert()
+	set category = "Fun"
+	set name = "Create Radio Alert"
+	var/message = input("Choose a message! (Don't forget the \"says, \" or similar at the start.)", "Message") as message|null
+	var/from = input("From whom? (Who's saying this?)", "From") as text|null
+	var/obj/item/device/radio/intercom/a = new /obj/item/device/radio/intercom(null)
+	a.autosay(message,from)
+	del(a)

code/modules/admin/verbs/randomverbs.dm

@@ -528,8 +528,11 @@ Traitors and the like can also be revived with the previous role mostly intact.
 		src << "Only administrators may use this command."
 		return
 	var/input = input(usr, "Please enter anything you want. Anything. Serious.", "What?", "") as message|null
+	var/customname = input(usr, "Pick a title for the report.", "Title") as message|null
 	if(!input)
 		return
+	if(!customname)
+		customname = "NanoTrasen Update"
 	for (var/obj/machinery/computer/communications/C in machines)
 		if(! (C.stat & (BROKEN|NOPOWER) ) )
 			var/obj/item/weapon/paper/P = new /obj/item/weapon/paper( C.loc )
@@ -538,7 +541,7 @@ Traitors and the like can also be revived with the previous role mostly intact.
 			C.messagetitle.Add("[command_name()] Update")
 			C.messagetext.Add(P.info)
 
-	command_alert(input);
+	command_alert(input, maintitle=customname);
 
 	world << sound('commandreport.ogg')
 	log_admin("[key_name(src)] has created a command report: [input]")