Hammers for hurting people (#16569)

* Hammers for hurting people

Added a new dark variant of the squish hammer that breaks every bone in the targets body and shoots out blood. Unfortunately they will become unsquished when they fall over, but still gets a nice initial squeeze!

Added a simple claw hammer weapon that I have plans for in an upcoming event. Strong melee weapon that easily breaks down windows and barricades, but also has a high chance of breaking any bones that it hits.

* Just a friendly little warning to my fellow staff :)

code/game/objects/items/weapons/joke.dm

@@ -16,4 +16,24 @@
 	else
 		M.ClearTransform()
 		M.update_transform()
-	return ..()
+	return ..()
+
+// Do not ever just leave this laying about, it will go horribly wrong!
+/obj/item/squishhammer/dark
+	name = "The Dark Short Stacker"
+	desc = "Wield the power of this weapon with responsibility (God knows you won't)."
+	icon = 'icons/obj/items.dmi'
+	icon_state = "dark_hammer"
+	attack_verb = list("stacked")
+	force = 0
+	throwforce = 0
+
+/obj/item/squishhammer/dark/attack(mob/M as mob, mob/user as mob)
+	..()
+	var/mob/living/carbon/human/H = M
+	if(istype(H))
+		for(var/obj/item/organ/external/E in H.organs)
+			E.fracture() // Oof, ouch, owie
+	var/turf/T = M.loc
+	if(isturf(T))
+		new /obj/effect/gibspawner/generic(T)

code/game/objects/items/weapons/melee/misc_vr.dm

@@ -13,4 +13,42 @@
 	sharp = TRUE
 	edge = FALSE
 	attack_verb = list("stabbed", "lunged at", "dextrously struck", "sliced", "lacerated", "impaled", "diced", "charioted")
-	hitsound = 'sound/weapons/bladeslice.ogg'
+	hitsound = 'sound/weapons/bladeslice.ogg'
+
+/obj/item/melee/hammer
+	name = "claw hammer"
+	desc = "A simple claw hammer for hitting things or people with, and the claw part probably does something too."
+	icon = 'icons/obj/weapons.dmi'
+	icon_state = "claw_hammer"
+	force = 15
+	throwforce = 10
+	w_class = ITEMSIZE_SMALL
+	attack_verb = list("smashed", "swung at", "pummelled", "nailed", "crushed", "bonked", "hammered", "cracked")
+	defend_chance = 0
+
+/obj/item/melee/hammer/apply_hit_effect(mob/living/target, mob/living/user, var/hit_zone, var/attack_modifier)
+	if(istype(target,/mob/living/carbon/human))
+		var/mob/living/carbon/human/H = target
+		if(prob(50))
+			var/obj/item/organ/external/affecting = H.get_organ(hit_zone)
+			affecting.fracture()
+	return ..()
+
+/obj/item/melee/hammer/afterattack(atom/A as mob|obj|turf|area, mob/user as mob, proximity)
+	if(!proximity) return
+	..()
+	if(A)
+		if(istype(A,/obj/structure/window))
+			var/obj/structure/window/W = A
+			if(prob(50))
+				W.visible_message(span_warning("\The [W] shatters under the force of the impact!"))
+				W.shatter()
+		else if(istype(A,/obj/structure/barricade))
+			var/obj/structure/barricade/B = A
+			if(prob(50))
+				B.visible_message(span_warning("\The [B] is broken apart with ease!"))
+				B.dismantle()
+		else if(istype(A,/obj/structure/grille))
+			if(prob(50))
+				A.visible_message(span_warning("\The [A] is smashed open!"))
+				qdel(A)