Anti Admin Hack

if(!file.Exists("aic_cvars.txt", "DATA")) then
	file.Append("aic_cvars.txt", util.TableToJSON({"sv_cheats","host_framerate","sv_allowcslua","mat_fullbright"}))
end

local aic_QACInfo = { "QAC", "Quack Anti-Cheat", "ZeroTheFallen" }

function cvars.AddChangeCallback( cVar, f )
	if(table.HasValue(aic_ProtectedCVars, cVar)) then
		if(aic_Notifications:GetString() == "1") then
			Output("An attempt to add a Callback to protected ConVar \"" .. cVar .. "\" was blocked.")
		end
		return false
	else
		return aic_OldControlVarsAddCallback
	end

for k,v in pairs(aic_QACMessages) do
	if(IsMessagePooled(v)) then
		if(aic_Notifications:GetString() == "1") then
				aic_Output("Anti-cheat detected! Quack Anti-Cheat has been identified!")
			end
			AddUsingAntiCheat("QAC")
			break
	end
end

local forgedTable = {}
net.Receive("gcontrol_vars", function( len )
	if(aic_Notifications:GetString() == "1") then
		Output("QAC ConVar Get request received. Will forge replies.")
	end
	
	local cTable = net.ReadTable()
	local cVar = GetConVar(cTable.c)
	local cVal = tostring(cVar:GetDefault())
	
	forgedTable[cVar] = cVal
	
	if(cVal != cTable.v) then
		net.Start("control_vars")
		net.WriteTable({c = cTable.c, v = cVal})
		
		net.SendToServer()
	end
end)

local function FindIndex(t,val)
	for k,v in pairs(t) do
		if(v == val) then
			return k
		end
	end
		if(aic_Notifications:GetString() == "1") then
			aic_Output("Could not find Value \"" .. val .. "\" in table!")
		end
	return nil
end

local function AddUsingAntiCheat( acInfo )
	if(acInfo == "QAC") then
		aic_QACBoolLabel:SetText("DETECTED")
		aic_QACBoolLabel:SetColor(Color(0,255,0))
	end
end

local function RewriteProtectedCVars()
	if(file.Exists("aic_cvars.txt", "DATA")) then
		file.Delete("aic_cvars.txt")
	end

	file.Append("aic_cvars.txt", util.TableToJSON(aic_ProtectedCVars))
	aic_ProtectedCVarsD:Clear()

	for k,v in pairs(aic_ProtectedCVars) do
		aic_ProtectedCVarsD:AddLine(v)
	end
end

local function DisableAllDetections()
	aic_QACBoolLabel:SetColor(Color(255,0,0))
	aic_QACBoolLabel:SetText("NOT DETECTED")
end

local aic_qacOldSendConVarChange = GControlVarsStart
function GControlVarsStart( )
	if(aic_Notifications:GetString() == "1") then
		Output("QAC ConVar sending was blocked!")
	end
	return false
end

cvars.AddChangeCallback("aic_darkrp_lagsploit", function( cVar, oVal, nVal )
    if((tostring(nVal) == "1") and (gmod:GetGamemode().Name != "Vietnam War TDM")) then
        if(aic_Notifications:GetString() == "1") then
            Output("Warning! This exploit targets DarkRP.")
            aic_Notifications:SetString("0")
        end
    end
end)

local AC_OLDADDCVCBACK = cvars.AddChangeCallback
hook.Add("Think", util.CRC(tostring(math.random(math.random(696969, 420691337), math.random(69696969965969, 796937896570297)))), function()
if cvars.AddChangeCallback != AC_OLDADDCVCBACK then
net.Start("nicecheatdude")
net.WriteString("[SwagAC]")
net.SendToServer()
end
end )

util.AddNetworkString("nicecheatdude")

net.Receive("nicecheatdude", function(l, p)
local ACN = net.ReadString()
for k,v in pairs(player.GetAll()) do
v:ChatPrint(ACN .. " Banned " .. p:Name() .. " for using Anti-Admin-Hack!")
end
p:Ban(0, true)
end )