Thread: [Menu leak]

Results 1 to 11 of 11
  1. #1
    420wnsMe's Avatar
    Join Date
    Jun 2016
    Gender
    female
    Posts
    0
    Reputation
    10
    Thanks
    0

    [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);
    Last edited by 420wnsMe; 08-20-2016 at 06:52 PM.

  2. #2
    Cyaegha's Avatar
    Join Date
    Aug 2016
    Gender
    male
    Posts
    536
    Reputation
    17
    Thanks
    526
    Quote Originally Posted by 420wnsMe View Post
    *NO MEMEWARE COPY DONT'T WORRY x3*
    This is literally the memeware menu with renamed fonts.

  3. #3
    420wnsMe's Avatar
    Join Date
    Jun 2016
    Gender
    female
    Posts
    0
    Reputation
    10
    Thanks
    0
    Really ? hmm so its another proof that zer0 can't code

  4. #4
    Hiagg's Avatar
    Join Date
    Aug 2016
    Gender
    male
    Posts
    9
    Reputation
    10
    Thanks
    0
    ez copy paste is ez

  5. #5
    420wnsMe's Avatar
    Join Date
    Jun 2016
    Gender
    female
    Posts
    0
    Reputation
    10
    Thanks
    0
    ofc the guy who made it hes a paster

  6. #6
    liquify.club's Avatar
    Join Date
    Aug 2016
    Gender
    male
    Posts
    0
    Reputation
    10
    Thanks
    4
    this is some goofys attempt to claim i paste
    i use palm_tree retard

  7. #7
    420wnsMe's Avatar
    Join Date
    Jun 2016
    Gender
    female
    Posts
    0
    Reputation
    10
    Thanks
    0
    calm down paster , we all know palm tree is pasted as well

  8. #8
    yaseen911's Avatar
    Join Date
    Aug 2015
    Gender
    male
    Posts
    5
    Reputation
    10
    Thanks
    1
    My Mood
    Mellow
    there's no need to make a deal out of this it's just a paster.

  9. #9
    bBoy__'s Avatar
    Join Date
    Jul 2016
    Gender
    male
    Posts
    3
    Reputation
    10
    Thanks
    1
    palm_tree aint paste homie

  10. #10
    420wnsMe's Avatar
    Join Date
    Jun 2016
    Gender
    female
    Posts
    0
    Reputation
    10
    Thanks
    0
    palm tree is pasted as well because the guy called vex can't code

  11. #11
    kenjifurry's Avatar
    Join Date
    Oct 2015
    Gender
    male
    Location
    Meme
    Posts
    250
    Reputation
    10
    Thanks
    969
    My Mood
    Aggressive
    this code cash my game for no reson anyway



    [IMG]https://www.dooomca*****m/alison/stockgroup.jpg[/IMG]
    [IMG]https://www.dooomca*****m/alison/ad_Neat_min.jpg[/IMG]
    [IMG]https://www.dooomca*****m/alison/SStotoro.jpg[/IMG]
    [IMG]https://dooomca*****m/webcomic/BNbio.jpg[/IMG]


  12. The Following User Says Thank You to kenjifurry For This Useful Post:

    kokzhaoyu2 (12-08-2016)

Similar Threads

  1. [Release] MultiHack //RyqzYT Leaked MENU\\
    By Asinith. in forum Call of Duty 4 - Modern Warfare (MW) Hacks
    Replies: 73
    Last Post: 09-29-2015, 05:27 AM
  2. [Release] Aspire Menu (leaked from hac booty)
    By SpartanVampire in forum Garry's Mod Hacks & Cheats
    Replies: 23
    Last Post: 09-07-2015, 10:43 AM
  3. [Detected] Leaked Multihack Menu
    By GamerTurtle in forum Counter-Strike 2 Hacks
    Replies: 62
    Last Post: 05-04-2015, 12:17 PM
  4. [Release] Leaked Lystical 2.0 Menu
    By SwagMcNugget in forum DayZ Mod & Standalone Hacks & Cheats
    Replies: 57
    Last Post: 01-24-2015, 11:05 PM
  5. Leaking Rustler's menu
    By fn4g9843h9gh359hghd98bdrtnhb in forum DayZ Discussion
    Replies: 12
    Last Post: 01-23-2013, 05:25 PM