[PAC] Anti Cheat

print('\n=======================================\n= Loaded pAntiCheat by TheLastPenguin =\n=======================================')
local a={}
local net=table.Copy(net)
local cvars=table.Copy(cvars)
local concommand=table.Copy(concommand)
local local;
local chat=table.Copy(chat)
local b={}

local function c(d)
if b[d]then return end;
b[d]=true;
print('[pAntiCheat] Scanning file '..d)
net.Start('pac_fvalidate')
net.WriteString(d)
net.SendToServer()end;
local e={}
setmetatable(e,{__mode='k'})

local function f()
local g,h;
for i=1,1/0 do g=getinfo(i,'S')
if not g then break end;
h=g.short_src;
if h~='RunString'and h~='LuaCmd'and h~='[C]'then
c(h)end
end
end;

local function j(k)
return function(...)f()
return k(...)
end
end;

hook.Add=j(hook.Add)
hook.Call=j(hook.Call)
timer.Create=j(timer.Create)
concommand.Add=j(concommand.Add)
surface.CreateFont=j(surface.CreateFont)
RunConsoleCommand=j(RunConsoleCommand)
include=j(include)

local function l(h)
local m,n=file.Find(h..'/*.lua','LUA')
for o,p in pairs(m)do c(h..'/'..p)end;
for o,q in pairs(n)do l(h..'/'..q)end
end;l('autorun')

local r={}
local function s(t,u)
net.Start('pac_cvalidate')
net.WriteString(t)
net.WriteString(tostring(u))
net.SendToServer()
end;

local function v(t)
local w=GetConVar(t)
if w then s(t,w:GetString())
end;
timer.Simple(math.random(20,30),
function()v(t)
end)
end;

local function x(t)
timer.Simple(20,function()
v(t)
end)
table.insert(r,t)
cvars.AddChangeCallback(t,function(y,z,u)s(y,u)
end)
end;

x('sv_cheats')
x('sv_allowcslua')
x('mat_fullbright')
x('mat_proxy')
x('mat_wireframe')
x('host_timescale')
x('host_framerate')

timer.Create('pac_notify2',80,0,function()
chat.AddText(Color(0,50,255),'[PAC]  ',Color(255,255,255),'Scanning for cheats... ')
timer.Simple(0.1,function()chat.AddText(Color(0,50,255),'[PAC]  ',Color(255,255,255),'Scanning for cheats... ')
end)
end)

net.Receive('pac_notify',function()
end)