You can now microwave pets (#83887)

## About The Pull Request
Mob placeholders could be microwaved prior, but it wouldn't do anything
besides spit out the placeholder on the ground
Now they get electrocuted, and if this kills them it gibs them, making a
mess.
This works for spacemen if they're varedited to be able to be held too,
so go wild microwaving the clown or something I guess.



https://github.com/tgstation/tgstation/assets/51932756/f4fdcb6b-54aa-4872-992d-78706dc9568f



## Why It's Good For The Game
Uhhh.... 
It adds a lot of potential comedy into the sandbox by allowing shocking
events like stuffing ian into the deepfryer, putting him into a burger
and then microwaving his body out of said burger to the horror of all
who witness such an act of profane cookery

## Changelog
🆑
add: You can now microwave station pets that you can pick up, with
predictable outcomes
/🆑

code/modules/mob/living/basic/vermin/mouse.dm

@@ -117,11 +117,19 @@
 	. = ..(TRUE)
 	// Now if we were't ACTUALLY gibbed, spawn the dead mouse
 	if(!gibbed)
-		var/obj/item/food/deadmouse/mouse = new(loc)
-		mouse.copy_corpse(src)
-		if(HAS_TRAIT(src, TRAIT_BEING_SHOCKED))
-			mouse.desc = "They're toast."
-			mouse.add_atom_colour("#3A3A3A", FIXED_COLOUR_PRIORITY)
+		var/make_a_corpse = TRUE
+		var/place_to_make_corpse = loc
+		if(istype(loc, /obj/item/clothing/head/mob_holder))//If our mouse is dying in place holder we want to put the dead mouse where the place holder was
+			var/obj/item/clothing/head/mob_holder/found_holder = loc
+			place_to_make_corpse = found_holder.loc
+			if(istype(found_holder.loc, /obj/machinery/microwave))//Microwaves gib things that die when cooked, so we don't need to make a dead body too
+				make_a_corpse = FALSE
+		if(make_a_corpse)
+			var/obj/item/food/deadmouse/mouse = new(place_to_make_corpse)
+			mouse.copy_corpse(src)
+			if(HAS_TRAIT(src, TRAIT_BEING_SHOCKED))
+				mouse.desc = "They're toast."
+				mouse.add_atom_colour("#3A3A3A", FIXED_COLOUR_PRIORITY)
 	qdel(src)
 
 /mob/living/basic/mouse/UnarmedAttack(atom/attack_target, proximity_flag, list/modifiers)