cyberpresidentvanellope/goonstation-2020
1
0
Fork 0
mirror of https://github.com/goonstation/goonstation-2020.git synced 2026-07-11 07:02:20 +01:00
Code Issues Packages Projects Releases Wiki Activity
Files
master
goonstation-2020/code/modules/admin/admin_verbs.dm
T
ZeWaka 49bf0c0105 Initial commit
2020-02-16 19:40:21 -08:00

1760 lines
57 KiB
Plaintext
Raw Permalink Blame History

var/list/admin_verbs = list(
1 = list(
// LEVEL_BABBY, goat fart, ayn rand's armpit
/client/proc/cmd_admin_say,
/client/proc/cmd_admin_gib_self,
),
2 = list(
// LEVEL_MOD, moderator
/client/proc/admin_changes,
/client/proc/admin_play,
/client/proc/admin_observe,
/client/proc/game_panel,
new/client/proc/game_panel(null, "Secrets", "bring back secrets 2016"),
/client/proc/player_panel,
/client/proc/cmd_admin_view_playernotes,
/client/proc/toggle_pray,
/client/proc/cmd_whois,
/client/proc/cmd_admin_pm,
/client/proc/dsay,
/client/proc/blobsay,
/client/proc/dronesay,
/client/proc/hivesay,
/client/proc/marsay,
/client/proc/flocksay,
/client/proc/toggle_hearing_all_looc,
/client/proc/cmd_admin_prison_unprison,
/client/proc/cmd_admin_playermode,
/datum/admins/proc/announce,
/datum/admins/proc/toggleooc,
/datum/admins/proc/togglelooc,
/datum/admins/proc/toggleoocdead,
/datum/admins/proc/startnow,
/datum/admins/proc/toggleAI,
/datum/admins/proc/delay_start,
/datum/admins/proc/delay_end,
/client/proc/cmd_admin_subtle_message,
/client/proc/cmd_admin_alert,
/client/proc/toggle_banlogin_announcements,
/client/proc/toggle_jobban_announcements,
/client/proc/toggle_popup_verbs,
/client/proc/toggle_server_toggles_tab,
/client/proc/toggle_attack_messages,
/client/proc/toggle_hear_prayers,
/client/proc/cmd_admin_plain_message,
/client/proc/cmd_admin_check_vehicle,
/client/proc/change_admin_prefs,
/client/proc/cmd_boot,
/client/proc/enableDrunkMode,
/client/proc/forceDrunkMode,
/client/proc/cmd_unshame_cube,
/client/proc/cmd_shame_cube,
/client/proc/removeSelf,
/client/proc/toggle_station_name_changing,
/client/proc/cmd_admin_remove_label_from,
/client/proc/cmd_admin_antag_popups,
),
3 = list(
// LEVEL_SA, secondary administrator
/client/proc/stealth,
/datum/admins/proc/pixelexplosion,
/datum/admins/proc/camtest,
/client/proc/alt_key,
/client/proc/create_portal,
/datum/admins/proc/togglefarting,
/client/proc/cmd_admin_show_ai_laws,
/client/proc/cmd_admin_reset_ai,
/verb/restart_the_fucking_server_i_mean_it,
/client/proc/cmd_admin_forceallsay,
/client/proc/cmd_admin_murraysay,
/client/proc/cmd_admin_hssay,
/client/proc/cmd_admin_bradsay,
/datum/admins/proc/restart,
/datum/admins/proc/toggleenter,
/client/proc/respawn_target,
/client/proc/respawn_self,
/client/proc/cmd_admin_check_reagents,
/client/proc/cmd_admin_check_health,
/client/proc/cmd_admin_polymorph,
/client/proc/revive_all_bees,
/client/proc/revive_all_cats,
/client/proc/revive_all_parrots,
/client/proc/revive_critter,
/client/proc/kill_critter,
/datum/admins/proc/toggle_blood_system,
/client/proc/narrator_mode,
/client/proc/admin_pick_random_player,
/client/proc/fix_powernets,
/datum/admins/proc/delay_start,
/datum/admins/proc/delay_end,
/client/proc/cmd_admin_create_centcom_report,
/client/proc/cmd_admin_create_advanced_centcom_report,
/client/proc/cmd_admin_advanced_centcom_report_help,
/client/proc/warn,
/client/proc/cmd_admin_playeropt,
/client/proc/popt_key,
/client/proc/POK,
/client/proc/POM,
/client/proc/show_rules_to_player,
/client/proc/view_fingerprints,
/client/proc/cmd_admin_intercom_announce,
/client/proc/cmd_admin_intercom_announce_freq,
/client/proc/cmd_admin_intercom_help,
/client/proc/cmd_dectalk,
/client/proc/cmd_admin_remove_plasma,
/client/proc/toggle_death_confetti,
/client/proc/cmd_admin_unhandcuff,
/client/proc/admin_toggle_lighting,
/client/proc/debug_deletions,
/client/proc/Jump,
/client/proc/jumptomob,
/client/proc/jtm,
/client/proc/jumptokey,
/client/proc/jtk,
/client/proc/jumptoturf,
/client/proc/jtt,
/client/proc/jumptocoord,
/client/proc/jtc,
/client/proc/admin_follow_mobject,
/client/proc/main_loop_context,
/client/proc/main_loop_tick_detail,
/client/proc/display_bomb_monitor,
//Ban verbs
/client/proc/openBanPanel,
/client/proc/cmd_admin_addban,
/client/proc/banooc,
/client/proc/view_cid_list,
/client/proc/modify_parts,
// moved down from admin
/client/proc/cmd_admin_add_freeform_ai_law,
/client/proc/cmd_admin_bulk_law_change,
/client/proc/cmd_admin_mute,
/client/proc/cmd_admin_mute_temp,
/client/proc/respawn_as_self,
/datum/admins/proc/toggletraitorscaling,
/client/proc/toggle_flourish,
/client/proc/getturftelesci,
/client/proc/cmd_view_runtimes,
/client/proc/cmd_antag_history,
/client/proc/cmd_admin_show_player_stats,
/client/proc/cmd_admin_show_player_ips,
/client/proc/cmd_admin_show_player_compids,
/client/proc/give_mass_medals,
/client/proc/copy_medals,
/client/proc/cmd_dispatch_observe_to_ghosts,
/client/proc/waddle_walking,
/client/proc/clear_area_overlays,
/client/proc/cmd_admin_adminundamn,
/client/proc/cmd_admin_admindamn,
/client/proc/toggle_respawn_arena,
),
4 = list(
// LEVEL_ADMIN, admin
/*
/client/proc/noclip,
/client/proc/cmd_admin_mute,
/client/proc/cmd_admin_mute_temp,
/client/proc/cmd_admin_delete,
/client/proc/cmd_admin_add_freeform_ai_law,
/client/proc/cmd_admin_show_ai_laws,
/client/proc/cmd_admin_reset_ai,
/client/proc/addpathogens,
/client/proc/addreagents,
/client/proc/respawn_as_self,
/datum/admins/proc/toggletraitorscaling,
/datum/admins/proc/togglerandomaiblobs,
*/
),
5 = list(
// LEVEL_PA, primary administrator
/datum/admins/proc/togglesuicide,
/datum/admins/proc/pixelexplosion,
/client/proc/open_dj_panel,
/client/proc/cmd_admin_clownify,
/client/proc/toggle_toggles,
/client/proc/cmd_admin_plain_message_all,
/client/proc/cmd_admin_fake_medal,
/datum/admins/proc/togglespeechpopups,
/datum/admins/proc/togglemonkeyspeakhuman,
/datum/admins/proc/toggleautoending,
/datum/admins/proc/togglelatetraitors,
/datum/admins/proc/toggle_pull_slowing,
/client/proc/togglebuildmode,
/client/proc/toggle_buildmode_view,
/client/proc/cmd_admin_rejuvenate_all,
/client/proc/toggle_force_mixed_blob,
/client/proc/toggle_force_mixed_wraith,
/proc/possess,
/proc/possessmob,
/proc/releasemob,
/client/proc/critter_creator_debug,
/client/proc/cmd_cat_county,
/client/proc/find_thing,
/client/proc/find_one_of,
/client/proc/cmd_admin_advview,
/client/proc/cmd_swap_minds,
/client/proc/cmd_transfer_client,
/client/proc/edit_module,
// /client/proc/modify_organs,
/client/proc/toggle_atom_verbs,
/client/proc/toggle_camera_network_reciprocity,
/client/proc/generate_poster,
/client/proc/count_all_of,
/client/proc/admin_set_ai_vox,
/client/proc/cmd_makeshittyweapon,
// moved up from admin
/client/proc/cmd_admin_delete,
/client/proc/noclip,
/client/proc/addpathogens,
/client/proc/addreagents,
/client/proc/respawn_as_self,
/client/proc/cmd_give_pet,
/client/proc/cmd_give_pets,
/client/proc/cmd_customgrenade,
/client/proc/cmd_admin_gib,
/client/proc/cmd_admin_partygib,
/client/proc/cmd_admin_owlgib,
/client/proc/cmd_admin_firegib,
/client/proc/cmd_admin_elecgib,
/client/proc/sharkgib,
/client/proc/cmd_admin_icegib,
/client/proc/cmd_admin_goldgib,
/client/proc/cmd_admin_spidergib,
/client/proc/cmd_admin_cluwnegib,
/client/proc/cmd_admin_tysongib,
/client/proc/removeOther,
/client/proc/cmd_change_map,
/client/proc/cmd_start_map_vote,
/client/proc/cmd_end_map_vote,
/client/proc/cmd_cancel_map_vote,
/client/proc/toggle_map_voting,
/client/proc/show_admin_lag_hacks,
),
6 = list(
// LEVEL_SHITGUY, shit person
/datum/admins/proc/togglesoundwaiting,
/datum/admins/proc/pixelexplosion,
/client/proc/rspawn_panel,
/proc/mod_color,
/client/proc/debug_variables,
/verb/adminCreateBlueprint,
/client/proc/cmd_mass_modify_object_variables,
/client/proc/cmd_debug_mutantrace,
/client/proc/cmd_admin_rejuvenate,
/client/proc/cmd_admin_drop_everything,
/client/proc/cmd_admin_humanize,
/client/proc/cmd_admin_mobileAIize,
/client/proc/cmd_admin_makeai,
/client/proc/cmd_admin_makecyborg,
/client/proc/cmd_admin_makeghostdrone,
/client/proc/cmd_debug_del_all,
/client/proc/cmd_admin_godmode,
/client/proc/cmd_admin_godmode_self,
/client/proc/cmd_admin_get_mobject,
/client/proc/cmd_admin_get_mobject_loc,
/client/proc/Getmob,
/client/proc/sendmob,
/client/proc/gethmobs,
/client/proc/sendhmobs,
/client/proc/getmobs,
/client/proc/sendmobs,
/client/proc/gettraitors,
/client/proc/getnontraitors,
/client/proc/Debug2,
/client/proc/jobbans,
/client/proc/rebuild_jobbans_panel,
/datum/admins/proc/adrev,
/datum/admins/proc/adspawn,
/datum/admins/proc/adjump,
/client/proc/find_all_of,
/client/proc/cmd_add_to_screen,
/client/proc/respawn_as,
/client/proc/general_report,
/client/proc/map_debug_panel,
/client/proc/air_report,
/client/proc/air_status,
/client/proc/fix_next_move,
/client/proc/debugreward,
/client/proc/flip_view,
/client/proc/show_image_to_all,
/client/proc/sharkban,
/client/proc/cmd_explosion,
/client/proc/toggle_literal_disarm,
/client/proc/admin_smoke,
/client/proc/admin_foam,
/client/proc/admin_fluid,
/client/proc/implant_all,
/datum/admins/proc/toggleaprilfools,
/client/proc/cmd_admin_pop_off_all_the_limbs_oh_god,
/datum/admins/proc/togglethetoggles,
/datum/admins/proc/togglesimsmode,
/client/proc/admin_toggle_nightmode,
/client/proc/toggle_ip_alerts,
/client/proc/upload_custom_hud,
/client/proc/replace_with_explosive,
/client/proc/enable_waterflow,
/client/proc/delete_fluids,
/client/proc/special_fullbright,
/client/proc/replace_space_exclusive,
/client/proc/dereplace_space,
/client/proc/ghostdroneAll,
/client/proc/showPregameHTML,
// /client/proc/admin_airborne_fluid,
// /client/proc/replace_space,
#ifdef IMAGE_DEL_DEBUG
/client/proc/debug_image_deletions,
/client/proc/debug_image_deletions_clear,
#endif
),
7 = list(
// LEVEL_CODER, coder
/client/proc/cmd_job_controls,
/datum/admins/proc/pixelexplosion,
/client/proc/cmd_modify_market_variables,
/client/proc/BK_finance_debug,
/client/proc/BK_alter_funds,
/client/proc/debug_pools,
/client/proc/cmd_claim_rs_verbs,
/client/proc/debug_variables,
/client/proc/debug_global_variable,
/client/proc/get_admin_state,
/client/proc/call_proc,
/client/proc/call_proc_all,
/datum/admins/proc/adsound,
/datum/admins/proc/pcap,
/client/proc/toggle_extra_verbs,
/client/proc/cmd_randomize_look,
/client/proc/toggle_numbers_station_messages,
// /client/proc/export_banlist,
// /client/proc/import_banlist,
/client/proc/ticklag,
/client/proc/cmd_debug_vox,
/datum/admins/proc/spawn_atom,
/client/proc/view_save_data,
/client/proc/check_gang_scores,
/client/proc/mapWorld,
/client/proc/call_proc_atom,
/client/proc/haine_blood_debug,
/client/proc/debug_messages,
/client/proc/toggle_next_click,
/client/proc/debug_reaction_list,
/client/proc/debug_reagents_cache,
/client/proc/debug_check_possible_reactions,
/client/proc/set_admin_level,
/client/proc/show_camera_paths,
/client/proc/dbg_itemspecial,
/client/proc/dbg_objectprop,
// /client/proc/remove_camera_paths_verb,
// /client/proc/show_runtime_window,
/client/proc/cmd_chat_debug,
/client/proc/toggleIrcbotDebug,
/datum/admins/proc/toggle_bone_system,
/client/proc/cmd_randomize_handwriting,
/client/proc/wireTest,
/client/proc/toggleResourceCache,
/client/proc/debugResourceCache,
/client/proc/debug_profiler,
/client/proc/SetInfoOverlay,
/client/proc/cmd_tooltip_debug,
/client/proc/deleteJsLogFile,
/client/proc/deleteAllJsLogFiles,
/client/proc/random_color_matrix,
/client/proc/clear_string_cache,
/client/proc/edit_color_matrix,
/client/proc/test_mass_flock_convert,
/client/proc/test_flock_panel,
/client/proc/temporary_deadmin_self,
/verb/rebuild_flow_networks,
/verb/print_flow_networks,
/client/proc/toggle_hard_reboot,
/client/proc/cmd_modify_respawn_variables,
#ifdef MACHINE_PROCESSING_DEBUG
/client/proc/cmd_display_detailed_machine_stats,
#endif
#ifdef QUEUE_STAT_DEBUG
/client/proc/cmd_display_queue_stats,
#endif
#ifdef ENABLE_SPAWN_DEBUG
/client/proc/cmd_modify_spawn_dbg_list,
/client/proc/spawn_dbg,
#endif
// /client/proc/RunLuaString
),
8 = list(
// LEVEL_HOST, host
/client/proc/cmd_claim_rs_verbs
),
)
// verbs that SAs and As get while observing. PA+ get these all the time
var/list/special_admin_observing_verbs = list(
/client/proc/cmd_admin_check_contents,
/datum/admins/proc/toggle_respawns,
/datum/admins/proc/toggledeadchat,
/client/proc/togglepersonaldeadchat,
/client/proc/Getmob,
)
// verbs that PAs get while observing. Coder+ get these all the time
var/list/special_pa_observing_verbs = list(
/client/proc/cmd_admin_drop_everything,
/client/proc/debug_variables,
/client/proc/cmd_modify_object_variables,
/client/proc/cmd_modify_ticker_variables,
/client/proc/cmd_modify_controller_variables,
/client/proc/Getmob,
/client/proc/sendmob,
/client/proc/cmd_admin_rejuvenate,
/client/proc/toggle_view_range,
/client/proc/cmd_admin_aview,
)
/client/proc/cmd_add_to_screen(var/atom/A as obj|mob|turf in world)
set name = "Add to Screen"
set desc = "Add a thing to some poor sod's screen."
set popup_menu = 1
set category = null
var/list/who = list("everyone" = 1)
for (var/client/C in clients)
var/keyname = "[C] ([C.mob])"
who += keyname
who[keyname] = who
var/chosen = input("Whose screen do you want to add this to?", "Add to screen", "everyone") as null|anything in who
if (!chosen)
return
if (chosen == "everyone")
for (var/client/C in clients)
C.screen += A
message_admins("[key_name(usr)] added [A] to everyone's screen!")
logTheThing("admin", usr, null, "added [A] to everyone's screen.")
else
var/client/C = who[chosen]
C.screen += A
boutput(usr, "<span style=\"color:blue\">Successful.</span>")
logTheThing("admin", usr, C.mob, "added [A] to %target%'s screen.")
/client/proc/update_admins(var/rank)
if(!src.holder)
src.holder = new /datum/admins(src)
src.holder.tempmin = 1
src.holder.audit |= AUDIT_VIEW_VARIABLES
src.holder.rank = rank
if(!src.holder.state)
var/state = alert("Which state do you want the admin to begin in?", "Admin-state", "Play", "Observe", "Neither")
if(state == "Play")
src.holder.state = 1
src.admin_play()
return
else if(state == "Observe")
src.holder.state = 2
src.admin_observe()
return
else
src.holder.dispose()
src.holder = null
return
switch (rank)
if ("Host")
src.holder.level = LEVEL_HOST
if ("Coder")
src.holder.level = LEVEL_CODER
if ("Shit Person")
src.holder.level = LEVEL_SHITGUY
if ("Primary Administrator")
src.holder.level = LEVEL_PA
if ("Administrator")
src.holder.level = LEVEL_ADMIN
if ("Secondary Administrator")
src.holder.level = LEVEL_SA
if ("Moderator")
src.holder.level = LEVEL_MOD
if ("Goat Fart", "Ayn Rand's Armpit")
src.holder.level = LEVEL_BABBY
if ("Inactive")
src.holder.dispose()
src.holder = null
boutput(src, "<span style='color:red;font-size:150%'><b>You are set to Inactive admin status! Please join #ss13admin on irc.synirc.net if you would like to become active again!</b></span>")
return
if ("Banned")
del(src)
return
else
src.holder.dispose()
src.holder = null
return
if (src.holder)
src.holder.owner = src
for(var/i = 1; i < 9; i++)
if (src.holder.level + 2 >= i && admin_verbs.len >= i && !isnull(admin_verbs[i]))
src.verbs += admin_verbs[i]
// certain ranks get special treatment while observing
if( src.holder.state ) // literally the laziest way to do this
if ( src.holder.level > LEVEL_MOD)
src.deadchat = 1
src.verbs += special_admin_observing_verbs
if ( src.holder.level > LEVEL_ADMIN )
src.verbs += special_pa_observing_verbs
else
if ( src.holder.level > LEVEL_ADMIN)
src.deadchat = 1
src.verbs += special_admin_observing_verbs
if( src.holder.level > LEVEL_PA ) //SHIT GUY PLUS
src.verbs += special_pa_observing_verbs
if (src.chatOutput && src.chatOutput.loaded)
src.chatOutput.loadAdmin()
/client/proc/clear_admin_verbs()
src.deadchat = 0
for(var/i = 1;i < 9; i++)
src.verbs -= admin_verbs[i]
src.verbs -= special_admin_observing_verbs
src.verbs -= special_pa_observing_verbs
src.buildmode = 0
src.show_popup_menus = 1
if (widescreen)
src.view = "21x15"
else
src.view = "15x15"
usr.see_in_dark = initial(usr.see_in_dark)
if(buildmode)
qdel(buildmode)
if(src.holder)
src.holder.level = 0
/client/proc/admin_observe()
set category = "Admin"
set name = "Set Observe"
if(!src.holder)
alert("You are not an admin")
return
if(!src.holder.popuptoggle) //Hrngh
var/rank = src.holder.rank
clear_admin_verbs()
src.holder.state = 2
// src.mob.mind.observing = 1
update_admins(rank)
blink(get_turf(src.mob))
if(!istype(src.mob, /mob/dead/observer) && !istype(src.mob, /mob/dead/target_observer))
if(src.mob.mind)
src.mob.mind.damned = 0
src.mob.ghostize()
boutput(src, "<span style=\"color:blue\">You are now observing</span>")
else
boutput(src, "<span style=\"color:blue\">You are already observing!</span>")
/client/proc/admin_play()
set category = "Admin"
set name = "Set Play"
if(!src.holder)
alert("You are not an admin")
return
if(!src.holder.popuptoggle) //Hrngh x2
var/rank = src.holder.rank
clear_admin_verbs()
src.holder.state = 1
// src.mob.mind.observing = 0
update_admins(rank)
blink(get_turf(src.mob))
if(istype(src.mob, /mob/dead/observer))
src.mob:reenter_corpse()
boutput(src, "<span style=\"color:blue\">You are now playing</span>")
else
boutput(src, "<span style=\"color:blue\">You are already playing!</span>")
/client/proc/get_admin_state()
set category = "Special Verbs"
for(var/mob/M in mobs)
if(M.client && M.client.holder)
if(M.client.holder.state == 1)
boutput(src, "[M.key] is playing - [M.client.holder.state]")
else if(M.client.holder.state == 2)
boutput(src, "[M.key] is observing - [M.client.holder.state]")
else
boutput(src, "[M.key] is undefined - [M.client.holder.state]")
//admin client procs ported over from mob.dm
/client/proc/player_panel()
set name = "Player Panel"
set category = "Admin"
if (src.holder && !src.holder.tempmin)
src.holder.player()
return
/client/proc/rspawn_panel()
set name = "Respawn Panel"
set category = "Admin"
if (src.holder)
src.holder.s_respawn()
return
/client/proc/jobbans()
set name = "Jobban Panel"
set category = "Admin"
if(src.holder)
src.holder.Jobbans()
return
/client/proc/rebuild_jobbans_panel()
set name = "Rebuild Jobbans Panel"
set category = "Admin"
if (src.holder)
src.holder.buildjobbanspanel()
return
/client/proc/game_panel()
set name = "Game Panel"
set category = "Admin"
if (src.holder)
src.holder.Game()
return
/client/proc/stealth()
set category = "Admin"
set name = "Stealth Mode"
admin_only
//fuck u
src.holder.set_stealth_mode(null, 0)
/datum/admins/proc/set_stealth_mode(var/new_key = null, var/force_on = 0)
if (!src.owner || !isclient(src.owner))
return // farte
if (force_on)
src.owner:stealth = 1
else
src.owner:stealth = !(src.owner:stealth)
if (src.owner:stealth)
if (!new_key)
new_key = input(usr, "Enter your desired display name.", "Fake Key", src.owner:key) as null|text
if (!new_key)
src.owner:stealth = 0
if (src.owner:stealth && src.owner:alt_key)
src.set_alt_key()
if (new_key)
new_key = trim(new_key)
//stealth_hide_fakekey = (alert("Hide your fake key when using DSAY?", "Extra stealthy","Yes", "No") == "Yes")
// I think if people really wanna be Denmark they can just set themselves to be Denmark
new_key = strip_html(new_key)
if (length(new_key) >= 26)
new_key = copytext(new_key, 1, 26)
src.owner:fakekey = new_key
else
src.owner:fakekey = null
src.owner:stealth_hide_fakekey = 0
logTheThing("admin", src.owner, null, "has turned stealth mode [src.owner:stealth ? "ON using key \"[src.owner:fakekey]\"" : "OFF"]")
logTheThing("diary", src.owner, null, "has turned stealth mode [src.owner:stealth ? "ON using key \"[src.owner:fakekey]\"" : "OFF"]", "admin")
message_admins("[key_name(src.owner)] has turned stealth mode [src.owner:stealth ? "ON using key \"[src.owner:fakekey]\"" : "OFF"]")
if (src.owner:stealth)
var/ircmsg[] = new()
ircmsg["key"] = src.owner:key
ircmsg["name"] = (usr && usr.real_name) ? usr.real_name : "NULL"
ircmsg["msg"] = "Has enabled stealth mode as ([src.owner:fakekey])"
ircbot.export("admin", ircmsg)
/client/proc/alt_key()
set category = "Admin"
set name = "Alternate Key"
set desc = "Shows your key as something else!"
admin_only
src.holder.set_alt_key(null, 0)
/datum/admins/proc/set_alt_key(var/new_key = null, var/force_on = 0)
if (!src.owner || !isclient(src.owner))
return // farte
if (force_on)
src.owner:alt_key = 1
else
src.owner:alt_key = !(src.owner:alt_key)
if (src.owner:alt_key)
if (!new_key)
new_key = input(usr, "Enter your desired display name.", "Fake Key", src.owner:key) as null|text
if (!new_key)
src.owner:alt_key = 0
if (src.owner:alt_key && src.owner:stealth)
src.set_stealth_mode()
if (new_key)
new_key = trim(new_key)
new_key = strip_html(new_key)
if (length(new_key) >= 26)
new_key = copytext(new_key, 1, 26)
src.owner:fakekey = new_key
else
src.owner:fakekey = null
logTheThing("admin", src.owner, null, "has changed their displayed key to [src.owner:alt_key ? "\"[src.owner:fakekey]\"" : "\"[src.owner:key]\""]")
logTheThing("diary", src.owner, null, "has changed their displayed key to [src.owner:alt_key ? "\"[src.owner:fakekey]\"" : "\"[src.owner:key]\""]", "admin")
message_admins("[key_name(src.owner)] has changed their displayed key to [src.owner:alt_key ? "\"[src.owner:fakekey]\"" : "\"[src.owner:key]\""]")
/*
if (src.alt_key)
var/ircmsg[] = new()
ircmsg["key"] = src.owner:key
ircmsg["name"] = (usr && usr.real_name) ? usr.real_name : "NULL"
ircmsg["msg"] = "Has set their displayed key to ([src.owner:fakekey])"
ircbot.export("admin", ircmsg)
*/
/client/proc/banooc()
set category = "Admin"
set name = "OOC (Un)Ban"
set desc = "Ban or unban a player from using OOC"
admin_only
var/mob/target
var/client/selection = input("Please, select a player!", "OOC Ban") as null|anything in clients
if (!selection)
return
target = selection.mob
if (!oocban_isbanned(target))
oocban_fullban(target)
message_admins("[key_name(src)] has banned [key_name(target)] from OOC")
logTheThing("admin", usr, target, "Banned %target% from OOC")
logTheThing("diary", usr, target, "Banned %target% from OOC", "admin")
else
oocban_unban(selection)
message_admins("[key_name(src)] has unbanned [key_name(target)] from OOC")
logTheThing("admin", usr, target, "Unbanned %target% from OOC")
logTheThing("diary", usr, target, "Unbanned %target% from OOC", "admin")
/client/proc/warn(var/mob/M in world)
set category = null
set popup_menu = 0
set name = "Warn"
set desc = "Warn a player"
admin_only
if(M.client && M.client.holder && (M.client.holder.level >= src.holder.level))
alert("You cannot perform this action. You must be of a higher administrative rank!", null, null, null, null, null)
return
if(!M.client.warned)
M.Browse(rules, "window=rules;size=480x320")
boutput(M, "<span style=\"color:red\"><B>You have been warned by an administrator. This is the only warning you will receive.</B></span>")
M.client.warned = 1
message_admins("<span style=\"color:blue\">[src.ckey] warned [M.ckey].</span>")
else
var/addData[] = new()
addData["ckey"] = M.ckey
addData["compID"] = M.computer_id
addData["ip"] = M.client.address
addData["reason"] = "Autobanning due to previous warn. This is what we in the biz like to call a \"second warning\"."
addData["akey"] = src.ckey
addData["mins"] = 10
addBan(addData)
/client/proc/clear_area_overlays()
set name = "Clear Area Overlays"
set category = "Debug"
for(var/area/A in world)
A.icon_state = ""
var/list/fun_images = list()
/client/proc/show_image_to_all()
set name = "Show Image to All"
set category = "Special Verbs"
if(fun_images.len)
switch(alert("There is already an existing image.", "Warning", "Ignore", "Clear", "Cancel"))
if("Clear")
for (var/datum/hud/funimage/fun_image)
for (var/client/C in fun_image.clients)
fun_image.remove_client(C)
fun_images.len = 0
return
if("Cancel")
return
var/icon/I = input("Pick an icon:","Icon") as null|icon
if (I)
var/datum/hud/funimage/fun_image = new(I)
fun_images += fun_image
for (var/client/C in clients)
fun_image.add_client(C)
logTheThing("admin", src, null, "has uploaded icon [I] to all players")
logTheThing("diary", src, null, "has uploaded icon [I] to all players", "admin")
message_admins("[key_name(src)] has uploaded icon [I] to all players")
/client/proc/show_rules_to_player(mob/M as mob in world)
set name = "Show Rules to Player"
set popup_menu = 0
set category = null
if(!M.client)
alert("[M] is logged out, so you should probably ban them!")
return
logTheThing("admin", src, M, "forced %target% to view the rules")
logTheThing("diary", src, M, "forced %target% to view the rules", "admin")
message_admins("[key_name(src)] forced [key_name(M)] to view the rules.")
M << csound("sound/misc/klaxon.ogg")
boutput(M, "<span style=\"color:red\"><B>WARNING: An admin is likely very cross with you and wants you to read the rules right fucking now!</B></span>")
// M.Browse(rules, "window=rules;size=480x320")
M << browse(rules, "window=rules;size=480x320")
/client/proc/view_fingerprints(obj/O as obj in world)
set name = "View Object Fingerprints"
set category = "Special Verbs"
admin_only
if(!O.fingerprintshidden || !O.fingerprintshidden.len)
alert("There are no fingerprints on this object.", null, null, null, null, null)
return
boutput(src, "<b>Hidden Fingerprints on [O]:</b>")
for(var/i in O.fingerprintshidden)
boutput(src, i)
boutput(src, "<b>Last touched by:</b> [O.fingerprintslast].")
return
/client/proc/respawn_as(var/client/cli in clients)
set name = "Respawn As"
set desc = "Respawn yourself as the currenly loaded character of a player. Instantly. Right where you stand."
set category = "Special Verbs"
set popup_menu = 0
admin_only
if (!cli)
cli = input("Please, select a player!", "Respawn As", null, null) as null|anything in clients
if(!cli)
return
if (!cli.preferences)
boutput(src, "<span style=\"color:red\">No preferences found on target client.</span>")
var/mob/mymob = src.mob
var/mob/living/carbon/human/H = new(mymob.loc)
cli.preferences.copy_to(H,src.mob,1)
if (!mymob.mind)
mymob.mind = new /datum/mind()
mymob.mind.key = key
mymob.mind.current = mymob
ticker.minds += mymob.mind
mymob.mind.transfer_to(H)
qdel(mymob)
H.JobEquipSpawned("Staff Assistant", 1)
/client/proc/entangle_at_random()
set name = "Entangle Lockers at Random"
set desc = "Entangle every locker at random. Dangerous!"
set category = "Special Verbs"
admin_only
if(alert("Are you sure you want to do this?",,"Yes", "No") == "Yes")
message_admins("[key_name(src)] has entangled every locker!")
var/list/closets = list()
var/n_closets = 0
for(var/obj/storage/closet in world)
closets += closet
n_closets++
for(var/i = 1, i < n_closets, i+=2)
var/obj/storage/A = pick(closets)
var/obj/storage/B = pick(closets)
closets -= A
closets -= B
A.entangled = B
B.entangled = A
/client/proc/respawn_as_self()
set name = "Respawn As Self"
set desc = "Respawn yourself as your currenly loaded character. Instantly. Right where you stand."
set category = "Special Verbs"
set popup_menu = 0
admin_only
if (!src.preferences)
boutput(src, "<span style=\"color:red\">No preferences found on your client.</span>")
if (!istype(src.mob, /mob/dead/observer) && !istype(src.mob, /mob/dead/target_observer))
if (alert(usr, "Are you sure you wanna respawn yourself where you are? If you're already in a living mob, it'll be deleted!", "Confirmation", "Yes", "No") == "No")
return
var/mob/mymob = src.mob
var/mob/living/carbon/human/H = new()
H.set_loc(mymob.loc)
src.preferences.copy_to(H,src.mob,1)
if (!mymob.mind)
mymob.mind = new /datum/mind()
mymob.mind.key = key
mymob.mind.current = mymob
ticker.minds += mymob.mind
mymob.mind.transfer_to(H)
qdel(mymob)
H.Equip_Rank("Staff Assistant", 2) //ZeWaka: joined_late is 2 so you don't get announced.
if (flourish)
for (var/mob/living/M in oviewers(5, get_turf(H)))
M.apply_flash(animation_duration = 30, weak = 5, uncloak_prob = 0, stamina_damage = 250)
/client/proc/cmd_admin_humanize(var/mob/M in world)
set category = null
set name = "Humanize"
set popup_menu = 0
if (!ticker)
SPAWN_DBG (0)
alert("Wait until the game starts.")
return
if (istype(M, /mob/new_player) || istype(M, /mob/dead/target_observer)/* || istype(M, /mob/living/intangible/aicamera)*/)
SPAWN_DBG (0)
alert("You can't humanize new_player mobs or target observers.")
return
// You now get to chose (mostly) if you want to send the target to the arrival shuttle (Convair880).
var/send_to_arrival_shuttle = 0
if (iswraith(M))
if (M.mind && M.mind.special_role == "wraith")
remove_antag(M, src, 0, 1) // Can't complete specialist objectives as a human. Also, the proc takes care of the rest.
return
send_to_arrival_shuttle = 1
else if (isintangible(M))
if (M.mind && M.mind.special_role == "blob")
remove_antag(M, src, 0, 1) // Ditto.
return
send_to_arrival_shuttle = 1
else if (isAI(M))
send_to_arrival_shuttle = 1
else
switch (input(src, "Send mob to arrival shuttle?", "Auto-teleport", "No") in list("Yes", "No", "Cancel"))
if ("Cancel")
return
if ("Yes")
send_to_arrival_shuttle = 1
if ("No")
send_to_arrival_shuttle = 0
else
send_to_arrival_shuttle = 0
if (issilicon(M))
var/mob/living/silicon/S = M
if (S.dependent && S.mainframe && isAI(S.mainframe))
qdel(S.mainframe) // Delete mainframe if it's an AI-controlled robot.
logTheThing("admin", src, M, "has made %target% a human.")
logTheThing("diary", src, M, "has made %target% a human.", "admin")
message_admins("[key_name(src)] has made [key_name(M)] a human.")
if (send_to_arrival_shuttle == 1)
M.show_text("<h2><font color=red><B>You have been respawned as a human and send to the arrival shuttle. If this is an unexpected development, please inquire about it in adminhelp.</B></font></h2>", "red")
return M.humanize(1)
else
M.show_text("<h2><font color=red><B>You have been respawned as a human. If this is an unexpected development, please inquire about it in adminhelp.</B></font></h2>", "red")
return M.humanize(0)
/client/proc/cmd_admin_pop_off_all_the_limbs_oh_god()
set category = null
set name = "Pop off everyone's limbs"
set desc = "Oh christ no don't do this"
if(alert("Really pop off everyone's limbs?", "JESUS CHRIST", "Yes, I'm a crazy bastard", "No") == "Yes, I'm a crazy bastard")
logTheThing("admin", src, null, "popped off all limbs.")
logTheThing("diary", src, null, "has popped off all limbs", "admin")
message_admins("[key_name(src)] has popped off everyone's limbs.")
for (var/mob/living/M in world)
for (var/obj/item/parts/P in M)
P.sever()
LAGCHECK(LAG_LOW)
M.update_body()
else
alert("Thank fuck.")
//Special proc to set up the server for mapping via screenshots
/client/proc/mapWorld()
set name = "Map World"
set desc = "Takes a series of screenshots for mapping"
set category = null //Debug
//Gotta prevent dummies
var/confirm = alert("WARNING: This proc should absolutely not be run on a live server! Make sure you know what you are doing!", "WARNING", "Cancel", "Proceed")
if(confirm == "Cancel")
return
//Viewport size
var/viewport_width
var/viewport_height
var/inputView = input(src, "Set your desired viewport size. (30 for 300x300 maps, 50 for 200x200)", "Viewport Size", 30) as num //used to be 60 then lummox broke it
if (inputView < 1)
return
else
viewport_width = inputView
viewport_height = inputView
src.view = "[viewport_width]x[viewport_height]"
//Z levels to map
var/z
var/allZ = 0
var/safeAllZ = 0
var/inputZ = input(src, "What Z level do you want to map? (10 for all levels, 11 for all except centcom level)", "Z Level", 11) as num
if (inputZ < 1)
return
else if (inputZ == 10)
allZ = 1
else if (inputZ == 11)
safeAllZ = 1
else
z = inputZ
var/delay
var/inputDelay = input(src, "Delay between changing location/taking screenshots. (If unsure, leave as as default)", "Delay", 7) as num
if (inputDelay < 1)
return
else
delay = inputDelay
var/confirm2 = alert("Make everyone invisible? (Literally every mob)", "Invisible Mobs?", "No", "Yes")
if (confirm2 == "Yes")
//Make everyone invisible so they don't get in the way of screenshots
for (var/mob/M in mobs)
if (M.ckey)
M.alpha = 0
var/confirm3 = alert("Max out all power devices? (Prevents lights from going out mid-mapping)", "Max Power?", "No", "Yes")
if (confirm3 == "Yes")
//Max out all power (to avoid lights dying mid mapping)
for(var/obj/machinery/power/apc/C in machines)
if(C.cell && C.z == 1)
C.cell.charge = C.cell.maxcharge
for(var/obj/machinery/power/smes/S in machines)
if(S.z != 1)
continue
S.charge = S.capacity
S.output = 200000
S.online = 1
S.updateicon()
S.power_change()
var/confirm4 = alert("Turn space bright pink? (For post processing/optimizations)", "Pink Background?", "No", "Yes")
if (confirm4 == "Yes")
//Make every space tile bright pink (for further processing via local image manipulation)
for (var/turf/space/S in world)
LAGCHECK(LAG_LOW)
if (S.contents.len == 0 && S.overlays.len <= 1)//== 0) //Doesnt pinkify tiles with crap on top of them (transparant overlays fuck with the image processing later)
S.icon = 'icons/effects/ULIcons.dmi'
S.icon_state = "etc"
S.color = transparentColor
var/confirm5 = alert("Make everything full bright?", "Fullbright?", "No", "Yes")
if (confirm5 == "Yes")
var/atom/plane = src.get_plane(PLANE_LIGHTING)
if (plane)
plane.alpha = 0
var/confirm6 = alert("Disable drop shadowing?", "Dropshadows?", "No", "Yes")
if (confirm6 == "Yes")
winset(src, "menu.set_shadow", "is-checked=false")
src.apply_depth_filter()
var/start_x = (viewport_width / 2) + 1
var/start_y = (viewport_height / 2) + 1
boutput(src, "<span style=\"color:blue\"><B>Begining mapping.</B></span>")
//Map eeeeverything
if (allZ || safeAllZ)
for (var/curZ = 1; curZ <= world.maxz; curZ++)
if (safeAllZ && (curZ == 2 || curZ == 4))
continue //Skips centcom
for (var/y = start_y; y <= world.maxy; y += viewport_height)
for (var/x = start_x; x <= world.maxx; x += viewport_width)
src.mob.x = x
src.mob.y = y
src.mob.z = curZ
sleep(delay)
winset(src, null, "command=\".screenshot auto\"")
out(src, "Screenshot taken at ([x], [y], [z])")
sleep(delay)
if (curZ != world.maxz)
var/pause = alert("Z Level ([curZ]) finished. Organise your screenshot files and press Ok to continue or Cancel to cease mapping.", "Tea break", "Ok", "Cancel")
if (pause == "Cancel")
return
//Or just one level I GUESS
else
for (var/y = start_y; y <= world.maxy; y += viewport_height)
for (var/x = start_x; x <= world.maxx; x += viewport_width)
src.mob.x = x
src.mob.y = y
src.mob.z = z
sleep(delay)
winset(src, null, "command=\".screenshot auto\"")
out(src, "Screenshot taken at ([x], [y], [z])")
sleep(delay)
alert("Mapping complete!", "Yay!", "Ok")
/client/proc/view_cid_list(var/C as text)
set name = "View CompID List"
set desc = "View the list of observed computer IDs belonging to a key"
set category = "Admin"
admin_only
view_client_compid_list(usr, C)
/client/proc/cmd_chat_debug(var/client/C in clients)
set name = "Debug Chat"
set desc = "Opens a firebug console in the target's chat area"
set category = "Debug"
admin_only
if (src != C)
var/trigger = (C.holder ? src.key : (src.stealth || src.fakekey ? src.fakekey : src.key))
ehjax.send(C, "browseroutput", list("firebug" = 1, "trigger" = trigger))
message_admins("[key_name(src)] has enabled Debug Chat mode on [key_name(C)]")
else
ehjax.send(C, "browseroutput", list("firebug" = 1))
/client/proc/blobsay(msg as text)
set category = "Special Verbs"
set name = "blobsay"
set hidden = 1
admin_only
if (!src.mob || src.player_mode)
return
if (src.holder.level >= LEVEL_SHITGUY)
msg = copytext(sanitize(html_encode(msg)), 1, MAX_MESSAGE_LEN)
logTheThing("admin", src, null, "BLOBSAY: [msg]")
logTheThing("diary", src, null, "BLOBSAY: [msg]", "admin")
if (!msg)
return
var/show_other_key = 0
if (src.stealth || src.alt_key)
show_other_key = 1
var/rendered = "<span class='game blobsay'><span class='prefix'>BLOB:</span> <span class='name'>ADMIN([show_other_key ? src.fakekey : src.key])</span> says, <span class='message'>\"[msg]\"</span></span>"
var/adminrendered = "<span class='game blobsay'><span class='prefix'>BLOB:</span> <span class='name' data-ctx='\ref[src.mob.mind]'>[show_other_key ? "ADMIN([src.key] (as [src.fakekey])" : "ADMIN([src.key]"])</span> says, <span class='message'>\"[msg]\"</span></span>"
for (var/mob/M in mobs)
if(istype(M, /mob/new_player))
continue
if (M.client && (isblob(M) || M.client.holder && !M.client.player_mode))
var/thisR = rendered
if ((istype(M, /mob/dead/observer)||M.client.holder) && src.mob.mind)
thisR = "<span class='adminHearing' data-ctx='[M.client.chatOutput.getContextFlags()]'>[adminrendered]</span>"
M.show_message(thisR, 2)
//say to all changelings hiveminds
/client/proc/hivesay(msg as text)
set category = "Special Verbs"
set name = "hivesay"
set hidden = 1
admin_only
if (!src.mob || src.player_mode)
return
if (src.holder.level >= LEVEL_SHITGUY)
msg = copytext(sanitize(html_encode(msg)), 1, MAX_MESSAGE_LEN)
logTheThing("admin", src, null, "HIVESAY: [msg]")
logTheThing("diary", src, null, "HIVESAY: [msg]", "admin")
if (!msg)
return
var/show_other_key = 0
if (src.stealth || src.alt_key)
show_other_key = 1
var/rendered = "<span class='game hivesay'><span class='prefix'>HIVEMIND:</span> <span class='name'>ADMIN([show_other_key ? src.fakekey : src.key])</span> says, <span class='message'>\"[msg]\"</span></span>"
var/adminrendered = "<span class='game hivesay'><span class='prefix'>HIVEMIND:</span> <span class='name' data-ctx='\ref[src.mob.mind]'>[show_other_key ? "ADMIN([src.key] (as [src.fakekey])" : "ADMIN([src.key]"])</span> says, <span class='message'>\"[msg]\"</span></span>"
for (var/mob/M in mobs)
if(istype(M, /mob/new_player))
continue
var/is_in_hivemind = 0
if (istype(M,/mob/living/critter/changeling) || istype(M,/mob/dead/target_observer/hivemind_observer))
is_in_hivemind = 1
if (ishuman(M))
var/mob/living/carbon/human/H = M
if (H.is_changeling())
is_in_hivemind = 1
if (M.client && (is_in_hivemind || M.client.holder && !M.client.player_mode))
var/thisR = rendered
if (M.client.holder && src.mob.mind)
thisR = "<span class='adminHearing' data-ctx='[M.client.chatOutput.getContextFlags()]'>[adminrendered]</span>"
M.show_message(thisR, 2)
/client/proc/dronesay(msg as text)
set category = "Special Verbs"
set name = "dronesay"
set hidden = 1
admin_only
if (!src.mob || src.player_mode)
return
if (src.holder.level >= LEVEL_SHITGUY)
msg = copytext(sanitize(html_encode(msg)), 1, MAX_MESSAGE_LEN)
logTheThing("admin", src, null, "DRONESAY: [msg]")
logTheThing("diary", src, null, "DRONESAY: [msg]", "admin")
if (!msg)
return
var/show_other_key = 0
if (src.stealth || src.alt_key)
show_other_key = 1
var/rendered = "<span class='game ghostdronesay'><span class='prefix'>DRONE:</span> <span class='name'>ADMIN([show_other_key ? src.fakekey : src.key])</span> says, <span class='message'>\"[msg]\"</span></span>"
var/adminrendered = "<span class='game ghostdronesay'><span class='prefix'>DRONE:</span> <span class='name' data-ctx='\ref[src.mob.mind]'>[show_other_key ? "ADMIN([src.key] (as [src.fakekey])" : "ADMIN([src.key]"])</span> says, <span class='message'>\"[msg]\"</span></span>"
for (var/mob/M in mobs)
if (istype(M, /mob/new_player))
continue
if (M.client && (isghostdrone(M) || M.client.holder && !M.client.player_mode))
var/thisR = rendered
if (M.client.holder && src.mob.mind)
thisR = "<span class='adminHearing' data-ctx='[M.client.chatOutput.getContextFlags()]'>[adminrendered]</span>"
M.show_message(thisR, 2)
// let's keep xeroxing until all that remains is a faded butt - cirr
/client/proc/marsay(msg as text)
set category = "Special Verbs"
set name = "marsay"
set hidden = 1
admin_only
if (!src.mob || src.player_mode)
return
if (src.holder.level >= LEVEL_SHITGUY)
msg = copytext(sanitize(html_encode(msg)), 1, MAX_MESSAGE_LEN)
logTheThing("admin", src, null, "MARSAY: [msg]")
logTheThing("diary", src, null, "MARSAY: [msg]", "admin")
if (!msg)
return
martian_speak(src.mob, msg, 1)
/client/proc/flocksay(msg as text)
set category = "Special Verbs"
set name = "flocksay"
set hidden = 1
admin_only
if (!src.mob || src.player_mode)
return
if (src.holder.level >= LEVEL_SHITGUY)
msg = copytext(sanitize(html_encode(msg)), 1, MAX_MESSAGE_LEN)
logTheThing("admin", src, null, "FLOCKSAY: [msg]")
logTheThing("diary", src, null, "FLOCKSAY: [msg]", "admin")
if (!msg)
return
flock_speak(src.mob, msg, null, 1)
/client/proc/cmd_dectalk()
set name = "Dectalk"
set category = "Special Verbs"
set desc = "Sends a message as voice to all players"
set popup_menu = 0
var/msg
if (args && args.len > 0)
msg = args[1]
msg = input(src, "Sends a message as voice to all players", "Dectalk", msg) as null|message
if (!msg) return 0
var/audio = dectalk(msg)
if (audio && audio["audio"])
message_admins("[key_name(src)] has used the dectalk verb with message: [audio["message"]]")
logTheThing("admin", src, null, "has used the dectalk verb with message: [audio["message"]]")
logTheThing("diary", src, null, "has used the dectalk verb with message: [audio["message"]]", "admin")
for (var/client/C in clients)
if (C.ignore_sound_flags & (SOUND_VOX | SOUND_ALL))
continue
var/trigger = src.key
if (src.holder && (src.stealth || src.alt_key))
trigger = (C.holder ? "[src.key] (as [src.fakekey])" : src.fakekey)
var/vol = C.getVolume(VOLUME_CHANNEL_ADMIN)
if (vol)
C.chatOutput.playDectalk(audio["audio"], trigger, vol)
return 1
else if (audio && audio["cooldown"])
alert(src, "There is a [nextDectalkDelay] second global cooldown between uses of this verb. Please wait [((world.timeofday + nextDectalkDelay * 10) - world.timeofday)/10] seconds.")
src.cmd_dectalk(msg)
return 0
else
alert(src, "An external server error has occurred. Please report this.")
return 0
/client/proc/cmd_give_pet(var/mob/M as mob in world)
set popup_menu = 0
set name = "Give Pet"
set desc = "Assigns someone a pet! Woo!"
set hidden = 1
admin_only
if (!M)
M = input("Choose a target.", "Selection") as null|anything in mobs
if (!M)
return
var/pet_input = input("Enter path of the thing you want to give as a pet or enter a part of the path to search", "Enter Path", pick("/obj/critter/domestic_bee", "/obj/critter/parrot/random", "/obj/critter/cat")) as null|text
if (!pet_input)
return
var/pet_path = get_one_match(pet_input, /obj)
if (!pet_path)
return
var/obj/Pet = new pet_path(get_turf(M))
Pet.name = "[M]'s pet [Pet.name]"
//Pets should probably not attack their owner
if (istype(Pet, /obj/critter))
var/obj/critter/CritterPet = Pet
CritterPet.atkcarbon = 0
CritterPet.atksilicon = 0
logTheThing("admin", usr ? usr : src, M, "gave %target% a pet [pet_path]!")
logTheThing("diary", usr ? usr : src, M, "gave %target% a pet [pet_path]!", "admin")
message_admins("[key_name(usr ? usr : src)] gave [M] a pet [pet_path]!")
/client/proc/cmd_give_pets()
set popup_menu = 0
set name = "Give Pets"
set desc = "Assigns everyone a pet! Woo!"
set hidden = 1
admin_only
var/pet_input = input("Enter path of the thing you want to give people as pets or enter a part of the path to search", "Enter Path", pick("/obj/critter/domestic_bee", "/obj/critter/parrot/random", "/obj/critter/cat")) as null|text
if (!pet_input)
return
var/pet_path = get_one_match(pet_input, /obj)
if (!pet_path)
return
for (var/mob/living/L in mobs)
var/obj/Pet = new pet_path(get_turf(L))
Pet.name = "[L]'s pet [Pet.name]"
//Pets should probably not attack their owner
if (istype(Pet, /obj/critter))
var/obj/critter/CritterPet = Pet
CritterPet.atkcarbon = 0
CritterPet.atksilicon = 0
LAGCHECK(LAG_LOW)
logTheThing("admin", usr ? usr : src, null, "gave everyone a pet [pet_path]!")
logTheThing("diary", usr ? usr : src, null, "gave everyone a pet [pet_path]!", "admin")
message_admins("[key_name(usr ? usr : src)] gave everyone a pet [pet_path]!")
/client/proc/cmd_customgrenade()
set popup_menu = 0
set name = "Custom Grenade"
set category = "Special Verbs"
set desc = "Create a custom object spewing grenade"
admin_only
var/obj_input = input("Enter path of the object you want the grenade to have or enter a part of the path to search", "Enter Path") as null|text
if (!obj_input)
return
var/obj_path = get_one_match(obj_input, /obj)
if (!obj_path)
return
var/obj/item/old_grenade/banana/nade = new /obj/item/old_grenade/banana
nade.payload = obj_path
nade.loc = usr.loc
nade.name = "mysterious grenade"
nade.desc = "There could be anything inside this."
logTheThing("admin", src, null, "spawned a custom grenade at [nade.loc]")
logTheThing("diary", src, null, "spawned a custom grenade at [nade.loc]", "admin")
message_admins("[key_name(src)] spawned a custom grenade at [nade.loc].")
/client/proc/admin_changes()
set category = "Admin"
set name = "Admin Changelog"
set desc = "Show or hide the admin changelog"
admin_only
if (winget(src, "adminchanges", "is-visible") == "true")
src.Browse(null, "window=adminchanges")
else
var/changelogHtml = grabResource("html/changelog.html")
var/data = admin_changelog:html
changelogHtml = replacetext(changelogHtml, "<!-- HTML GOES HERE -->", "[data]")
src.Browse(changelogHtml, "window=adminchanges;size=500x650;title=Admin+Changelog;", 1)
/client/proc/removeSelf()
set category = "Special Verbs"
set name = "Remove Self"
set desc = "Simply removes you from existence"
set popup_menu = 0
admin_only
if (!src.mob)
out(src, "<span style='color: blue;'>You don't even exist!</span>")
return
if (istype(src.mob, /mob/dead/observer) || istype(src.mob, /mob/dead/target_observer))
out(src, "<span style='color: blue;'>You're already dead, you can't be removed any more than that!</span>")
return
if (flourish)
for (var/mob/living/M in oviewers(5, get_turf(src.mob)))
M.apply_flash(animation_duration = 30, weak = 5, uncloak_prob = 0, stamina_damage = 250)
animate(src.mob, transform = matrix(50, 50, MATRIX_SCALE), time = 15, alpha = 0, easing = CIRCULAR_EASING, flags = EASE_OUT)
sleep(15)
var/mob/O = src.mob
src.mob.ghostize()
qdel(O)
/client/proc/removeOther(var/mob/M as mob in world)
set category = "Special Verbs"
set name = "Remove Other"
set desc = "Remove some other dude from the mortal plain"
set popup_menu = 0
admin_only
if (!M)
out(src, "<span style='color: blue;'>You need to select someone to remove!</span>")
return
if (istype(M, /mob/dead/observer) || istype(M, /mob/dead/target_observer))
out(src, "<span style='color: blue;'>That person is already dead, sorry.</span>")
return
var/client/C
if (M.client)
C = M.client
M.remove()
logTheThing("admin", src, C ? C : M, "removed %target% from existence!")
logTheThing("diary", src, C ? C : M, "removed %target% from existence!", "admin")
message_admins("[key_name(src)] removed [key_name(C ? C : M)] from existence!")
/client/proc/cmd_change_map()
set category = "Admin"
set name = "Switch Map"
set desc = "Switch the map for the next round"
set popup_menu = 0
admin_only
var/bustedMapSwitcher = isMapSwitcherBusted()
if (bustedMapSwitcher)
return alert(bustedMapSwitcher)
if (mapSwitcher.nextMapIsVotedFor)
var/ignorePlayerVote = alert("The next map was voted for by the players, are you sure you want to override it? This could be very rude!", "Ignore Players?", "Yes", "No")
if (ignorePlayerVote == "No")
return
if (mapSwitcher.locked)
return alert("The server is currently switching to another map. You will need to wait.")
var/info = "Select a map"
info += "\nCurrently on: [mapSwitcher.current]"
if (mapSwitcher.next)
info += "\nNext round's map will be: [mapSwitcher.next]"
var/map = input(info, "Switch Map", mapSwitcher.next ? mapSwitcher.next : mapSwitcher.current) as null|anything in mapNames
if (!map) return
if (map == mapSwitcher.current && !mapSwitcher.next)
return alert("The map is already on [map] you dunce!")
try
mapSwitcher.setNextMap(src.key, mapName = map)
catch (var/exception/e)
logTheThing("debug", null, null, "<b>Map Switcher:</b> [e.name]")
return alert("Oh no! Something went wrong with the map switcher. Details have been logged to the debug category.")
logTheThing("admin", usr ? usr : src, null, "set the next round's map to [map]")
logTheThing("diary", usr ? usr : src, null, "set the next round's map to [map]", "admin")
message_admins("[key_name(usr ? usr : src)] set the next round's map to [map]")
var/announce = alert("Map set to [map]. It will apply next round.\n\nAnnounce this to the unwashed masses?", "All done", "Ok", "Nah")
if (announce == "Ok")
boutput(world, "<span style=\"color:blue\"><b>The next round's map will be: [map]</b></span>")
/client/proc/cmd_start_map_vote()
set category = "Admin"
set name = "Start Map Vote"
set desc = "Start a player vote for the next map"
set popup_menu = 0
admin_only
var/bustedMapSwitcher = isMapSwitcherBusted()
if (bustedMapSwitcher)
return alert(bustedMapSwitcher)
if (!mapSwitcher.votingAllowed)
return alert("Map votes are currently toggled off.")
if (mapSwitcher.playersVoting)
return alert("There is already a map vote underway.")
var/duration = input("How long (in seconds) should this vote last? Enter 0 to last indefinitely (you'll need to manually end it).", "Duration?", 0) as num
duration = duration * 10 //convert to deciseconds
try
mapSwitcher.startMapVote(duration = duration)
catch (var/exception/e)
logTheThing("debug", null, null, "<b>Map Switcher:</b> [e.name]")
return alert("Oh no! Something went wrong with the map switcher. Details have been logged to the debug category.")
logTheThing("admin", usr ? usr : src, null, "triggered a player map vote (duration: [duration])")
logTheThing("diary", usr ? usr : src, null, "triggered a player map vote (duration: [duration])", "admin")
message_admins("[key_name(usr ? usr : src)] triggered a player map vote (duration: [duration])")
/client/proc/cmd_end_map_vote()
set category = "Admin"
set name = "End Map Vote"
set desc = "End a player vote for the next map"
set popup_menu = 0
admin_only
var/bustedMapSwitcher = isMapSwitcherBusted()
if (bustedMapSwitcher)
return alert(bustedMapSwitcher)
if (!mapSwitcher.playersVoting)
return alert("There isn't a vote currently underway.")
try
mapSwitcher.endMapVote()
catch (var/exception/e)
logTheThing("debug", null, null, "<b>Map Switcher:</b> [e.name]")
return alert("Oh no! Something went wrong with the map switcher. Details have been logged to the debug category.")
logTheThing("admin", usr ? usr : src, null, "ended the player map vote")
logTheThing("diary", usr ? usr : src, null, "ended the player map vote", "admin")
message_admins("[key_name(usr ? usr : src)] ended the player map vote")
/client/proc/cmd_cancel_map_vote()
set category = "Admin"
set name = "Cancel Map Vote"
set desc = "Cancel a player map vote without doing anything"
set popup_menu = 0
admin_only
var/bustedMapSwitcher = isMapSwitcherBusted()
if (bustedMapSwitcher)
return alert(bustedMapSwitcher)
if (!mapSwitcher.playersVoting)
return alert("There isn't a vote currently underway.")
var/really = alert("Are you sure you want to cancel the map vote before it's finished? This will discard all votes and do nothing.", "Dash player dreams?", "Yes", "No")
if (really == "No")
return
try
mapSwitcher.cancelMapVote()
catch (var/exception/e)
logTheThing("debug", null, null, "<b>Map Switcher:</b> [e.name]")
return alert("Oh no! Something went wrong with the map switcher. Details have been logged to the debug category.")
logTheThing("admin", usr ? usr : src, null, "cancelled the player map vote prematurely")
logTheThing("diary", usr ? usr : src, null, "cancelled the player map vote prematurely", "admin")
message_admins("[key_name(usr ? usr : src)] cancelled the player map vote prematurely. Rude.")
/client/proc/cmd_antag_history(var/ckey as text)
set category = "Admin"
set name = "View Antag History"
set desc = "View the antag history for a given player"
set popup_menu = 0
admin_only
if (!ckey)
return
var/list/history
try
history = antagWeighter.completeHistory(ckey)
catch(var/exception/e)
return alert(e.name)
var/html = "<table>"
html += "<thead><tr>"
html += "<th>Mode</th>"
html += "<th>Played</th>"
html += "<th>Antag</th>"
html += "<th>Chosen</th>"
html += "<th>Target</th>"
html += "</tr></thead>"
for (var/role in config.play_antag_rates)
var/list/data
if (role in history)
data = history[role]
else
//some round types are so rare, we might have no data for this player playing them, so we make shit up
data = list(
"seen" = 0,
"selected" = 0,
"percent" = 0
)
var/seen = round(text2num(data["seen"]))
var/selected = round(text2num(data["selected"]))
var/chosen = round(text2num(data["percent"]))
var/target = config.play_antag_rates[role]
var/chosenClass = "fine"
//if the player has been chosen more than 50% over the target, show red
if (chosen > target * 1.5)
chosenClass = "danger"
//or, if it's just over the target, show orange
else if (chosen > target)
chosenClass = "warning"
html += "<tr>"
html += "<td>[capitalize(role)]</td>"
html += "<td>[seen]</td>"
html += "<td>[selected]</td>"
html += "<td class='[chosenClass]'>[chosen]%</td>"
html += "<td>[target]%</td>"
html += "</tr>"
html += "</table>"
var/antagHistoryHtml = grabResource("html/antagHistory.html")
antagHistoryHtml = replacetext(antagHistoryHtml, "<!-- HTML GOES HERE -->", html)
src.Browse(antagHistoryHtml, "window=antaghistory[ckey];title=[capitalize(ckey)]+Antag+History;")
/client/proc/cmd_dispatch_observe_to_ghosts(var/atom/movable/target)
set category = "Admin"
set name = "Alert All Ghosts"
set desc = "Send a notice to ghosts that something weird is happening at a person"
set popup_menu = 0
admin_only
if(ghost_notifier)
ghost_notifier.send_notification(src, target, /datum/ghost_notification/observe/admin)
/client/proc/showPregameHTML()
set category = "Admin"
set name = "Display Pregame HTML"
set desc = "Tired of boring map gimmicks on the pregame screen? Try HTML!"
admin_only
if(pregameHTML)
if(alert("There's already some HTML shown. Do you want to remove or replace it?", "HTML clear?", "Remove", "Replace") == "Remove")
pregameHTML = null
message_admins("[key_name(src)] cleared the pre-game HTML.")
logTheThing("admin", src, null, "cleared the pre-game HTML.")
for(var/client/C)
try
C<< browse("", "window=pregameBrowser")
if(C)
winshow(C, "pregameBrowser", 0)
catch()
return
var/newHTML = null
if(alert("Do you want to upload an HTML file, or type it in?", "HTML Source", "Here", "Upload") == "Here")
newHTML = input("Gib HTML, then.", "FEED ME HTML", "<b>memes</b>") as message
else
newHTML = input("Upload that file!", "Upload that file!") as file
if(newHTML)
newHTML = file2text(newHTML)
if(newHTML)
pregameHTML = newHTML
message_admins("[key_name(src)] changed the pre-game HTML.")
logTheThing("admin", src, null, "changed the pre-game HTML.")
for(var/client/C)
if(istype(C.mob, /mob/new_player))
C << browse(pregameHTML, "window=pregameBrowser")
if(C)
winshow(C, "pregameBrowser", 1)
/client/proc/implant_all()
set category = "Special Verbs"
set name = "Implant All"
set desc = "Gives everyone a microbomb. You cannot undo this!!"
admin_only
microbombs_4_everyone()
/var/microbombs_4_everyone = 0
/proc/microbombs_4_everyone(var/bomb_power = null)
if (isnull(bomb_power) && usr)
bomb_power = input("Please enter bomb power. Set to 0 to turn off. Turning off will not get rid of or disable existing microbombs.") as null|num
if (isnull(bomb_power))
return
microbombs_4_everyone = max(bomb_power, 0)
message_admins("[key_name(usr)] [bomb_power > 0 ? "implanted everyone with a microbomb. Power: [bomb_power]" : "turned off microbombs for everyone."]")
logTheThing("admin", usr, null, "[bomb_power > 0 ? "implanted everyone with a microbomb. Power: [bomb_power]" : "turned off microbombs for everyone."]")
if (microbombs_4_everyone > 0)
var/implanted = 0
for (var/mob/living/carbon/human/H in mobs)
var/obj/item/implant/microbomb/MB = new (H)
MB.explosionPower = microbombs_4_everyone
MB.implanted = 1
H.implant.Add(MB)
MB.implanted(H, 0)
implanted ++
SPAWN_DBG (30)
boutput(usr, "<span style='color:red;'>Implanted [implanted] people with microbombs. Any further humans that spawn will also have bombs.</span>")
else
boutput(usr, "<span style='color:red;'>Turned off spawning with microbombs. No existing microbombs have been deleted or disabled.</span>")
Reference in New Issue View Git Blame Copy Permalink