var/global/BSACooldown = 0 var/global/floorIsLava = 0 //////////////////////////////// /proc/message_admins(var/msg) msg = "ADMIN LOG: [msg]" log_adminwarn(msg) for(var/client/C in admins) if(R_ADMIN & C.holder.rights) C << msg /proc/msg_admin_attack(var/text) //Toggleable Attack Messages log_attack(text) var/rendered = "ATTACK: [text]" for(var/client/C in admins) if(R_ADMIN & C.holder.rights) if(C.prefs.toggles & CHAT_ATTACKLOGS) var/msg = rendered C << msg proc/admin_notice(var/message, var/rights) for(var/mob/M in mob_list) if(check_rights(rights, 0, M)) M << message ///////////////////////////////////////////////////////////////////////////////////////////////Panels /datum/admins/proc/show_player_panel(var/mob/M in mob_list) set category = "Admin" set name = "Show Player Panel" set desc="Edit player (respawn, ban, heal, etc)" if(!M) usr << "You seem to be selecting a mob that doesn't exist anymore." return if (!istype(src,/datum/admins)) src = usr.client.holder if (!istype(src,/datum/admins)) usr << "Error: you are not an admin!" return var/body = "Options for [M.key]" body += "Options panel for [M]" if(M.client) body += " played by [M.client] " body += "\[[M.client.holder ? M.client.holder.rank : "Player"]\]" if(istype(M, /mob/new_player)) body += " Hasn't Entered Game " else body += " \[Heal\] " body += {"

\[ VV - TP - PM - SM - [admin_jump_link(M, src)]\]
Mob type = [M.type]

Kick | Warn | Ban | Jobban | Notes "} if(M.client) body += "| Prison | " var/muted = M.client.prefs.muted body += {"
Mute: \[IC | OOC | PRAY | ADMINHELP | DEADCHAT\] (toggle all) "} body += {"

Jump to | Get | Send To

[check_rights(R_ADMIN|R_MOD,0) ? "Traitor panel | " : "" ] Narrate to | Subtle message "} if (M.client) if(!istype(M, /mob/new_player)) body += "

" body += "Transformation:" body += "
" //Monkey if(issmall(M)) body += "Monkeyized | " else body += "Monkeyize | " //Corgi if(iscorgi(M)) body += "Corgized | " else body += "Corgize | " //AI / Cyborg if(isAI(M)) body += "Is an AI " else if(ishuman(M)) body += {"Make AI | Make Robot | Make Alien | Make slime "} //Simple Animals if(isanimal(M)) body += "Re-Animalize | " else body += "Animalize | " // DNA2 - Admin Hax if(M.dna && iscarbon(M)) body += "

" body += "DNA Blocks:
" var/bname for(var/block=1;block<=DNA_SE_LENGTH;block++) if(((block-1)%5)==0) body += "" bname = assigned_blocks[block] body += "" body += "
 12345
[block-1]" if(bname) var/bstate=M.dna.GetSEState(block) var/bcolor="[(bstate)?"#006600":"#ff0000"]" body += "[bname][block]" else body += "[block]" body+="
" body += {"

Rudimentary transformation:
These transformations only create a new mob type and copy stuff over. They do not take into account MMIs and similar mob-specific things. The buttons in 'Transformations' are preferred, when possible.

Observer | \[ Xenos: Larva Drone Hunter Sentinel Queen \] | \[ Crew: Human Unathi Tajaran Skrell Vox \] | \[ Nymph Diona \] | \[ slime: Baby, Adult \] Monkey | Cyborg | Cat | Runtime | Corgi | Ian | Crab | Coffee | \[ Construct: Armoured , Builder , Wraith \] Shade
"} body += {"

Other actions:
Forcesay "} if (M.client) body += {" | Thunderdome 1 | Thunderdome 2 | Thunderdome Admin | Thunderdome Observer | "} // language toggles body += "

Languages:
" var/f = 1 for(var/k in all_languages) var/datum/language/L = all_languages[k] if(!(L.flags & INNATE)) if(!f) body += " | " else f = 0 if(L in M.languages) body += "[k]" else body += "[k]" body += {"
"} usr << browse(body, "window=adminplayeropts;size=550x515") feedback_add_details("admin_verb","SPP") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/player_info/var/author // admin who authored the information /datum/player_info/var/rank //rank of admin who made the notes /datum/player_info/var/content // text content of the information /datum/player_info/var/timestamp // Because this is bloody annoying #define PLAYER_NOTES_ENTRIES_PER_PAGE 50 /datum/admins/proc/PlayerNotes() set category = "Admin" set name = "Player Notes" if (!istype(src,/datum/admins)) src = usr.client.holder if (!istype(src,/datum/admins)) usr << "Error: you are not an admin!" return PlayerNotesPage(1) /datum/admins/proc/PlayerNotesPage(page) var/dat = "Player notes
" var/savefile/S=new("data/player_notes.sav") var/list/note_keys S >> note_keys if(!note_keys) dat += "No notes found." else dat += "" note_keys = sortList(note_keys) // Display the notes on the current page var/number_pages = note_keys.len / PLAYER_NOTES_ENTRIES_PER_PAGE // Emulate ceil(why does BYOND not have ceil) if(number_pages != round(number_pages)) number_pages = round(number_pages) + 1 var/page_index = page - 1 if(page_index < 0 || page_index >= number_pages) return var/lower_bound = page_index * PLAYER_NOTES_ENTRIES_PER_PAGE + 1 var/upper_bound = (page_index + 1) * PLAYER_NOTES_ENTRIES_PER_PAGE upper_bound = min(upper_bound, note_keys.len) for(var/index = lower_bound, index <= upper_bound, index++) var/t = note_keys[index] dat += "" dat += "
[t]

" // Display a footer to select different pages for(var/index = 1, index <= number_pages, index++) if(index == page) dat += "" dat += "[index] " if(index == page) dat += "" usr << browse(dat, "window=player_notes;size=400x400") /datum/admins/proc/player_has_info(var/key as text) var/savefile/info = new("data/player_saves/[copytext(key, 1, 2)]/[key]/info.sav") var/list/infos info >> infos if(!infos || !infos.len) return 0 else return 1 /datum/admins/proc/show_player_info(var/key as text) set category = "Admin" set name = "Show Player Info" if (!istype(src,/datum/admins)) src = usr.client.holder if (!istype(src,/datum/admins)) usr << "Error: you are not an admin!" return var/dat = "Info on [key]" dat += "" var/p_age = "unknown" for(var/client/C in clients) if(C.ckey == key) p_age = C.player_age break dat +="Player age: [p_age]
" var/savefile/info = new("data/player_saves/[copytext(key, 1, 2)]/[key]/info.sav") var/list/infos info >> infos if(!infos) dat += "No information found on the given key.
" else var/update_file = 0 var/i = 0 for(var/datum/player_info/I in infos) i += 1 if(!I.timestamp) I.timestamp = "Pre-4/3/2012" update_file = 1 if(!I.rank) I.rank = "N/A" update_file = 1 dat += "[I.content] by [I.author] ([I.rank]) on [I.timestamp] " if(I.author == usr.key || I.author == "Adminbot" || ishost(usr)) dat += "Remove" dat += "

" if(update_file) info << infos dat += "
" dat += "Add Comment
" dat += "" usr << browse(dat, "window=adminplayerinfo;size=480x480") /datum/admins/proc/access_news_network() //MARKER set category = "Fun" set name = "Access Newscaster Network" set desc = "Allows you to view, add and edit news feeds." if (!istype(src,/datum/admins)) src = usr.client.holder if (!istype(src,/datum/admins)) usr << "Error: you are not an admin!" return var/dat dat = text("Admin Newscaster

Admin Newscaster Unit

") switch(admincaster_screen) if(0) dat += {"Welcome to the admin newscaster.
Here you can add, edit and censor every newspiece on the network.
Feed channels and stories entered through here will be uneditable and handled as official news by the rest of the units.
Note that this panel allows full freedom over the news network, there are no constrictions except the few basic ones. Don't break things! "} if(news_network.wanted_issue) dat+= "
Read Wanted Issue" dat+= {"

Create Feed Channel
View Feed Channels
Submit new Feed story

Exit "} var/wanted_already = 0 if(news_network.wanted_issue) wanted_already = 1 dat+={"
Feed Security functions:

[(wanted_already) ? ("Manage") : ("Publish")] \"Wanted\" Issue
Censor Feed Stories
Mark Feed Channel with Nanotrasen D-Notice (disables and locks the channel.

The newscaster recognises you as:
[src.admincaster_signature]
"} if(1) dat+= "Station Feed Channels
" if( isemptylist(news_network.network_channels) ) dat+="No active channels found..." else for(var/datum/feed_channel/CHANNEL in news_network.network_channels) if(CHANNEL.is_admin_channel) dat+="[CHANNEL.channel_name]
" else dat+="[CHANNEL.channel_name] [(CHANNEL.censored) ? ("***") : ()]
" dat+={"

Refresh
Back "} if(2) dat+={" Creating new Feed Channel...
Channel Name: [src.admincaster_feed_channel.channel_name]
Channel Author: [src.admincaster_signature]
Will Accept Public Feeds: [(src.admincaster_feed_channel.locked) ? ("NO") : ("YES")]


Submit

Cancel
"} if(3) dat+={" Creating new Feed Message...
Receiving Channel: [src.admincaster_feed_channel.channel_name]
" //MARK Message Author: [src.admincaster_signature]
Message Body: [src.admincaster_feed_message.body]

Submit

Cancel
"} if(4) dat+={" Feed story successfully submitted to [src.admincaster_feed_channel.channel_name].


Return
"} if(5) dat+={" Feed Channel [src.admincaster_feed_channel.channel_name] created successfully.


Return
"} if(6) dat+="ERROR: Could not submit Feed story to Network.

" if(src.admincaster_feed_channel.channel_name=="") dat+="•Invalid receiving channel name.
" if(src.admincaster_feed_message.body == "" || src.admincaster_feed_message.body == "\[REDACTED\]") dat+="•Invalid message body.
" dat+="
Return
" if(7) dat+="ERROR: Could not submit Feed Channel to Network.

" if(src.admincaster_feed_channel.channel_name =="" || src.admincaster_feed_channel.channel_name == "\[REDACTED\]") dat+="•Invalid channel name.
" var/check = 0 for(var/datum/feed_channel/FC in news_network.network_channels) if(FC.channel_name == src.admincaster_feed_channel.channel_name) check = 1 break if(check) dat+="•Channel name already in use.
" dat+="
Return
" if(9) dat+="[src.admincaster_feed_channel.channel_name]: \[created by: [src.admincaster_feed_channel.author]\]
" if(src.admincaster_feed_channel.censored) dat+={" ATTENTION: This channel has been deemed as threatening to the welfare of the station, and marked with a Nanotrasen D-Notice.
No further feed story additions are allowed while the D-Notice is in effect.

"} else if( isemptylist(src.admincaster_feed_channel.messages) ) dat+="No feed messages found in channel...
" else var/i = 0 for(var/datum/feed_message/MESSAGE in src.admincaster_feed_channel.messages) i++ dat+="-[MESSAGE.body]
" if(MESSAGE.img) usr << browse_rsc(MESSAGE.img, "tmp_photo[i].png") dat+="

" dat+="\[Story by [MESSAGE.author]\]
" dat+={"

Refresh
Back "} if(10) dat+={" Nanotrasen Feed Censorship Tool
NOTE: Due to the nature of news Feeds, total deletion of a Feed Story is not possible.
Keep in mind that users attempting to view a censored feed will instead see the \[REDACTED\] tag above it.

Select Feed channel to get Stories from:
"} if(isemptylist(news_network.network_channels)) dat+="No feed channels found active...
" else for(var/datum/feed_channel/CHANNEL in news_network.network_channels) dat+="[CHANNEL.channel_name] [(CHANNEL.censored) ? ("***") : ()]
" dat+="
Cancel" if(11) dat+={" Nanotrasen D-Notice Handler
A D-Notice is to be bestowed upon the channel if the handling Authority deems it as harmful for the station's morale, integrity or disciplinary behaviour. A D-Notice will render a channel unable to be updated by anyone, without deleting any feed stories it might contain at the time. You can lift a D-Notice if you have the required access at any time.
"} if(isemptylist(news_network.network_channels)) dat+="No feed channels found active...
" else for(var/datum/feed_channel/CHANNEL in news_network.network_channels) dat+="[CHANNEL.channel_name] [(CHANNEL.censored) ? ("***") : ()]
" dat+="
Back" if(12) dat+={" [src.admincaster_feed_channel.channel_name]: \[ created by: [src.admincaster_feed_channel.author] \]
[(src.admincaster_feed_channel.author=="\[REDACTED\]") ? ("Undo Author censorship") : ("Censor channel Author")]
"} if( isemptylist(src.admincaster_feed_channel.messages) ) dat+="No feed messages found in channel...
" else for(var/datum/feed_message/MESSAGE in src.admincaster_feed_channel.messages) dat+={" -[MESSAGE.body]
\[Story by [MESSAGE.author]\]
[(MESSAGE.body == "\[REDACTED\]") ? ("Undo story censorship") : ("Censor story")] - [(MESSAGE.author == "\[REDACTED\]") ? ("Undo Author Censorship") : ("Censor message Author")]
"} dat+="
Back" if(13) dat+={" [src.admincaster_feed_channel.channel_name]: \[ created by: [src.admincaster_feed_channel.author] \]
Channel messages listed below. If you deem them dangerous to the station, you can Bestow a D-Notice upon the channel.
"} if(src.admincaster_feed_channel.censored) dat+={" ATTENTION: This channel has been deemed as threatening to the welfare of the station, and marked with a Nanotrasen D-Notice.
No further feed story additions are allowed while the D-Notice is in effect.

"} else if( isemptylist(src.admincaster_feed_channel.messages) ) dat+="No feed messages found in channel...
" else for(var/datum/feed_message/MESSAGE in src.admincaster_feed_channel.messages) dat+="-[MESSAGE.body]
\[Story by [MESSAGE.author]\]
" dat+="
Back" if(14) dat+="Wanted Issue Handler:" var/wanted_already = 0 var/end_param = 1 if(news_network.wanted_issue) wanted_already = 1 end_param = 2 if(wanted_already) dat+="
A wanted issue is already in Feed Circulation. You can edit or cancel it below.
" dat+={"
Criminal Name: [src.admincaster_feed_message.author]
Description: [src.admincaster_feed_message.body]
"} if(wanted_already) dat+="Wanted Issue created by: [news_network.wanted_issue.backup_author]
" else dat+="Wanted Issue will be created under prosecutor: [src.admincaster_signature]
" dat+="
[(wanted_already) ? ("Edit Issue") : ("Submit")]" if(wanted_already) dat+="
Take down Issue" dat+="
Cancel" if(15) dat+={" Wanted issue for [src.admincaster_feed_message.author] is now in Network Circulation.


Return
"} if(16) dat+="ERROR: Wanted Issue rejected by Network.

" if(src.admincaster_feed_message.author =="" || src.admincaster_feed_message.author == "\[REDACTED\]") dat+="•Invalid name for person wanted.
" if(src.admincaster_feed_message.body == "" || src.admincaster_feed_message.body == "\[REDACTED\]") dat+="•Invalid description.
" dat+="
Return
" if(17) dat+={" Wanted Issue successfully deleted from Circulation

Return
"} if(18) dat+={" -- STATIONWIDE WANTED ISSUE --
\[Submitted by: [news_network.wanted_issue.backup_author]\]
Criminal: [news_network.wanted_issue.author]
Description: [news_network.wanted_issue.body]
Photo:: "} if(news_network.wanted_issue.img) usr << browse_rsc(news_network.wanted_issue.img, "tmp_photow.png") dat+="
" else dat+="None" dat+="
Back
" if(19) dat+={" Wanted issue for [src.admincaster_feed_message.author] successfully edited.


Return
"} else dat+="I'm sorry to break your immersion. This shit's bugged. Report this bug to Agouri, polyxenitopalidou@gmail.com" //world << "Channelname: [src.admincaster_feed_channel.channel_name] [src.admincaster_feed_channel.author]" //world << "Msg: [src.admincaster_feed_message.author] [src.admincaster_feed_message.body]" usr << browse(dat, "window=admincaster_main;size=400x600") onclose(usr, "admincaster_main") /datum/admins/proc/Jobbans() if(!check_rights(R_BAN)) return var/dat = "Job Bans!
" for(var/t in jobban_keylist) var/r = t if( findtext(r,"##") ) r = copytext( r, 1, findtext(r,"##") )//removes the description dat += text("") dat += "
[t] (unban)
" usr << browse(dat, "window=ban;size=400x400") /datum/admins/proc/Game() if(!check_rights(0)) return var/dat = {"
Game Panel

\n Change Game Mode
"} if(master_mode == "secret") dat += "(Force Secret Mode)
" dat += {"
Create Object
Quick Create Object
Create Turf
Create Mob

Edit Airflow Settings
Edit Phoron Settings
Choose a default ZAS setting
"} usr << browse(dat, "window=admin2;size=210x280") return /datum/admins/proc/Secrets() if(!check_rights(0)) return var/dat = "The first rule of adminbuse is: you don't talk about the adminbuse.
" if(check_rights(R_ADMIN,0)) dat += {" Admin Secrets

Bombing List
Show current traitors and objectives
Show last [length(lastsignalers)] signalers
Show last [length(lawchanges)] law changes
Show AI Laws
Show Game Mode
Show Crew Manifest
List DNA (Blood)
List Fingerprints


"} if(check_rights(R_FUN,0)) dat += {" 'Random' Events

Toggle station artificial gravity
Spawn a wave of meteors (aka lagocolyptic shower)
Spawn a gravitational anomaly (aka lagitational anomolag)
Spawn wormholes
Spawn blob
Trigger a Xenomorph infestation
Trigger a Cortical Borer infestation
Spawn an Alien silently
Trigger a Spider infestation
Send in a space ninja
Send in a strike team
Trigger an Carp migration
Irradiate the station
Trigger a Prison Break
Trigger a Virus Outbreak
Spawn an Immovable Rod
Toggle a "lights out" event
Spawn an Ion Storm
Spawn Space-Vines
Trigger a communication blackout

Fun Secrets

Remove 'internal' clothing
Remove ALL clothing
Turn all humans into monkeys
Remove firesuits, grilles, and pods
Make all areas powered
Make all areas unpowered
Power all SMES
Toggle Prison Shuttle Status(Use with S/R)
Send Prison Shuttle
Return Prison Shuttle
Warp all Players to Prison
Triple AI mode (needs to be used in the lobby)
Everyone is the traitor
There can only be one!
Ghost Mode
Make all players retarded
Make all items look like guns
Paintball Mode
Japanese Animes Mode
Egalitarian Station Mode
Launch a shuttle
Force launch a shuttle
Jump a shuttle
Move a shuttle
Break all lights
Fix all lights
Best Friend AI
The floor is lava! (DANGEROUS: extremely lame)
"} if(check_rights(R_SERVER,0)) dat += "Toggle bomb cap
" if(check_rights(R_SERVER|R_FUN,0)) dat += {"
Final Solutions
(Warning, these will end the round!)

Summon Nar-Sie
Start a Supermatter Cascade
"} dat += "
" if(check_rights(R_DEBUG,0)) dat += {" Security Level Elevated

Change all maintenance doors to engie/brig access only
Change all maintenance doors to brig access only
Remove cap on security officers

Coder Secrets

Show Job Debug
Admin Log

"} usr << browse(dat, "window=secrets") return /////////////////////////////////////////////////////////////////////////////////////////////////admins2.dm merge //i.e. buttons/verbs /datum/admins/proc/restart() set category = "Server" set name = "Restart" set desc="Restarts the world" if (!usr.client.holder) return var/confirm = alert("Restart the game world?", "Restart", "Yes", "Cancel") if(confirm == "Cancel") return if(confirm == "Yes") world << "Restarting world! Initiated by [usr.client.holder.fakekey ? "Admin" : usr.key]!" log_admin("[key_name(usr)] initiated a reboot.") feedback_set_details("end_error","admin reboot - by [usr.key] [usr.client.holder.fakekey ? "(stealth)" : ""]") feedback_add_details("admin_verb","R") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! if(blackbox) blackbox.save_all_data_to_sql() sleep(50) world.Reboot() /datum/admins/proc/announce() set category = "Special Verbs" set name = "Announce" set desc="Announce your desires to the world" if(!check_rights(0)) return var/message = input("Global message to send:", "Admin Announce", null, null) as message//todo: sanitize for all? if(message) if(!check_rights(R_SERVER,0)) message = sanitize(message, 500, extra = 0) world << "\blue [usr.client.holder.fakekey ? "Administrator" : usr.key] Announces:\n \t [message]" log_admin("Announce: [key_name(usr)] : [message]") feedback_add_details("admin_verb","A") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/toggleooc() set category = "Server" set desc="Globally Toggles OOC" set name="Toggle OOC" if(!check_rights(R_ADMIN)) return config.ooc_allowed = !(config.ooc_allowed) if (config.ooc_allowed) world << "The OOC channel has been globally enabled!" else world << "The OOC channel has been globally disabled!" log_and_message_admins("toggled OOC.") feedback_add_details("admin_verb","TOOC") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/togglelooc() set category = "Server" set desc="Globally Toggles LOOC" set name="Toggle LOOC" if(!check_rights(R_ADMIN)) return config.looc_allowed = !(config.looc_allowed) if (config.looc_allowed) world << "The LOOC channel has been globally enabled!" else world << "The LOOC channel has been globally disabled!" log_and_message_admins("toggled LOOC.") feedback_add_details("admin_verb","TLOOC") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/toggledsay() set category = "Server" set desc="Globally Toggles DSAY" set name="Toggle DSAY" if(!check_rights(R_ADMIN)) return config.dsay_allowed = !(config.dsay_allowed) if (config.dsay_allowed) world << "Deadchat has been globally enabled!" else world << "Deadchat has been globally disabled!" log_admin("[key_name(usr)] toggled deadchat.") message_admins("[key_name_admin(usr)] toggled deadchat.", 1) feedback_add_details("admin_verb","TDSAY") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc /datum/admins/proc/toggleoocdead() set category = "Server" set desc="Toggle Dead OOC." set name="Toggle Dead OOC" if(!check_rights(R_ADMIN)) return config.dooc_allowed = !( config.dooc_allowed ) log_admin("[key_name(usr)] toggled Dead OOC.") message_admins("[key_name_admin(usr)] toggled Dead OOC.", 1) feedback_add_details("admin_verb","TDOOC") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/toggletraitorscaling() set category = "Server" set desc="Toggle traitor scaling" set name="Toggle Traitor Scaling" config.traitor_scaling = !config.traitor_scaling log_admin("[key_name(usr)] toggled Traitor Scaling to [config.traitor_scaling].") message_admins("[key_name_admin(usr)] toggled Traitor Scaling [config.traitor_scaling ? "on" : "off"].", 1) feedback_add_details("admin_verb","TTS") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/startnow() set category = "Server" set desc="Start the round RIGHT NOW" set name="Start Now" if(!ticker) alert("Unable to start the game as it is not set up.") return if(ticker.current_state == GAME_STATE_PREGAME) ticker.current_state = GAME_STATE_SETTING_UP log_admin("[usr.key] has started the game.") message_admins("[usr.key] has started the game.") feedback_add_details("admin_verb","SN") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! return 1 else usr << "Error: Start Now: Game has already started." return 0 /datum/admins/proc/toggleenter() set category = "Server" set desc="People can't enter" set name="Toggle Entering" config.enter_allowed = !(config.enter_allowed) if (!(config.enter_allowed)) world << "New players may no longer enter the game." else world << "New players may now enter the game." log_admin("[key_name(usr)] toggled new player game entering.") message_admins("\blue [key_name_admin(usr)] toggled new player game entering.", 1) world.update_status() feedback_add_details("admin_verb","TE") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/toggleAI() set category = "Server" set desc="People can't be AI" set name="Toggle AI" config.allow_ai = !( config.allow_ai ) if (!( config.allow_ai )) world << "The AI job is no longer chooseable." else world << "The AI job is chooseable now." log_admin("[key_name(usr)] toggled AI allowed.") world.update_status() feedback_add_details("admin_verb","TAI") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/toggleaban() set category = "Server" set desc="Respawn basically" set name="Toggle Respawn" config.abandon_allowed = !(config.abandon_allowed) if(config.abandon_allowed) world << "You may now respawn." else world << "You may no longer respawn :(" message_admins("\blue [key_name_admin(usr)] toggled respawn to [config.abandon_allowed ? "On" : "Off"].", 1) log_admin("[key_name(usr)] toggled respawn to [config.abandon_allowed ? "On" : "Off"].") world.update_status() feedback_add_details("admin_verb","TR") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/toggle_aliens() set category = "Server" set desc="Toggle alien mobs" set name="Toggle Aliens" config.aliens_allowed = !config.aliens_allowed log_admin("[key_name(usr)] toggled Aliens to [config.aliens_allowed].") message_admins("[key_name_admin(usr)] toggled Aliens [config.aliens_allowed ? "on" : "off"].", 1) feedback_add_details("admin_verb","TA") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/toggle_space_ninja() set category = "Server" set desc="Toggle space ninjas spawning." set name="Toggle Space Ninjas" config.ninjas_allowed = !config.ninjas_allowed log_admin("[key_name(usr)] toggled Space Ninjas to [config.ninjas_allowed].") message_admins("[key_name_admin(usr)] toggled Space Ninjas [config.ninjas_allowed ? "on" : "off"].", 1) feedback_add_details("admin_verb","TSN") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/delay() set category = "Server" set desc="Delay the game start/end" set name="Delay" if(!check_rights(R_SERVER)) return if (!ticker || ticker.current_state != GAME_STATE_PREGAME) ticker.delay_end = !ticker.delay_end log_admin("[key_name(usr)] [ticker.delay_end ? "delayed the round end" : "has made the round end normally"].") message_admins("\blue [key_name(usr)] [ticker.delay_end ? "delayed the round end" : "has made the round end normally"].", 1) return //alert("Round end delayed", null, null, null, null, null) round_progressing = !round_progressing if (!round_progressing) world << "The game start has been delayed." log_admin("[key_name(usr)] delayed the game.") else world << "The game will start soon." log_admin("[key_name(usr)] removed the delay.") feedback_add_details("admin_verb","DELAY") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/adjump() set category = "Server" set desc="Toggle admin jumping" set name="Toggle Jump" config.allow_admin_jump = !(config.allow_admin_jump) message_admins("\blue Toggled admin jumping to [config.allow_admin_jump].") feedback_add_details("admin_verb","TJ") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/adspawn() set category = "Server" set desc="Toggle admin spawning" set name="Toggle Spawn" config.allow_admin_spawning = !(config.allow_admin_spawning) message_admins("\blue Toggled admin item spawning to [config.allow_admin_spawning].") feedback_add_details("admin_verb","TAS") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/adrev() set category = "Server" set desc="Toggle admin revives" set name="Toggle Revive" config.allow_admin_rev = !(config.allow_admin_rev) message_admins("\blue Toggled reviving to [config.allow_admin_rev].") feedback_add_details("admin_verb","TAR") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/immreboot() set category = "Server" set desc="Reboots the server post haste" set name="Immediate Reboot" if(!usr.client.holder) return if( alert("Reboot server?",,"Yes","No") == "No") return world << "\red Rebooting world! \blue Initiated by [usr.client.holder.fakekey ? "Admin" : usr.key]!" log_admin("[key_name(usr)] initiated an immediate reboot.") feedback_set_details("end_error","immediate admin reboot - by [usr.key] [usr.client.holder.fakekey ? "(stealth)" : ""]") feedback_add_details("admin_verb","IR") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! if(blackbox) blackbox.save_all_data_to_sql() world.Reboot() /datum/admins/proc/unprison(var/mob/M in mob_list) set category = "Admin" set name = "Unprison" if (M.z == 2) if (config.allow_admin_jump) M.loc = pick(latejoin) message_admins("[key_name_admin(usr)] has unprisoned [key_name_admin(M)]", 1) log_admin("[key_name(usr)] has unprisoned [key_name(M)]") else alert("Admin jumping disabled") else alert("[M.name] is not prisoned.") feedback_add_details("admin_verb","UP") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! ////////////////////////////////////////////////////////////////////////////////////////////////ADMIN HELPER PROCS /proc/is_special_character(mob/M as mob) // returns 1 for specail characters and 2 for heroes of gamemode if(!ticker || !ticker.mode) return 0 if (!istype(M)) return 0 if(M.mind) if(ticker.mode.antag_templates && ticker.mode.antag_templates.len) for(var/datum/antagonist/antag in ticker.mode.antag_templates) if(antag.is_antagonist(M.mind)) return 2 else if(M.mind.special_role) return 1 if(isrobot(M)) var/mob/living/silicon/robot/R = M if(R.emagged) return 1 return 0 /datum/admins/proc/spawn_fruit(seedtype in plant_controller.seeds) set category = "Debug" set desc = "Spawn the product of a seed." set name = "Spawn Fruit" if(!check_rights(R_SPAWN)) return if(!seedtype || !plant_controller.seeds[seedtype]) return var/datum/seed/S = plant_controller.seeds[seedtype] S.harvest(usr,0,0,1) log_admin("[key_name(usr)] spawned [seedtype] fruit at ([usr.x],[usr.y],[usr.z])") /datum/admins/proc/spawn_custom_item() set category = "Debug" set desc = "Spawn a custom item." set name = "Spawn Custom Item" if(!check_rights(R_SPAWN)) return var/owner = input("Select a ckey.", "Spawn Custom Item") as null|anything in custom_items if(!owner|| !custom_items[owner]) return var/list/possible_items = custom_items[owner] var/datum/custom_item/item_to_spawn = input("Select an item to spawn.", "Spawn Custom Item") as null|anything in possible_items if(!item_to_spawn) return item_to_spawn.spawn_item(get_turf(usr)) /datum/admins/proc/check_custom_items() set category = "Debug" set desc = "Check the custom item list." set name = "Check Custom Items" if(!check_rights(R_SPAWN)) return if(!custom_items) usr << "Custom item list is null." return if(!custom_items.len) usr << "Custom item list not populated." return for(var/assoc_key in custom_items) usr << "[assoc_key] has:" var/list/current_items = custom_items[assoc_key] for(var/datum/custom_item/item in current_items) usr << "- name: [item.name] icon: [item.item_icon] path: [item.item_path] desc: [item.item_desc]" /datum/admins/proc/spawn_plant(seedtype in plant_controller.seeds) set category = "Debug" set desc = "Spawn a spreading plant effect." set name = "Spawn Plant" if(!check_rights(R_SPAWN)) return if(!seedtype || !plant_controller.seeds[seedtype]) return new /obj/effect/plant(get_turf(usr), plant_controller.seeds[seedtype]) log_admin("[key_name(usr)] spawned [seedtype] vines at ([usr.x],[usr.y],[usr.z])") /datum/admins/proc/spawn_atom(var/object as text) set category = "Debug" set desc = "(atom path) Spawn an atom" set name = "Spawn" if(!check_rights(R_SPAWN)) return var/list/types = typesof(/atom) var/list/matches = new() for(var/path in types) if(findtext("[path]", object)) matches += path if(matches.len==0) return var/chosen if(matches.len==1) chosen = matches[1] else chosen = input("Select an atom type", "Spawn Atom", matches[1]) as null|anything in matches if(!chosen) return if(ispath(chosen,/turf)) var/turf/T = get_turf(usr.loc) T.ChangeTurf(chosen) else new chosen(usr.loc) log_admin("[key_name(usr)] spawned [chosen] at ([usr.x],[usr.y],[usr.z])") feedback_add_details("admin_verb","SA") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/show_traitor_panel(var/mob/M in mob_list) set category = "Admin" set desc = "Edit mobs's memory and role" set name = "Show Traitor Panel" if(!istype(M)) usr << "This can only be used on instances of type /mob" return if(!M.mind) usr << "This mob has no mind!" return M.mind.edit_memory() feedback_add_details("admin_verb","STP") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/show_game_mode() set category = "Admin" set desc = "Show the current round configuration." set name = "Show Game Mode" if(!ticker || !ticker.mode) alert("Not before roundstart!", "Alert") return var/out = "Current mode: [ticker.mode.name] ([ticker.mode.config_tag])
" out += "
" if(ticker.mode.ert_disabled) out += "Emergency Response Teams: disabled" else out += "Emergency Response Teams: enabled" out += "
" if(ticker.mode.deny_respawn) out += "Respawning: disallowed" else out += "Respawning: allowed" out += "
" out += "Shuttle delay multiplier: [ticker.mode.shuttle_delay]
" if(ticker.mode.auto_recall_shuttle) out += "Shuttle auto-recall: enabled" else out += "Shuttle auto-recall: disabled" out += "

" if(ticker.mode.event_delay_mod_moderate) out += "Moderate event time modifier: [ticker.mode.event_delay_mod_moderate]
" else out += "Moderate event time modifier: unset
" if(ticker.mode.event_delay_mod_major) out += "Major event time modifier: [ticker.mode.event_delay_mod_major]
" else out += "Major event time modifier: unset
" out += "
" if(ticker.mode.antag_tag) out += "Core antag id: [ticker.mode.antag_tag].
" if(ticker.mode.round_autoantag) out += "Autotraitor enabled ([ticker.mode.get_antag_prob()]% spawn chance)" if(ticker.mode.antag_scaling_coeff) out += " (scaling with [ticker.mode.antag_scaling_coeff])" out += "
" else out += "Autotraitor disabled.
" out += "All antag ids:" if(ticker.mode.antag_templates && ticker.mode.antag_templates.len). var/playercount = ticker.mode.num_players() for(var/datum/antagonist/antag in ticker.mode.antag_templates) var/cur_max_antags if(ticker.mode.antag_tag && antag.id == ticker.mode.antag_tag) cur_max_antags = antag.max_antags_round else cur_max_antags = antag.max_antags if(ticker.mode.antag_scaling_coeff) cur_max_antags = Clamp((playercount/ticker.mode.antag_scaling_coeff), 1, cur_max_antags) out += " [antag.id]" out += " ([antag.get_antag_count()]/[cur_max_antags]) " out += " \[-\]
" else out += " None." out += " \[+\]
" usr << browse(out, "window=edit_mode[src]") feedback_add_details("admin_verb","SGM") /datum/admins/proc/toggletintedweldhelmets() set category = "Debug" set desc="Reduces view range when wearing welding helmets" set name="Toggle tinted welding helmets." config.welder_vision = !( config.welder_vision ) if (config.welder_vision) world << "Reduced welder vision has been enabled!" else world << "Reduced welder vision has been disabled!" log_admin("[key_name(usr)] toggled welder vision.") message_admins("[key_name_admin(usr)] toggled welder vision.", 1) feedback_add_details("admin_verb","TTWH") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/toggleguests() set category = "Server" set desc="Guests can't enter" set name="Toggle guests" config.guests_allowed = !(config.guests_allowed) if (!(config.guests_allowed)) world << "Guests may no longer enter the game." else world << "Guests may now enter the game." log_admin("[key_name(usr)] toggled guests game entering [config.guests_allowed?"":"dis"]allowed.") message_admins("\blue [key_name_admin(usr)] toggled guests game entering [config.guests_allowed?"":"dis"]allowed.", 1) feedback_add_details("admin_verb","TGU") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! /datum/admins/proc/output_ai_laws() var/ai_number = 0 for(var/mob/living/silicon/S in mob_list) ai_number++ if(isAI(S)) usr << "AI [key_name(S, usr)]'s laws:" else if(isrobot(S)) var/mob/living/silicon/robot/R = S usr << "CYBORG [key_name(S, usr)] [R.connected_ai?"(Slaved to: [R.connected_ai])":"(Independant)"]: laws:" else if (ispAI(S)) usr << "pAI [key_name(S, usr)]'s laws:" else usr << "SOMETHING SILICON [key_name(S, usr)]'s laws:" if (S.laws == null) usr << "[key_name(S, usr)]'s laws are null?? Contact a coder." else S.laws.show_laws(usr) if(!ai_number) usr << "No AIs located" //Just so you know the thing is actually working and not just ignoring you. /datum/admins/proc/show_skills() set category = "Admin" set name = "Show Skills" if (!istype(src,/datum/admins)) src = usr.client.holder if (!istype(src,/datum/admins)) usr << "Error: you are not an admin!" return var/mob/living/carbon/human/M = input("Select mob.", "Select mob.") as null|anything in human_mob_list if(!M) return show_skill_window(usr, M) return /client/proc/update_mob_sprite(mob/living/carbon/human/H as mob) set category = "Admin" set name = "Update Mob Sprite" set desc = "Should fix any mob sprite update errors." if (!holder) src << "Only administrators may use this command." return if(istype(H)) H.regenerate_icons() /* helper proc to test if someone is a mentor or not. Got tired of writing this same check all over the place. */ /proc/is_mentor(client/C) if(!istype(C)) return 0 if(!C.holder) return 0 if(C.holder.rights == R_MENTOR) return 1 return 0 /proc/get_options_bar(whom, detail = 2, name = 0, link = 1, highlight_special = 1) if(!whom) return "(*null*)" var/mob/M var/client/C if(istype(whom, /client)) C = whom M = C.mob else if(istype(whom, /mob)) M = whom C = M.client else return "(*not an mob*)" switch(detail) if(0) return "[key_name(C, link, name, highlight_special)]" if(1) //Private Messages return "[key_name(C, link, name, highlight_special)](?)" if(2) //Admins var/ref_mob = "\ref[M]" return "[key_name(C, link, name, highlight_special)](?) (PP) (VV) (SM) ([admin_jump_link(M, src)]) (CA)" if(3) //Devs var/ref_mob = "\ref[M]" return "[key_name(C, link, name, highlight_special)](VV)([admin_jump_link(M, src)])" if(4) //Mentors var/ref_mob = "\ref[M]" return "[key_name(C, link, name, highlight_special)] (?) (PP) (VV) (SM) ([admin_jump_link(M, src)])" /proc/ishost(whom) if(!whom) return 0 var/client/C var/mob/M if(istype(whom, /client)) C = whom if(istype(whom, /mob)) M = whom C = M.client if(R_HOST & C.holder.rights) return 1 else return 0 // // //ALL DONE //********************************************************************************************************* // //Returns 1 to let the dragdrop code know we are trapping this event //Returns 0 if we don't plan to trap the event /datum/admins/proc/cmd_ghost_drag(var/mob/dead/observer/frommob, var/mob/living/tomob) if(!istype(frommob)) return //Extra sanity check to make sure only observers are shoved into things //Same as assume-direct-control perm requirements. if (!check_rights(R_VAREDIT,0) || !check_rights(R_ADMIN|R_DEBUG,0)) return 0 if (!frommob.ckey) return 0 var/question = "" if (tomob.ckey) question = "This mob already has a user ([tomob.key]) in control of it! " question += "Are you sure you want to place [frommob.name]([frommob.key]) in control of [tomob.name]?" var/ask = alert(question, "Place ghost in control of mob?", "Yes", "No") if (ask != "Yes") return 1 if (!frommob || !tomob) //make sure the mobs don't go away while we waited for a response return 1 if(tomob.client) //No need to ghostize if there is no client tomob.ghostize(0) message_admins("[key_name_admin(usr)] has put [frommob.ckey] in control of [tomob.name].") log_admin("[key_name(usr)] stuffed [frommob.ckey] into [tomob.name].") feedback_add_details("admin_verb","CGD") tomob.ckey = frommob.ckey qdel(frommob) return 1