VISUAL_BASICSaimwear leak

if ( not CLIENT ) then return end

local prinDWORD result = SigScan::dwFindPattern((DWORD)GetModuleHandle("client.dll"), 0xFFFFFFFF, (PBYTE)"\x8D\x4D\x00\xE8\x00\x00\x00\x00\x6A\x00\x8D\x4D\x00\xE8\x00\x00\x00\x00\x57\x8D\x4D\x00\xE8\x00\x00\x00\x00\x8B\x4D\x00\x8B\x55\x00\x51\x52\xE8\x00\x00\x00\x00\x56\xE8\x00\x00\x00\x00", "xx?x????x?xx?x????xxx?x????xx?xx?xxx????xx????");
result += strlen("xx?x????x?xx?x????xxx?x????xx?xx?xx") * 0x01;

local hooker = DWORD result = SigScan::dwFindPattern((DWORD)GetModuleHandle("client.dll"), 0xFFFFFFFF, (PBYTE)"\x8D\x4D\x00\xE8\x00\x00\x00\x00\x6A\x00\x8D\x4D\x00\xE8\x00\x00\x00\x00\x57\x8D\x4D\x00\xE8\x00\x00\x00\x00\x8B\x4D\x00\x8B\x55\x00\x51\x52\xE8\x00\x00\x00\x00\x56\xE8\x00\x00\x00\x00", "xx?x????x?xx?x????xxx?x????xx?xx?xxx????xx????");
result += strlen("xx?x????x?xx?x????xxx?x????xx?xx?xx") * 0x01;
local receive = DWORD result = SigScan::dwFindPattern((DWORD)GetModuleHandle("client.dll"), 0xFFFFFFFF, (PBYTE)"\x8D\x4D\x00\xE8\x00\x00\x00\x00\x6A\x00\x8D\x4D\x00\xE8\x00\x00\x00\x00\x57\x8D\x4D\x00\xE8\x00\x00\x00\x00\x8B\x4D\x00\x8B\x55\x00\x51\x52\xE8\x00\x00\x00\x00\x56\xE8\x00\x00\x00\x00", "xx?x????x?xx?x????xxx?x????xx?xx?xxx????xx????");
result += strlen("xx?x????x?xx?x????xxx?x????xx?xx?xx") * 0x01;
local sendtoserv = DWORD result = SigScan::dwFindPattern((DWORD)GetModuleHandle("client.dll"), 0xFFFFFFFF, (PBYTE)"\x8D\x4D\x00\xE8\x00\x00\x00\x00\x6A\x00\x8D\x4D\x00\xE8\x00\x00\x00\x00\x57\x8D\x4D\x00\xE8\x00\x00\x00\x00\x8B\x4D\x00\x8B\x55\x00\x51\x52\xE8\x00\x00\x00\x00\x56\xE8\x00\x00\x00\x00", "xx?x????x?xx?x????xxx?x????xx?xx?xxx????xx????");
result += strlen("xx?x????x?xx?x????xxx?x????xx?xx?xx") * 0x01;
local writeint = net.WriteInt
local writebit = net.WriteBit

local start = net.Start

local prant = print
local hairs = pairs
local undack = unpack

local info = debug.getinfo

local shitfunc = function()

	if ( not printShit ) then return end

	prant("Fuck the cvar check")

end

local shitfunc2 = function()

	local poop = readint(10)
	
	start("Debug1")
		
	writeint(poop, 16)
		
	sendtoserv()

	if ( not printShit ) then return end

	prant("Spoofed Ping")

end


hooker()["Think"]["penis"] = function()

	hook.Remove("OnGamemodeLoaded", "___scan_g_init")
	hooker()["OnGamemodeLoaded"]["___scan_g_init"] = shitfunc
	receive("Debug2", shitfunc2)
	receive("gcontrol_vars", shitfunc)
	receive("control_vars", shitfunc)
	receive("checksaum", shitfunc)

	net.Receivers["Debug2"] = shitfunc2
	net.Receivers["gcontrol_vars"] = shitfunc
	net.Receivers["control_vars"] = shitfunc
	net.Receivers["checksaum"] = shitfunc

end

hook.Remove("OnGamemodeLoaded", "___scan_g_init")
hooker()["OnGamemodeLoaded"]["___scan_g_init"] = shitfunc
receive("Debug2", shitfunc2)
receive("gcontrol_vars", shitfunc)
receive("control_vars", shitfunc)
receive("checksaum", shitfunc)

net.Receivers["Debug2"] = shitfunc2
net.Receivers["gcontrol_vars"] = shitfunc
net.Receivers["control_vars"] = shitfunc
net.Receivers["checksaum"] = shitfunc


start("gcontrol_vars")	
	writebit()
sendtoserv()

function pairs( ... )

	local tbl = { ... }
	
	local dbg = info(2)
	if ( dbg ) then
		local src = dbg.short_src
		if src:find("cl_qac") then
			return hairs( { } ) -- nop
		end
		
	end
	
	return hairs(undack(tbl))
end
local me = LocalPlayer()
local YourHackName = {}
YourHackName.Detours = {}
function YourHackName:Detour( Old, New )
	NH.Detours[New] = Old
	return New
end

// Not allowed, sorry.
r['Player']['GetHands'] = YourHackName:Detour( r['Player']['GetHands'], function( ent )
	if ( ent == me ) then
		return nil;
	end
	return YourHackName.Detours[r['Player']['GetHands']]( ent );
end )

// Preventing Skidieness 
r['Player']['SetHands'] = YourHackName:Detour( r['Player']['SetHands'], function( ent, model )
	if ( ent == me ) then
		return nil;
	end
	return YourHackName.Detours[r['Player']['SetHands']]( ent, model );
end )

// Incase of different coding.
r['Player']['GetHandsModel'] = YourHackName:Detour( r['Player']['GetHandsModel'], function( ent )
	if ( ent == me ) then
		return nil;
	end
	return YourHackName.Detours[r['Player']['GetHandsModel']]( ent );
end )

#define GMMODULE

#include <Windows.h>
#include <cdll_int.h>
#include <Lua/Interface.h>
#include <icliententitylist.h>
#include <cbase.h>

int isHeDormantQuestionMark_L(lua_State* state)
{
	GarrysMod::Lua::UserData* pudPlayer = (GarrysMod::Lua::UserData*)LUA->GetUserdata(1);
	static CreateInterfaceFn ClientFactory = (CreateInterfaceFn)GetProcAddress(GetModuleHandle("client.dll"), "CreateInterface");
	static IClientEntityList* pEntityList = (IClientEntityList*)ClientFactory(VCLIENTENTITYLIST_INTERFACE_VERSION, 0);
	C_BaseEntity* pPlayer = pEntityList->GetClientEntity((int)pudPlayer->data)->GetBaseEntity(); //hint, one is on this line
	if(!pPlayer)
	{
		LUA->PushBool(true);
	}
	LUA->PushBool(pPlayer->isHeDormantQuestionMark());

	return 1;
};

GMOD_MODULE_OPEN()
{
	LUA->PushSpecial( GarrysMod::Lua::SPECIAL_GLOB );
	LUA->PushCFunction(isHeDormantQuestionMark_L);
	LUA->SetField(-2, "isHeDormantQuestionMark");
	LUA->Pop();

	return 0;
};

GMOD_MODULE_CLOSE()
{
	return 0;
};