Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- chat.AddText(Color(255,0,0,255), "Loaded!")
- surface.CreateFont( "cheatfont", {
- font = "Arial",
- extended = true,
- size = 20,
- weight = 500,
- antialias = true,
- underline = false,
- italic = false,
- strikeout = false,
- symbol = false,
- rotary = false,
- shadow = false,
- additive = false,
- outline = false,
- } )
- function GetInsert()
- if input.IsKeyDown(KEY_INSERT) and alreadypressed == 0 then
- OpenMainMenu()
- alreadypressed = 1
- elseif input.IsKeyDown(KEY_INSERT) then
- else
- alreadypressed = 0
- end
- end
- hook.Add( "Think", "GetInsert", GetInsert )
- local cheatmenu = vgui.Create( "DFrame" )
- cheatmenu:SetPos( ScrW() * 0.02604166666, ScrH() * 0.04629629629 )
- cheatmenu:SetSize( ScrW() * 0.390625, ScrH() * 0.46092592592 )
- cheatmenu:Center ()
- cheatmenu:SetTitle( " -- S1MPLET0N --" )
- cheatmenu:SetVisible( true )
- cheatmenu:SetDraggable( true )
- cheatmenu:ShowCloseButton( true )
- cheatmenu:MakePopup( )
- cheatmenu:SetBackgroundBlur( false )
- cheatmenu.Paint = function()
- surface.SetDrawColor( 40, 40, 40, 255 )
- surface.DrawRect( 0, 0, cheatmenu:GetWide(), cheatmenu:GetTall() )
- surface.SetDrawColor( 75, 0, 255, 255 )
- surface.DrawOutlinedRect( 0, 0, cheatmenu:GetWide(), cheatmenu:GetTall() )
- surface.DrawText("ESP")
- local button = vgui.Create( "DButton" )
- button:SetSize( 100, 35 )
- button:SetText( "Toggle Player ESP" )
- button:Center()
- button:MakePopup()
- button:SetConsoleCommand( "say", LocalPlayer():Nick() )
- end
- cheatmenu:MakePopup()
- cheatmenu:SetVisible(false)
- OpenMainMenu = function()
- visible = !visible
- cheatmenu:SetVisible(visible)
- end
- surface.CreateFont( "myFont", {
- font = "Tahoma", -- Use the font-name which is shown to you by your operating system Font Viewer, not the file name
- extended = false,
- size = 18,
- weight = 500,
- blursize = 0,
- scanlines = 0,
- antialias = true,
- underline = false,
- italic = false,
- strikeout = false,
- symbol = false,
- rotary = false,
- shadow = false,
- additive = false,
- outline = false,
- } )
- --MISC
- hook.Add("Think","Misc",function()
- AutoShoot(0.05)
- end)
- function itemESP()
- for k,ent in pairs(ents.GetAll()) do
- local entName = ent:GetClass()
- if string.find(entName,"weapon_*") && LocalPlayer():Health() > 0 then
- -- get infos
- local entPos = ent:GetPos():ToScreen()
- surface.SetFont("myFont")
- surface.SetTextColor(Color(0,255,0))
- surface.SetTextPos(entPos.x,entPos.y)
- surface.DrawText(string.Right(entName,7))
- end
- end
- end
- function playerESP(colorBoxEnemy ,colorBoxAlies, weightBox , heightBox )
- for i,ply in pairs(player.GetAll()) do // loop trough all player of the server
- if ply != LocalPlayer() && LocalPlayer():Health() > 0 && ply:IsValid() && ply:IsPlayer() then //check if selected player is not me if i am alive and if ent is not null
- if ply:Health() > 0 then //check if player is alive
- //variables for esp
- local height = heightBox // height of the box
- local weight = weightBox // same for the weight
- local colorE = colorBoxEnemy //setup color for esp enemy
- local colorA = colorBoxAlies //setup color for esp alies
- local myPos = LocalPlayer():GetPos() //get pos of my player
- local plyPos = ply:GetPos() //get player pos
- local plySize = 70.0 //setup height of player
- plyPos = Vector(plyPos.x,plyPos.y,plyPos.z + plySize) //add height to the player pos
- local dist = myPos:Distance(plyPos) //get distance between me and the player
- local plyScr = plyPos:ToScreen() //convert 3d pos of player to screen pos
- if ply:HasWeapon("weapon_mu_knife") then
- surface.SetDrawColor(colorE) //set color enemy
- surface.DrawOutlinedRect(plyScr.x - (16800/dist),plyScr.y,(weight/dist),(height/dist)) //draw a outlined rectangle
- elseif !ply:HasWeapon("weapon_mu_knife") then
- surface.SetDrawColor(colorA) //set color alies
- surface.DrawOutlinedRect(plyScr.x - (16800/dist),plyScr.y,(weight/dist),(height/dist)) //draw a outlined rectangle
- end
- end
- end
- end
- end
- hook.Add("HUDPaint","DrawingStuff",function()
- itemESP(Color(238,104,188),Color(255,235,43),315,690)
- playerESP(Color(238,104,188),Color(255,235,43),31500,31500)
- end)
- local res = {
- "weapon_physgun",
- "weapon_physcannon",
- "gmod_tool",
- "gmod_camera"
- }
- local playere = FindMetaTable("Player")
- function playere:EyeVisible(ent)
- if (not IsValid(ent)) then
- return
- end
- local trace = { start = self:LocalToWorld(self:OBBCenter()), endpos = ent:LocalToWorld(ent:OBBCenter()), filter = { self, ent }, mask = 1174421507 }
- local tr = util.TraceLine(trace)
- return (tr.Fraction == 1)
- end
- local target = NULL
- local lock = false
- hook.Remove("CreateMove", "lel")
- hook.Add("CreateMove", "lel", function( cmd )
- local wep = LocalPlayer():GetActiveWeapon()
- if IsValid(wep) then
- if not table.HasValue(res, wep:GetClass()) then
- local wep = LocalPlayer():GetActiveWeapon()
- if IsValid(wep) and wep.Primary != nil then
- wep.Primary.Recoil = 0
- wep.Primary.Cone = 0
- end
- if lock == false and target == NULL then
- target = LocalPlayer():GetEyeTrace().Entity
- lock = true
- end
- if not LocalPlayer():EyeVisible(target) then
- lock = false
- target = NULL
- end
- if target ~= NULL then
- if target:Health() <= 0 then
- lock = false
- target = NULL
- end
- end
- if target ~= NULL and target:HasWeapon("weapon_mu_knife") and input.IsKeyDown(KEY_LSHIFT) then
- local targethead = target:LookupBone("ValveBiped.Bip01_Pelvis")
- if targethead != nil and lock == true then
- local targetheadpos, targetheadang = target:GetBonePosition(targethead)
- cmd:SetViewAngles((targetheadpos-LocalPlayer():GetShootPos()):Angle())
- end
- elseif not IsValid(target) then
- lock = false
- target = NULL
- end
- end
- end
- end)
- local bhop = { }
- bhop.MetaPlayer = FindMetaTable( "Player")
- bhop.oldKeyDown = bhop.MetaPlayer['KeyDown']
- bhop.On = true
- bhop.SOn = true
- bhop.Hooks = { hook = { }, name = { } }
- bhop.jump = false
- function bhop.AddHook(hookname, name, func)
- hook.Add( hookname, name, func ) --Hopefully you have something better
- end
- bhop.MetaPlayer['KeyDown'] = function( self, key )
- if self ~= LocalPlayer() then return end
- if (key == IN_MOVELEFT) and bhop.left then
- return true
- elseif (key == IN_MOVERIGHT) and bhop.right then
- return true
- elseif (key == IN_JUMP) and bhop.jump then
- return true
- else
- return bhop.oldKeyDown( self, key )
- end
- end
- local oldEyePos = LocalPlayer():EyeAngles()--This is to see where player is looking
- function bhop.CreateMove( cmd )
- bhop.jump = false
- if (cmd:KeyDown( IN_JUMP )) then
- if (not bhop.jump) then
- if (bhop.On and !LocalPlayer():OnGround()) then --Bhop here
- cmd:RemoveKey( IN_JUMP )
- end
- else
- bhop.jump = false
- end
- if(bhop.SOn ) then--auto strafer
- local x = cmd:GetMouseX()
- if( x < 0) then --If you move your mouse left, walk left, if you're jumping
- cmd:SetSideMove( -1000000 )
- bhop.left = true
- bhop.right = false
- elseif( x > 0 ) then --If you move your mouse right, move right, while jumping
- cmd:SetSideMove( 1000000 )
- bhop.right = true
- bhop.left = false
- end
- end
- elseif (not bhop.jump) then
- bhop.jump = true
- end
- end
- bhop.AddHook( "CreateMove", tostring(math.random(0, 133712837)), bhop.CreateMove )--add the hook
- concommand.Add( "bhop", function () --Toggler
- bhop.On = not bhop.On
- local state = "off"
- if bhop.On then state = "on" end
- print("Bhop ".. state)
- end)
- concommand.Add( "bhop_strafe", function ()
- bhop.SOn = not bhop.SOn
- local state = "on"
- if bhop.SOn then state = "on" end
- print("Strafe ".. state)
- end)
- concommand.Add("bhop_unload", function()
- for i = 1, #bhop.Hooks.hook do
- hook.Remove( bhop.Hooks.hook[i], bhop.Hooks.name[i] )
- print( "Unhooked "..bhop.Hooks.hook[i].." using name "..bhop.Hooks.name[i] )
- end
- concommand.Remove("bhop_strafe")
- concommand.Remove("bhop")
- concommand.Remove( "bhop_unload" )
- bhop = nil
- print("Bhop unloaded")
- end)
- surface.CreateFont( "myFont", {
- font = "Arial", -- Use the font-name which is shown to you by your operating system Font Viewer, not the file name
- extended = false,
- size = 30,
- weight = 500,
- blursize = 0,
- scanlines = 0,
- antialias = true,
- underline = false,
- italic = false,
- strikeout = false,
- symbol = false,
- rotary = false,
- shadow = true,
- additive = false,
- outline = false,
- } )
- --MISC
- function AutoShoot(delay)
- //Variables
- local trace = (LocalPlayer():GetEyeTrace()).Entity
- //check
- if trace:IsValid() && trace:IsPlayer() && input.IsKeyDown(KEY_LALT) then //check if entity is a player
- if trace:Health() > 0 && LocalPlayer():Health() > 0 then //if player is alive
- RunConsoleCommand("+attack") //start shooting
- timer.Simple(delay,function() RunConsoleCommand("-attack")end) //wait 0.05 s and stop shooting
- end
- end
- end
- hook.Add("Think","Misc",function()
- AutoShoot(0.05)
- end)
- function itemESP()
- for k,ent in pairs(ents.GetAll()) do
- local entName = ent:GetClass()
- if string.find(entName,"weapon_mu_knife") && LocalPlayer():Health() > 0 then
- -- get infos
- local entPos = ent:GetPos():ToScreen()
- hook.Add( "HUDPaint", "Loot_esp", function()
- for k,v in pairs (ents.FindByClass("mu_loot")) do
- local lootpos = ( v:GetPos() + Vector( 0,0,10 ) ):ToScreen()
- surface.SetFont("myFont")
- surface.SetTextColor(Color(0, 255, 0))
- surface.SetTextPos(lootpos.x,lootpos.y)
- surface.DrawText("Loot")
- end
- end)
- surface.SetFont("myFont")
- surface.SetTextColor(Color(255,66,66))
- surface.SetTextPos(entPos.x-70,entPos.y)
- surface.DrawText("Weapon: Knife")
- end
- if string.find(entName,"weapon_mu_magnum") && LocalPlayer():Health() > 0 then
- -- get infos
- local entPos = ent:GetPos():ToScreen()
- surface.SetFont("myFont")
- surface.SetTextColor(Color(53, 255, 80))
- surface.SetTextPos(entPos.x-70,entPos.y)
- surface.DrawText("Weapon: Magnum")
- end
- end
- end
- function playerESP(colorBoxEnemy ,colorBoxAlies, weightBox , heightBox )
- for i,ply in pairs(player.GetAll()) do // loop trough all player of the server
- if ply != LocalPlayer() && LocalPlayer():Health() > 0 && ply:IsValid() && ply:IsPlayer() then //check if selected player is not me if i am alive and if ent is not null
- if ply:Health() > 0 then //check if player is alive
- //variables for esp
- local height = heightBox // height of the box
- local weight = weightBox // same for the weight
- local colorE = colorBoxEnemy //setup color for esp enemy
- local colorA = colorBoxAlies //setup color for esp alies
- local myPos = LocalPlayer():GetPos() //get pos of my player
- local plyPos = ply:GetPos() //get player pos
- local plySize = 70.0 //setup height of player
- plyPos = Vector(plyPos.x,plyPos.y,plyPos.z + plySize) //add height to the player pos
- local dist = myPos:Distance(plyPos) //get distance between me and the player
- local plyScr = plyPos:ToScreen() //convert 3d pos of player to screen pos
- if ply:HasWeapon("weapon_mu_knife") then
- surface.SetDrawColor(colorE) //set color enemy
- surface.DrawRect(plyScr.x - (16800/dist),plyScr.y,(weight/dist),(height/dist)) //draw a outlined rectangle
- surface.DrawOutlinedRect(plyScr.x - (17000/dist),plyScr.y,(weight/dist),(height/dist)) //draw a outlined rectangle
- elseif !ply:HasWeapon("weapon_mu_knife") then
- surface.SetDrawColor(colorA) //set color alies
- surface.DrawRect(plyScr.x - (16800/dist),plyScr.y,(weight/dist),(height/dist)) //draw a outlined rectangle
- surface.DrawOutlinedRect(plyScr.x - (17000/dist),plyScr.y,(weight/dist),(height/dist)) //draw a outlined rectangle
- end
- end
- end
- end
- hook.Add("HUDPaint","DrawingStuff",function()
- itemESP(Color(238,104,188),Color(255,235,43),315,690)
- playerESP(Color(255, 40, 40, 80),Color(46, 255, 42, 80),31500,69000)
- end)
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement