Adds random Central Command names, admins can change it if they have the +fun flag.

code/__HELPERS/names.dm

@@ -20,7 +20,23 @@ var/command_name = null
 	if (command_name)
 		return command_name
 
-	var/name = "Central Command"
+	var/name = ""
+
+	if (prob(10))
+		name += pick("Super", "Ultra")
+		name += " "
+
+	// Prefix
+	if (name)
+		name += pick("", "Central", "System", "Home")
+	else
+		name += pick("Central", "System", "Home")
+	if (name)
+		name += " "
+
+	// Suffix
+	name += pick("Federation", "Command", "Alliance", "Unity", "Empire", "Confederation", "Protectorate", "Commonwealth", "Imperium", "Republic")
+	name += " "
 
 	command_name = name
 	return name

code/game/gamemodes/game_mode.dm

@@ -167,7 +167,7 @@
 
 
 /datum/game_mode/proc/send_intercept()
-	var/intercepttext = "<FONT size = 3><B>Cent. Com. Update</B> Requested status information:</FONT><HR>"
+	var/intercepttext = "<FONT size = 3><B>[command_name()] Update</B> Requested status information:</FONT><HR>"
 	intercepttext += "<B> In case you have misplaced your copy, attached is a list of personnel whom reliable sources&trade; suspect may be affiliated with the Syndicate:</B><br>"
 
 
@@ -211,15 +211,15 @@
 	for (var/obj/machinery/computer/communications/comm in world)
 		if (!(comm.stat & (BROKEN | NOPOWER)) && comm.prints_intercept)
 			var/obj/item/weapon/paper/intercept = new /obj/item/weapon/paper( comm.loc )
-			intercept.name = "paper- 'Cent. Com. Status Summary'"
+			intercept.name = "paper- '[command_name()] Status Summary'"
 			intercept.info = intercepttext
 
-			comm.messagetitle.Add("Cent. Com. Status Summary")
+			comm.messagetitle.Add("[command_name()] Status Summary")
 			comm.messagetext.Add(intercepttext)
 	world << sound('commandreport.ogg')
 
-/*	command_alert("Summary downloaded and printed out at all communications consoles.", "Enemy communication intercept. Security Level Elevated.")
+	command_alert("Summary downloaded and printed out at all communications consoles.", "Enemy communication intercept.")
-	for(var/mob/M in player_list)
+/*	for(var/mob/M in player_list)
 		if(!istype(M,/mob/new_player))
 			M << sound('sound/AI/intercept.ogg')
 	if(security_level < SEC_LEVEL_BLUE)

code/modules/admin/admin_verbs.dm

@@ -94,7 +94,8 @@ var/list/admin_verbs_fun = list(
 	/client/proc/make_sound,
 	/client/proc/toggle_random_events,
 	/client/proc/set_ooc,
-	/client/proc/editappear
+	/client/proc/editappear,
+	/client/proc/commandname
 	)
 var/list/admin_verbs_spawn = list(
 	/datum/admins/proc/spawn_atom,		/*allows us to spawn instances*/
@@ -727,6 +728,13 @@ var/list/admin_verbs_mod = list(
 	else
 		usr << "You now won't get attack log messages"
 
+/client/proc/commandname()
+	set name = "Set Command Name"
+	set category = "Fun"
+
+	var/text = input(usr,"Please select a new Central Command name.", null)as text|null
+	if(text)
+		change_command_name(text)
 
 /client/proc/toggledebuglogs()
 	set name = "Toggle Debug Log Messages"