Adds a nugget smite for admins (ParadiseSS13#22637)

* new smites

* part dos

* just nugget

* msg update

* forgot to move this

* Review

* added logmsg

* Update code/modules/mob/living/carbon/human/human_death.dm

Tested and applied!

Co-authored-by: Farie82 <farie82@users.noreply.github.com>

---------

Co-authored-by: Farie82 <farie82@users.noreply.github.com>

code/modules/admin/topic.dm

@@ -2065,6 +2065,7 @@
 			ptypes += "Crew Traitor"
 			ptypes += "Floor Cluwne"
 			ptypes += "Shamebrero"
+			ptypes += "Nugget"
 		var/punishment = input(owner, "How would you like to smite [M]?", "Its good to be baaaad...", "") as null|anything in ptypes
 		if(!(punishment in ptypes))
 			return
@@ -2180,6 +2181,13 @@
 				var/obj/item/clothing/head/sombrero/shamebrero/S = new(H.loc)
 				H.equip_to_slot_or_del(S, SLOT_HUD_HEAD)
 				logmsg = "shamebrero"
+			if("Nugget")
+				H.Weaken(12 SECONDS, TRUE)
+				H.AdjustJitter(40 SECONDS)
+				to_chat(H, "<span class='danger'>You feel as if your limbs are being ripped from your body!</span>")
+				addtimer(CALLBACK(H, TYPE_PROC_REF(/mob/living/carbon/human, make_nugget)), 6 SECONDS)
+				logmsg = "nugget"
+
 		if(logmsg)
 			log_admin("[key_name(owner)] smited [key_name(M)] with: [logmsg]")
 			message_admins("[key_name_admin(owner)] smited [key_name_admin(M)] with: [logmsg]")

code/modules/mob/living/carbon/human/human_death.dm

@@ -169,3 +169,10 @@
 		update_body()
 		update_mutantrace()
 		UpdateAppearance() // reset hair from DNA
+
+/mob/living/carbon/human/proc/make_nugget(mob/living)
+	for(var/obj/item/organ/external/limb as anything in bodyparts)
+		if(limb.body_part == LEG_RIGHT || limb.body_part == LEG_LEFT || limb.body_part == ARM_RIGHT || limb.body_part == ARM_LEFT)
+			limb.droplimb()
+	emote("scream")
+	playsound(src, 'sound/misc/desceration-03.ogg', 70)