diff --git a/code/modules/admin/admin_verb_lists.dm b/code/modules/admin/admin_verb_lists.dm index aa0deca9d6..3a95be8f6c 100644 --- a/code/modules/admin/admin_verb_lists.dm +++ b/code/modules/admin/admin_verb_lists.dm @@ -106,6 +106,7 @@ var/list/admin_verbs_admin = list( /datum/admins/proc/paralyze_mob, /client/proc/fixatmos, /datum/admins/proc/quick_nif, //VOREStation Add, + /datum/admins/proc/quick_authentic_nif, //CHOMPStation add /datum/admins/proc/sendFax, /client/proc/despawn_player, /datum/admins/proc/view_feedback, @@ -368,6 +369,7 @@ var/list/admin_verbs_mod = list( /datum/admins/proc/view_persistent_data, /datum/admins/proc/view_txt_log, //shows the server log (diary) for today, /datum/admins/proc/quick_nif, //CHOMPEdit + /datum/admins/proc/quick_authentic_nif, //CHOMPEdit /client/proc/admin_teleport, //CHOMPEdit /datum/admins/proc/view_atk_log //shows the server combat-log, doesn't do anything presently, ) diff --git a/code/modules/admin/verbs/debug_ch.dm b/code/modules/admin/verbs/debug_ch.dm new file mode 100644 index 0000000000..b33604b7ea --- /dev/null +++ b/code/modules/admin/verbs/debug_ch.dm @@ -0,0 +1,32 @@ +/datum/admins/proc/quick_authentic_nif() + set category = "Fun" + set name = "Quick Auth NIF" + set desc = "Spawns an authentic NIF into someone in quick-implant mode." + + if(!check_rights(R_ADMIN|R_EVENT|R_DEBUG)) //CHOMPStation Edit TFF 24/4/19: Allow Devs to use Quick-NIF verb. + return + + var/mob/living/carbon/human/H = input("Pick a mob with a player","Quick Authentic NIF") as null|anything in player_list + + if(!H) + return + + if(!istype(H)) + to_chat(usr,"That mob type ([H.type]) doesn't support NIFs, sorry.") + return + + if(!H.get_organ(BP_HEAD)) + to_chat(usr,"Target is unsuitable.") + return + + if(H.nif) + to_chat(usr,"Target already has a NIF.") + return + + if(H.species.flags & NO_SCAN) + new /obj/item/device/nif/authenticbio(H) + else + new /obj/item/device/nif/authentic(H) + + log_and_message_admins("[key_name(src)] Quick Authentic NIF'd [H.real_name].") + feedback_add_details("admin_verb","QANIF") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc! diff --git a/vorestation.dme b/vorestation.dme index 5adf208ce5..252086b43d 100644 --- a/vorestation.dme +++ b/vorestation.dme @@ -1796,6 +1796,7 @@ #include "code\modules\admin\verbs\custom_event.dm" #include "code\modules\admin\verbs\deadsay.dm" #include "code\modules\admin\verbs\debug.dm" +#include "code\modules\admin\verbs\debug_ch.dm" #include "code\modules\admin\verbs\debug_vr.dm" #include "code\modules\admin\verbs\diagnostics.dm" #include "code\modules\admin\verbs\dice.dm"