VoltageHackV2.lua

--[[ VoltageHack v2 Garry's Mod multi-hack ]]--
--[[ Coded by Tyler with help from others  ]]--
--[[ Do NOT leak this hack code to anyone! ]]--
--[[ Please ignore the awful messy code    ]]--
--[[ Some of this code is borrowed for now ]]--


/* Start of Hack */

--Requires--
//require("sdef2")
require("cvar2")

--Locals--
local VH = {}

print("VoltageHack Version: 2 Is now running!")


/* ConVars */ --Our commands to activate features in the hack.

//ESP/WallHack
CreateClientConVar( "vh_esp", 0, true, false )
CreateClientConVar( "vh_esphealth", 0, true, false )
CreateClientConVar( "vh_espbox", 0, true, false )
CreateClientConVar( "vh_espmodel", 0, true, false )
CreateClientConVar( "vh_espsolid", 0, true, false )


//Misc
CreateClientConVar( "vh_Crosshair", 0, true, false )
CreateClientConVar( "vh_norecoil", 0, true, false )
CreateClientConVar( "vh_hitmarker", 0, true, false )
CreateClientConVar( "vh_lasersight", 0, true, false )
CreateClientConVar( "vh_bhop", 0, true, false )
CreateClientConVar( "vh_spectators", 0, true, false )
CreateClientConVar( "vh_keypadhack", 0, true, false )
CreateClientConVar( "vh_antigag", 0, true, false )


//Aimbot
CreateClientConVar( "vh_silentaim", 0, true, false )
CreateClientConVar( "vh_trigger", 0, true, false )
CreateClientConVar( "vh_nospread", 0, true, false )

--------------------------------------------------------------------------------

/* Start of Hack functions */ --Lets start making the hack features!

///////////////////////
// **WallHack/ESP** //
/////////////////////
--ESP [Info]--
local function ESP()
if( GetConVarNumber( 'vh_esp' ) != 0 ) then
for k, v in pairs( player.GetAll() ) do
if( v:Alive() && v != LocalPlayer() ) then
local Pos = ( v:GetPos() + Vector( 0, 0, 75 ) ):ToScreen();
surface.SetDrawColor( team.GetColor( v:Team() ) )
draw.SimpleText( v:Name(), 'DefaultFixedOutline', Pos.x, Pos.y, team.GetColor( v:Team() ), TEXT_ALIGN_CENTER );
draw.SimpleText( v:Health(), 'DefaultFixedOutline', Pos.x, Pos.y + 10, team.GetColor( v:Team() ), TEXT_ALIGN_CENTER );
end
end
end
end
hook.Add( 'HUDPaint', 'VoltageESP', ESP );

--ESP [Box]--
function ESPBox()
    if GetConVarNumber( "vh_espbox" ) >= 1 then
        for k, v in pairs ( player.GetAll() ) do
            if v ~= LocalPlayer() then
            if v:Alive() and v:Team() ~= TEAM_SPECTATOR then
                local PlayerBoxPos = v:EyePos():ToScreen()
                surface.SetDrawColor( team.GetColor( v:Team() ) )
                surface.DrawOutlinedRect( PlayerBoxPos.x - 40 / 2, PlayerBoxPos.y - 40 / 2, 40, 80 )
                end
            end
        end
    end
end
hook.Add( "HUDPaint", "PlayerBox1", ESPBox )

--ESP [Player Model]
function PlayerModel()
if GetConVarNumber( "vh_espmodel" ) >= 1 then
for k, v in pairs(ents.GetAll()) do
if ValidEntity( v ) then
if v:IsPlayer() or v:IsNPC() then
v:SetMaterial( "" )
cam.Start3D( EyePos(), EyeAngles() )
v:DrawModel()
cam.End3D()
                end
            end
        end
    end
end
hook.Add( "HUDPaint", "Playermodel1", PlayerModel )


--ESP [Solid Player Model]--
function SolidESP()
if GetConVarNumber( "vh_espsolid" ) >= 1 then
for k, v in pairs(ents.GetAll()) do
if ValidEntity( v ) then
if v:IsPlayer() or v:IsNPC() then
v:SetMaterial( "models/debug/debugwhite" )
cam.Start3D( EyePos(), EyeAngles() )
v:DrawModel()
cam.End3D()
                end
            end
        end
    end
end
hook.Add( "HUDPaint", "SolidESP1", SolidESP )





--KeyPad Hack-- [110% Credit to C0BRA on this one, I did NOT make any of the keypadhack, I just like it alot so I added it. Again, Thanks C0BRA.]

if GetConVarNumber( "vh_Keypadhack" ) >= 1 then
    for _, p in pairs( player.GetAll() ) do
    local tr = p:GetEyeTraceNoCursor()
    if ( ( tr.StartPos - tr.HitPos ):Length() < 32 ) then
    local e = tr.Entity
    if ( e:IsValid() ) then
    if ( e:GetClass() == "sent_keypad" || e:GetClass() == "sent_keypad_adv" || e:GetClass() == "sent_keypad_wire") then
    if ( e:GetNetworkedBool("Hacked") != true ) then
    //////////////////////
    ////////Non Secure
    ////////////////////
    if ( e:GetNetworkedBool("keypad_secure") == false ) then
    if ( e:GetNWBool( "keypad_access" ) && e:GetNWBool( "keypad_showaccess" ) ) then
    e.Password = e:GetNWInt( "keypad_num" )
    end
    /////////////////////////////
    ////////Secure Keypads
    ////////////////////////////
    else
    local pos = e:WorldToLocal(tr.HitPos)
        --------Code-----------
        local CurNum = e:GetNetworkedInt("keypad_num")
        local access = e:GetNetworkedBool("keypad_access")
        if( e.Num == nil) then e.Num = 0 end
        /////////////////////////////
        //////Success!
        ////////////////////////////
        if(access == true && CurNum != 0) then
        e:SetNetworkedBool("Hacked", true)
        e.Password = e.Num
        end
        /////////////////////////////
        //////Success!
        ////////////////////////////
        if(CurNum == 0 && e.Num != 0) then
        e.Num = 0
        end
        /////////////////////
        ///////One
        ///////////////////////////
        if( CurNum != 0 && CurNum > e.Num ) then
        if(pos.y > -2.1948 && pos.y < -0.9932 && pos.z < -0.0075 && pos.z > -1.2929) then
        e.Num = tonumber(e.Num.."1")
        print(e.Num)
        //////////////////////////
        /////Two
        //////////////////////////
        elseif(pos.y > -0.5865 && pos.y < 0.6369 && pos.z < -0.0039 && pos.z > -1.2509) then
        e.Num = tonumber(e.Num.."2")
        print(e.Num)
        //////////////////////////
        /////Three
        //////////////////////////
        elseif(pos.y > 1.0185 && pos.y < 2.2451 && pos.z < -0.0205 && pos.z > -1.2954) then
        e.Num = tonumber(e.Num.."3")
        print(e.Num)
        //////////////////////////
        /////Four
        //////////////////////////
        elseif(pos.y > -2.1992 && pos.y < -0.9697 && pos.z < -1.6083 && pos.z > -2.8945) then
        e.Num = tonumber(e.Num.."4")
        print(e.Num)
        //////////////////////////
        /////Five
        //////////////////////////
        elseif(pos.y > -0.5893 && pos.y < 0.6437 && pos.z < -1.6010 && pos.z > -2.8989) then
        e.Num = tonumber(e.Num.."5")
        print(e.Num)
        //////////////////////////
        /////Six
        //////////////////////////
        elseif(pos.y > 1.0065 && pos.y < 2.2297 && pos.z < -1.6031 && pos.z > -2.8992) then
        e.Num = tonumber(e.Num.."6")
        print(e.Num)
        //////////////////////////
        /////Seven
        //////////////////////////
        elseif(pos.y > -2.1958 && pos.y < -0.9575 && pos.z < -3.3015 && pos.z > -4.5483) then
        e.Num = tonumber(e.Num.."7")
        print(e.Num)
        //////////////////////////
        /////Eight
        //////////////////////////
        elseif(pos.y > -0.5899 && pos.y < 0.6464 && pos.z < -3.3108 && pos.z > -4.5422) then
        e.Num = tonumber(e.Num.."8")
        print(e.Num)
        //////////////////////////
        /////Nine
        //////////////////////////
        elseif(pos.y > 1.0023 && pos.y < 2.2230 && pos.z < -3.3003 && pos.z > -4.5493) then
        e.Num = tonumber(e.Num.."9")
        print(e.Num)
        ------------------------
                                end
                            end
                        end
                    end
                end
            end
        end
    end
end



/////////////////
// **Aimbot** //
///////////////
--No Recoil--
hook.Add( "Think", "No Recoil", function()
if GetConVarNumber( "vh_norecoil" ) >= 1 then
if LocalPlayer():GetActiveWeapon().Primary then
LocalPlayer():GetActiveWeapon().Primary.Recoil = 0
        end
    end
end )

--Aimbot--
// ### TEMPORARY AIMBOT CODE ### //
// Yes I know this aimbot is shit,//
//I will replace it when I get the//
//coding skills to do so.//

local Aiming = false;
local Target = nil;

local function IsVisible( e )
    local Trace = {};
    Trace.start = LocalPlayer():GetShootPos();
    Trace.endpos = e:GetBonePosition( e:LookupBone( 'ValveBiped.Bip01_Head1' ) );
    Trace.mask = MASK_SHOT
    Trace.filter = { LocalPlayer(), e };
    local tr = util.TraceLine( Trace );
    if( !tr.Hit ) then return true; end
end

local function Valid( e )
    if( !IsValid( e ) || !ValidEntity( e ) ) then return false; end
    if( !e:Alive() || !e:IsPlayer() ) then return false; end
    if( e == LocalPlayer() || e:GetMoveType() == MOVETYPE_OBSERVER || e:Team() == TEAM_SPECTATOR ) then return false; end
    return true;
end

local function Aimbot( u )
    if( !Aiming ) then return; end
    for k, v in pairs( player.GetAll() ) do
        if( IsVisible( v ) && Valid( v ) ) then
            Target = v;
            if( !Target ) then return; end
            local Bone = Target:GetBonePosition( Target:LookupBone( 'ValveBiped.Bip01_Head1' ) );
            Bone = Bone + Target:GetVelocity() / 50 + LocalPlayer():GetVelocity() / 50
            local Angl = ( Bone - LocalPlayer():GetShootPos() ):Angle();
            Angl.p = math.NormalizeAngle( Angl.p );
            Angl.y = math.NormalizeAngle( Angl.y );
            Angl.r = 0
            u:SetViewAngles( Angl );
            local w = LocalPlayer():GetActiveWeapon()
            if( w.Primary ) then w.Primary.Recoil = 0 end;
            if( w.Secondary ) then w.Secondary.Recoil = 0 end;
        end
    end
end
hook.Add( 'CreateMove', '\2\3', Aimbot );
concommand.Add( '+vh_aim', function() Aiming = true end );
concommand.Add( '-vh_aim', function() Aiming = false end );

--NoSpread--

function WeaponVector( value, typ )
        local s = ( -value )
      
        if ( typ == true ) then
                s = ( -value )
        elseif ( typ == false ) then
                s = ( value )
        else
                s = ( value )
        end
        return Vector( s, s, s )
end

local currentseed, cmd2, seed = currentseed || 0, 0, 0
local w, vecCone, valCone = "", Vector( 0, 0, 0 ), Vector( 0, 0, 0 )

local CustomCones       = {}
CustomCones.Weapons = {}
CustomCones.Weapons[ "weapon_pistol" ]          = WeaponVector( 0.0100, true )  // HL2 Pistol
CustomCones.Weapons[ "weapon_smg1" ]            = WeaponVector( 0.04362, true ) // HL2 SMG1
CustomCones.Weapons[ "weapon_ar2" ]                     = WeaponVector( 0.02618, true ) // HL2 AR2
CustomCones.Weapons[ "weapon_shotgun" ]         = WeaponVector( 0.08716, true ) // HL2 SHOTGUN

local NormalCones = { [ "weapon_cs_base" ] = true }

function GetCone( wep )
        local c = wep.Cone
      
        if ( !c && ( type( wep.Primary ) == "table" ) && ( type( wep.Primary.Cone ) == "number" ) ) then c = wep.Primary.Cone end
        if ( !c ) then c = 0 end
        if ( type( wep.Base ) == "string" && NormalCones[ wep.Base ] ) then return c end
        if ( ( wep:GetClass() == "ose_turretcontroller" ) ) then return 0 end
        return c || 0
end
      
function DoVHNospread( ucmd, angle )
if GetConVarNumber( "vh_nospread" ) >= 1 then
        local ply = LocalPlayer()
        
        cmd2, seed = abc_ucmd_getperdicston( ucmd )
        if ( cmd2 != 0 ) then currentseed = seed end
      
        local w = ply:GetActiveWeapon(); vecCone = Vector( 0, 0, 0 )
        if ( w && w:IsValid() && ( type( w.Initialize ) == "function" ) ) then
                valCone = GetCone( w )
                      
                if ( type( valCone ) == "number" ) then
                        vecCone = Vector( -valCone, -valCone, -valCone )
                      
                elseif ( type( valCone ) == "Vector" ) then
                        vecCone = valCone * -1
                              
                end
    else
                if ( w:IsValid() ) then
                        local class = w:GetClass()
                                if ( CustomCones.Weapons[ class ] ) then
                                        vecCone = CustomCones.Weapons[ class ]
                                end
                        end
                end
        return abc_donospred( currentseed || 0, ( angle || ply:GetAimVector():Angle() ):Forward(), vecCone ):Angle()
  end
end

///////////////
// **Misc** //
/////////////
--Bunnyhop--
function Bunnyhop()
if GetConVarNumber( "vh_bhop" ) >= 1 then
if input.IsKeyDown( KEY_SPACE ) then
if LocalPlayer():IsOnGround() then
RunConsoleCommand("+Jump")
timer.Create("Bhop",0.01, 0 ,function() RunConsoleCommand("-Jump") end)

                        end
                end
                        end
                                end
                              
hook.Add("Think", "immabunny", Bunnyhop)


--TriggerBot--
function TriggerBot()
local Eye = LocalPlayer():GetEyeTrace().Entity
if GetConVarNumber( "vh_trigger" ) >= 1 then
if (Eye:IsNPC() or Eye:IsPlayer()) then
RunConsoleCommand("+attack")
else
timer.Simple(0.50, function()
RunConsoleCommand("-attack")
                        end)
                end
        end
                end

hook.Add("Think", "Test", TriggerBot)
                
    


    
--SpeedHack--
CreateClientConVar("vh_speedhack_speed",3.5)
local factor = GetConVarNumber("vh_speedhack_speed")
concommand.Add( "+vh_speed", function( p, c, a )
    cvar2.SetValue( "sv_cheats", "1" )
    cvar2.SetValue( "host_timescale", factor )
end )

concommand.Add( "-vh_speed", function( p, c, a )
    //cvar2.SetValue( "sv_cheats", "0" ) --Uncomment to turn sv_cheats off after SpeedHack is turned off.
    cvar2.SetValue( "host_timescale", "1.0" )
end )


--Spectators--
local showSpectators = false
hook.Add("HUDPaint", "showspectators", function()
    if GetConVarNumber( "vh_spectators" ) >= 1 then return end
    local spectatePlayers = {}
    local x = 0
    for k,v in pairs(player.GetAll()) do
        if v:GetObserverTarget() == LocalPlayer() then
            table.insert(spectatePlayers, v:Name())
        end
    end
    local textLength = surface.GetTextSize(table.concat(spectatePlayers) ) / 3
    draw.RoundedBox(1, ScrW() - 180, ScrH() - ScrH() + 15, 150, 30 + textLength, Color(0,0,0,150))
    draw.SimpleText("Spectators", "ScoreboardText", ScrW() - 140, ScrH() - ScrH() + 17, Color(0, 0, 0, 150))
    draw.SimpleText("Spectators", "ScoreboardText", ScrW() - 140, ScrH() - ScrH() + 16, Color(255, 255, 255, 255))

    for k, v in pairs(spectatePlayers) do
        draw.SimpleText(v, "ScoreboardText", ScrW() - 140, ScrH() - ScrH() + 35 + x, Color(255, 255, 255, 255))
        x = x + 15
    end
end)


--LaserSight--
local VH = {};
local Allowed = { 'weapon_hvh_m4a1', 'weapon_sh_m249', 'weapon_sh_p228', 'weapon_sh_mp5a4', 'weapon_sh_deagle', 'weapon_sh_ak47', 'weapon_sh_m4a2', 'weapon_ar2', 'weapon_smg1', 'weapon_deagle', 'weapon_pistol', 'weapon_mad_deagle', 'weapon_mad_ak47', 'weapon_glock', 'weapon_para', 'weapon_ak47', 'weapon_fiveseven', 'weapon_mac10', 'weapon_tmp', 'weapon_m4', 'weapon_mp5', 'weapon_mad_mp5' }

function VH.Barrel( )
if GetConVarNumber( "vh_lasersight" ) >= 1 then return end
local ViewModel = LocalPlayer():GetViewModel()
local Attach = ViewModel:LookupAttachment( '1' )
if( !LocalPlayer():Alive() || LocalPlayer():GetActiveWeapon() == NULL ) then return; end
if ( Attach == 0 ) then Attach = ViewModel:LookupAttachment( 'muzzle' ) end
if( !table.HasValue( Allowed, LocalPlayer():GetActiveWeapon():GetClass() ) ) then return; end
cam.Start3D( EyePos(), EyeAngles() )
render.SetMaterial( Material( 'sprites/bluelaser1' ) )
render.DrawBeam( ViewModel:GetAttachment( Attach ).Pos, LocalPlayer():GetEyeTrace().HitPos, 5, 0, 0, team.GetColor( LocalPlayer():Team() ) )
cam.End3D()
end
hook.Add( 'RenderScreenspaceEffects', '\2\3', VH.Barrel )

--Hitmarker--
function Hitmarker()
if GetConVarNumber( "vh_hitmarker" ) >= 1 then
local EyeEnt = LocalPlayer():GetEyeTrace().Entity
if EyeEnt:IsPlayer() then
if LocalPlayer():Health() > 0 then
if LocalPlayer():GetCurrentCommand():KeyDown(IN_ATTACK) then
if LocalPlayer():GetActiveWeapon():Clip1() > 0 then

surface.SetDrawColor( 255 , 0 , 0 , 255 )
surface.DrawLine(ScrW() / 2 - 5 , ScrH() / 2 - 5 , ScrW() / 2 - 15 , ScrH() / 2 - 15)
surface.DrawLine(ScrW() / 2 + 5 , ScrH() / 2 + 5 , ScrW() / 2 + 15, ScrH() / 2 + 15)
surface.DrawLine(ScrW() / 2 + 5 , ScrH() / 2 - 5 , ScrW() / 2 + 15 , ScrH() / 2 - 15)
surface.DrawLine(ScrW() / 2 - 5 , ScrH() / 2 + 5 , ScrW() / 2 - 15 , ScrH() / 2 + 15)
                                        end
                                end
                        end
                                end
                                        end
                                                end
                                              
hook.Add("HUDPaint","DisplayShittyHitmarker",Hitmarker)


--SilentAim--
local Hooks = {};

function AddHook( t, pac )
    local u = tostring( math.random( 1, 150 ) );
    table.insert( Hooks, u )
    return( hook.Add( t, u, pac ) );
end


local View = Angle( 0, 0, 0 );

local function FakeView(ply, origin, angles, FOV)
    if( GetConVarNumber( 'vh_silentaim' ) >= 1 ) then return; end
    if GetViewEntity() != LocalPlayer() then return end
    local base = GAMEMODE:CalcView(ply, origin, View, FOV) || {}
            base.angles = base.angles || View
            base.angles.r = 0
    return base
end
AddHook("CalcView", FakeView)


--Custom Crosshair--
function Crosshair()
if GetConVarNumber( "vh_crosshair" ) >= 1 then
surface.SetDrawColor(0,0,0,255)
surface.DrawLine(ScrW() / 2 - 20, ScrH() / 2, ScrW() / 2 + 22 , ScrH() / 2)
surface.DrawLine(ScrW() / 2 - 0, ScrH() / 2 - 20, ScrW() / 2 - 0 , ScrH() / 2 + 22)
        end
end
hook.Add("HUDPaint","CustomCross",Crosshair)

/////////////////////
// **Derma menu** //
///////////////////

/// Derma ///

local function ShowFrame()

Frame = vgui.Create("DFrame")
Frame:SetSize( 280 , 270 )
Frame:SetPos( ScrW() / 2 - Frame:GetWide() / 2 , ScrH() / 2 - Frame:GetTall() / 2  )
Frame:SetTitle("VoltageHack [V2]")
Frame:SetVisible( true )
Frame:ShowCloseButton( true )
Frame.Paint = function()
    draw.RoundedBox( 8, 0, 0, Frame:GetWide(), Frame:GetTall(), Color( 0, 0, 255, 110 ) )
end
Frame:MakePopup()

local BSheet = vgui.Create("DPropertySheet" , Frame)
BSheet:SetSize( 270 , 230 )
BSheet:SetPos( 5 , 25 )
BSheet.Paint = function()
    draw.RoundedBox( 8, 0, 0, BSheet:GetWide(), BSheet:GetTall(), Color( 0, 0, 0, 190 ) )
end

local Tab = vgui.Create("DLabel")
Tab:SetParent( BSheet )
Tab:SetPos( 0 , 10 )
Tab:SetText("")

local Tab2 = vgui.Create("DLabel")
Tab2:SetParent( BSheet )
Tab2:SetPos( 0 , 10 )
Tab2:SetText("")

local Tab3 = vgui.Create("DLabel")
Tab3:SetParent( BSheet )
Tab3:SetPos( 0 , 10 )
Tab3:SetText("")

local Tab4 = vgui.Create("DLabel")
Tab4:SetParent( BSheet )
Tab4:SetPos( 0 , 10 )
Tab4:SetText("")


// Options

local AimLabel = vgui.Create("DLabel")
AimLabel:SetParent( Tab )
AimLabel:SetPos( 13 , 10 )
AimLabel:SetText("")
AimLabel:SetTextColor( Color(255 , 255 , 255 , 255 ) )
AimLabel:SizeToContents()

local AimLabel2 = vgui.Create("DLabel")
AimLabel2:SetParent( Tab )
AimLabel2:SetPos( 13 , 70 )
AimLabel2:SetText("")
AimLabel2:SetTextColor( Color(255 , 255 , 255 , 255 ) )
AimLabel2:SizeToContents()

local AimLabel3 = vgui.Create("DLabel")
AimLabel3:SetParent( Tab )
AimLabel3:SetPos( 206 , 10 )
AimLabel3:SetText("")
AimLabel3:SetTextColor( Color(255 , 255 , 255 , 255 ) )
AimLabel3:SizeToContents()

local AimLabel4 = vgui.Create("DLabel")
AimLabel4:SetParent( Tab )
AimLabel4:SetPos( 13 , 130  )
AimLabel4:SetText("")
AimLabel4:SetTextColor( Color(255 , 255 , 255 , 255 ) )
AimLabel4:SizeToContents()

local AimLabel5 = vgui.Create("DLabel")
AimLabel5:SetParent( Tab )
AimLabel5:SetPos( 118.5 , 235 )
AimLabel5:SetText("VoltageHack [V2] Beta")
AimLabel5:SetTextColor( Color(255 , 255 , 255 , 255 ) )
AimLabel5:SizeToContents()

local Aim3 = vgui.Create( "DCheckBoxLabel")
Aim3:SetText( "TriggerBot" )
Aim3:SetConVar( "vh_trigger" )
Aim3:SetParent( Tab )
Aim3:SetPos( 10 , 30 )
Aim3:SetValue( GetConVarNumber("vh_trigger") )
Aim3:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Aim3:SizeToContents()

local Aim4 = vgui.Create( "DCheckBoxLabel")
Aim4:SetText( "NoSpread" )
Aim4:SetConVar( "vh_nospread" )
Aim4:SetParent( Tab )
Aim4:SetPos( 10 , 50 )
Aim4:SetValue( GetConVarNumber("vh_nospread") )
Aim4:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Aim4:SizeToContents()

local Aim5 = vgui.Create( "DCheckBoxLabel")
Aim5:SetText( "NoRecoil" )
Aim5:SetConVar( "vh_norecoil" )
Aim5:SetParent( Tab )
Aim5:SetPos( 10 , 70 )
Aim5:SetValue( GetConVarNumber("vh_norecoil") )
Aim5:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Aim5:SizeToContents()

local Aim6 = vgui.Create( "DCheckBoxLabel")
Aim6:SetText( "SilentAim" )
Aim6:SetConVar( "vh_silentaim" )
Aim6:SetParent( Tab )
Aim6:SetPos( 10 , 90 )
Aim6:SetValue( GetConVarNumber( 'vh_silentaim' ) );
Aim6:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Aim6:SizeToContents()

local EspLabel = vgui.Create("DLabel")
EspLabel:SetParent( Tab2 )
EspLabel:SetPos( 13 , 10 )
EspLabel:SetText("")
EspLabel:SetTextColor( Color(255 , 255 , 255 , 255 ) )
EspLabel:SizeToContents()

local EspLabel2 = vgui.Create("DLabel")
EspLabel2:SetParent( Tab2 )
EspLabel2:SetPos( 13 , 90 )
EspLabel2:SetText("")
EspLabel2:SetTextColor( Color(255 , 255 , 255 , 255 ) )
EspLabel2:SizeToContents()

local EspLabel3 = vgui.Create("DLabel")
EspLabel3:SetParent( Tab2 )
EspLabel3:SetPos( 200 , 10 )
EspLabel3:SetText("")
EspLabel3:SetTextColor( Color(255 , 255 , 255 , 255 ) )
EspLabel3:SizeToContents()

local Esp = vgui.Create( "DCheckBoxLabel")
Esp:SetText( "Esp Info" )
Esp:SetConVar( "vh_esp" )
Esp:SetParent( Tab2 )
Esp:SetPos( 10 , 30 )
Esp:SetValue( GetConVarNumber("vh_esp") )
Esp:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Esp:SizeToContents()

local Esp2 = vgui.Create( "DCheckBoxLabel")
Esp2:SetText( "ESP Player Model" )
Esp2:SetConVar( "vh_espmodel" )
Esp2:SetParent( Tab2 )
Esp2:SetPos( 10 , 110 )
Esp2:SetValue( GetConVarNumber("vh_espmodel") )
Esp2:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Esp2:SizeToContents()

local Esp3 = vgui.Create( "DCheckBoxLabel")
Esp3:SetText( "ESP Box" )
Esp3:SetConVar( "vh_espbox" )
Esp3:SetParent( Tab2 )
Esp3:SetPos( 10 , 130 )
Esp3:SetValue( GetConVarNumber( 'vh_espbox' ) )
Esp3:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Esp3:SizeToContents()


local Esp6 = vgui.Create( "DCheckBoxLabel")
Esp6:SetText( "KeyPad Hack" )
Esp6:SetConVar( "vh_keypdhack" )
Esp6:SetParent( Tab2 )
Esp6:SetPos( 10 , 70 )
Esp6:SetValue( GetConVarNumber("vh_keypadhack") )
Esp6:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Esp6:SizeToContents()

local Esp4 = vgui.Create( "DCheckBoxLabel")
Esp4:SetText( "ESP Solid" )
Esp4:SetConVar( "vh_espsolid" )
Esp4:SetParent( Tab2 )
Esp4:SetPos( 10 , 90 )
Esp4:SetValue( GetConVarNumber("vh_espsolidh") )
Esp4:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Esp4:SizeToContents()

local Esp5 = vgui.Create( "DCheckBoxLabel")
Esp5:SetText( "Disable Spectator List" )
Esp5:SetConVar( "vh_spectators" )
Esp5:SetParent( Tab2 )
Esp5:SetPos( 10 , 50 )
Esp5:SetValue( GetConVarNumber("vh_spectators") )
Esp5:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Esp5:SizeToContents()


local MiscLabel = vgui.Create("DLabel")
MiscLabel:SetParent( Tab3 )
MiscLabel:SetPos( 13 , 10 )
MiscLabel:SetText("Misc Features")
MiscLabel:SetTextColor( Color(255 , 255 , 255 , 255 ) )
MiscLabel:SizeToContents()

local MiscLabel2 = vgui.Create("DLabel")
MiscLabel2:SetParent( Tab3 )
MiscLabel2:SetPos( 205 , 10 )
MiscLabel2:SetText("")
MiscLabel2:SetTextColor( Color(255 , 255 , 255 , 255 ) )
MiscLabel2:SizeToContents()

local Misc = vgui.Create( "DCheckBoxLabel")
Misc:SetText( "Bunnyhop" )
Misc:SetConVar( "vh_bhop" )
Misc:SetParent( Tab3 )
Misc:SetPos( 10 , 30 )
Misc:SetValue( GetConVarNumber("vh_bhop") )
Misc:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Misc:SizeToContents()

local Misc2 = vgui.Create( "DCheckBoxLabel")
Misc2:SetText( "Disable Laser Sight" )
Misc2:SetConVar( "vh_lasersight" )
Misc2:SetParent( Tab3 )
Misc2:SetPos( 10 , 50 )
Misc2:SetValue( GetConVarNumber("vh_lasersight") )
Misc2:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Misc2:SizeToContents()

local Misc3 = vgui.Create( "DCheckBoxLabel")
Misc3:SetText( "Crosshair" )
Misc3:SetConVar( "vh_crosshair" )
Misc3:SetParent( Tab3 )
Misc3:SetPos( 10 , 70 )
Misc3:SetValue( GetConVarNumber("vh_crosshair") )
Misc3:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Misc3:SizeToContents()

local Misc4 = vgui.Create( "DCheckBoxLabel")
Misc4:SetText( "HitMarker" )
Misc4:SetConVar( "vh_hitmarker" )
Misc4:SetParent( Tab3 )
Misc4:SetPos( 10 , 90 )
Misc4:SetValue( GetConVarNumber("vh_hitmarker") )
Misc4:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Misc4:SizeToContents()

local Misc5 = vgui.Create( "DCheckBoxLabel")
Misc5:SetText( "ULX Anti Gag" )
Misc5:SetConVar( "vh_antigag" )
Misc5:SetParent( Tab3 )
Misc5:SetPos( 10 , 110 )
Misc5:SetValue( GetConVarNumber("vh_antigag") )
Misc5:SetTextColor( Color(255 , 255 , 255 , 255 ) )
Misc5:SizeToContents()

local Sh = vgui.Create( "DNumSlider")
Sh:SetWide(100)
Sh:SetText( "" )
Sh:SetMin(0)
Sh:SetMax(10)
Sh:SetDecimals(1)
Sh:SetPos( 20 , 30 )
Sh:SetParent( Tab4 )
Sh:SetConVar("vh_speedhack_speed")

local ShLabel = vgui.Create("DLabel")
ShLabel:SetParent( Tab4 )
ShLabel:SetPos( 20 , 15 )
ShLabel:SetText( "SpeedHack Speed" )
ShLabel:SetTextColor(Color (255 , 255 , 255 , 255 ))
ShLabel:SizeToContents()
    
local IsisB = vgui.Create( "DButton", Tab3 )
IsisB:SetSize( 70, 30 )
IsisB:SetPos( 15, 300 )
IsisB:SetText( "Website." )
IsisB.DoClick = function()
    
local HtmlWin = vgui.Create( "DFrame" )
HtmlWin:SetPos( 1,1 )
HtmlWin:SetSize( ScrW() - 25 , ScrH() - 50 )
HtmlWin:SetTitle( "Updates/Information" )
HtmlWin:SetVisible( true )  
HtmlWin:SetDraggable( true )
HtmlWin:ShowCloseButton( false )
HtmlWin:MakePopup()
    
local HTMLWeb = vgui.Create( "HTML", HtmlWin )
HTMLWeb:SetSize(ScrW(), ScrH())
HTMLWeb:SetPos( 0, 50 )
HTMLWeb:OpenURL( "http://www.VoltageHack.webs.com/" )

local IsisB2 = vgui.Create( "DButton", HtmlWin )
IsisB2:SetSize( 70, 30 )
IsisB2:SetPos( 3, 5 )
IsisB2:SetText( "Minimize" )
IsisB2.DoClick = function()
HtmlWin:SetVisible(false)
    end    
local IsisB3 = vgui.Create( "DButton")
IsisB3:SetSize( 80,30 )
IsisB3:SetPos( ScrW() - 85, 35 )
IsisB3:SetText( "Hack Main Page" )
IsisB3.DoClick = function()
HtmlWin:SetVisible(true)
    end    
    
    
end


BSheet:AddSheet( "Aimbot", Tab, "gui/silkicons/star", false, false, "Aimbot" )
BSheet:AddSheet( "ESP", Tab2, "gui/silkicons/check_on", false, false, "Wallhacks/ESP" )
BSheet:AddSheet( "Misc", Tab3, "gui/silkicons/world", false, false, "Misc" )
BSheet:AddSheet( "Speedhack", Tab4, "gui/silkicons/wrench", false, false, "Gotta go fast" )
end
concommand.Add("+Vh_Menu",ShowFrame)
concommand.Add("-Vh_Menu",function()
Frame:SetVisible( false )
end)

concommand.Add("Vh_Menu_Reload",function()
ShowFrame()
end)