local Workspace = game:GetService("Workspace")

local function wireUp(source: Instance, target: Instance, sourceName: string?, targetName: string?)
	local wire = Instance.new("Wire", source)
	wire.SourceInstance = source
	wire.TargetInstance = target

	if sourceName then
		wire.SourceName = sourceName
	end
	if targetName then
		wire.TargetName = targetName
	end

	return wire
end

local listener = Instance.new("AudioListener")
listener.Parent = Workspace.CurrentCamera
local output = Instance.new("AudioDeviceOutput")
output.Parent = Workspace

local splitter = Instance.new("AudioChannelSplitter")
splitter.Parent = Workspace
local mixer = Instance.new("AudioChannelMixer")
mixer.Parent = Workspace

-- Envía lo que escucha el oyente a un separador y envía una mezcla a la salida final
wireUp(listener, splitter)
wireUp(mixer, output)

-- Configura tanto el separador como el mezclador para usar un diseño cuadrifónico
splitter.Layout = Enum.AudioChannelLayout.Quad
mixer.Layout = Enum.AudioChannelLayout.Quad

-- Da a cada uno de los cuatro canales su propio cambiador de tono
local frontLeft = Instance.new("AudioPitchShifter")
frontLeft.Name = "Frente Izquierda"
frontLeft.Pitch = 1.25
frontLeft.Parent = Workspace
local backLeft = Instance.new("AudioPitchShifter")
backLeft.Name = "Detrás Izquierda"
backLeft.Pitch = 0.5
backLeft.Parent = Workspace
local frontRight = Instance.new("AudioPitchShifter")
frontRight.Name = "Frente Derecha"
frontRight.Pitch = 1.5
frontRight.Parent = Workspace
local backRight = Instance.new("AudioPitchShifter")
backRight.Name = "Detrás Derecha"
backRight.Pitch = 0.75
backRight.Parent = Workspace

wireUp(splitter, frontLeft, "Izquierda")
wireUp(splitter, backLeft, "DetrásIzquierda")
wireUp(splitter, frontRight, "Derecha")
wireUp(splitter, backRight, "DetrásDerecha")

wireUp(frontLeft, mixer, nil, "Izquierda")
wireUp(backLeft, mixer, nil, "DetrásIzquierda")
wireUp(frontRight, mixer, nil, "Derecha")
wireUp(backRight, mixer, nil, "DetrásDerecha")

-- Configura una parte para emitir audio
local part = Instance.new("Part")
part.Shape = Enum.PartType.Ball
part.Size = Vector3.new(4, 4, 4)
part.Material = Enum.Material.SmoothPlastic
part.CastShadow = false
part.Position = Vector3.new(0, 4, -12)
part.Anchored = true
part.Parent = Workspace

local analyzer = Instance.new("AudioAnalyzer")
analyzer.Parent = part
local emitter = Instance.new("AudioEmitter")
emitter.Parent = part
local assetPlayer = Instance.new("AudioPlayer")
assetPlayer.Looping = true
assetPlayer.Asset = "rbxassetid://97799489309320"
assetPlayer.Parent = emitter

wireUp(assetPlayer, emitter)
wireUp(assetPlayer, analyzer)

-- Comienza a reproducir el audio
assetPlayer:Play()

-- Ajusta el color de la parte a medida que se reproduce el audio
while true do
	local peak = math.sqrt(analyzer.PeakLevel)
	part.Color = Color3.new(peak, peak, peak)
	task.wait()
end