local cam = cam
local draw = draw
local ScrW = ScrW
local ScrH = ScrH
local Color = Color
local Angle = Angle
local Vector = Vector
local surface = surface
local tonumber = tonumber
local ColorToHSV = ColorToHSV
local HSVToColor = HSVToColor

local hide = {
    CHudHealth  = true,
    CHudBattery = true,
}

local function HideThings( name )
    if ( hide[ name ] ) then return false end
end
hook.Add( "HUDShouldDraw", "HideThings", HideThings )


local BLACK = Color( 0, 0, 0 )
local WHITE = Color( 255, 255, 255 )
local GRAY  = Color(120,120,120,50)

--[[-------------------------------------------------------------------------------]]--
visualizer = visualizer or {}
--[[-------------------------------------------------------------------------------]]--
visualizer.levels = visualizer.levels or {
    [FFT_256]   = 128,
    [FFT_512]   = 256,
    [FFT_1024]  = 512,
    [FFT_2048]  = 1024,
    [FFT_4096]  = 2048,
    [FFT_8192]  = 4096,
    [FFT_16384] = 8192,
}
--[[-------------------------------------------------------------------------------]]--
visualizer.Level  = FFT_256
visualizer.LevelW = 22
visualizer.LevelH = ScrH()
visualizer.TotalW = visualizer.LevelW * visualizer.levels[ visualizer.Level ]

visualizer.URL     = "http://jukebox.ijwtb.net/music/Capital Cities/In A Tidal Wave Of Mystery/I Sold My Bed, But Not My Stereo.mp3"
visualizer.Channel = visualizer.Channel

visualizer.Pos = Vector( -1000, 1000, -11275 )
visualizer.Ang = Angle( 0, 0, 90 )
visualizer.Color = Color( 255, 0, 0 )
visualizer.BGColor = BLACK
visualizer.BorderColor = WHITE
visualizer.Borders = true
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_url", function( ply, cmd, args, str )
    visualizer.URL = args[1]
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_levels", function( ply, cmd, args, str )
    local num = tonumber( args[1] )
    if ( !num ) then return end

    local fft = _G[ "FFT_" .. num ]
    if ( !fft ) then return end

    visualizer.Level = fft
    visualizer.TotalW = visualizer.LevelW * visualizer.levels[ fft ]
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_pos", function( ply, cmd, args, str )
    local x, y, z = tonumber( args[1] ), tonumber( args[2] ), tonumber( args[3] )
    if ( !x or !y or !z ) then return end

    visualizer.Pos = Vector( x, y, z )
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_ang", function( ply, cmd, args, str )
    local p, y, r = tonumber( args[1] ), tonumber( args[2] ), tonumber( args[3] )
    if ( !p or !y or !r ) then return end

    visualizer.Ang = Angle( p, y, r )
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_levelw", function( ply, cmd, args, str )
    local w = tonumber( args[1] )
    if ( !w ) then return end

    visualizer.LevelW = w
    visualizer.TotalW = visualizer.LevelW * visualizer.levels[ visualizer.Level ]
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_levelh", function( ply, cmd, args, str )
    local h = tonumber( args[1] )
    if ( !h ) then return end

    visualizer.LevelH = h
end )
--[[-------------------------------------------------------------------------------]]--
function visualizer.Play()
    visualizer.Stop()

    hook.Add( "PostDrawOpaqueRenderables", "Visualizer", visualizer.Draw )

    sound.PlayURL( visualizer.URL, "noblock", function( channel, errID, errName )
        visualizer.Channel = channel
    end )
end
concommand.Add( "visualizer_play", function( ply, cmd, args, str )
    visualizer.Play()
end )
--[[-------------------------------------------------------------------------------]]--
function visualizer.Stop()
    if ( visualizer.Channel ) then
        visualizer.Channel:Stop()
        visualizer.Channel = nil
    end

    hook.Remove( "PostDrawOpaqueRenderables", "Visualizer" )
end
concommand.Add( "visualizer_stop", function( ply, cmd, args, str )
    visualizer.Stop()
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_refresh", function( ply, cmd, args, str )
    hook.Add( "PostDrawOpaqueRenderables", "Visualizer", visualizer.Draw )
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_borders", function( ply, cmd, args, str )
    visualizer.Borders = tobool( args[1] )
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_border_color", function( ply, cmd, args, str )
    local r, g, b = tonumber( args[1] ), tonumber( args[2] ), tonumber( args[3] )
    if ( !r or !g or !b ) then return end

    visualizer.BorderColor = Color( r, g, b )
end )
--[[-------------------------------------------------------------------------------]]--
concommand.Add( "visualizer_bg_color", function( ply, cmd, args, str )
    local r, g, b = tonumber( args[1] ), tonumber( args[2] ), tonumber( args[3] )
    if ( !r or !g or !b ) then return end

    visualizer.BGColor = Color( r, g, b )
end )
--[[-------------------------------------------------------------------------------]]--
function visualizer.Draw()
    if( not IsValid( visualizer.Channel ) ) then return end

    local FFTable   = {}
    local FFTLevels = visualizer.Channel:FFT( FFTable, visualizer.Level )

    cam.Start3D2D( visualizer.Pos, visualizer.Ang, 1 )
        draw.RoundedBox( 0, 0, 0, visualizer.TotalW, visualizer.LevelH, visualizer.BGColor )
    cam.End3D2D()

    local fft, x, y
    local levelW = visualizer.LevelW

    local h, s, v = ColorToHSV( visualizer.Color )
    visualizer.Color = HSVToColor( h + 1, s, v )

    surface.SetFont( "default" )

    for i = 1, #FFTable do
        fft = FFTable[ i ]
        local levelH = fft * visualizer.LevelH

        x = visualizer.LevelW * ( i - 1 )
        y = visualizer.LevelH - levelH

        cam.Start3D2D( visualizer.Pos, visualizer.Ang, 1 )
            draw.RoundedBox( 0, x, y, levelW, levelH, HSVToColor( h + i, s, v ) )

            if ( visualizer.Borders ) then
                surface.SetDrawColor( visualizer.BorderColor )
                surface.DrawOutlinedRect( x, y, levelW, levelH+1 )
            end

            surface.SetTextPos( x + ( visualizer.LevelW / 2 ), visualizer.LevelH )
            surface.DrawText( i )
        cam.End3D2D()
    end
end
--[[-------------------------------------------------------------------------------]]--