Dynamic Sound

code/__DEFINES/dcs/signals/signals_client.dm

@@ -27,3 +27,6 @@
 
 /// Called when something is removed from a client's screen : /client/proc/remove_from_screen(screen_remove)
 #define COMSIG_CLIENT_SCREEN_REMOVE "client_screen_remove"
+
+/// From movement.dm: /atom/movable/proc/Moved(atom/oldloc, direction, Forced = FALSE)
+#define COMSIG_CLIENT_MOB_MOVED "client_mob_moved"

code/datums/diseases/black_goo.dm

@@ -155,7 +155,7 @@
 			human.remove_language(LANGUAGE_ENGLISH) // You lose the ability to understand english. Language processing is handled in the mind not the body.
 			var/datum/species/zombie/zombie_species = GLOB.all_species[SPECIES_ZOMBIE]
 			zombie_species.handle_alert_ghost(human)
-		playsound(human.loc, 'sound/hallucinations/wail.ogg', 25, 1)
+		playsound(human, 'sound/hallucinations/wail.ogg', 25, 1)
 		human.jitteriness = 0
 		human.set_species(SPECIES_ZOMBIE)
 		stage = 4

code/datums/soundOutput.dm

@@ -4,6 +4,8 @@
 	var/list/soundscape_playlist = list() //Updated on changing areas
 	var/ambience = null //The file currently being played as ambience
 	var/status_flags = 0 //For things like ear deafness, psychodelic effects, and other things that change how all sounds behave
+	var/list/current_sounds = list()
+	var/list/source_sounds = list()
 
 	/// Currently applied environmental reverb.
 	VAR_PROTECTED/owner_environment = SOUND_ENVIRONMENT_NONE
@@ -16,15 +18,52 @@
 	RegisterSignal(owner.mob, COMSIG_MOVABLE_MOVED, PROC_REF(on_mob_moved))
 	RegisterSignal(owner.mob, COMSIG_MOB_LOGOUT, PROC_REF(on_mob_logout))
 	RegisterSignal(owner, COMSIG_CLIENT_MOB_LOGGED_IN, PROC_REF(on_client_mob_logged_in))
+	RegisterSignal(owner, COMSIG_CLIENT_MOB_MOVED, PROC_REF(update_sounds))
 	return ..()
 
 /datum/soundOutput/Destroy()
 	UnregisterSignal(owner.mob, list(COMSIG_MOVABLE_MOVED, COMSIG_MOB_LOGOUT))
 	UnregisterSignal(owner, COMSIG_CLIENT_MOB_LOGGED_IN)
+	UnregisterSignal(owner, COMSIG_CLIENT_MOB_MOVED)
 	owner = null
 	return ..()
 
-/datum/soundOutput/proc/process_sound(datum/sound_template/T)
+#define SMOOTHING 2 // [1, 32], 32 Means best sound most lag 1 Means worst sound least lag
+
+/datum/soundOutput/proc/update_sounds(atom/user, direction)
+	SIGNAL_HANDLER
+	for(var/channel in current_sounds)
+		for(var/i in 0 to round(32/SMOOTHING))
+			i = i * SMOOTHING
+			switch(direction)
+				if(1)
+					process_sound(current_sounds[channel], TRUE, 0, -1+i/32)
+				if(2)
+					process_sound(current_sounds[channel], TRUE, 0, 1-i/32)
+				if(4)
+					process_sound(current_sounds[channel], TRUE, -1+i/32)
+				if(8)
+					process_sound(current_sounds[channel], TRUE, 1-i/32, 0)
+
+/datum/soundOutput/proc/update_sounds_from_source(atom/source, direction)
+	SIGNAL_HANDLER
+	for(var/datum/sound_template/template in source_sounds[source])
+		for(var/i in 0 to round(32/SMOOTHING))
+			i = i * SMOOTHING
+			switch(direction)
+				if(1)
+					process_sound(template, TRUE, 0, 1+i/32)
+				if(2)
+					process_sound(template, TRUE, 0, -1-i/32)
+				if(4)
+					process_sound(template, TRUE, 1+i/32)
+				if(8)
+					process_sound(template, TRUE, -1-i/32, 0)
+
+/datum/soundOutput/proc/remove_sound(channel)
+	current_sounds -= channel
+
+/datum/soundOutput/proc/process_sound(datum/sound_template/T, update=FALSE, offset_x = 0, offset_y = 0)
 	var/sound/S = sound(T.file, T.wait, T.repeat)
 	S.volume = owner.volume_preferences[T.volume_cat] * T.volume
 	if(T.channel == 0)
@@ -33,29 +72,54 @@
 		S.channel = T.channel
 	S.frequency = T.frequency
 	S.falloff = T.falloff
-	S.status = T.status
-	if(T.x && T.y && T.z)
-		var/turf/owner_turf = get_turf(owner.mob)
-		if(owner_turf)
-			// We're in an interior and sound came from outside
-			if(SSinterior.in_interior(owner_turf) && owner_turf.z != T.z)
-				var/datum/interior/VI = SSinterior.get_interior_by_coords(owner_turf.x, owner_turf.y, owner_turf.z)
-				if(VI && VI.exterior)
-					var/turf/candidate = get_turf(VI.exterior)
-					if(candidate.z != T.z)
-						return // Invalid location
-					S.falloff /= 2
-					owner_turf = candidate
-			S.x = T.x - owner_turf.x
-			S.y = 0
-			S.z = T.y - owner_turf.y
-		S.y += T.y_s_offset
-		S.x += T.x_s_offset
-		S.echo = SOUND_ECHO_REVERB_ON //enable environment reverb for positional sounds
+	S.status = update ? SOUND_UPDATE : T.status 
+	if(!update)
+		S.params = list("on-end" = ".soundend [S.channel] [T.source]")
+
+
+	var/turf/source_turf
+	if(!QDELETED(T.source))
+		source_turf = get_turf(T.source)
+
+		if(!update && istype(T.source, /atom/movable))
+			source_sounds[T.source] = T
+			RegisterSignal(T.source, COMSIG_MOVABLE_MOVED, PROC_REF(update_sounds))
+	else
+		source_turf = locate(T.x, T.y, T.z)
+
+	var/turf/owner_turf = get_turf(owner.mob)
+	if(owner_turf)
+		// We're in an interior and sound came from outside
+		if(SSinterior.in_interior(owner_turf) && owner_turf.z != T.z)
+			var/datum/interior/VI = SSinterior.get_interior_by_coords(owner_turf.x, owner_turf.y, owner_turf.z)
+			if(VI && VI.exterior)
+				var/turf/candidate = get_turf(VI.exterior)
+				if(candidate.z != T.z)
+					return // Invalid location
+				S.falloff /= 2
+				owner_turf = candidate
+		S.x = source_turf.x - owner_turf.x + offset_x
+		S.y = 0
+		S.z = source_turf.y - owner_turf.y + offset_y
+	S.y += T.y_s_offset
+	S.x += T.x_s_offset
+	S.echo = SOUND_ECHO_REVERB_ON
 	if(owner.mob.ear_deaf > 0)
 		S.status |= SOUND_MUTE
 
-	sound_to(owner,S)
+	if(!update)
+		current_sounds[num2text(S.channel)] = T
+	sound_to(owner, S)
+
+/client/verb/sound_ended(channel as num, source as mob|obj|turf)
+	set name = ".soundend"
+
+	soundOutput.remove_sound(num2text(channel))
+
+	if(soundOutput.source_sounds[source])
+		soundOutput.source_sounds -= source
+		UnregisterSignal(source, COMSIG_MOVABLE_MOVED)
+
 
 /datum/soundOutput/proc/update_ambience(area/target_area, ambience_override, force_update = FALSE)
 	var/status_flags = SOUND_STREAM

code/game/machinery/bots/mulebot.dm

@@ -452,7 +452,7 @@
 /obj/structure/machinery/bot/mulebot/proc/load(atom/movable/C)
 	if((wires & WIRE_LOADCHECK) && !istype(C,/obj/structure/closet/crate))
 		src.visible_message("[src] makes a sighing buzz.", "You hear an electronic buzzing sound.")
-		playsound(src.loc, 'sound/machines/buzz-sigh.ogg', 25, 0)
+		playsound(src, 'sound/machines/buzz-sigh.ogg', 25, 0)
 		return // if not emagged, only allow crates to be loaded
 
 	//I'm sure someone will come along and ask why this is here... well people were dragging screen items onto the mule, and that was not cool.
@@ -636,25 +636,25 @@
 						mode = 4
 						if(blockcount == 3)
 							src.visible_message("[src] makes an annoyed buzzing sound", "You hear an electronic buzzing sound.")
-							playsound(src.loc, 'sound/machines/buzz-two.ogg', 25, 0)
+							playsound(src, 'sound/machines/buzz-two.ogg', 25, 0)
 
 						if(blockcount > 5) // attempt 5 times before recomputing
 							// find new path excluding blocked turf
 							src.visible_message("[src] makes a sighing buzz.", "You hear an electronic buzzing sound.")
-							playsound(src.loc, 'sound/machines/buzz-sigh.ogg', 25, 0)
+							playsound(src, 'sound/machines/buzz-sigh.ogg', 25, 0)
 
 							spawn(2)
 								calc_path(next)
 								if(length(path) > 0)
 									src.visible_message("[src] makes a delighted ping!", "You hear a ping.")
-									playsound(src.loc, 'sound/machines/ping.ogg', 25, 0)
+									playsound(src, 'sound/machines/ping.ogg', 25, 0)
 								mode = 4
 							mode =6
 							return
 						return
 				else
 					src.visible_message("[src] makes an annoyed buzzing sound", "You hear an electronic buzzing sound.")
-					playsound(src.loc, 'sound/machines/buzz-two.ogg', 25, 0)
+					playsound(src, 'sound/machines/buzz-two.ogg', 25, 0)
 					mode = 5
 					return
 			else
@@ -671,11 +671,11 @@
 					blockcount = 0
 					mode = 4
 					src.visible_message("[src] makes a delighted ping!", "You hear a ping.")
-					playsound(src.loc, 'sound/machines/ping.ogg', 25, 0)
+					playsound(src, 'sound/machines/ping.ogg', 25, 0)
 
 				else
 					src.visible_message("[src] makes a sighing buzz.", "You hear an electronic buzzing sound.")
-					playsound(src.loc, 'sound/machines/buzz-sigh.ogg', 25, 0)
+					playsound(src, 'sound/machines/buzz-sigh.ogg', 25, 0)
 
 					mode = 7
 		//if(6)
@@ -720,7 +720,7 @@
 /obj/structure/machinery/bot/mulebot/proc/at_target()
 	if(!reached_target)
 		src.visible_message("[src] makes a chiming sound!", "You hear a chime.")
-		playsound(src.loc, 'sound/machines/chime.ogg', 25, 0)
+		playsound(src, 'sound/machines/chime.ogg', 25, 0)
 		reached_target = 1
 
 		if(load) // if loaded, unload at target
@@ -770,7 +770,7 @@
 // when mulebot is in the same loc
 /obj/structure/machinery/bot/mulebot/proc/RunOver(mob/living/carbon/human/H)
 	src.visible_message(SPAN_DANGER("[src] drives over [H]!"))
-	playsound(src.loc, 'sound/effects/splat.ogg', 25, 1)
+	playsound(src, 'sound/effects/splat.ogg', 25, 1)
 
 	var/damage = rand(5,15)
 	H.apply_damage(2*damage, BRUTE, "head")

code/game/sound.dm

@@ -18,6 +18,7 @@
 	var/z
 	var/y_s_offset // Vertical sound offset
 	var/x_s_offset // Horizontal sound offset
+	var/atom/source
 
 /proc/get_free_channel()
 	var/static/cur_chan = 1
@@ -72,6 +73,7 @@
 	S.x = turf_source.x
 	S.y = turf_source.y
 	S.z = turf_source.z
+	S.source = source
 
 	if(!SSinterior)
 		SSsound.queue(S)

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

@@ -347,7 +347,7 @@ CULT
 
 	H.put_in_any_hand_if_possible(new /obj/item/device/flashlight, FALSE, TRUE)
 
-	playsound(H.loc, 'sound/voice/scream_horror1.ogg', 25)
+	playsound(H, 'sound/voice/scream_horror1.ogg', 25)
 
 	H.visible_message(SPAN_HIGHDANGER("[H] puts on their robes."), SPAN_WARNING("You put on your robes."))
 	for(var/datum/action/human_action/activable/cult/obtain_equipment/O in H.actions)

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

@@ -160,7 +160,7 @@
 				if(M != src)
 					M.show_message(SPAN_NOTICE("[src] talks into [length(used_radios) ? used_radios[1] : "the radio."]"), SHOW_MESSAGE_VISIBLE)
 			if(ishumansynth_strict(src))
-				playsound(src.loc, 'sound/effects/radiostatic.ogg', 15, 1)
+				playsound(src, 'sound/effects/radiostatic.ogg', 15, 1)
 
 			italics = 1
 			message_range = 2

code/modules/mob/living/carbon/human/species/zombie.dm

@@ -80,9 +80,9 @@
 
 /datum/species/zombie/handle_unique_behavior(mob/living/carbon/human/zombie)
 	if(prob(5))
-		playsound(zombie.loc, basic_moan, 15, basic_variance)
+		playsound(zombie, basic_moan, 15, basic_variance)
 	else if(prob(5))
-		playsound(zombie.loc, rare_moan, 15, rare_variance)
+		playsound(zombie, rare_moan, 15, rare_variance)
 
 /datum/species/zombie/handle_death(mob/living/carbon/human/zombie, gibbed)
 	set waitfor = FALSE

code/modules/mob/living/carbon/xenomorph/Abilities.dm

@@ -136,7 +136,7 @@
 		if(hugger.stat != DEAD)
 			hugger.die()
 
-	playsound(xeno.loc, pick(xeno.screech_sound_effect_list), 75, 0, status = 0)
+	playsound(xeno, pick(xeno.screech_sound_effect_list), 75, 0, status = 0)
 	xeno.visible_message(SPAN_XENOHIGHDANGER("[xeno] emits an ear-splitting guttural roar!"))
 	xeno.create_shriekwave(14) //Adds the visual effect. Wom wom wom, 14 shriekwaves
 

code/modules/mob/living/carbon/xenomorph/Facehuggers.dm

@@ -293,9 +293,9 @@
 	human.disable_lights()
 	human.disable_special_items()
 	if(ishuman_strict(human))
-		playsound(loc, human.gender == "male" ? 'sound/misc/facehugged_male.ogg' : 'sound/misc/facehugged_female.ogg' , 25, 0)
+		playsound(human, human.gender == "male" ? 'sound/misc/facehugged_male.ogg' : 'sound/misc/facehugged_female.ogg' , 25, 0)
 	else if(isyautja(human))
-		playsound(loc, 'sound/voice/pred_facehugged.ogg', 65, FALSE)
+		playsound(human, 'sound/voice/pred_facehugged.ogg', 65, FALSE)
 	if(!sterile)
 		if(!human.species || !(human.species.flags & IS_SYNTHETIC)) //synthetics aren't paralyzed
 			human.apply_effect(MIN_IMPREGNATION_TIME * 0.5 * knockout_mod, PARALYZE) //THIS MIGHT NEED TWEAKS
@@ -435,7 +435,7 @@
 	stat = DEAD
 	flags_inventory &= ~CANTSTRIP
 	visible_message("[icon2html(src, viewers(src))] <span class='danger'>\The [src] curls up into a ball!</span>")
-	playsound(src.loc, 'sound/voice/alien_facehugger_dies.ogg', 25, 1)
+	playsound(src, 'sound/voice/alien_facehugger_dies.ogg', 25, 1)
 
 	if(ismob(loc)) //Make it fall off the person so we can update their icons. Won't update if they're in containers thou
 		var/mob/holder_mob = loc

code/modules/mob/living/carbon/xenomorph/XenoProcs.dm

@@ -319,7 +319,7 @@
 
 	if (pounceAction.freeze_self)
 		if(pounceAction.freeze_play_sound)
-			playsound(loc, rand(0, 100) < 95 ? 'sound/voice/alien_pounce.ogg' : 'sound/voice/alien_pounce2.ogg', 25, 1)
+			playsound(src, rand(0, 100) < 95 ? 'sound/voice/alien_pounce.ogg' : 'sound/voice/alien_pounce2.ogg', 25, 1)
 		ADD_TRAIT(src, TRAIT_IMMOBILIZED, TRAIT_SOURCE_ABILITY("Pounce"))
 		pounceAction.freeze_timer_id = addtimer(CALLBACK(src, PROC_REF(unfreeze_pounce)), pounceAction.freeze_time, TIMER_STOPPABLE)
 	pounceAction.additional_effects(M)

code/modules/mob/living/carbon/xenomorph/abilities/ability_helper_procs.dm

@@ -138,7 +138,7 @@
 		R.take_damage_type(40 / A.acid_delay, "acid", src)
 		visible_message(SPAN_XENOWARNING("[src] vomits globs of vile stuff at \the [O]. It sizzles under the bubbling mess of acid!"), \
 			SPAN_XENOWARNING("We vomit globs of vile stuff at [O]. It sizzles under the bubbling mess of acid!"), null, 5)
-		playsound(loc, "sound/bullets/acid_impact1.ogg", 25)
+		playsound(O, "sound/bullets/acid_impact1.ogg", 25)
 		QDEL_IN(A, 20)
 		return
 
@@ -158,7 +158,7 @@
 		attack_log += text("\[[time_stamp()]\] <font color='green'>Spat acid on [O]</font>")
 	visible_message(SPAN_XENOWARNING("[src] vomits globs of vile stuff all over [O]. It begins to sizzle and melt under the bubbling mess of acid!"), \
 	SPAN_XENOWARNING("We vomit globs of vile stuff all over [O]. It begins to sizzle and melt under the bubbling mess of acid!"), null, 5)
-	playsound(loc, "sound/bullets/acid_impact1.ogg", 25)
+	playsound(O, "sound/bullets/acid_impact1.ogg", 25)
 
 /proc/unroot_human(mob/living/carbon/H, trait_source)
 	if (!isxeno_human(H))

code/modules/mob/living/carbon/xenomorph/abilities/burrower/burrower_powers.dm

@@ -44,7 +44,7 @@
 				COMSIG_LIVING_FLAMER_FLAMED,
 		), PROC_REF(flamer_crossed_immune))
 	add_traits(list(TRAIT_ABILITY_BURROWED, TRAIT_UNDENSE, TRAIT_IMMOBILIZED), TRAIT_SOURCE_ABILITY("Burrow"))
-	playsound(src.loc, 'sound/effects/burrowing_b.ogg', 25)
+	playsound(src, 'sound/effects/burrowing_b.ogg', 25)
 	update_icons()
 	addtimer(CALLBACK(src, PROC_REF(do_burrow_cooldown)), (caste ? caste.burrow_cooldown : 5 SECONDS))
 	burrow_timer = world.time + 90 // How long we can be burrowed

code/modules/mob/living/carbon/xenomorph/abilities/general_powers.dm

@@ -757,7 +757,7 @@
 	if(xeno.ammo.spit_windup)
 		spitting = TRUE
 		if(xeno.ammo.pre_spit_warn)
-			playsound(xeno.loc,"alien_drool", 55, 1)
+			playsound(xeno, "alien_drool", 55, 1)
 		to_chat(xeno, SPAN_WARNING("We begin to prepare a large spit!"))
 		xeno.visible_message(SPAN_WARNING("[xeno] prepares to spit a massive glob!"),\
 		SPAN_WARNING("We begin to spit [xeno.ammo.name]!"))
@@ -775,7 +775,7 @@
 	xeno.visible_message(SPAN_XENOWARNING("[xeno] spits at [atom]!"), \
 
 	SPAN_XENOWARNING("We spit [xeno.ammo.name] at [atom]!") )
-	playsound(xeno.loc, sound_to_play, 25, 1)
+	playsound(xeno, sound_to_play, 25, 1)
 
 	var/obj/projectile/proj = new (current_turf, create_cause_data(xeno.ammo.name, xeno))
 	proj.generate_bullet(xeno.ammo)

code/modules/mob/living/carbon/xenomorph/abilities/predalien/predalien_powers.dm

@@ -10,7 +10,7 @@
 	if(!check_and_use_plasma_owner())
 		return
 
-	playsound(xeno.loc, pick(predalien_roar), 75, 0, status = 0)
+	playsound(xeno, pick(predalien_roar), 75, 0, status = 0)
 	xeno.visible_message(SPAN_XENOHIGHDANGER("[xeno] emits a guttural roar!"))
 	xeno.create_shriekwave(7) //Adds the visual effect. Wom wom wom, 7 shriekwaves
 	for(var/mob/living/carbon/carbon in view(7, xeno))

code/modules/mob/living/carbon/xenomorph/abilities/runner/runner_powers.dm

@@ -126,7 +126,7 @@
 		multitile_vehicle.take_damage_type(20 / acid.acid_delay, "acid", src)
 		visible_message(SPAN_XENOWARNING("[src] vomits globs of vile stuff at [multitile_vehicle]. It sizzles under the bubbling mess of acid!"), \
 			SPAN_XENOWARNING("We vomit globs of vile stuff at [multitile_vehicle]. It sizzles under the bubbling mess of acid!"), null, 5)
-		playsound(loc, "sound/bullets/acid_impact1.ogg", 25)
+		playsound(affected_atom, "sound/bullets/acid_impact1.ogg", 25)
 		QDEL_IN(acid, 20)
 		return
 
@@ -135,7 +135,7 @@
 
 	visible_message(SPAN_XENOWARNING("[src] vomits globs of vile stuff all over [affected_atom]. It begins to sizzle and melt under the bubbling mess of acid!"), \
 	SPAN_XENOWARNING("We vomit globs of vile stuff all over [affected_atom]. It begins to sizzle and melt under the bubbling mess of acid!"), null, 5)
-	playsound(loc, "sound/bullets/acid_impact1.ogg", 25)
+	playsound(affected_atom, "sound/bullets/acid_impact1.ogg", 25)
 
 
 /datum/action/xeno_action/activable/acider_for_the_hive/use_ability(atom/affected_atom)

code/modules/mob/living/carbon/xenomorph/abilities/sentinel/sentinel_powers.dm

@@ -18,7 +18,7 @@
 	xeno.visible_message(SPAN_XENOWARNING("[xeno] spits at [target]!"), \
 	SPAN_XENOWARNING("You spit at [target]!") )
 	var/sound_to_play = pick(1, 2) == 1 ? 'sound/voice/alien_spitacid.ogg' : 'sound/voice/alien_spitacid2.ogg'
-	playsound(xeno.loc, sound_to_play, 25, 1)
+	playsound(xeno, sound_to_play, 25, 1)
 
 	xeno.ammo = GLOB.ammo_list[/datum/ammo/xeno/toxin]
 	var/obj/projectile/projectile = new /obj/projectile(current_turf, create_cause_data(initial(xeno.caste_type), xeno))
@@ -50,7 +50,7 @@
 	xeno.visible_message(SPAN_XENOWARNING("[xeno] spits at [target]!"), \
 	SPAN_XENOWARNING("You spit at [target]!") )
 	var/sound_to_play = pick(1, 2) == 1 ? 'sound/voice/alien_spitacid.ogg' : 'sound/voice/alien_spitacid2.ogg'
-	playsound(xeno.loc, sound_to_play, 25, 1)
+	playsound(xeno, sound_to_play, 25, 1)
 
 	xeno.ammo = GLOB.ammo_list[/datum/ammo/xeno/toxin/shotgun]
 	var/obj/projectile/projectile = new /obj/projectile(current_turf, create_cause_data(initial(xeno.caste_type), xeno))