cyberpresidentvanellope/vgstation13
1
0
Fork 0
mirror of https://github.com/vgstation-coders/vgstation13.git synced 2025-12-10 02:16:05 +00:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
d3athrow
2013-08-18 16:17:55 -05:00
parent 56c9a3f985
commit 12826d260a
3 changed files with 31 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
code/__HELPERS/names.dm
View File

@@ -20,7 +20,23 @@ var/command_name = null
if (command_name) if (command_name)
return 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 command_name = name
return name return name

10
code/game/gamemodes/game_mode.dm
View File

@@ -167,7 +167,7 @@
/datum/game_mode/proc/send_intercept() /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>" 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) for (var/obj/machinery/computer/communications/comm in world)
if (!(comm.stat & (BROKEN | NOPOWER)) && comm.prints_intercept) if (!(comm.stat & (BROKEN | NOPOWER)) && comm.prints_intercept)
var/obj/item/weapon/paper/intercept = new /obj/item/weapon/paper( comm.loc ) 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 intercept.info = intercepttext
comm.messagetitle.Add("Cent. Com. Status Summary") comm.messagetitle.Add("[command_name()] Status Summary")
comm.messagetext.Add(intercepttext) comm.messagetext.Add(intercepttext)
world << sound('commandreport.ogg') 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)) if(!istype(M,/mob/new_player))
M << sound('sound/AI/intercept.ogg') M << sound('sound/AI/intercept.ogg')
if(security_level < SEC_LEVEL_BLUE) if(security_level < SEC_LEVEL_BLUE)

10
code/modules/admin/admin_verbs.dm
View File

@@ -94,7 +94,8 @@ var/list/admin_verbs_fun = list(
/client/proc/make_sound, /client/proc/make_sound,
/client/proc/toggle_random_events, /client/proc/toggle_random_events,
/client/proc/set_ooc, /client/proc/set_ooc,
/client/proc/editappear /client/proc/editappear,
/client/proc/commandname
) )
var/list/admin_verbs_spawn = list( var/list/admin_verbs_spawn = list(
/datum/admins/proc/spawn_atom, /*allows us to spawn instances*/ /datum/admins/proc/spawn_atom, /*allows us to spawn instances*/
@@ -727,6 +728,13 @@ var/list/admin_verbs_mod = list(
else else
usr << "You now won't get attack log messages" 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() /client/proc/toggledebuglogs()
set name = "Toggle Debug Log Messages" set name = "Toggle Debug Log Messages"