freq vis remake

local chr = owner.Character
local root = chr.HumanoidRootPart

local sen = 10
local bars = {}

local visGui = Instance.new("BillboardGui")
visGui.Name = "visGui"
visGui.Adornee = root
visGui.Size = UDim2.new(5, 0, 5, 0)
visGui.StudsOffsetWorldSpace = Vector3.new(0, 5, 0)
visGui.Parent = root

local bg = Instance.new("Frame")
bg.Size = UDim2.new(1, 0, 1, 0)
bg.Position = UDim2.new(0.5, 0, 0, 0)
bg.BorderSizePixel = 0.5
bg.BackgroundColor3 = Color3.fromRGB(47, 47, 47)
bg.AnchorPoint = Vector2.new(0.5, 0)
bg.ZIndex = 0
bg.Parent = visGui

local nameText = Instance.new("TextBox")
nameText.Size = UDim2.new(0.75, 0, 0.125, 0)
nameText.Position = UDim2.new(0.125, 0, 0.85, 0)
nameText.BackgroundTransparency = 1
nameText.TextStrokeTransparency = 0
nameText.TextScaled = true
nameText.TextWrapped = true
nameText.Font = "Gotham"
nameText.TextColor3 = Color3.new(1, 1, 1)
nameText.TextStrokeColor3 = Color3.new()
nameText.ZIndex = 2
nameText.Parent = visGui

for i = 1, 64 do
    local bar = Instance.new("Frame")
    bar.BorderSizePixel = 0
    bar.BackgroundColor3 = Color3.fromRGB(99, 254, 147)
    bar.ZIndex = 1
    bar.Parent = visGui
    table.insert(bars, bar)
end

local song = Instance.new("Sound")
song.Name = "serverSound"
song.SoundId = "rbxassetid://1835520403"
song.Volume = 2
song.Looped = true
song.Parent = root
song:Play()

nameText.Text = game:GetService("MarketplaceService"):GetProductInfo(song.SoundId:sub(14))["Name"]

local remote = Instance.new("RemoteEvent")
remote.Name = "visRemote"
remote.Parent = owner.PlayerGui

NLS([[
local owner = game:GetService("Players").LocalPlayer
local chr = owner.Character
local root = chr.HumanoidRootPart
local serverSound = root:FindFirstChild("serverSound")
local remote = owner.PlayerGui:FindFirstChild("visRemote")

local sound = Instance.new("AudioPlayer")
sound.AssetId = "rbxassetid://1835520403"
sound.Looping = true
sound.Parent = root
sound:Play()

local soundAnalyze = Instance.new("AudioAnalyzer")
soundAnalyze.Parent = sound

local soundAnalyzeWire = Instance.new("Wire")
soundAnalyzeWire.SourceInstance = sound
soundAnalyzeWire.TargetInstance = soundAnalyze
soundAnalyzeWire.Parent = sound

local windowFuncs = {
    ["none"] = function(fftTable)
        return fftTable
    end,
    ["triangular"] = function(fftTable)
        local windowedData = {}
        local windowSize = #fftTable
        for i = 1, windowSize do
            local windowValue = 1 - math.abs((2 * i) / windowSize - 1)
            windowedData[i] = (fftTable[i] * windowValue) * 4
        end
        return windowedData
    end,
    ["hann"] = function(fftTable)
        local windowedData = {}
        local windowSize = #fftTable
        for i = 1, windowSize do
            local windowValue = 0.5 * (1 - math.cos(2 * math.pi * i / windowSize)) 
            windowedData[i] = (fftTable[i] * windowValue) * 4
        end
        return windowedData
    end,
    ["hamming"] = function(fftTable)
        local windowedData = {}
        local windowSize = #fftTable
        for i = 1, windowSize do
            local windowValue = 0.54 - 0.46 * math.cos(2 * math.pi * i / windowSize)
            windowedData[i] = (fftTable[i] * windowValue) * 4
        end
        return windowedData
    end,
    ["nuttall"] = function(fftTable)
        local windowedData = {}
        local windowSize = #fftTable
        local a0 = 0.355768
        local a1 = 0.487396
        local a2 = 0.144232
        local a3 = 0.012604
        for i = 1, windowSize do
            local windowValue = a0 -
                a1 * math.cos(2 * math.pi * i / windowSize) +
                a2 * math.cos(4 * math.pi * i / windowSize) -
                a3 * math.cos(6 * math.pi * i / windowSize)
            windowedData[i] = (fftTable[i] * windowValue) * 4
        end
        return windowedData
    end,
    ["blackman"] = function(fftTable)
        local windowedData = {}
        local windowSize = #fftTable
        local a0 = 0.42659
        local a1 = 0.49656
        local a2 = 0.076849
        for i = 1, windowSize do
            local windowValue = a0 -
                a1 * math.cos(2 * math.pi * i / windowSize) +
                a2 * math.cos(4 * math.pi * i / windowSize)
            windowedData[i] = (fftTable[i] * windowValue) * 4
        end
        return windowedData
    end,
    ["blackman-nuttall"] = function(fftTable)
        local windowedData = {}
        local windowSize = #fftTable
        local a0 = 0.3635819
        local a1 = 0.4891775
        local a2 = 0.1365995
        local a3 = 0.0106411
        for i = 1, windowSize do
            local windowValue = a0 -
                a1 * math.cos(2 * math.pi * i / windowSize) +
                a2 * math.cos(4 * math.pi * i / windowSize) -
                a3 * math.cos(6 * math.pi * i / windowSize)
            windowedData[i] = (fftTable[i] * windowValue) * 4
        end
        return windowedData
    end,
    ["blackman-harris"] = function(fftTable)
        local windowedData = {}
        local windowSize = #fftTable
        local a0 = 0.35875
        local a1 = 0.48829
        local a2 = 0.14128
        local a3 = 0.01168
        for i = 1, windowSize do
            local windowValue = a0 -
                a1 * math.cos(2 * math.pi * i / windowSize) +
                a2 * math.cos(4 * math.pi * i / windowSize) -
                a3 * math.cos(6 * math.pi * i / windowSize)
            windowedData[i] = (fftTable[i] * windowValue) * 4
        end
        return windowedData
    end,
    ["astral"] = function(fftTable)
        local windowedData = {}
        for i = 1, #fftTable do
            if fftTable[i - 1] and fftTable[i + 1] then
                windowedData[i] = (fftTable[i] + fftTable[i - 1] + fftTable[i + 1]) / 3
            else
                windowedData[i] = fftTable[i]
            end
        end
        return windowedData
    end
}

local windowType = "none"
local astral = false
remote.OnClientEvent:Connect(function(window)
    window = string.lower(window)
    if window ~= "astral" then
        if windowFuncs[window] then
            windowType = window
        else
            windowType = "none"
        end
    else
        astral = not astral
    end
end)

local fft = {}
game:GetService("RunService").PreRender:Connect(function()
    table.clear(fft)

    sound.AssetId = serverSound.SoundId
    sound.PlaybackSpeed = serverSound.Pitch
    sound.TimePosition = serverSound.TimePosition + owner:GetNetworkPing()
    local fftOut = soundAnalyze:GetSpectrum()
    
    table.move(fftOut, 1, 64, 1, fft)
    
    fft = windowFuncs[windowType](fft)
    fft = astral and windowFuncs["astral"](fft) or fft
    
    remote:FireServer(fft)
end)
]], owner.PlayerGui)

local fft = {}
remote.OnServerEvent:Connect(function(plr, fftOut)
    fft = fftOut
end)

local chatFuncs = {
    ["play"] = function(param)
        song.SoundId = "rbxassetid://".. param
        song.TimePosition = 0
        song:Play()
        
        if pcall(game:GetService("MarketplaceService").GetProductInfo, game:GetService("MarketplaceService"), song.SoundId:sub(14)) then
            nameText.Text = game:GetService("MarketplaceService"):GetProductInfo(song.SoundId:sub(14))["Name"]
        else
            nameText.Text = "Not Playing"
        end
    end,
    ["vol"] = function(param)
        song.Volume = param or 1
    end,
    ["pit"] = function(param)
        song.Pitch = param or 1
    end,
    ["seek"] = function(param)
        song.TimePosition = param or 1
    end,
    ["sen"] = function(param)
        sen = param
    end,
    ["window"] = function(param)
        remote:FireClient(owner, param)
    end,
}

owner.Chatted:Connect(function(msg)
    msg = msg:sub(1, 3) == "/e " and msg:sub(4) or msg
    msg = msg:sub(1, 1) == "/" and msg:sub(2) or msg
    
    local cmd, param = table.unpack(msg:split(" "))
    if chatFuncs[cmd] then
        chatFuncs[cmd](param)
    end
end)

game:GetService("RunService").PostSimulation:Connect(function(dt)
    for i, v in next, bars do
        if song.Playing and nameText.Text ~= "Not Playing" then
            if fft[i] ~= nil then
                v.Size = v.Size:Lerp(UDim2.new(0.5 / #bars, 0, 0.5 / #bars + math.clamp(fft[i] * sen, 0, 0.75), 0), 0.3 * dt * 60)
                v.BackgroundColor3 = Color3.fromRGB(99 + fft[i] * sen * 100, 254 + fft[i] * sen * 100, 147 + fft[i] * sen * 100)
            end
            v.Position = UDim2.new(i / (#bars * 1.25) + #bars / (#bars * 10), 0, 0.8375 - v.Size.Height.Scale / 1.000001, 0)
        else
            v.Size = v.Size:Lerp(UDim2.new(0.5 / #bars, 0, 0.5 / #bars, 0), 0.3 * dt * 60)
            v.BackgroundColor3 = Color3.fromRGB(99, 254, 147)
            v.Position = UDim2.new(i / (#bars * 1.25) + #bars / (#bars * 10), 0, 0.8375 - v.Size.Height.Scale / 1.000001, 0)
        end
    end
end)