Results 1 to 2 of 2
  1. #1
    Porch's Avatar
    Join Date
    Jan 2019
    Gender
    male
    Posts
    1
    Reputation
    10
    Thanks
    0

    [VGUI] Check Boxes with Label always Locked in Title Tab Frame

    Hey Guys! I need help with my cheat project for Harry's fashion. When I wrote the checkbox code, it was locked and had minimum and maximum X, Y, such as the section name (Panel) at the top. It is always locked and has the minimum coordinates are the same as the Section (Panel). Please help guys, the code below.
    Code:
    surface.CreateFont("FrameFont",{font = "Trebuchet24", size = 23})

    function AddFrameTab( Parent, Text, Tab, PosX, PosY)
    local AddFrameTab = vgui.Create( "DButton", Parent )
    AddFrameTab:SetText( Text )
    AddFrameTab:SetFont("FrameFont")
    AddFrameTab:SetTextColor( Color(255,255,255) )
    AddFrameTab:SetSize(100,25)
    AddFrameTab:SetPos( PosX, PosY )
    function AddFrameTab:Paint() end
    AddFrameTab.DoClick = function()
    ChangeTab( Tab )
    end
    end

    function ChangeTab ( Tab )
    Aimbot:SetVisible(false)
    Visuals:SetVisible(false)
    Misc:SetVisible(false)
    Colors:SetVisible(false)
    Config:SetVisible(false)
    Friends:SetVisible(false)

    Tab:SetVisible(true)
    end

    PMHack = {}
    Options = {}
    PMHack.Aimbot = false
    PMHack.AimbotBind = ""
    PMHack.AimbotFov = 45
    PMHack.AimbotFriends = {}

    Frame = vgui.Create("DFrame")
    Frame:SetTitle("")
    Frame:SetPos(600,-600)
    Frame:MakePopup()
    Frame:SetSize(600,500)
    Frame:SetDraggable(true)
    Frame:ShowCloseButton(false)

    function Frame:Paint( w, h )
    draw.RoundedBox( 0, 0, 0, w, 24, Color(120,120,120,255) )
    draw.RoundedBox( 0, 0, 0, w, h, Color(39,126,145,255) )

    surface.SetDrawColor( Color(255,255,255) )

    surface.DrawLine( 0, 24, w, 24 )
    surface.DrawLine( 0, 55, w, 55 )
    surface.DrawLine( 0, 24, 0, 55 )
    surface.DrawLine( 100, 24, 100, 55 )
    surface.DrawLine( 200, 24, 200, 55 )
    surface.DrawLine( 300, 24, 300, 55 )
    surface.DrawLine( 400, 24, 400, 55 )
    surface.DrawLine( 498, 24, 498, 55 )
    surface.DrawLine( 599, 24, 599, 55 )
    end

    Aimbot = vgui.Create("DPanel", Frame)
    Aimbot:SetPos( 2 , 25 )
    Aimbot:SetSize( Frame:GetWide(), Frame:GetTall()-25 )
    Aimbot:SetVisible( false )

    //Aimbot

    //PaintFrame
    function Aimbot:Paint()
    draw.RoundedBox( 0, 0, 0, 97, 30, Color(1, 61, 71,250) )
    end

    Visuals = vgui.Create("DPanel", Frame)
    Visuals:SetPos( 102 , 25 )
    Visuals:SetSize( Frame:GetWide(), Frame:GetTall()-25 )
    Visuals:SetVisible( false )

    //Visuals


    //PaintFrame
    function Visuals:Paint()
    draw.RoundedBox( 0, 0, 0, 97, 30, Color(1, 61, 71,250) )
    end

    Misc = vgui.Create("DPanel", Frame)
    Misc:SetPos( 202 , 25 )
    Misc:SetSize( Frame:GetWide(), Frame:GetTall()-25 )
    Misc:SetVisible( false )

    //MiscPaint
    function Misc:Paint()
    draw.RoundedBox( 0, 0, 0, 97, 30, Color(1, 61, 71,250) )
    end

    Friends = vgui.Create("DPanel", Frame)
    Friends:SetPos( 302 , 25 )
    Friends:SetSize( Frame:GetWide(), Frame:GetTall()-25 )
    Friends:SetVisible( false )

    //Friends



    //PaintFrame
    function Friends:Paint()
    draw.RoundedBox( 0, 0, 0, 97, 30, Color(1, 61, 71,250) )
    end

    Colors = vgui.Create("DPanel", Frame)
    Colors:SetPos( 402 , 25 )
    Colors:SetSize( Frame:GetWide(), Frame:GetTall()-25 )
    Colors:SetVisible( false )

    //Colors


    //PaintFrame
    function Colors:Paint()
    draw.RoundedBox( 0, 0, 0, 95, 30, Color(1, 61, 71,250) )
    end

    Config = vgui.Create("DPanel", Frame)
    Config:SetPos( 500 , 25 )
    Config:SetSize( Frame:GetWide(), Frame:GetTall()-25 )
    Config:SetVisible( false )

    //Config


    //PaintFrame
    function Config:Paint()
    draw.RoundedBox( 0, 0, 0, 97, 30, Color(1, 61, 71,250) )
    end

    AddFrameTab(Frame, "Aimbot", Aimbot, 0, 27)
    AddFrameTab(Frame, "Visuals", Visuals, 100, 27)
    AddFrameTab(Frame, "Misc", Misc, 200, 27)
    AddFrameTab(Frame, "Friends", Friends, 300, 27)
    AddFrameTab(Frame, "Colors", Colors, 400, 27)
    AddFrameTab(Frame, "Config", Config, 500, 27)

    hook.Add("Think", "CheckFrame", function()
    if input.IsKeyDown(KEY_INSERT) then
    if FrameOpened then
    if input.IsKeyDown(KEY_INSERT) && !FrameDelay then
    FrameDelay = true
    Frame:SetVisible(false)
    timer.Simple( 0.5, function() FrameDelay = false end )
    FrameOpened = false
    end
    else
    if input.IsKeyDown(KEY_INSERT) && !FrameDelay then
    FrameDelay = true
    Frame:SetVisible(true)
    timer.Simple( 0.5, function() FrameDelay = false end )
    FrameOpened = true
    end
    end
    end
    end)

  2. #2
    Effyx's Avatar
    Join Date
    Nov 2017
    Gender
    male
    Posts
    13
    Reputation
    10
    Thanks
    1
    My Mood
    Doh
    just paste exploitshitty menu like everyone else smh

Similar Threads

  1. Replies: 0
    Last Post: 06-19-2018, 05:11 AM
  2. [Help] Check Boxes [solved]
    By SofaKingH4rd in forum Visual Basic Programming
    Replies: 5
    Last Post: 08-07-2011, 01:14 AM
  3. [Help] Check Box
    By CoOKiEbrEEd in forum Visual Basic Programming
    Replies: 6
    Last Post: 03-25-2011, 10:20 AM
  4. Display a box with a dynamic size [nasm]
    By radnomguywfq3 in forum Assembly
    Replies: 0
    Last Post: 08-31-2008, 01:28 AM
  5. check box
    By mrkprv in forum C++/C Programming
    Replies: 0
    Last Post: 06-19-2008, 05:54 AM