gLua Toolkit/Hack!

local chyst = {}
chyst.me = LocalPlayer()
chyst.esp_enabled = CreateClientConVar("chyst_esp_enabled", 1, true, false)
chyst.chams_enabled = CreateClientConVar("chyst_chams_enabled", 1, true, false)

function chyst.print(msg)
	MsgC(Color(255, 255, 255), "|")
	MsgC(Color(160, 215, 50), "Chystonik")
	MsgC(Color(255, 255, 255), "| ")
	MsgC(Color(128, 128, 128), msg .. "\n")
end

function chyst.findlua(code)
	local ret = {}
	
	for k,v in pairs(_G) do
		if (k and isstring(k) and k:find(code)) then
			table.insert(ret, k)
		end
	end
	
	return ret
end

function chyst.esp()
	for k,v in pairs(player.GetAll()) do
		local min = (v:GetPos() + Vector(0, 0, 1)):ToScreen();
		local max = (v:GetPos() + Vector(0, 0, 70)):ToScreen();
		local hit = (min.y - max.y);
		local wid = (hit / 2.5)
		
		if (chyst.esp_enabled:GetBool() and v != chyst.me and v:Alive() and v:Health() > 0) then
			local ESP = (v:EyePos()):ToScreen()
			draw.DrawText(v:Name(), "debugfixed", ESP.x -25, ESP.y -56, team.GetColor(v:Team()), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
			draw.DrawText("Rank: "..v:GetUserGroup(), "debugfixed", ESP.x -25, ESP.y -44, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
				
			if(v:GetActiveWeapon():IsValid()) then
				draw.DrawText("Weapon: " ..v:GetActiveWeapon():GetClass(), "debugfixed", ESP.x -25, ESP.y -32, Color(255, 255, 255, 255), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
			end
				
			surface.SetDrawColor(team.GetColor(v:Team()))
			surface.DrawOutlinedRect(max.x - (wid / 2) - 1, max.y - 1, wid + 2, hit + 2);
			draw****undedBox(0, max.x - (wid/1.5) + 1, max.y + 1, (wid-2)/10, (hit-2)*0.01 * v:Health(), Color(0,200,0,255))
		end
	end
end

// ponyhack chams :^)

function chyst.chams() 
	for k,v in pairs(player.GetAll()) do
		if v:Alive() and v:Health() > 0 and v:IsPlayer() and v != LocalPlayer() and chyst.chams_enabled:GetBool() then
			cam.Start3D()

			cam.IgnoreZ(true)
			render.MaterialOverride(Material("models/wireframe"))
			render.SuppressEngineLighting( true )

			local col = Color(255,255,255)

			render.SetColorModulation( col.r/255, col.g/255, col.b/255 )
			v:DrawModel()
			render.SetColorModulation( 1, 1, 1 )

			render.SuppressEngineLighting( false )
			render.MaterialOverride(0)
			cam.IgnoreZ(false)

			cam.End3D()
		end
	end
end

chyst.print("Loading!")

if file.Find("lua/bin/gmcl_hax_win32.dll", "GAME") then 
	/*
	nh.ForceVar
	nh.UserCmd
	nh.ChangeName
	nh.GetCurrentName
	*/
	require("hax")
	chyst.forcevar = nh.ForceVar
	chyst.usercmd = nh.UserCmd
	chys*****ame = nh.ChangeName
	chyst.getname = nh.GetCurrentName
	chyst.hax = true
	chyst.print("gmcl_hax found!")
else
	chyst.hax = false
	chyst.print("gmcl_hax not found! CVar forcing disabled!")
end

if chyst.hax == true then
	concommand.Add("chyst_fcvar", function(ply, cmd, args)
		chyst.forcevar(GetConVar(args[1]), args[2])
		chyst.print("Forced CVar: " .. args[1] .. " to " .. args[2])
	end )
end

concommand.Add("chyst_runlua", function(ply, cmd, args)
	chyst.print("Feature disabled!")
end )

concommand.Add("chyst_findlua", function(ply, cmd, args)
	if args[1] != nil then
		local luatbl = chyst.findlua(args[1])
		
		for k,v in pairs(luatbl) do
			chyst.print(v)
		end
	else
		chyst.print("Arguments were nil! Usage: ")
		chyst.print('chyst_findlua "ulx"')
	end
end )

function chyst.hooked_hudpaint()
	chyst.esp()
end

function chyst.addhook(type, name, func)
	chyst.newname = util.CRC(name)
	hook.Add(type, chyst.newname, func)
end

chyst.addhook("HUDPaint", "chyst.hudpaint", chyst.hooked_hudpaint)

chyst.print("Loaded!")