A port of an early version of Baystation's new instruments (#37447)

* first commit instruments

first commit for instruments, should have everything ready

* open dream linter fix 1

* fix linter warnings 1

* subsystem + other small fixes

* alternative sprites

* more alternative sprites

* style fixes + src. removal

code/modules/bayinstruments/sound_player.dm

@@ -0,0 +1,106 @@
+#define REFRESH_FREQUENCY 5
+/datum/sound_player
+	// Virtual object
+	// It's the one used to modify shit
+	var/range = 15
+	var/volume = 20
+	var/volume_falloff_exponent = 0.9
+	var/forced_sound_in = 4
+	var/falloff = 2
+	var/three_dimensional_sound = 1
+	var/apply_echo = 0
+	var/virtual_environment_selected = -1
+	var/env[23]
+	var/echo[18]
+
+	var/datum/synthesized_song/song
+	var/datum/instrument/instrument
+	var/obj/actual_instrument
+
+	var/list/mob/present_listeners = list()
+	var/list/turf/stored_locations = list()
+
+	/*
+	This needs an explanation.
+	This is beyond dumb, this is fucking retarded.
+	Basically when you send a sound with a non-minus-one environment to a client, it sets their _global_ environment value to whatever you sent to them
+	So ALL sounds will have this environment setting assigned afterwards.
+	You could sort of hear it if you were standing in a hallway and got a PM or something.
+	*/
+	var/last_updated_listeners = 0
+
+/datum/sound_player/New(obj/where, datum/instrument/what)
+	song = new (src, what)
+	actual_instrument = where
+	echo = global.musical_config.echo_default.Copy()
+	env = global.musical_config.env_default.Copy()
+
+/datum/sound_player/Destroy()
+	song.playing = 0
+	present_listeners.Cut()
+	stored_locations.Cut()
+	actual_instrument = null
+	instrument = null
+	sleep(1)
+	for (var/channel in song.free_channels)
+		global.musical_config.free_channels += channel // Deoccupy channels
+	song = null
+	qdel(song)
+	return ..()
+
+
+/datum/sound_player/proc/apply_modifications_for(mob/who, sound/what, note_num, which_line, which_note) // You don't need to override this
+	var/mod = (get_dist_euclidian(who, get_turf(actual_instrument))-1) / range
+	what.volume = volume / (100**mod**volume_falloff_exponent)
+	if (get_turf(who) in stored_locations)
+		what.volume /= 10 // Twice as low
+
+	if (three_dimensional_sound)
+		what.falloff = falloff
+		var/turf/source = get_turf(actual_instrument)
+		var/turf/receiver = get_turf(who)
+		var/dx = source.x - receiver.x // Hearing from the right/left
+		what.x = dx
+
+		var/dz = source.y - receiver.y // Hearing from infront/behind
+		what.z = dz
+
+		what.y = 1
+	if (global.musical_config.env_settings_available)
+		what.environment = global.musical_config.is_custom_env(virtual_environment_selected) ? env : virtual_environment_selected
+	if (apply_echo)
+		what.echo = echo
+	return
+
+
+/datum/sound_player/proc/cache_unseen_tiles()
+	stored_locations = range(range, get_turf(actual_instrument)) - view(range, get_turf(actual_instrument))
+
+
+/datum/sound_player/proc/who_to_play_for() // Find suitable mobs to annoy with music
+	if (world.time - last_updated_listeners > REFRESH_FREQUENCY)
+		present_listeners.Cut()
+		for (var/mob/some_hearer in range(range, get_turf(actual_instrument))) // Apparently hearers only works for local things -- so if something's inside a closet, only things inside this closet can hear it
+			if (!(some_hearer.client && some_hearer.mind))
+				continue
+			//if (isdeaf(some_hearer))
+			//	continue
+			if (some_hearer.ear_deaf > 0)
+				continue
+//			var/dist = get_dist(some_hearer, src)
+			if (!some_hearer.client.prefs.hear_instruments)
+				continue
+			present_listeners += some_hearer
+			last_updated_listeners = world.time
+	return present_listeners
+
+
+/datum/sound_player/proc/shouldStopPlaying(mob/user)
+	return actual_instrument:shouldStopPlaying(user)
+
+
+/datum/sound_player/proc/channel_overload()
+	// Cease playing
+	return 0
+
+#undef REFRESH_FREQUENCY