View difference between Paste ID: H7DwU6Xr and CDhMDvM4

 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] )
+	local r, g, b, a = tonumber( args[1] ), tonumber( args[2] ), tonumber( args[3] ), tonumber( args[4] )
 	if ( !r or !g or !b ) then return end
 
-	visualizer.BorderColor = Color( r, g, b )
+	visualizer.BorderColor = Color( r, g, b, a or 255 )
 end )
 --[[-------------------------------------------------------------------------------]]--
 concommand.Add( "visualizer_bg_color", function( ply, cmd, args, str )
-	local r, g, b = tonumber( args[1] ), tonumber( args[2] ), tonumber( args[3] )
+	local r, g, b, a = tonumber( args[1] ), tonumber( args[2] ), tonumber( args[3] ), tonumber( args[4] )
 	if ( !r or !g or !b ) then return end
 
-	visualizer.BGColor = Color( r, g, b )
+	visualizer.BGColor = Color( r, g, b, a or 255 )
 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
 --[[-------------------------------------------------------------------------------]]--