local wa, wb = 0, 0

hook.Add( "CreateMove", "CamFuck", function( cmd )

	local x, y = cmd:GetForwardMove(), cmd:GetSideMove()
	wa, wb = x, y

	local ad = Vector( x, y, 0 )

	local an = Angle()
	an:Set( RenderAngles() )
	an.p = 0

	local am = Angle()
	am:Set( cmd:GetViewAngles() )
	am.p = 0

	ad:Rotate( am )
	ad:Rotate( -an )

	ad:Normalize()
	ad:Mul(320)

	--print(ad.x, ad.y)

	cmd:SetForwardMove( ad.x )
	cmd:SetSideMove( ad.y )
end)

function GM:PlayerNoClip()
	return true
end

if CLIENT then
	local function ss( scale )
		return scale * ( ScrH() / 480 )
	end

	local w25, w50, w75, w100 = Color( 255, 255, 255, 0.25*255 ), Color( 255, 255, 255, 0.50*255 ), Color( 255, 255, 255, 0.75*255 ), Color( 255, 255, 255, 1.00*255 )
	local g25, g50, g75, g100 = Color( 0, 0, 0, 0.25*255 ), Color( 0, 0, 0, 0.50*255 ), Color( 0, 0, 0, 0.75*255 ), Color( 0, 0, 0, 1.00*255 )

	hook.Add( "HUDPaint", "HUDFuck", function()
		local bo = ss( 20 )
		local cr, cd = ss( 50 ), ss( 100 )

		surface.SetDrawColor( g100 )
		surface.DrawRect( bo, ScrH() - bo + cr, cd, cd )
		
		surface.SetDrawColor( w25 )
		surface.DrawLine( bo + cr, ScrH() - bo - cd, bo + cr, ScrH() - bo )
		surface.DrawLine( bo, ScrH() - bo - cr, bo + cd, ScrH() - bo - cr )

		surface.SetDrawColor( w100 )
		surface.DrawCircle( bo + cr, ScrH() - bo - cr, cr )

		local ox, oy = 0, 0
		local msp = 300

		ox = wb/msp
		oy = -wa/msp

		ox = math.Clamp( ox, -1, 1 ) * cr
		oy = math.Clamp( oy, -1, 1 ) * cr

		surface.DrawCircle( bo + cr + ox, ScrH() - bo - cr + oy, ss( 2 ) )
	end)
end