StylesHack2k15
stole this from UnitedHosts lool 
Code:
/*
STYLESHACK 2k15 EDITION
Bolegachan
Kaboom
This is the story bout a man called ExiledStyles
A long story bout da biggest man from MPGH
he take you wit'cha
he'll penetrate yuh
Aaa
la bang this maddafakka Garry's Modification to MPGH
This is the story bout da man with the rocket bass
A long story bout da biggest man from ace of bass
he take you wit'cha
he'll penetrate yuh
Aaa
la bang this maddafakka Garry's Modification to MPGH
la bang this maddafakka Garry's Modification to MPGH
la bang this maddafakka Garry's Modification to MPGH
This is the story bout a man called ExiledStyles
A long story bout da biggest man from MPGH
he take you wit'cha
he'll penetrate yuh
Aaa
la bang this maddafakka Garry's Modification to MPGH
This is the story bout da man with the rocket bass
A long story bout da biggest man from ace of bass
he take you wit'cha
he'll penetrate yuh
Aaa
la bang this maddafakka Garry's Modification to MPGH
he take you wit'cha
he'll penetrate yuh
Aaa
la bang this maddafakka Garry's Modification to MPGH
la bang this maddafakka Garry's Modification to MPGH
la bang this maddafakka
This is the story bout a man called ExiledStyles
A long story bout da biggest man from MPGH
he take you wit'cha
he'll penetrate yuh
Aaa
la bang this maddafakka Garry's Modification to MPGH
Kaboom
*/
--Behold CHEATERS if your reading this then you suck because you bypassed my protection method on UnitedHosts
--BEHOLD THE GLORY OF A EXILEDSTYLES I HID THIS FROM YOU CHEATERS BECAUSE IT'S POWERFUL
local Hack = "StylesHack2k15 GMod Priv8"
local Mode = 1
local AutoShoot = false
local Aiming = false
local Distance = 999999999
local tracedata = {}
local BannedWeapons = {"weapon_physcannon", "weapon_physgun", "weapon_frag", "weapon_real_cs_smoke", "arrest_stick", "unarrest_stick", "stunstick",
"weapon_real_cs_flash", "weapon_real_cs_grenade", "spidermans_swep", "manhack_welder", "laserpointer", "remotecontroller", "med_kit",
"door_ram", "pocket", "weaponchecker", "lockpick", "keypad_cracker", "keys", "weapon_real_cs_knife", "gmod_tool", "gmod_camera", "weapon_crowbar",
"weapon_stunstick", "weapon_knife", "weapon_rpg"}
print( Hack .. "1.0 BETA loaded" )
// The autoshoot function.
local function ATHack()
if LocalPlayer():Alive() and AutoShoot then
local pos = LocalPlayer():GetShootPos()
local ang = LocalPlayer():GetAimVector()
tracedata.start = pos
tracedata.endpos = pos+(ang * Distance)
tracedata.filter = LocalPlayer()
local trace = util.TraceLine(tracedata)
target = trace.Entity
if WeaponCheck() and ModeCheck() and AmmoCheck() then
Fire()
end
end
end
// Check are we targeting NPC's, Players or maybe both.
function ModeCheck()
if Mode == 1 then
if !target:IsNPC() and !target:IsPlayer() then
return false
end
elseif Mode == 2 then
if !target:IsPlayer() then
return false
end
elseif Mode == 3 then
if !target:IsNPC() then
return false
end
end
return true
end
// No-recoil.
local function NoRecoil()
if !Recoil and WeaponCheck() and LocalPlayer():Alive() and LocalPlayer():GetActiveWeapon():IsValid() and LocalPlayer():GetActiveWeapon().Primary then
LocalPlayer():GetActiveWeapon().Primary.Recoil = 0
else return end
end
hook.Add("Think", "Norecoil", NoRecoil)
// Check our ammo, if ammo is 0, then reload and output false, else if ammo is not 0, outputs true.
function AmmoCheck()
if Ammo() == 0 then
LocalPlayer():ConCommand("+reload; wait 2; -reload")
return false
else
return true
end
end
// Output our current ammo.
function Ammo()
if LocalPlayer() and LocalPlayer():GetActiveWeapon() and LocalPlayer():GetActiveWeapon():IsValid() then
actwep = LocalPlayer():GetActiveWeapon()
if ( ! actwep ) then return -1 end
return actwep:Clip1()
end
end
// Checks if the target is valid for targeting.
function TargetCheck( ent )
if !ent:IsValid() or !ent:IsNPC() and !ent:IsPlayer() or LocalPlayer() == ent then return false end
if ent:IsPlayer() and !ent:Alive() then return false end
if ent:IsNPC() and ent:GetMoveType() == 0 then return false end
if Mode == 1 then
if ent:IsNPC() or ent:IsPlayer() then return true end
elseif Mode == 2 then
if ent:IsPlayer() then return true end
if ent:IsNPC() then return false end
elseif Mode == 3 then
if ent:IsNPC() then return true end
if ent:IsPlayer() then return false end
end
end
// Outputs the targets heads position.
function HeadPosition( ent )
local hbone = ent:LookupBone("ValveBiped.Bip01_Head1")
return ent:GetBonePosition(hbone)
end
// Are we seeing the target, no use to try and shoot through walls is it.
function TargetVisible( ent )
local trace = {start = LocalPlayer():GetShootPos(),endpos = HeadPosition(ent),filter = {LocalPlayer(), ent},mask = 1174421507}
local tr = util.TraceLine(trace)
if tr.Fraction == 1 then
return true
else
return false
end
end
// Gets the positions and angles, and counts the right values for some aimbotting.
function GetTarget()
local position = LocalPlayer():EyePos()
local angle = LocalPlayer():GetAimVector()
local tar = {0,0}
for _, ent in pairs( ents.GetAll() ) do
if LocalPlayer():Alive() and WeaponCheck() and TargetCheck( ent ) and TargetVisible( ent ) and AmmoCheck() then
local targetpos = ent:EyePos()
local editor = ( targetpos - position ):Normalize()
editor = editor - angle
editor = editor:Length()
editor = math.abs( editor )
if editor < tar[2] or tar[1] == 0 then
tar = {ent, editor}
end
end
end
return tar[1]
end
local Aimed = _R["CUserCmd"].SetViewAngles
// This is the part where we don't have to move our mouse. :)
function AutoAim( UCMD )
if Aiming and WeaponCheck() then
local targ = GetTarget()
if targ == 0 then return end
local velocity = targ:GetVelocity() or Vector(0,0,0)
Aimed(UCMD, ( ( HeadPosition( targ ) + velocity * 2 * FrameTime() ) - LocalPlayer():GetShootPos() ):Angle() )
local trace = LocalPlayer():GetEyeTrace()
end
end
hook.Add("CreateMove", "Autoaim", AutoAim)
concommand.Add("at_autoaim_on", function()
Aiming = true
LocalPlayer():ChatPrint(Hack .. "AutoAim Enabled!")
end )
concommand.Add("at_autoaim_off", function()
Aiming = false
LocalPlayer():ChatPrint(Hack .. "AutoAim Disabled!")
end )
// Checks if the weapon you are trying to shoot with is in the table 'BannedWeapons' if it is, then it doesn't shoot with the aimbot.
function WeaponCheck()
if !LocalPlayer():Alive() then return false end
if LocalPlayer():Alive() and LocalPlayer():GetActiveWeapon():IsValid() then
Weapon = LocalPlayer():GetActiveWeapon():GetClass()
else return false
end
if table.HasValue( BannedWeapons, Weapon ) then
return false
else
return true
end
end
// We gotta fire the gun too.
function Fire()
LocalPlayer():ConCommand("+attack; wait 2; -attack; wait 2")
end
// The menu.
local function menu()
local panel = vgui.Create("DFrame")
panel:SetSize(560, 280)
panel:SetPos(ScrW() / 3, ScrH() / 3)
panel:SetTitle( "HowToStyle Gmod Public 1.0 BETA" )
panel:SetVisible( true )
panel:SetDraggable( true )
panel:ShowCloseButton( true )
panel:MakePopup()
enabled1 = vgui.Create( "DButton", panel )
enabled1:SetPos( 20, 50 )
enabled1:SetSize( 140, 40 )
enabled1:SetText( "Autoshoot On" )
enabled1.DoClick = function()
RunConsoleCommand( "at_autoshoot_on" )
end
disabled1 = vgui.Create( "DButton", panel )
disabled1:SetPos( 20, 100 )
disabled1:SetSize( 140, 40 )
disabled1:SetText( "Autoshoot Off" )
disabled1.DoClick = function()
RunConsoleCommand( "at_autoshoot_off" )
end
espon1 = vgui.Create( "DButton", panel )
espon1:SetPos( 200, 50 )
espon1:SetSize( 140, 40 )
espon1:SetText( "ESP On" )
espon1.DoClick = function()
RunConsoleCommand( "at_esp_on" )
end
espoff1 = vgui.Create( "DButton", panel )
espoff1:SetPos( 200, 100 )
espoff1:SetSize( 140, 40 )
espoff1:SetText( "ESP Off" )
espoff1.DoClick = function()
RunConsoleCommand( "at_esp_off" )
end
aimoff1 = vgui.Create( "DButton", panel )
aimoff1:SetPos( 20, 210 )
aimoff1:SetSize( 140, 40 )
aimoff1:SetText( "Autoaim Off" )
aimoff1.DoClick = function()
RunConsoleCommand( "at_autoaim_off" )
end
aimon1 = vgui.Create( "DButton", panel )
aimon1:SetPos( 20, 160 )
aimon1:SetSize( 140, 40 )
aimon1:SetText( "Autoaim On" )
aimon1.DoClick = function()
RunConsoleCommand( "at_autoaim_on" )
end
mode1 = vgui.Create( "DButton", panel )
mode1:SetPos( 380, 80 )
mode1:SetSize( 140, 40 )
mode1:SetText( "Aimbot: All" )
mode1.DoClick = function()
Mode = 1
LocalPlayer():ChatPrint(Hack .. "Aimbot Mode: All")
end
mode2 = vgui.Create( "DButton", panel )
mode2:SetPos( 380, 130 )
mode2:SetSize( 140, 40 )
mode2:SetText( "Aimbot: Player" )
mode2.DoClick = function()
Mode = 2
LocalPlayer():ChatPrint(Hack .. "Aimbot Mode: Player")
end
mode3 = vgui.Create( "DButton", panel )
mode3:SetPos( 380, 180 )
mode3:SetSize( 140, 40 )
mode3:SetText( "Aimbot: NPC" )
mode3.DoClick = function()
Mode = 3
LocalPlayer():ChatPrint(Hack .. "Aimbot Mode: NPC")
end
randon = vgui.Create( "DButton", panel )
randon:SetPos( 200, 160 )
randon:SetSize( 140, 40 )
randon:SetText( "Name Changer On" )
randon.DoClick = function()
LocalPlayer():ConCommand("at_changer_on")
end
randoff = vgui.Create( "DButton", panel )
randoff:SetPos( 200, 210 )
randoff:SetSize( 140, 40 )
randoff:SetText( "Name Changer Off" )
randoff.DoClick = function()
LocalPlayer():ConCommand("at_changer_off")
end
label1 = vgui.Create( "Label", panel )
label1:SetPos( 205, 250 )
label1:SetSize( 140, 40 )
label1:SetText( "Coded by JustiMaN - HowToStyle.net" )
recoilon = vgui.Create( "DButton", panel )
recoilon:SetPos( 360, 40 )
recoilon:SetSize( 80, 30 )
recoilon:SetText( "No-Recoil On" )
recoilon.DoClick = function()
LocalPlayer():ConCommand("at_norecoil_on")
end
recoiloff = vgui.Create( "DButton", panel )
recoiloff:SetPos( 450, 40 )
recoiloff:SetSize( 80, 30 )
recoiloff:SetText( "No-Recoil Off" )
recoiloff.DoClick = function()
LocalPlayer():ConCommand("at_norecoil_off")
end
end
concommand.Add("at_menu", menu)
concommand.Add("at_autoshoot_on", function()
AutoShoot = true
LocalPlayer():ChatPrint(Hack .. "AutoShoot Enabled!")
end )
concommand.Add("at_norecoil_on", function()
Recoil = false
LocalPlayer():ChatPrint( Hack .. "No-Recoil Enabled!" )
end )
concommand.Add("at_norecoil_off", function()
Recoil = true
LocalPlayer():ChatPrint( Hack .. "No-Recoil Disabled!" )
end )
concommand.Add("at_autoshoot_off", function()
AutoShoot = false
LocalPlayer():ChatPrint(Hack .. "AutoShoot Disabled!")
end )
hook.Add("Think", "Autoshoot", ATHack)
// Name changer, yay?
function name_random()
if random == true then
RunConsoleCommand("setinfo", "name", table.Random( player.GetAll() ):Nick() .. " ")
end
end
concommand.Add("at_changer_on", function( ply )
local orig = ply:Nick()
random = true
hook.Add("Think", "random", name_random)
end )
concommand.Add("at_changer_off", function()
random = false
hook.Remove("Think", "random", name_random)
RunConsoleCommand("setinfo", "name", orig)
end )
// It's time for some wallhacking.
function esp()
if enabled == true then
for _,v in ipairs (player.GetAll()) do
local pos = v:GetPos() + Vector(0,0,90)
pos = pos:ToScreen()
if v:Nick() == LocalPlayer():Nick() then
name = ""
dead = ""
else
name = v:Nick()
dead = "*Dead*"
end
if v:Health() > 0 then
color = Color(255,255,255,255)
elseif v:Health() < 1 then
color = Color(0,0,0,255)
draw.DrawText(dead, "ScoreboardText", pos.x, pos.y + 10, color,1)
end
draw.DrawText(name, "ScoreboardText", pos.x, pos.y - 10, color,1)
end
end
end
concommand.Add("at_esp_on", function()
enabled = true
hook.Add("HUDPaint", "Paint", esp)
LocalPlayer():ChatPrint(Hack .. "ESP - Enabled")
end )
concommand.Add("at_esp_off", function()
enabled = false
LocalPlayer():ChatPrint(Hack .. "ESP - Disabled")
end )
Originally Posted by Scetch08
