Advertisement
Caliber_

Shitcheat 3.2

Jun 30th, 2017
437
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 41.52 KB | None | 0 0
  1. local defcon = { Menu = { t = {}; b = {}; c = 0}; Alive = {};}
  2. defcon.Normal           = {
  3.     aimbot                  = true;
  4.     aimbot_fov              = 5;
  5.     aimbot_friendly_fire    = true;
  6.     triggerbot              = true;
  7.    
  8.     esp_player              = true;
  9.     esp_player_dist         = 16000;
  10.     esp_player_showdist     = true;
  11.     esp_player_name         = true;
  12.     esp_player_rank         = true;
  13.     esp_player_health       = true;
  14.     esp_player_armor        = true;
  15.     esp_player_glow         = true;
  16.    
  17.     esp_entity              = true;
  18.     esp_entity_dist         = 16000;
  19.    
  20.     flashlight_spam         = false;
  21.    
  22.     darkrp_money            = false;
  23.     darkrp_god              = false;
  24.    
  25.     ttt_deathnotifs         = true;
  26.     bhop_bhop               = true;
  27.     crosshair               = false;
  28.     velocity                = false;
  29.     chatspam1               = false;
  30.     chatspam2               = false;
  31.     lasereyes               = false;
  32.     freecam_below           = false;
  33.     freecam_below2          = false;
  34.     freecam_below3          = false;
  35.     freecam_above           = false;
  36.     freecam_above2          = false;
  37.     freecam_above3          = false;
  38.     freecam_side            = false;
  39.     freecam_side2           = false;
  40.     freecam_side3           = false;
  41.     cl_noclip               = false;
  42.     pickupinradius          = false;
  43.     dupeinradius            = false;
  44. }
  45. defcon.Settings         = (file.Exists("d_settings.txt", "DATA") and util.JSONToTable(file.Read("d_settings.txt", "DATA"))) or defcon.Normal
  46. defcon.Entities         = (file.Exists("d_entities.txt", "DATA") and util.JSONToTable(file.Read("d_entities.txt", "DATA"))) or {}
  47. defcon.Whitelist        = (file.Exists("d_whitelist.txt", "DATA") and util.JSONToTable(file.Read("d_whitelist.txt", "DATA"))) or {}
  48. defcon.AimKey           = (file.Exists("d_aimkey.txt", "DATA") and tonumber(file.Read("d_aimkey.txt", "DATA"))) or KEY_LALT
  49.  
  50. --colors
  51.  
  52. red = Color(255,0,0,255);
  53. black = Color(0,0,0,255);
  54. green = Color(0,255,0,255);
  55. white = Color(255,255,255,255);
  56. blue = Color(0,0,255,255);
  57. cyan = Color(0,255,255,255);
  58. pink = Color(255,0,255,255);
  59. blue = Color(0,0,255,255);
  60. grey = Color(100,100,100,255);
  61. gold = Color(255,228,0,255);
  62. lightblue = Color(155,205,248);
  63. lightgreen = Color(174,255,0);
  64. iceblue = Color(116,187,251,255);
  65. orange = Color(255,165,0,255);
  66. brown = Color(112, 89, 50, 255);
  67.  
  68. --menu display messages
  69.  
  70. defcon.Phrases          = {
  71.     "niggerniggerniggernigger";
  72.     "bob good is not so good";
  73.     "sheo is a kike";
  74.     "new shitcheat";
  75.     "i hate niggers";
  76.     "suck my dick";
  77.     "donul trump";
  78.     "remove kebab";
  79.     "remember, no russian";
  80.     "Made by the Madbluntz.rs Team";
  81.     "we need to nuke japan again";
  82.     "now with freecam";
  83.     "go fast eat ass";
  84.     "[OOC]Johnny Nutmegg: you fucking suck dick bro";
  85.     "the fuck are you looking at";
  86. }
  87. defcon.Keys = {
  88. "KEY_0", "KEY_1", "KEY_2", "KEY_3", "KEY_4", "KEY_5",
  89. "KEY_6", "KEY_7", "KEY_8", "KEY_9", "KEY_A", "KEY_B", "KEY_C",
  90. "KEY_D", "KEY_E", "KEY_F", "KEY_G", "KEY_H", "KEY_I", "KEY_J",
  91. "KEY_K", "KEY_L", "KEY_M", "KEY_N", "KEY_O", "KEY_P", "KEY_Q",
  92. "KEY_R", "KEY_S", "KEY_T", "KEY_U", "KEY_V", "KEY_W", "KEY_X",
  93. "KEY_Y", "KEY_Z", "KEY_PAD_0", "KEY_PAD_1", "KEY_PAD_2", "KEY_PAD_3",
  94. "KEY_PAD_4", "KEY_PAD_5", "KEY_PAD_6", "KEY_PAD_7", "KEY_PAD_8", "KEY_PAD_9",
  95. "KEY_PAD_DIVIDE", "KEY_PAD_MULTIPLY", "KEY_PAD_MINUS", "KEY_PAD_PLUS", "KEY_PAD_ENTER",
  96. "KEY_PAD_DECIMAL", "KEY_LBRACKET", "KEY_RBRACKET", "KEY_SEMICOLON", "KEY_APOSTROPHE",
  97. "KEY_BACKQUOTE", "KEY_COMMA", "KEY_PERIOD", "KEY_SLASH", "KEY_BACKSLASH", "KEY_MINUS",
  98. "KEY_EQUAL", "KEY_ENTER", "KEY_SPACE", "KEY_BACKSPACE", "KEY_TAB", "KEY_CAPSLOCK",
  99. "KEY_NUMLOCK", "KEY_ESCAPE", "KEY_SCROLLLOCK", "KEY_INSERT", "KEY_DELETE", "KEY_HOME",
  100. "KEY_END", "KEY_PAGEUP", "KEY_PAGEDOWN", "KEY_BREAK", "KEY_LSHIFT", "KEY_RSHIFT",
  101. "KEY_LALT", "KEY_RALT", "KEY_LCONTROL", "KEY_RCONTROL", "KEY_LWIN", "KEY_RWIN",
  102. "KEY_APP", "KEY_UP", "KEY_LEFT", "KEY_DOWN", "KEY_RIGHT", "KEY_F1", "KEY_F2",
  103. "KEY_F3", "KEY_F4", "KEY_F5", "KEY_F6", "KEY_F7", "KEY_F8", "KEY_F9",
  104. "KEY_F10", "KEY_F11", "KEY_F12", "KEY_CAPSLOCKTOGGLE", "KEY_NUMLOCKTOGGLE",
  105. "KEY_SCROLLLOCKTOGGLE"
  106. };
  107.  
  108. for k,v in pairs(defcon.Normal) do
  109.     if defcon.Settings[k] == nil then
  110.         defcon.Settings = defcon.Normal
  111.         -- so that if a new key is added to the normal config, the Settings will reset
  112.     end
  113. end
  114.  
  115. -- functions
  116.  
  117. function defcon.Update(x,y,z, ok)
  118.     if x == "setting" then
  119.         defcon.Settings[y] = z
  120.         if ok == true then
  121.             file.Write("d_settings.txt", util.TableToJSON(defcon.Settings))
  122.         end
  123.     elseif x == "entity" then
  124.         file.Write("d_entities.txt", util.TableToJSON(defcon.Entities))
  125.     elseif x == "friend" then
  126.         file.Write("d_whitelist.txt", util.TableToJSON(defcon.Whitelist))
  127.     end
  128. end
  129. function defcon.ESPCheck(typ, v)
  130.     if typ == "player" then
  131.         if v:Alive() && v:Health() >= 1 && v ~= LocalPlayer() /*&& /*LocalPlayer():Alive() &&*/ /*LocalPlayer():Team() ~= TEAM_SPECTATOR*/ then
  132.             return true
  133.         end
  134.     elseif typ == "entity" then
  135.         if IsValid(v) then
  136.             return true
  137.         end
  138.     end
  139.     return false
  140. end
  141. function defcon.ESPDistance(typ, v)
  142.     if typ == "player" then
  143.         if defcon.Settings["esp_player_dist"] >= 16000 then
  144.             return true
  145.         elseif v:GetPos():Distance(LocalPlayer():GetPos()) < (defcon.Settings["esp_player_dist"]) then
  146.             return true
  147.         end
  148.     elseif typ == "entity" then
  149.         if defcon.Settings["esp_entity_dist"] >= 16000 then
  150.             return true
  151.         elseif v:GetPos():Distance(LocalPlayer():GetPos()) < (defcon.Settings["esp_entity_dist"]) then
  152.             return true
  153.         end
  154.     end
  155.     return false
  156. end
  157. function defcon.GetShootPos(ent)
  158.     local eyes = ent:LookupAttachment("eyes");
  159.     if(eyes ~= 0) then
  160.         eyes = ent:GetAttachment(eyes);
  161.         if(eyes and eyes.Pos) then
  162.             return eyes.Pos, eyes.Ang;
  163.         end
  164.     end
  165. end
  166. function defcon.Visible(ent)
  167.     local pos = LocalPlayer():GetShootPos()
  168.     local ang = LocalPlayer():GetAimVector()
  169.     local trace = {start = LocalPlayer():GetShootPos(), endpos = defcon.GetShootPos(ent), filter = {LocalPlayer(), ent}, mask = 1174421507};
  170.     local tr = util.TraceLine(trace);
  171.     return(tr.Fraction == 1);
  172. end
  173. function defcon.Whitelisted(ent)
  174.     if defcon.Whitelist[ent:SteamID()] then return true
  175.     else return false end
  176. end
  177. function defcon.CanTarget(v)
  178.     if v:IsPlayer() then
  179.         if (defcon.Visible(v) and (not defcon.Whitelisted(v)) and v:Alive() and (v:Health() > 0) and v:Team() ~= TEAM_SPECTATOR) then
  180.             if (v ~= LocalPlayer() and LocalPlayer():Alive() and LocalPlayer():Team() ~= TEAM_SPECTATOR) then
  181.                 if not(defcon.Settings["aimbot_friendly_fire"]) then
  182.                     if (v:Team() ~= LocalPlayer():Team()) then
  183.                         return true
  184.                     end
  185.                 else
  186.                     return true
  187.                 end
  188.             end
  189.         end
  190.     end
  191.     return false
  192. end
  193. function defcon.Ents()
  194.     local t = {}
  195.     for k,v in pairs(ents.GetAll()) do
  196.         if IsValid(v) and not(table.HasValue(t, v:GetClass())) then
  197.             table.insert(t, v:GetClass())
  198.         end
  199.     end
  200.     table.sort(t, function(a,b) return a < b end)
  201.    
  202.     return t
  203. end
  204.  
  205. -- fonts
  206.  
  207. surface.CreateFont("deffont", {
  208.     font    =   "impact",
  209.     size    =   64
  210. });
  211. surface.CreateFont("deffontesp1", {
  212.     font="TabLarge",
  213.     size=13,
  214.     weight=700
  215. });
  216. surface.CreateFont("deffontesp2", {
  217.     font="TabLarge",
  218.     size=10,
  219.     weight=700
  220. });
  221. surface.CreateFont("velmet", {
  222.  size = 50,
  223.  weight = 500,
  224.  antialias = true,
  225.  font = "VCR OSD Mono"});
  226.  surface.CreateFont("warnign", {
  227.  size = 18,
  228.  weight = 0,
  229.  antialias = false,
  230.  font = "times new roman"});
  231.  
  232. -- short vars
  233.  
  234. local menu              = defcon.Menu
  235. local current           = defcon.Current
  236. local alive             = defcon.Alive
  237. local normal            = defcon.Normal
  238. local settings          = defcon.Settings
  239. local entities          = defcon.Entities
  240. local whitelist         = defcon.Whitelist
  241. local phrases           = defcon.Phrases
  242. local espcheck          = defcon.ESPCheck
  243. local espdistance       = defcon.ESPDistance
  244.  
  245. -- menu
  246.  
  247. local function AddTab(txt, tab, func)
  248.     menu.c = menu.c + 1 -- increase the counter for the amount of tabs
  249.     local panel
  250.     if tab and tab == true then
  251.         panel = vgui.Create("DPanel", menu.frame);
  252.         panel:SetPos(120,25);
  253.         panel:SetSize(376,406);
  254.         if menu.Current == txt then
  255.             panel:SetVisible(true)
  256.         else
  257.             panel:SetVisible(false)
  258.         end
  259.         panel.Paint = function()
  260.             surface.SetDrawColor( 10, 10, 10, 255 )
  261.             surface.DrawOutlinedRect( 0, 0, panel:GetWide() - 1, panel:GetTall() - 1)
  262.             draw.SimpleText(string.upper(txt), "deffont", 10, 5, Color(210, 210, 210, 235), TEXT_ALIGN_LEFT);
  263.         end
  264.     end
  265.     local button = vgui.Create("DButton", menu.buttons);
  266.     button:SetText(txt);
  267.     button:SetSize(80, 20);
  268.     button:SetPos(15, -15+(25*menu.c));
  269.     button:SetTextColor(color_white)
  270.     button.Paint = function(self)
  271.         surface.SetDrawColor(100,100,100,220)
  272.         surface.DrawRect(0, 0,self:GetSize())
  273.         surface.SetDrawColor(0,0,0,255)
  274.         surface.DrawOutlinedRect(0,0,self:GetSize())
  275.     end
  276.     button.DoClick = func or (tab and tab == true and function()
  277.         for k,v in pairs(menu.t) do
  278.             if v ~= panel then
  279.                 v:SetVisible(false)
  280.             end
  281.         end
  282.         panel:SetVisible(true)
  283.         menu.Current = txt
  284.         surface.PlaySound("ambient/levels/canals/drip4.wav");
  285.     end)
  286.     return panel, button;
  287. end
  288.  
  289. --derma bullshit
  290.  
  291. local function AddFeature(id, parent, typ, name, setting, o1, o2)
  292.     if not parent then return end
  293.     if typ == "button" then
  294.         local label = vgui.Create("DLabel", parent)
  295.         label:SetText(name)
  296.         label:SetPos(5,(55+(id*25)))
  297.         label:SizeToContents(false)
  298.         local button = vgui.Create("DButton", parent)
  299.         if defcon.Settings[setting] == true then
  300.             button:SetText("enabled")
  301.         else
  302.             button:SetText("disabled")
  303.         end
  304.         button:SetSize(80,20)
  305.         if not id then
  306.             button:SetPos(285,45)
  307.         else
  308.             button:SetPos(285,(55+(id*25)))
  309.         end
  310.         button.DoClick = function()
  311.             if button:GetText() == "enabled" then
  312.                 button:SetText("disabled"); defcon.Update("setting", setting, false, true)
  313.             else
  314.                 button:SetText("enabled"); defcon.Update("setting", setting, true, true)
  315.             end
  316.         end
  317.         button:SetTextColor(color_white)
  318.         button.Paint = function(self)
  319.             surface.SetDrawColor(100,100,100,220)
  320.             surface.DrawRect(0, 0,self:GetSize())
  321.             surface.SetDrawColor(0,0,0,255)
  322.             surface.DrawOutlinedRect(0,0,self:GetSize())
  323.         end
  324.         return button,label
  325.     elseif typ == "slider" then
  326.         local slider = vgui.Create("DNumSlider", parent)
  327.         slider:SetPos(5, (45+(id*25)))
  328.         slider:SetText(name)
  329.         slider:SetMinMax(o1, o2)
  330.         slider:SetWide(372.5)
  331.         slider:SetDecimals( 0 )
  332.         slider:SetFGColor(255,255,255,255)
  333.         slider:SetBGColor(255,255,255,255)
  334.         slider:SetValue(defcon.Settings[setting])
  335.         slider.OnValueChanged = function(panel, value)
  336.             local c = tonumber(value)
  337.             defcon.Update("setting", setting, math.Round(c), true)
  338.         end
  339.         return slider;
  340.     end
  341.  
  342.     if typ == "label" then
  343.         local label = vgui.Create("DLabel", parent)
  344.         label:SetText(name)
  345.         label:SetPos(5,(55+(id*25)))
  346.         label:SizeToContents(false)
  347.         label:SetFont("warnign")
  348.         label.Paint = function(self)
  349.             label:SetTextColor(Color( 255, 190, 24, 255 ))
  350.             end
  351.        
  352.     return label
  353.     end
  354.         if typ == "label2" then
  355.         local label = vgui.Create("DLabel", parent)
  356.         label:SetText(name)
  357.         label:SetPos(5,(55+(id*25)))
  358.         label:SizeToContents(false)
  359.         label:SetFont("deffont2")
  360.         label.Paint = function(self)
  361.             label:SetTextColor(Color( 140, 140, 140, 255 ))
  362.             end
  363.            
  364.     return label2
  365.     end
  366.         if typ == "label3" then
  367.         local label = vgui.Create("DLabel", parent)
  368.         label:SetText(name)
  369.         label:SetPos(5,(55+(id*25)))
  370.         label:SizeToContents(false)
  371.         label:SetFont("warnign")
  372.         label.Paint = function(self)
  373.             label:SetTextColor(Color( 255, 190, 24, 255 ))
  374.             end
  375.        
  376.     return label3
  377. end
  378.     if not parent then return end
  379.     if typ == "canser" then
  380.         local label = vgui.Create("DLabel", parent)
  381.         label:SetText(name)
  382.         label:SetPos(5,(55+(id*25)))
  383.         label:SizeToContents(false)
  384.         local button = vgui.Create("DButton", parent)
  385.         if defcon.Settings[setting] == true then
  386.             button:SetText("enabled")
  387.         else
  388.             button:SetText("disabled")
  389.         end
  390.         button:SetSize(80,20)
  391.         if not id then
  392.             button:SetPos(285,45)
  393.         else
  394.             button:SetPos(285,(55+(id*25)))
  395.         end
  396.         button.DoClick = function()
  397.             if button:GetText() == "enabled" then
  398.                 button:SetText("enabled"); defcon.Update("setting", setting, false, true); RunConsoleCommand "SH_toggle"
  399.             else
  400.                 button:SetText("disabled"); defcon.Update("setting", setting, true, true); RunConsoleCommand "SH_toggle"
  401.             end
  402.         end
  403.         button:SetTextColor(color_white)
  404.         button.Paint = function(self)
  405.             surface.SetDrawColor(100,100,100,220)
  406.             surface.DrawRect(0, 0,self:GetSize())
  407.             surface.SetDrawColor(0,0,0,255)
  408.             surface.DrawOutlinedRect(0,0,self:GetSize())
  409.     end
  410. end
  411.     if not parent then return end
  412.     if typ == "landsernigger" then
  413.         local label = vgui.Create("DLabel", parent)
  414.         label:SetText(name)
  415.         label:SetPos(5,(55+(id*25)))
  416.         label:SizeToContents(false)
  417.         local button = vgui.Create("DButton", parent)
  418.         if defcon.Settings[setting] == true then
  419.             button:SetText("search")
  420.         else
  421.             button:SetText("search")
  422.         end
  423.         button:SetSize(80,20)
  424.         if not id then
  425.             button:SetPos(285,45)
  426.         else
  427.             button:SetPos(285,(55+(id*25)))
  428.         end
  429.         button.DoClick = function()
  430.             if button:GetText() == "enabled" then
  431.                 button:SetText("search"); defcon.Update("setting", setting, false, true); RunConsoleCommand "pickupinradius"
  432.             else
  433.                 button:SetText("search"); defcon.Update("setting", setting, true, true); RunConsoleCommand "pickupinradius"
  434.             end
  435.         end
  436.         button:SetTextColor(color_white)
  437.         button.Paint = function(self)
  438.             surface.SetDrawColor(100,100,100,220)
  439.             surface.DrawRect(0, 0,self:GetSize())
  440.             surface.SetDrawColor(0,0,0,255)
  441.             surface.DrawOutlinedRect(0,0,self:GetSize())
  442.     end
  443.     end
  444.     if not parent then return end
  445.     if typ == "landsernigger2" then
  446.         local label = vgui.Create("DLabel", parent)
  447.         label:SetText(name)
  448.         label:SetPos(5,(55+(id*25)))
  449.         label:SizeToContents(false)
  450.         local button = vgui.Create("DButton", parent)
  451.         if defcon.Settings[setting] == true then
  452.             button:SetText("dupe")
  453.         else
  454.             button:SetText("dupe")
  455.         end
  456.         button:SetSize(80,20)
  457.         if not id then
  458.             button:SetPos(285,45)
  459.         else
  460.             button:SetPos(285,(55+(id*25)))
  461.         end
  462.         button.DoClick = function()
  463.             if button:GetText() == "enabled" then
  464.                 button:SetText("dupe"); defcon.Update("setting", setting, false, true); RunConsoleCommand "dupeinradius"
  465.             else
  466.                 button:SetText("dupe"); defcon.Update("setting", setting, true, true); RunConsoleCommand "dupeinradius"
  467.             end
  468.         end
  469.         button:SetTextColor(color_white)
  470.         button.Paint = function(self)
  471.             surface.SetDrawColor(100,100,100,220)
  472.             surface.DrawRect(0, 0,self:GetSize())
  473.             surface.SetDrawColor(0,0,0,255)
  474.             surface.DrawOutlinedRect(0,0,self:GetSize())
  475.     end
  476. end
  477. end
  478.  
  479. --menu assthetic
  480.  
  481. local function AddButton(parent, text, posx, posy, func)
  482.     local button = vgui.Create("DButton", parent)
  483.     button:SetText(text)
  484.     button:SetSize(80,20)
  485.     button:SetPos(posx,posy)
  486.     button:SetTextColor(color_white)
  487.     button.DoClick = func or function() end
  488.     button.Paint = function(self)
  489.         surface.SetDrawColor(100,100,100,220)
  490.         surface.DrawRect(0, 0,self:GetSize())
  491.         surface.SetDrawColor(0,0,0,255)
  492.         surface.DrawOutlinedRect(0,0,self:GetSize())
  493.     end
  494.     return button
  495. end
  496.  
  497. local function DrawMenu()
  498.     if(menu.frame) then menu.frame:Remove(); menu.frame = nil; end
  499.    
  500.     menu.c = 0
  501.    
  502.     menu.frame = vgui.Create("DFrame");
  503.     menu.frame:SetPos(ScrW()/2-184, ScrH()/2-155);
  504.     menu.frame:SetSize(500, 435);
  505.     menu.frame:SetTitle("Shitcheat 3.2 :: "..defcon.Phrases[math.random(1, table.Count(defcon.Phrases))]);
  506.     menu.frame.Paint = function()
  507.         surface.SetDrawColor(50,50,50,200)
  508.         surface.DrawRect(0, 0,menu.frame:GetWide(),menu.frame:GetTall())
  509.         surface.SetDrawColor(0,0,0,255)
  510.         surface.DrawOutlinedRect(0,0,menu.frame:GetWide(),menu.frame:GetTall())
  511.     end
  512.     menu.frame:SetVisible(true);
  513.     menu.frame:SetDraggable(true);
  514.     menu.frame:SetSizable(false);
  515.     menu.frame:ShowCloseButton(false);
  516.     menu.frame:SetBackgroundBlur(true)
  517.     menu.frame:MakePopup();
  518.    
  519.     menu.close = vgui.Create("DButton", menu.frame)
  520.     menu.close:SetFont('marlett')
  521.     menu.close:SetText('r')
  522.     menu.close:SetColor(Color(255, 255, 255))
  523.     menu.close:SetSize(15, 15)
  524.     menu.close:SetDrawBackground(false)
  525.     menu.close:SetPos(menu.frame:GetWide() - 20, 5)
  526.     menu.close.DoClick = function()
  527.         menu.frame:Remove(); menu.frame = nil;
  528.     end
  529.  
  530.     menu.buttons = vgui.Create("DPanel",menu.frame)
  531.     menu.buttons:SetPos(5, 25)
  532.     menu.buttons:SetSize(111,406)
  533.     menu.buttons:SetVisible(true)
  534.     menu.buttons.Paint = function()
  535.         surface.SetDrawColor(10,10,10,255)
  536.         surface.DrawOutlinedRect(0,0,110,405)
  537.     end
  538.  
  539.     menu.t.def = vgui.Create("DPanel", menu.frame);
  540.     menu.t.def:SetPos(120,25);
  541.     menu.t.def:SetSize(376,406);
  542.     if menu.Current ~= nil then menu.t.def:SetVisible(false) end
  543.     menu.t.def.Paint = function()
  544.         surface.SetDrawColor( 10, 10, 10, 255 )
  545.         surface.DrawOutlinedRect( 0, 0, menu.t.def:GetWide() - 1, menu.t.def:GetTall() - 1)
  546.     end
  547.    
  548.     menu.t.a, menu.b.a      = AddTab("Aimbot",      true)
  549.     menu.t.p, menu.b.p      = AddTab("Player ESP",  true)
  550.     menu.t.e, menu.b.e      = AddTab("Entity ESP",  true)
  551.     menu.t.m, menu.b.m      = AddTab("Misc.",       true)
  552.     menu.t.f, menu.b.f      = AddTab("Freecam", true)
  553.     --id, parent  , the type, the text , setting
  554.     AddFeature(1, menu.t.a, "button", "Enabled", "aimbot")
  555.     AddFeature(2, menu.t.a, "button", "Triggerbot", "triggerbot")
  556.     AddFeature(3, menu.t.a, "button", "Friendly Fire", "aimbot_friendly_fire")
  557.     AddFeature(4, menu.t.a, "slider", "FOV", "aimbot_fov", 0, 180)
  558.    
  559.     AddFeature(1, menu.t.p, "button", "Enabled", "esp_player")
  560.     AddFeature(2, menu.t.p, "button", "Show Name", "esp_player_name")
  561.     AddFeature(3, menu.t.p, "button", "Show Rank", "esp_player_rank")
  562.     AddFeature(4, menu.t.p, "button", "Show Health", "esp_player_health")
  563.     AddFeature(5, menu.t.p, "button", "Show Armor", "esp_player_armor")
  564.     AddFeature(6, menu.t.p, "button", "Show Distance", "esp_player_showdist")
  565.     AddFeature(7, menu.t.p, "slider", "Draw Distance", "esp_player_dist", 0, 16000)
  566.     AddFeature(8, menu.t.p, "button", "Draw Glow Halo", "esp_player_glow")
  567.     AddFeature(9, menu.t.p, "button", "Laser Eyes", "lasereyes")
  568.    
  569.     AddFeature(1, menu.t.e, "button", "Enabled", "esp_entity")
  570.     AddFeature(2, menu.t.e, "slider", "Draw Distance", "esp_entity_dist", 0, 16000)
  571.    
  572.     AddFeature(1, menu.t.m, "button", "Flashlight Spam [hold leftarrow]", "flashlight_spam")
  573.     AddFeature(2, menu.t.m, "button", "Bunny hopping [hold space]", "bhop_bhop")
  574.     AddFeature(3, menu.t.m, "button", "Client side crosshair", "crosshair")
  575.     AddFeature(4, menu.t.m, "button", "Big velocity meter", "velocity")
  576.     AddFeature(5, menu.t.m, "button", "Chat spammer 1 [random messages, no vc]", "chatspam1")
  577.     AddFeature(6, menu.t.m, "button", "Chat spammer 2 [hl2rp vc messages]", "chatspam2")
  578.     AddFeature(7, menu.t.m, "label3", "You can bind the two scripts under this message to any key                                               ")
  579.     AddFeature(8, menu.t.m, "label3", "Just type 'bind commandname key', e.g. 'bind +jump m'                                               ")
  580.     AddFeature(9, menu.t.m, "landsernigger", "Pick up items in radius [Clockwork schemas only]","pickupinradius")
  581.     AddFeature(10, menu.t.m, "label2", "Console coammand: pickupinradius                                               ")
  582.     AddFeature(11, menu.t.m, "landsernigger2", "Duplicate items in radius [Clockwork schemas only]", "dupeinradius")
  583.     AddFeature(12, menu.t.m, "label2", "Console command: dupeinradius                                               ")
  584.  
  585.     AddFeature(1, menu.t.f, "canser", "Clientside noclip (replaced ghettocam in version 3)", "cl_noclip")
  586.     AddFeature(10, menu.t.f, "label", "NOTICE: entities may not appear when using freecam                                                     ")
  587.    
  588.     if string.find(gmod.GetGamemode().Name, "DarkRP") then
  589.         AddFeature(1, menu.t.g, "button", "God-mode Exploit (Costs in-game $$$)", "darkrp_god")
  590.     elseif string.find(gmod.GetGamemode().Name, "Trouble in Terrorist Town") then
  591.         AddFeature(1, menu.t.g, "button", "Display Death Notifications", "ttt_deathnotifs")
  592.     end
  593.     local elist
  594.     local elist2
  595.     local elistc
  596.     local elistc2
  597.     local function makeelist()
  598.         elist = vgui.Create("DComboBox", menu.t.e)
  599.         elist:SetPos(10,menu.t.e:GetTall()-43)
  600.         elist:SetSize(130,20)
  601.         for k,v in pairs(defcon.Ents()) do
  602.             if not(defcon.Entities[v]) then
  603.                 local i = elist:AddChoice(v)
  604.             end
  605.         end
  606.         elist.OnSelect = function(index,value,data)
  607.             print(data)
  608.             elist2 = data
  609.         end
  610.     end
  611.     local function makeelistc()
  612.         elistc = vgui.Create("DComboBox", menu.t.e)
  613.         elistc:SetPos(235, menu.t.e:GetTall()-43)
  614.         elistc:SetSize(130,20)
  615.         for k,v in pairs(defcon.Entities) do
  616.             local i = elistc:AddChoice(v)
  617.         end
  618.         elistc.OnSelect = function(index,value,data)
  619.             elistc2 = data
  620.         end
  621.     end
  622.     makeelist()
  623.     makeelistc()
  624.     AddButton(menu.t.e, "Add Entity", 35, menu.t.e:GetTall()-23, function()
  625.         if(elist2) then
  626.             for k,v in pairs(defcon.Ents()) do
  627.                 if (v == elist2) then
  628.                     print(v)
  629.                     table.insert(defcon.Entities, v)
  630.                     defcon.Update("entity")
  631.                 end
  632.             end
  633.         end
  634.         makeelist()
  635.         makeelistc()
  636.     end)
  637.     AddButton(menu.t.e, "Remove Entity", 260, menu.t.e:GetTall()-23, function()
  638.         if(elistc2) then
  639.             for k,v in pairs(defcon.Entities) do
  640.                 if (v == elistc2) then
  641.                     defcon.Entities[k] = nil;
  642.                     defcon.Update("entity")
  643.                 end
  644.             end
  645.         end
  646.         makeelist()
  647.         makeelistc()
  648.     end)
  649.     local flist
  650.     local flist2
  651.     local flistc
  652.     local flistc2
  653.     local function makeflist()
  654.         flist = vgui.Create("DComboBox", menu.t.a)
  655.         flist:SetPos(10,menu.t.a:GetTall()-43)
  656.         flist:SetSize(130,20)
  657.         for k,v in pairs(player.GetAll()) do
  658.             if v ~= LocalPlayer() then
  659.                 if not(defcon.Whitelist[v:SteamID()]) then
  660.                     local i = flist:AddChoice(v:Nick())
  661.                 end
  662.             end
  663.         end
  664.         flist.OnSelect = function(index,value,data)
  665.             print(data)
  666.             elist2 = data
  667.         end
  668.     end
  669.     local function makeflistc()
  670.         flistc = vgui.Create("DComboBox", menu.t.a)
  671.         flistc:SetPos(235, menu.t.a:GetTall()-43)
  672.         flistc:SetSize(130,20)
  673.         for k,v in pairs(player.GetAll()) do
  674.             if v ~= LocalPlayer() then
  675.                 if defcon.Whitelist[v:SteamID()] then
  676.                     local i = flistc:AddChoice(v:Nick())
  677.                 end
  678.             end
  679.         end
  680.         flistc.OnSelect = function(index,value,data)
  681.             flistc2 = data
  682.         end
  683.     end
  684.     makeflist()
  685.     makeflistc()
  686.     AddButton(menu.t.a, "Add Friend", 35, menu.t.a:GetTall()-23, function()
  687.         if(flist2) then
  688.             for k,v in pairs(player.GetAll()) do
  689.                 if (v:Nick() == flist2) then
  690.                     print(v:Nick())
  691.                     table.insert(defcon.Whitelist, v:SteamID())
  692.                     PrintTable(defcon.Whitelist)
  693.                     defcon.Update("friend")
  694.                 end
  695.             end
  696.         end
  697.         makeflist()
  698.         makeflistc()
  699.     end)
  700.     AddButton(menu.t.a, "Remove Friend", 260, menu.t.a:GetTall()-23, function()
  701.         if(flistc2) then
  702.             for k,v in pairs(defcon.Whitelist) do
  703.                 if (v:SteamID() == flistc2) then
  704.                     defcon.Whitelist[k] = nil;
  705.                     defcon.Update("friend")
  706.                 end
  707.             end
  708.         end
  709.         makeflist()
  710.         makeflistc()
  711.     end)
  712. end
  713.  
  714. --clientside noclip
  715.  
  716. local SH = {}
  717.  
  718. SH.Enabled = false
  719. SH.ViewOrigin = Vector( 0, 0, 0 )
  720. SH.ViewAngle = Angle( 0, 0, 0 )
  721. SH.Velocity = Vector( 0, 0, 0 )
  722.  
  723. function SH.CalcView( ply, origin, angles, fov )
  724.     if ( !SH.Enabled ) then return end
  725.     if ( SH.SetView ) then
  726.         SH.ViewOrigin = origin
  727.         SH.ViewAngle = angles
  728.        
  729.         SH.SetView = false
  730.     end
  731.     return { origin = SH.ViewOrigin, angles = SH.ViewAngle }
  732. end
  733. hook.Add( "CalcView", "niggerwalk", SH.CalcView )
  734.  
  735. function SH.CreateMove( cmd )
  736.     if ( !SH.Enabled ) then return end
  737.    
  738.     local time = FrameTime()
  739.     SH.ViewOrigin = SH.ViewOrigin + ( SH.Velocity * time )
  740.     SH.Velocity = SH.Velocity * 0.95
  741.    
  742.     local sensitivity = 0.022
  743.     SH.ViewAngle.p = math.Clamp( SH.ViewAngle.p + ( cmd:GetMouseY() * sensitivity ), -89, 89 )
  744.     SH.ViewAngle.y = SH.ViewAngle.y + ( cmd:GetMouseX() * -1 * sensitivity )
  745.    
  746.     local add = Vector( 0, 0, 0 )
  747.     local ang = SH.ViewAngle
  748.     if ( cmd:KeyDown( IN_FORWARD ) ) then add = add + ang:Forward() end
  749.     if ( cmd:KeyDown( IN_BACK ) ) then add = add - ang:Forward() end
  750.     if ( cmd:KeyDown( IN_MOVERIGHT ) ) then add = add + ang:Right() end
  751.     if ( cmd:KeyDown( IN_MOVELEFT ) ) then add = add - ang:Right() end
  752.     if ( cmd:KeyDown( IN_JUMP ) ) then add = add + ang:Up() end
  753.     if ( cmd:KeyDown( IN_DUCK ) ) then add = add - ang:Up() end
  754.    
  755.     add = add:GetNormal() * time * 500
  756.     if ( cmd:KeyDown( IN_SPEED ) ) then add = add * 2 end
  757.    
  758.     SH.Velocity = SH.Velocity + add
  759.    
  760.     if ( SH.LockView == true ) then
  761.         SH.LockView = cmd:GetViewAngles()
  762.     end
  763.     if ( SH.LockView ) then
  764.         cmd:SetViewAngles( SH.LockView )
  765.     end
  766.    
  767.     cmd:SetForwardMove( 0 )
  768.     cmd:SetSideMove( 0 )
  769.     cmd:SetUpMove( 0 )
  770. end
  771. hook.Add( "CreateMove", "niggerwalk", SH.CreateMove )
  772.  
  773. function SH.Toggle()
  774.     SH.Enabled = !SH.Enabled
  775.     SH.LockView = SH.Enabled
  776.     SH.SetView = true
  777.    
  778.     local status = { [ true ] = "enabled", [ false ] = "disabled" }
  779.     print( "freecam " .. status[ SH.Enabled ] )
  780. end
  781. concommand.Add( "SH_toggle", SH.Toggle )
  782.  
  783. concommand.Add( "SH_pos", function() print( SH.ViewOrigin ) end )
  784.  
  785. --defunct freecam
  786.  
  787. hook.Add( "ShouldDrawLocalPlayer", "ThirdPersonDrawPlayer", function()
  788.  
  789.     if defcon.Settings["freecam_below"] or defcon.Settings["freecam_below2"] or defcon.Settings["freecam_below3"] or defcon.Settings["freecam_above"] or defcon.Settings["freecam_above2"] or defcon.Settings["freecam_above3"] or defcon.Settings["freecam_side"] or defcon.Settings["freecam_side2"] or defcon.Settings["freecam_side3"] then
  790.  
  791.         return true
  792.  
  793.     end
  794.  
  795. end )
  796. hook.Add( "CalcView", "ThirdPersonView", function( ply, pos, angles, fov )
  797.     if defcon.Settings["freecam_below"] then
  798.         local view = {}
  799.         view.origin = pos - ( angles:Forward() * -200 ) + ( angles:Right() * 0 ) + ( angles:Up() * -150 )
  800.         view.angles = ply:EyeAngles() + Angle( 0, 180, 0 )
  801.         view.fov = fov
  802.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  803.     end
  804.     if defcon.Settings["freecam_below2"] then
  805.         local view = {}
  806.         view.origin = pos - ( angles:Forward() * 200 ) + ( angles:Right() * 0 ) + ( angles:Up() * -150 )
  807.         view.angles = ply:EyeAngles() + Angle( 0, 0, 0 )
  808.         view.fov = fov
  809.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  810.     end
  811.         if defcon.Settings["freecam_below3"] then
  812.         local view = {}
  813.         view.origin = pos - ( angles:Forward() * 200 ) + ( angles:Right() * 0 ) + ( angles:Up() * -650 )
  814.         view.angles = ply:EyeAngles() + Angle( 0, 0, 0 )
  815.         view.fov = fov
  816.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  817.     end
  818.         if defcon.Settings["freecam_above"] then
  819.         local view = {}
  820.         view.origin = pos - ( angles:Forward() * 200 ) + ( angles:Right() * 0 ) + ( angles:Up() * 150 )
  821.         view.angles = ply:EyeAngles() + Angle( 0, 0, 0 )
  822.         view.fov = fov
  823.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  824.     end
  825.         if defcon.Settings["freecam_above2"] then
  826.         local view = {}
  827.         view.origin = pos - ( angles:Forward() * -200 ) + ( angles:Right() * 0 ) + ( angles:Up() * 150 )
  828.         view.angles = ply:EyeAngles() + Angle( 0, 180, 0 )
  829.         view.fov = fov
  830.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  831.     end
  832.         if defcon.Settings["freecam_above3"] then
  833.         local view = {}
  834.         view.origin = pos - ( angles:Forward() * 200 ) + ( angles:Right() * 0 ) + ( angles:Up() * 650 )
  835.         view.angles = ply:EyeAngles() + Angle( 0, 0, 0 )
  836.         view.fov = fov
  837.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  838.     end
  839.         if defcon.Settings["freecam_side"] then
  840.         local view = {}
  841.         view.origin = pos - ( angles:Forward() * 150 ) + ( angles:Right() * 150 ) + ( angles:Up() * 0 )
  842.         view.angles = ply:EyeAngles() + Angle( 0, 0, 0 )
  843.         view.fov = fov
  844.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  845.     end
  846.         if defcon.Settings["freecam_side2"] then
  847.         local view = {}
  848.         view.origin = pos - ( angles:Forward() * -150 ) + ( angles:Right() * 150 ) + ( angles:Up() * 0 )
  849.         view.angles = ply:EyeAngles() + Angle( 0, 180, 0 )
  850.         view.fov = fov
  851.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  852.     end
  853.             if defcon.Settings["freecam_side3"] then
  854.         local view = {}
  855.         view.origin = pos - ( angles:Forward() * 150 ) + ( angles:Right() * 650 ) + ( angles:Up() * 0 )
  856.         view.angles = ply:EyeAngles() + Angle( 0, 0, 0 )
  857.         view.fov = fov
  858.         return GAMEMODE:CalcView( ply, view.origin, view.angles, view.fov )
  859.     end
  860.     end)
  861.    
  862. --esp
  863.  
  864. hook.Add("HUDPaint", "catHUD", function()
  865.     if defcon.Settings["esp_player"] or defcon.Settings["esp_entity"] then
  866.         for k,v in pairs(ents.GetAll()) do
  867.             if defcon.Settings["esp_player"] && v:IsPlayer() then
  868.                 if(espcheck("player", v) and espdistance("player", v))then
  869.                     local ESP = (v:EyePos()):ToScreen()
  870.                     local name,health,rank,col,distance = "","","","",""
  871.                     local outcol = Color(0,0,0,255)
  872.                     local white = Color(255,255,255,255)
  873.                     local outcol2 = outcol
  874.                     if defcon.Settings["esp_player_name"] then
  875.                         if v.GetRPName then name = v:GetRPName()
  876.                         else name = v:Nick() end
  877.                     end
  878.                     if v:Nick() ~= name then rank = " "..v:Nick() end
  879.                     if v.SteamName and name ~= v:SteamName() then rank = " "..v:SteamName() end
  880.                     if defcon.Settings["esp_player_rank"] then
  881.                         if v:IsSuperAdmin() then
  882.                             rank = "[Super Admin]"..rank
  883.                         elseif v:IsAdmin() then
  884.                             rank = "[Admin]"..rank
  885.                         elseif v:IsUserGroup("moderator") or v:IsUserGroup("mod") then
  886.                             rank = "[Moderator]"..rank
  887.                         elseif v:IsUserGroup("vip") or v:IsUserGroup("donator") then
  888.                             rank = "[Donator]"..rank
  889.                         end
  890.                     end
  891.                     if defcon.Settings["esp_player_health"] and not(defcon.Settings["esp_player_armor"]) then
  892.                         health = v:Health().."H"
  893.                     elseif defcon.Settings["esp_player_armor"] and not(defcon.Settings["esp_player_health"]) then
  894.                         health = v:Armor().."A"
  895.                     elseif defcon.Settings["esp_player_armor"] and defcon.Settings["esp_player_health"] then
  896.                         health = v:Health().. "H - "..v:Armor().."A"
  897.                     end
  898.                     if defcon.Settings["esp_player_showdist"] then
  899.                         distance = v:GetPos():Distance(LocalPlayer():GetPos())
  900.                         distance = math.Round(distance).." m"
  901.                     end
  902.                     col = team.GetColor(v:Team())
  903.                     if(col.r <= 50 and col.g <= 50 and col.b <= 50) then
  904.                         outcol2 = Color(200,200,200,255)
  905.                     end
  906.                     if col.a <= 50 then
  907.                         col = Color(col.r,col.g,col.b, 255)
  908.                     end
  909.                     draw.SimpleTextOutlined(rank, "deffontesp2", ESP.x, ESP.y -46, col, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER, 1, outcol2)
  910.                     draw.SimpleTextOutlined(name, "deffontesp1", ESP.x, ESP.y - 34, col, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER, 1, outcol2)
  911.                     if health ~= "" then
  912.                         draw.SimpleTextOutlined(health, "deffontesp2", ESP.x, ESP.y -22, white, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER, 1, outcol)
  913.                         draw.SimpleTextOutlined(distance, "deffontesp2", ESP.x, ESP.y - 10, white, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER, 1, outcol)
  914.                     else
  915.                         draw.SimpleTextOutlined(distance, "deffontesp2", ESP.x, ESP.y - 22, white, TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER, 1, outcol)
  916.                     end
  917.                     if defcon.Settings["esp_player_glow"] then
  918.                         halo.Add({v}, col, 2, 2, 1, true, true)
  919.                     end
  920.                 end
  921.             end
  922.             if (defcon.Settings["esp_entity"] and espcheck("entity", v) and espdistance("entity", v))then
  923.                 if table.HasValue(defcon.Entities, v:GetClass()) then
  924.                     local ESP = (v:EyePos()):ToScreen()
  925.                     draw.SimpleTextOutlined(v:GetClass(), "deffontesp1", ESP.x, ESP.y - 46, Color(255,0,0,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER, 1, Color(0,0,0,255))
  926.                 end
  927.             end
  928.         end
  929.     end
  930. end)
  931.  
  932. --misc. shit
  933.  
  934. hook.Add("Think", "catBOT", function()
  935.     if(input.IsKeyDown(KEY_TAB) && input.IsKeyDown(KEY_Q) && !menu.frame)then
  936.         DrawMenu()
  937.     elseif(menu.frame && input.IsKeyDown(KEY_ESCAPE))then
  938.         menu.frame:Remove();menu.frame = nil
  939.     end
  940.     if defcon.Settings["flashlight_spam"] and input.IsKeyDown(KEY_LEFT) then
  941.         RunConsoleCommand("impulse", "100")
  942.     end
  943.     if(defcon.Settings["triggerbot"] && input.IsMouseDown(MOUSE_4)) then
  944.         local pos = LocalPlayer():GetShootPos()
  945.         local ang = LocalPlayer():GetAimVector()
  946.         local tracedata = {}
  947.         tracedata.start = pos
  948.         tracedata.endpos = pos+(ang*9999999999999)
  949.         local trace = util.TraceLine(tracedata)
  950.         if(trace.HitNonWorld) then
  951.             target = trace.Entity
  952.             if(target:IsPlayer() and defcon.CanTarget(target)) then
  953.                 RunConsoleCommand("+attack")
  954.                 timer.Simple(0.000000000000000000001, function() RunConsoleCommand("-attack") end)
  955.             end
  956.         end
  957.     end
  958.     if(defcon.Settings["aimbot"] && /*input.IsKeyDown(defcon.AimKey)*/ input.IsKeyDown(KEY_F)) then
  959.         for k,v in pairs(player.GetAll()) do
  960.             if defcon.CanTarget(v) then
  961.                 local head = v:LookupBone("ValveBiped.Bip01_Head1")
  962.                 if head ~= nil then
  963.                     local fov = defcon.Settings["aimbot_fov"]
  964.                     if fov == 0 then
  965.                         local headpos,targetheadang = v:GetBonePosition(head)
  966.                         LocalPlayer():SetEyeAngles((headpos - LocalPlayer():GetShootPos()):Angle())
  967.                     else
  968.                         local lpang = LocalPlayer():GetAngles();
  969.                         local ang = (v:GetPos() - LocalPlayer():GetPos()):Angle();
  970.                         local ady = math.abs(math.NormalizeAngle(lpang.y - ang.y))
  971.                         local adp = math.abs(math.NormalizeAngle(lpang.p - ang.p ))
  972.                         if not(ady > fov or adp > fov) then
  973.                             local headpos,targetheadang = v:GetBonePosition(head)
  974.                             if headpos != nil and targetheadang != nil then
  975.                                 LocalPlayer():SetEyeAngles((headpos - LocalPlayer():GetShootPos()):Angle())
  976.                             end
  977.                         end
  978.                     end
  979.                 end
  980.             end
  981.         end
  982.     end
  983.     if defcon.Settings["ttt_deathnotifs"] then
  984.         for k,v in pairs(player.GetAll()) do
  985.             if v:Alive() and not (defcon.Alive[v:UniqueID()] == true) then
  986.                 defcon.Alive[v:UniqueID()] = true
  987.             elseif not v:Alive() and (defcon.Alive[v:UniqueID()] == true) then
  988.                 defcon.Alive[v:UniqueID()] = false
  989.                 notification.AddLegacy(v:Nick().. " has died!", NOTIFY_GENERIC, 5)
  990.             end
  991.         end
  992.     end
  993. end)
  994.  
  995. --bhop
  996.  
  997. hook.Add( "CreateMove", "Billard_Bhop", function( ucmd )
  998.     if defcon.Settings["bhop_bhop"] then
  999.         if ucmd:KeyDown( IN_JUMP ) then
  1000.             if LocalPlayer():WaterLevel() <= 1 && LocalPlayer():GetMoveType() != MOVETYPE_LADDER && !LocalPlayer():IsOnGround() then
  1001.                     ucmd:RemoveKey( IN_JUMP )
  1002.             end
  1003.         end
  1004.     end
  1005. end )
  1006.  
  1007. --velocity meter
  1008.  
  1009. hook.Add("HUDPaint", "Velocity", function()
  1010.     for k,v in pairs(player.GetAll()) do
  1011.         if defcon.Settings ["velocity"] then
  1012.             local showvel = math.floor(LocalPlayer():GetVelocity():Length())
  1013.                 draw.RoundedBox(1, ScrW()/2.5, ScrH()/1.07, ScrW()/4.21, ScrH()/26, Color(50, 50, 50, 150))
  1014.                 draw.DrawText("velocity: "..showvel, "velmet", ScrW()/2.5, ScrH()/1.08, Color(255, 255, 255, 185))
  1015.                 end
  1016.             end
  1017.     end)
  1018.    
  1019. --crosshair
  1020.  
  1021. hook.Add( "HUDPaint", "CrossHair", function ( ucmd )
  1022.     if defcon.Settings["crosshair"] then
  1023.         local h = ScrH() / 2
  1024.         local w = ScrW() / 2
  1025.         local h1 = ScrH() / 2
  1026.         local w1 = ScrW() / 2
  1027.        
  1028.         surface.SetDrawColor( 0, 255, 255 )
  1029.         surface.DrawLine( w + 10, h, w - 10, h )
  1030.         surface.DrawLine( w, h + 10, w, h - 10 )
  1031.     end
  1032.        
  1033. end)
  1034.  
  1035. --chat spam
  1036.  
  1037. local function Spam2()
  1038.     if defcon.Settings["chatspam1"] then
  1039.          LocalPlayer():ConCommand("say "..table.Random(normalspam).." " )
  1040.     end
  1041. end
  1042. timer.Create("Spammins2", .5,0,Spam2)
  1043.  
  1044. normalspam = {}
  1045. normalspam[1] = "mods = fags"
  1046. normalspam[2] = "I hate niggers"
  1047. normalspam[3] = "sheo was here"
  1048. normalspam[4] = "try finger but hole"
  1049. normalspam[5] = "time for crab"
  1050. normalspam[6] = "THIS SERVER IS GETTING FUCKING NULLED RN"
  1051. normalspam[7] = "whoever made this server is a fucking downie holy shit"
  1052. normalspam[8] = "this serv sucks, fuck you guys"
  1053. normalspam[9] = "im not hacking wtf?"
  1054. normalspam[10] = "Mega.co.nz is famous for it's shitposting on 4chan."
  1055. normalspam[11] = "How much memes could a cock suck if 9/11?"
  1056. normalspam[12] = "assrape"
  1057. normalspam[13] = "AHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH"
  1058. normalspam[14] = "Sweedish fish are like apples, they taste good as candy, not the actual thing."
  1059. normalspam[15] = "you what"
  1060. normalspam[16] = "I'll quote your head with a rock!"
  1061. normalspam[17] = "fuck me harder daddy"
  1062. normalspam[18] = "dickrape is neat"
  1063. normalspam[19] = "Shitty memes from a shitty dream."
  1064. normalspam[20] = "sheogorath has aids"
  1065. normalspam[21] = "fuck niggers"
  1066. normalspam[22] = "♫im an alabama nigger and i wanna be free, to hell with the n double a-c-p!♫"
  1067. normalspam[23] = "hey whats up guys it's scarce here"
  1068. normalspam[24] = "//this is a test of the emergency broadcast system"
  1069. normalspam[25] = "erp = b&"
  1070. normalspam[26] = "50 percent off all fat farts at the fag store"
  1071. normalspam[27] = "dennis the menace"
  1072. normalspam[28] = "that's how things came to be, and that can never change, that can never change, no way.  That's how things came to be and that can never change, except when things'll change some day."
  1073. normalspam[29] = "shoutout to poopnig420 for providing memes"
  1074. normalspam[30] = "shoutout to inboot for providing packets"
  1075. normalspam[31] = "geklmin is a grade-a autist."
  1076. normalspam[32] = "REMOVE KEBAB remove kebab"
  1077. normalspam[33] = "you are worst turk. you are the turk idiot you are the turk smell. return to croatioa. to our croatia cousins you may come our contry. you may live in the zoo….ahahahaha"
  1078. normalspam[34] = "hahahahaha idiot turk and bosnian smell so bad..wow i can smell it."
  1079. normalspam[35] = "you will get caught. russia+usa+croatia+slovak=kill bosnia…"
  1080. normalspam[36] = "you will ww2/ tupac alive in serbia, tupac making album of serbia . fast rap tupac serbia."
  1081. normalspam[37] = "2pac aliv and real strong wizard kill all the turk farm aminal with rap magic now we the serba rule ."
  1082. normalspam[38] = "ape of the zoo presidant georg bush fukc the great satan and lay egg this egg hatch and bosnia wa;s born."
  1083. normalspam[39] = "stupid baby form the eggn give bak our clay we will crush u lik a skull of pig. serbia greattst countrey"
  1084. normalspam[40] = "cetnik rascal FUck but fuck asshole turk stink bosnia sqhipere shqipare..turk genocide best day of my life."
  1085. normalspam[41] = "http://www.madbluntz.rs offical sponsor of the republika srpska - marijuana fanatics serbia"
  1086.  
  1087. local function Spam()
  1088.     if defcon.Settings["chatspam2"] then
  1089.          LocalPlayer():ConCommand("say "..table.Random(hl2rpvcspam).." " )
  1090.     end
  1091. end
  1092. timer.Create("Spammins", .5,0,Spam)
  1093.  
  1094. hl2rpvcspam = {}
  1095. hl2rpvcspam[1] = "noooo"
  1096. hl2rpvcspam[2] = "whistle tune"
  1097. hl2rpvcspam[3] = "i could eat a horse"
  1098. hl2rpvcspam[4] = "combine"
  1099. hl2rpvcspam[5] = "zombies"
  1100. hl2rpvcspam[6] = "run"
  1101. hl2rpvcspam[7] = "over here"
  1102. hl2rpvcspam[8] = "hey over here"
  1103. hl2rpvcspam[9] = "run for your life"
  1104. hl2rpvcspam[10] = "hes dead"
  1105.  
  1106. --laser eyes
  1107.  
  1108. hook.Add("PostDrawOpaqueRenderables", "lazereyes", function()
  1109.     if defcon.Settings["lasereyes"] then
  1110.     for k, v in pairs(player.GetAll())do
  1111.         local pos, ang = v:GetShootPos();
  1112.         render.SetMaterial(Material("sprites/bluelaser1"));
  1113.         render.DrawBeam(pos, v:GetEyeTrace().HitPos, 5, 1, 1, team.GetColor(v:Team()));
  1114.     end
  1115.     end
  1116. end)  
  1117.  
  1118. --shit shamelessly stolen from my pal rootie
  1119.  
  1120. function DupeInRadius()
  1121.         local ply = LocalPlayer()
  1122.             for k,v in pairs( ents.GetAll() ) do
  1123.                     local pos = v:GetPos()
  1124.                     if v:IsValid() and ply:GetPos():Distance(pos) <= 180 then
  1125.                             if v:GetClass() == "cw_item"  then
  1126.                                     for i=0,2,1 do
  1127.                                             Clockwork.datastream:Start("EntityMenuOption", {v, "cwItemTake", "cwItemTake"})
  1128.                                                                         end
  1129.                                                         elseif v:GetClass() == "cw_cash" then
  1130.                                                                 for i=0,2,1 do
  1131.                                             Clockwork.datastream:Start("EntityMenuOption", {v, "cwCashTake", "cwCashTake"})
  1132.                                     end
  1133.                             end
  1134.                     end
  1135.             end
  1136.     end
  1137.  
  1138.    concommand.Add( "dupeinradius", DupeInRadius )
  1139.  
  1140. function PickUpInRadius()
  1141.     local ply = LocalPlayer()
  1142.         for k,v in pairs( ents.GetAll() ) do
  1143.                 local pos = v:GetPos()
  1144.                 if v:IsValid() and ply:GetPos():Distance(pos) <= 2048 then
  1145.                         if v:GetClass() == "cw_item"  then
  1146.                                 Clockwork.datastream:Start("EntityMenuOption", {v, "cwItemTake", "cwItemTake"});
  1147.                         elseif v:GetClass() == "cw_cash" then
  1148.                                 Clockwork.datastream:Start("EntityMenuOption", {v, "cwCashTake", "cwCashTake"});
  1149.                         elseif v:GetClass() == "cw_shipment" then
  1150.                                 Clockwork.datastream:Start("EntityMenuOption", {v, "cwShipmentOpen", "cwShipmentOpen"});
  1151.                         elseif v:GetClass() == "prop_physics" then
  1152.                                 Clockwork.datastream:Start("EntityMenuOption", {v, "cwContainerOpen", "cwContainerOpen"});
  1153.                         elseif v:GetClass() == "prop_ragdoll" then
  1154.                                 Clockwork.datastream:Start("EntityMenuOption", {v, "cwContainerOpen", "cwContainerOpen"});
  1155.                          end
  1156.                 end
  1157.         end
  1158. end
  1159. concommand.Add( "pickupinradius", PickUpInRadius )
  1160.  
  1161. --everything below is disabled, don't fuck with this unless you know what you're doing.
  1162.  
  1163. /*concommand.Add("debug", function()
  1164.     local pcash,gname = "", gmod.GetGamemode().Name
  1165.     print("Game-mode:\n    "..gname)
  1166.     if string.find(gname, "DarkRP") then
  1167.         print("Player Cash Amounts")
  1168.         for k,v in pairs(player.GetAll()) do
  1169.             if not(v.DarkRPVars and v.DarkRPVars.money)and(darkrpvar == true) then
  1170.                 darkrpvar = false
  1171.             end
  1172.             if v ~= LocalPlayer() then
  1173.                 pcash = pcash.."    "..v:Nick().." - "..v.DarkRPVars.money.."\n"
  1174.             end
  1175.         end
  1176.         if pcash ~= "" then
  1177.             print(pcash)
  1178.         end
  1179.     end
  1180.     if LocalPlayer().GetActiveWeapon and LocalPlayer():GetActiveWeapon() ~= nil and IsValid(LocalPlayer():GetActiveWeapon()) then
  1181.         print("Current Weapon")
  1182.         print("    "..LocalPlayer():GetActiveWeapon():GetClass())
  1183.     end
  1184.         local pos = LocalPlayer():GetShootPos()
  1185.     local ang = LocalPlayer():GetAimVector()
  1186.     local tracedata = {}
  1187.     tracedata.start = pos
  1188.     tracedata.endpos = pos+(ang*9999999999999)
  1189.     local trace = util.TraceLine(tracedata)
  1190.     if(trace.HitNonWorld) then
  1191.         target = trace.Entity
  1192.         print("Entity Info")
  1193.         print("    Class: "..target:GetClass())
  1194.         print("    Model: "..target:GetModel())
  1195.     end
  1196. end)*/
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement