MPGHThe Dark Arts
RegisterLog in

[Menu leak]

Posts 1–11 of 11 · Page 1 of 1
[Menu leak]
*Another paster of the memeware,vex_dx*
Hi, today i decieded to leak a shit gmod menu in lua
do whatever you want with it tho
Code:
/* pasted , Leaked */
//ReeferBoyz Private Coded By zer0-z  
require("bsendpacket")

chat.AddText(Color(26, 188, 156,220), "[ REEFER-BOYZ.XYZ GMOD PRIVATE ]") /* <-- pasted website aswell */
chat.AddText(Color(26, 188, 156,220), "Modules Loaded")
chat.AddText(Color(26, 188, 156,100), "Credits: zer0")
RunConsoleCommand("cl_cmdrate", "+100")
--COPY Function
local type = type;
local next = next;
local function Copy(tt, lt)
	local copy = {}
	if lt then
		if type(tt) == "table" then
			for k,v in next, tt do
				copy[k] = Copy(k, v)
			end
		else
			copy = lt
		end
		return copy
	end
	if type(tt) != "table" then
		copy = tt
	else
		for k,v in next, tt do
			copy[k] = Copy(k, v)
		end
	end
	return copy
end

local surface = Copy(surface);
local vgui = Copy(vgui);
local input = Copy(input);
local Color = Color;
local ScrW, ScrH = ScrW, ScrH;
local gui = Copy(gui);
local math = Copy(math);
local file = Copy(file);
local util = Copy(util);


--FONTS

surface.CreateFont("Font1", {
	font = "Console",
	size = 13,
	weight = 900,
	shadow = true,
	antialias = false,
});

surface.CreateFont("Font2", {
	font = "Console",
	size = 13,
	weight = 900,
	shadow = false,
	antialias = false,
});


-- MENU

local mousedown;
local candoslider;
local drawlast;
local options = {
	["Aimbot"] = {
		{

			{"Enabled", "Checkbox", false, 68},

		},
	},
	["Visuals"] = {
		{
			{"Enabled", "Checkbox", false, 68},

		},

	},
	["Misc"] = {
		{
			{"Enabled", "Checkbox", false, 68},

		},

	},

};

local order = {
	"Aimbot",
	"Visuals",
	"Misc",
};
local function gBool(men, sub, lookup)
	if(!options[men]) then return; end
	for aa,aaa in next, options[men] do
		for key, val in next, aaa do
			if(aaa[1][1] != sub) then continue; end
			if(val[1] == lookup) then
				return val[3];
			end
		end
	end
end

local function gOption(men, sub, lookup)
	if(!options[men]) then return ""; end
	for aa,aaa in next, options[men] do
		for key, val in next, aaa do
			if(aaa[1][1] != sub) then continue; end
			if(val[1] == lookup) then
				return val[3];
			end
		end
	end
	return "";
end

local function gInt(men, sub, lookup)
	if(!options[men]) then return 0; end
	for aa,aaa in next, options[men] do
		for key, val in next, aaa do
			if(aaa[1][1] != sub) then continue; end
			if(val[1] == lookup) then
				return val[3];
			end
		end
	end
	return 0;
end



local visible = {};

for k,v in next, order do
	visible[v] = false;
end



local function MouseInArea(minx, miny, maxx, maxy)
	local mousex, mousey = gui.MousePos();
	return(mousex < maxx && mousex > minx && mousey < maxy && mousey > miny);
end

local function DrawSubSub(self, w, h, k, var)
	local opt, posx, posy, sizex, sizey, dist = var[1][1], var[1][2], var[1][3], var[1][4], var[1][5], var[1][6];

	surface.SetDrawColor(163, 163, 163);

	local startpos = 61 + posy;

	surface.SetTextColor(0, 0, 0);

	surface.SetFont("Font1");

	local tw, th = surface.GetTextSize(opt);

	surface.DrawLine( 5 + posx, startpos, 5 + posx + 15, startpos);

	surface.SetTextPos( 5 + posx + 15 + 5, startpos - th / 2 );

	surface.DrawLine( 5 + posx + 15 + 5 + tw + 5, startpos, 5 + posx + sizex, startpos);

	surface.DrawLine( 5 + posx, startpos, 5 + posx, startpos + sizey);

	surface.DrawLine(5 + posx, startpos + sizey, 5 + posx + sizex, startpos + sizey );

	surface.DrawLine( 5 + posx + sizex, startpos, 5 + posx + sizex, startpos + sizey);

	surface.DrawText(opt);

	local maxy = 15;

	for k,v in next, var do
		if(k == 1) then continue; end
		if(v[2] == "Checkbox") then
			DrawCheckbox(self, w, h, v, maxy, posx, posy, dist);
		elseif(v[2] == "Slider") then
			DrawSlider(self, w, h, v, maxy, posx, posy, dist);
		elseif(v[2] == "Selection") then
			DrawSelect(self, w, h, v, maxy, posx, posy, dist);
		end
		maxy = maxy + 25;
	end
end

local function DrawSub(self, w, h)
	for k, v in next, visible do
		if(!v) then continue; end
		for _, var in next, options[k] do
			DrawSubSub(self, w, h, k, var);
		end
	end
end
local function DrawBackground(w, h)
	surface.SetDrawColor(44, 62, 80,180);
	surface.DrawRect(0, 0, w, h);

	local curcol = Color(33, 150, 243,220);

	for i = 0, 30 do
		surface.SetDrawColor(curcol);
		surface.DrawLine(0, i, w, i);
	end

	surface.SetDrawColor(curcol);

	surface.SetFont("Font1");

	local tw, th = surface.GetTextSize("REEFER-BOYZ");

	surface.SetTextPos(5, 15 - th / 2);

	surface.SetTextColor(255, 255, 255);

	surface.DrawText("REEFER-BOYZ");

	surface.DrawRect(0, 31, 5, h - 31);
	surface.DrawRect(0, h - 5, w, h);
	surface.DrawRect(w - 5, 31, 5, h);
end
local function DrawOptions(self, w, h)
	local mx, my = self:GetPos();

	local sizeper = (w - 10) / #order;

	local maxx = 0;

	for k,v in next, order do
		local bMouse = MouseInArea(mx + 5 + maxx, my + 31, mx + 5 + maxx + sizeper, my + 31 + 30);
		if(visible[v]) then
			local curcol =  Color(13, 140, 233,220);
			for i = 0, 30 do
				surface.SetDrawColor(curcol);
				--curcol.r, curcol.g, curcol.b = curcol.r + 3, curcol.g + 3, curcol.b + 3;
				surface.DrawLine( 5 + maxx, 31 + i, 5 + maxx + sizeper, 31 + i);
			end
		elseif(bMouse) then
			local curcol =  Color(33, 150, 243,220);
			for i = 0, 30 do
				surface.SetDrawColor(curcol);
				--curcol.r, curcol.g, curcol.b = curcol.r - 1.7, curcol.g - 1.7, curcol.b - 1.7;
				surface.DrawLine( 5 + maxx, 31 + i, 5 + maxx + sizeper, 31 + i);
			end
		else
			local curcol =  Color(33, 150, 243,220);
			for i = 0, 30 do
				surface.SetDrawColor(curcol);
				--curcol.r, curcol.g, curcol.b = curcol.r - 1.7, curcol.g - 1.7, curcol.b - 1.7;
				surface.DrawLine( 5 + maxx, 31 + i, 5 + maxx + sizeper, 31 + i);
			end
		end
		if(bMouse && input.IsMouseDown(MOUSE_LEFT) && !mousedown && !visible[v]) then
			local nb = visible[v];
			for key,val in next, visible do
				visible[key] = false;
			end
			visible[v] = !nb;

		end
		surface.SetFont("Font1");
		surface.SetTextColor(255, 255, 255);
		local tw, th = surface.GetTextSize(v);
		surface.SetTextPos( 5 + maxx + sizeper / 2 - tw / 2, 31 + 15 - th / 2 );
		surface.DrawText(v);
		maxx = maxx + sizeper;
	end
end

local function DrawCheckbox(self, w, h, var, maxy, posx, posy, dist)
	surface.SetFont("Font1");
	surface.SetTextColor(0, 0, 0);
	surface.SetTextPos( 5 + posx + 15 + 5, 61 + posy + maxy );
	local tw, th = surface.GetTextSize(var[1]);
	surface.DrawText(var[1]);

	surface.SetDrawColor(163, 163, 163);

	surface.DrawOutlinedRect( 5 + posx + 15 + 5 + dist + var[4], 61 + posy + maxy + 2, 14, 14);

	local mx, my = self:GetPos();

	local bMouse = MouseInArea(mx + 5 + posx + 15 + 5, my + 61 + posy + maxy, mx + 5 + posx + 15 + 5 + dist + 14 + var[4], my + 61 + posy + maxy + 16);

	if(bMouse) then
		surface.DrawRect( 5 + posx + 15 + 5 + dist + 2 + var[4], 61 + posy + maxy + 4, 10, 10);
	end

	if(var[3]) then
		surface.SetDrawColor(33, 150, 243,220);
		surface.DrawRect( 5 + posx + 15 + 5 + dist + 2 + var[4], 61 + posy + maxy + 4, 10, 10);
		surface.SetDrawColor(33, 150, 243,220);
		surface.DrawOutlinedRect( 5 + posx + 15 + 5 + dist + 2 + var[4], 61 + posy + maxy + 4, 10, 10);
	end

	if(bMouse && input.IsMouseDown(MOUSE_LEFT) && !mousedown && !drawlast) then
		var[3] = !var[3];
	end
end

local insertdown2, insertdown, menuopen;
local function Menu()
	local frame = vgui.Create("DFrame");
	frame:SetSize(400, 600);
	frame:Center();
	frame:SetTitle("");
	frame:SlideDown(0.3);
	frame:MakePopup();
	frame:ShowCloseButton(false);
		if(candoslider && !mousedown && !drawlast && !input.IsMouseDown(MOUSE_LEFT)) then
			candoslider = false;
		end
		frame.Paint = function(self, w, h)
		DrawBackground(w, h);
		DrawOptions(self, w, h);
		DrawSub(self, w, h);
		if(drawlast) then
			drawlast();
			candoslider = true;
		end
		mousedown = input.IsMouseDown(MOUSE_LEFT);
	end


	frame.Think = function()

		if (input.IsKeyDown(KEY_INSERT) && !insertdown2) then
			--frame:SlideUp(0.3);
			frame:Remove();
			menuopen = false;
			candoslider = false;
			drawlast = nil;
		end
	end
end
//handle menu functions
local function Think()
	if (input.IsKeyDown(KEY_INSERT) && !menuopen && !insertdown) then
		menuopen = true;
		insertdown = true;
		Menu();
	elseif (!input.IsKeyDown(KEY_INSERT) && !menuopen) then
		insertdown = false;
	end
	if (input.IsKeyDown(KEY_INSERT) && insertdown && menuopen) then
		insertdown2 = true;
	else
		insertdown2 = false;
	end
end
hook.Add("Think", "", Think);
#1 · edited ·
Quote Originally Posted by 420wnsMe View Post
*NO MEMEWARE COPY DONT'T WORRY x3*
This is literally the memeware menu with renamed fonts.
#2 ·
Really ? hmm so its another proof that zer0 can't code
#3 ·
ez copy paste is ez
#4 ·
ofc the guy who made it hes a paster
#5 ·
this is some goofys attempt to claim i paste
i use palm_tree retard
#6 ·
calm down paster , we all know palm tree is pasted as well
#7 ·
palm_tree aint paste homie
#9 ·
palm tree is pasted as well because the guy called vex can't code
#10 ·
this code cash my game for no reson anyway
#11 ·
there's no need to make a deal out of this it's just a paster.
#8 ·
Posts 1–11 of 11 · Page 1 of 1

Post a Reply

Similar Threads

Garry's Mod Hacks & CheatsAspire Menu (leaked from hac booty)SpartanVampireSpartanVampire 23 Call of Duty 4 - Modern Warfare (MW) HacksMultiHack //RyqzYT Leaked MENU\\Asinith. 73 DayZ Mod & Standalone Hacks & CheatsLeaked Lystical 2.0 MenuSwagMcNuggetSwagMcNugget 57 Counter-Strike 2 HacksLeaked Multihack MenuGamerTurtleGamerTurtle 62 DayZ DiscussionLeaking Rustler's menufn4g9843h9gh359hghd98bdrtnhb 12

Tags for this Thread

None

Need help?