Xenofauna Guns (#10700)

code/modules/projectiles/guns/energy/special.dm

@@ -199,13 +199,19 @@
 /obj/item/gun/energy/mousegun/emag_act(var/remaining_charges, var/mob/user)
 	if(!emagged)
 		to_chat(user, SPAN_WARNING("You overload \the [src]'s shock modulator."))
-		max_shots = 10
+		max_shots = initial(max_shots) + 4
 		projectile_type = /obj/item/projectile/beam/mousegun/emag
 		emagged = TRUE
 		QDEL_NULL(power_supply)
 		power_supply = new /obj/item/cell/device/variable(src, max_shots * charge_cost)
 		return TRUE
 
+/obj/item/gun/energy/mousegun/xenofauna
+	name = "xenofauna gun"
+	desc = "The NT \"Xenovermino\" Zap-Blast is a highly sophisticated and probably safe beamgun designed to deal with hostile xenofauna."
+	projectile_type = /obj/item/projectile/beam/mousegun/xenofauna
+	max_shots = 12
+
 /obj/item/gun/energy/net
 	name = "net gun"
 	desc = "A gun designed to deploy energy nets to capture animals or unruly crew members."

code/modules/projectiles/projectile/beams.dm

@@ -280,6 +280,16 @@
 			to_chat(M, 'sound/effects/basscannon.ogg')
 	return TRUE
 
+/obj/item/projectile/beam/mousegun/xenofauna
+	nodamage = FALSE
+	damage = 10
+
+/obj/item/projectile/beam/mousegun/xenofauna/mousepulse(atom/target, range, log)
+	if(is_type_in_list(target, list(/mob/living/simple_animal/hostile/retaliate/cavern_dweller, /mob/living/simple_animal/hostile/carp, /mob/living/simple_animal/carp, /mob/living/simple_animal/hostile/giant_spider)))
+		var/mob/living/simple_animal/SA = target
+		SA.take_organ_damage(0, 20)
+	return TRUE
+
 /obj/item/projectile/beam/shotgun
 	name = "diffuse laser"
 	icon_state = "laser"