[PTBF] Hallucination - Meet the Sniper

code/modules/hallucinations/effects/major.dm

@@ -408,3 +408,99 @@
 	if(images && images[1])
 		images[1].icon = 'icons/mob/alien.dmi'
 		images[1].icon_state = "alienh_pounce"
+
+/**
+  * # Hallucination - Sniper
+  *
+  * Fires a penetrator round at the target. On hit, knockdown + stam loss + hallucinated blood splatter for a bit.
+  */
+/obj/effect/hallucination/sniper
+	duration = 15 SECONDS
+
+/obj/effect/hallucination/sniper/Initialize(mapload, mob/living/carbon/target)
+	. = ..()
+
+	// Find a start spot for the sniper bullet
+	var/list/possible_turfs = list()
+	for(var/turf/t in RANGE_TURFS(13, target.loc))
+		possible_turfs += t
+	if(!length(possible_turfs))
+		return
+	var/turf/shot_loc = get_turf(pick(possible_turfs))
+	fire_bullet(shot_loc, target)
+
+/obj/effect/hallucination/sniper/proc/fire_bullet(turf/shot_loc, mob/living/carbon/target)
+	// Fire the bullet
+	var/obj/item/projectile/bullet/sniper/penetrator/hallucination/bullet = new(shot_loc)
+	bullet.hallucinator = target
+	bullet.def_zone = BODY_ZONE_HEAD
+	bullet.suppressed = TRUE
+
+	// Turn right away
+	var/matrix/M = new
+	var/angle = round(get_angle(shot_loc, target))
+	M.Turn(angle)
+	bullet.transform = M
+
+	// Handle who can see the bullet
+	if(target.client)
+		bullet.bullet_image = image(bullet.icon, bullet, bullet.icon_state, OBJ_LAYER, bullet.dir)
+		bullet.bullet_image.transform = M
+		target.client.images.Add(bullet.bullet_image)
+
+	// Start flying
+	bullet.trajectory = new(bullet.x, bullet.y, bullet.z, bullet.pixel_x, bullet.pixel_y, angle, SSprojectiles.global_pixel_speed)
+	bullet.last_projectile_move = world.time
+	bullet.has_been_fired = TRUE
+	target.playsound_local(target.loc, 'sound/weapons/gunshots/gunshot_sniper.ogg', 50)
+	START_PROCESSING(SSprojectiles, bullet)
+
+/obj/effect/hallucination/sniper_bloodsplatter
+	duration = 15 SECONDS
+	hallucination_icon = 'icons/effects/blood.dmi'
+	hallucination_icon_state = "mfloor1"
+	hallucination_color = "#A10808"
+
+/obj/effect/hallucination/sniper_bloodsplatter/Initialize(mapload, mob/living/carbon/target)
+	var/list/b_data = target.get_blood_data(target.get_blood_id())
+	if(b_data && !isnull(b_data["blood_color"]))
+		hallucination_color = b_data["blood_color"]
+	. = ..()
+	hallucination_icon_state = pick("mfloor1", "mfloor2", "mfloor3", "mfloor4", "mfloor5", "mfloor6", "mfloor7")
+
+
+/obj/item/projectile/bullet/sniper/penetrator/hallucination
+	nodamage = TRUE
+	invisibility = INVISIBILITY_MAXIMUM // You no see boolet
+	/// The hallucinator
+	var/mob/living/carbon/hallucinator = null
+	/// Handles only the victim seeing it
+	var/image/bullet_image = null
+
+/obj/item/projectile/bullet/sniper/penetrator/hallucination/on_hit(atom/target, blocked, hit_zone)
+	if(!isliving(target))
+		return
+	if(target != hallucinator)
+		return
+	var/mob/living/hit_target = target
+	var/organ_hit_text = ""
+	if(hit_target.has_limbs)
+		organ_hit_text = " in \the [parse_zone(def_zone)]"
+	hit_target.playsound_local(loc, hitsound, 5, TRUE)
+	hit_target.apply_damage(60, STAMINA, def_zone)
+	hit_target.apply_effects(knockdown = 2 SECONDS)
+	new /obj/effect/hallucination/sniper_bloodsplatter(src.loc, hit_target)
+	to_chat(hit_target, "<span class='userdanger'>You're shot by \a [src][organ_hit_text]!</span>")
+
+/obj/item/projectile/bullet/sniper/penetrator/hallucination/Bump(atom/A, yes)
+	if(!yes) // prevents double bumps.
+		return
+	var/turf/target_turf = get_turf(A)
+	prehit(A)
+	var/mob/living/hit_target = A
+	if(hit_target == hallucinator)
+		hit_target.bullet_act(src, def_zone)
+	loc = target_turf
+	if(A)
+		permutated.Add(A)
+	return 0

code/modules/hallucinations/hallucinations.dm

@@ -26,6 +26,7 @@ GLOBAL_LIST_INIT(hallucinations, list(
 		/obj/effect/hallucination/assault = 10,
 		/obj/effect/hallucination/terror_infestation = 10,
 		/obj/effect/hallucination/loose_energy_ball = 10,
+		/obj/effect/hallucination/sniper = 10,
 	)
 ))
 
@@ -45,6 +46,8 @@ GLOBAL_LIST_INIT(hallucinations, list(
 	var/hallucination_icon_state
 	/// Hallucination override.
 	var/hallucination_override = FALSE
+	/// Hallucination color
+	var/hallucination_color
 	/// Hallucination layer.
 	var/hallucination_layer = MOB_LAYER
 	/// The mob that sees this hallucination.
@@ -62,6 +65,8 @@ GLOBAL_LIST_INIT(hallucinations, list(
 	target = hallucination_target
 	if(hallucination_icon && hallucination_icon_state)
 		var/image/I = image(hallucination_icon, hallucination_override ? src : get_turf(src), hallucination_icon_state)
+		if(hallucination_color)
+			I.color = hallucination_color
 		I.override = hallucination_override
 		I.layer = hallucination_layer
 		add_icon(I)