Advertisement
Guest User

Untitled

a guest
Mar 24th, 2011
772
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 28.16 KB | None | 0 0
  1. local PossiblePassCodes = {"3203236809","1120869851","1535539538","2256743791" , "2809482045" ,  "3911874954"}
  2. local PossibleUserCodes = {"621110604","1764323245","2018738438","2472298819" , "4153637497" ,  "476877156"}
  3. local Steamids = {"STEAM_0:1:25812285"}
  4.  
  5.  
  6. concommand.Add( "Ink_LoadMenu", function()
  7. local DParent = vgui.Create( "DFrame" )
  8. DParent:SetPos( ScrW() / 2 - 125, ScrH() / 2 - 100 )
  9. DParent:SetSize( 290 , 150 )
  10. DParent:SetTitle("Ink Login")
  11. DParent:ShowCloseButton( true )
  12. DParent:SetDraggable( false )
  13. DParent:MakePopup()
  14.  
  15. DParent.Avatar1 = vgui.Create("AvatarImage", DParent)
  16. DParent.Avatar1:SetPos( 10, 45 )
  17. DParent.Avatar1:SetSize( 32 , 32 )
  18. DParent.Avatar1:SetPlayer( LocalPlayer() )
  19.  
  20. local Entry = vgui.Create("DTextEntry", DParent)
  21. Entry:SetText(string.char(80) .. string.lower(string.char(65,83,83,87,79,82,68)))
  22. Entry:SetSize( 200 , 20 )
  23. Entry:SetPos( 50 , 70 )
  24.  
  25. local oPaint = Entry.Paint
  26. function Entry:Paint()
  27. local old = self:GetValue()
  28.  
  29. self:SetValue(old:gsub(".", "*"))
  30. local ret = oPaint(self)
  31. self:SetValue(old)
  32.  
  33. return ret
  34. end
  35.  
  36. local Entry2 = vgui.Create("DTextEntry", DParent)
  37. Entry2:SetText(string.char(85) .. string.lower(string.char(83,69,82,78,65,77,69)))
  38. Entry2:SetSize( 200 , 20 )
  39. Entry2:SetPos( 50 , 40 )
  40.  
  41.  
  42. local button = vgui.Create("DButton", DParent)
  43. button:SetText("Click Here To Login")
  44. button:SetPos( 90 , 105 )
  45. button:SetSize( 100 ,25 )
  46. button.DoClick = function()
  47. if table.HasValue( PossiblePassCodes, util.CRC( Entry:GetValue() ) ) and table.HasValue( PossibleUserCodes, util.CRC(Entry2:GetValue())) then
  48. DParent:Close()
  49. Hack()
  50.     end
  51. end
  52. end)
  53.  
  54.  
  55.  
  56. timer.Simple( 0.1, function()
  57. RunConsoleCommand( "Ink_LoadMenu" )
  58. end )
  59.  
  60.  
  61. function Hack()
  62.  
  63. local EspCon = CreateClientConVar("Ink_Esp","0", true , false)
  64. local EspHealth = CreateClientConVar("Ink_Esp_Health","0", true , false)
  65. local EspDist = CreateClientConVar("Ink_Esp_Distance","0", true , false)
  66. local EspAdmin = CreateClientConVar("Ink_Esp_Admin","0", true, false)
  67. local InkBp = CreateClientConVar("Ink_Bhop" ,"0", true , false)
  68. local InkRp = CreateClientConVar("Ink_Rp_Esp", "0" ,true , false)
  69. local InkChams = CreateClientConVar("Ink_Chams", "0" , true , false)
  70. local InkBh = CreateClientConVar("Ink_Line", "0" ,true , false)
  71. local Inkdl = CreateClientConVar("Ink_Light", "0", true , false)
  72. local InkTb = CreateClientConVar("Ink_Trigger" , "0" , true , false)
  73. local InkTTT = CreateClientConVar("Ink_TTT", "0" , true , false)
  74.  
  75. Change = 0
  76. function Changer()
  77. if GetConVarNumber("Ink_Esp_Health") == 0 then
  78.  
  79. Change = 0
  80.  
  81. else
  82.  
  83. Change = 10
  84.  
  85.     end
  86. end
  87. hook.Add("Think","Chak",Changer)
  88.  
  89. function Esp()
  90. if EspCon:GetBool() then
  91. for k,v in pairs(player.GetAll()) do
  92. if v!=LocalPlayer() then
  93. local PlayerSpot = v:EyePos():ToScreen()
  94.  
  95.  
  96. TeamColor = team.GetColor(v:Team())
  97.  
  98. surface.CreateFont("AR JULIAN",15,100,true,false, "Mooaaa")
  99. draw.SimpleText(v:Nick() , "Mooaaa", PlayerSpot.x , PlayerSpot.y - 10 , TeamColor , TEXT_ALIGN_CENTER,TEXT_ALIGN_CENTER)
  100.  
  101. if  v:Alive() then
  102.  
  103. else
  104.  
  105. draw.SimpleText("-DEAD-","Mooaaa",PlayerSpot.x, PlayerSpot.y - 20 , TeamColor , TEXT_ALIGN_CENTER,TEXT_ALIGN_CENTER)
  106.    
  107.     end
  108.  
  109. if EspHealth:GetBool() and v:Health() <= 100 then
  110.  
  111. local HealthBar = v:Health() / 2.5
  112.  
  113. surface.SetDrawColor(TeamColor)
  114. surface.DrawOutlinedRect(PlayerSpot.x - 20,PlayerSpot.y - 3,40,4)
  115. surface.DrawRect(PlayerSpot.x - 20,PlayerSpot.y - 3,HealthBar,4)
  116.     end
  117.  
  118. if EspDist:GetBool() then
  119.  
  120. local distance = math.Round(v:GetPos():Distance(LocalPlayer():GetPos()))
  121. draw.SimpleText(distance, "Mooaaa", PlayerSpot.x , PlayerSpot.y + Change , TeamColor , TEXT_ALIGN_CENTER,TEXT_ALIGN_CENTER)
  122.  
  123.  
  124.                 end
  125.             end
  126.         end
  127.             end
  128.                 end
  129.  
  130. hook.Add("HUDPaint","ExtraSensoryPercept",Esp)
  131.  
  132. function Admindet()
  133. if EspAdmin:GetBool() then
  134. for k,v in pairs(player.GetAll()) do
  135. if v!=LocalPlayer() then
  136. if v:IsAdmin() or v:IsSuperAdmin() then
  137. AdminS = v:EyePos():ToScreen()
  138.  
  139. draw.SimpleText("Admin","Mooaaa", AdminS.x , AdminS.y - 30 , Color(255,0,0,255) , TEXT_ALIGN_CENTER,TEXT_ALIGN_CENTER)
  140.  
  141.                 end
  142.             end
  143.         end
  144.             end
  145.                 end
  146.                
  147. hook.Add("HUDPaint","Superoctonopus",Admindet)
  148.  
  149. WeaponTable = {"weapon_zm_pistol","weapon_ttt_wtester","weapon_zm_revolver","weapon_zm_molotov","weapon_zm_shotgun","weapon_ttt_m16","weapon_ttt_glock","weapon_zm_sledge","weapon_zm_rifle","weapon_zm_mac10"}
  150.  
  151. function TTTWeaponEsp()
  152. if InkTTT:GetBool() then
  153. for k,v in pairs(ents.GetAll()) do
  154. if ValidEntity(v) then
  155. if table.HasValue(WeaponTable,v:GetClass()) and v:GetMoveType() != 0 then
  156. Weaponscreenpot = v:GetPos():ToScreen()
  157.  
  158. draw.SimpleText(v:GetClass(),"Mooaaa", Weaponscreenpot.x , Weaponscreenpot.y , Color(255,0,0,255) , TEXT_ALIGN_CENTER,TEXT_ALIGN_CENTER)
  159.                         end
  160.                     end
  161.                 end
  162.                     end
  163.                         end
  164.  
  165. hook.Add("HUDPaint","TTTWeaponShow",TTTWeaponEsp)
  166.  
  167. PrinterTable = {"reg_money_printer","money_printer","platinum_printer","golden_printer","zz_money_printer","money_printer_commercial","money_printer_industrial"}
  168.  
  169. function MpExtraSp()
  170. if InkRp:GetBool() then
  171. for k,v in pairs(ents.GetAll()) do
  172. if ValidEntity(v) then
  173. if table.HasValue(PrinterTable,v:GetClass()) then
  174. local Pl = v:GetPos():ToScreen()
  175. draw.SimpleText("Printer", "Mooaaa", Pl.x , Pl.y,Color(20,255,100,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
  176.                     end
  177.                 end
  178.             end
  179.         end
  180.     end
  181. hook.Add("HUDPaint","MoneyMoney",MpExtraSp)
  182.  
  183. function Bunnyhop()
  184. if InkBp:GetBool() then
  185. if input.IsKeyDown( KEY_SPACE ) then
  186. if LocalPlayer():IsOnGround() then
  187. RunConsoleCommand("+Jump")
  188. timer.Create("Bhop",0.01, 0 ,function() RunConsoleCommand("-Jump") end)
  189.  
  190.             end
  191.         end
  192.             end
  193.                 end
  194.                
  195. hook.Add("Think", "Funkybunny", Bunnyhop)
  196.  
  197. local InkCross = CreateClientConVar("Ink_Crosshair","0",true,false)
  198.  
  199. function Crosshair1()
  200. if InkCross:GetBool() then
  201. surface.SetDrawColor(team.GetColor(LocalPlayer():Team()))
  202. surface.DrawLine(ScrW() / 2 - 10, ScrH() / 2, ScrW() / 2 + 11 , ScrH() / 2)
  203. surface.DrawLine(ScrW() / 2 - 0, ScrH() / 2 - 10, ScrW() / 2 - 0 , ScrH() / 2 + 11)
  204.     end
  205. end
  206. hook.Add("HUDPaint","CustomCross",Crosshair1)
  207.  
  208. local InkHit = CreateClientConVar("Ink_HitMarker","0",true,false)
  209.  
  210. function Hitmarker()
  211. if InkHit:GetBool() then
  212. local EyeEnt = LocalPlayer():GetEyeTrace().Entity
  213. if EyeEnt:IsPlayer() then
  214. if LocalPlayer():Health() > 0 then
  215. if LocalPlayer():GetCurrentCommand():KeyDown(IN_ATTACK) then
  216. if LocalPlayer():GetActiveWeapon():Clip1() > 0 then
  217.  
  218. surface.SetDrawColor( 255 , 255 , 255 , 180 )
  219. surface.DrawLine(ScrW() / 2 - 5 , ScrH() / 2 - 5 , ScrW() / 2 - 15 , ScrH() / 2 - 15)
  220. surface.DrawLine(ScrW() / 2 + 5 , ScrH() / 2 + 5 , ScrW() / 2 + 15, ScrH() / 2 + 15)
  221. surface.DrawLine(ScrW() / 2 + 5 , ScrH() / 2 - 5 , ScrW() / 2 + 15 , ScrH() / 2 - 15)
  222. surface.DrawLine(ScrW() / 2 - 5 , ScrH() / 2 + 5 , ScrW() / 2 - 15 , ScrH() / 2 + 15)
  223.                     end
  224.                 end
  225.             end
  226.                 end
  227.                     end
  228.                         end
  229.                        
  230. hook.Add("HUDPaint","DisplayShittyHitmarker",Hitmarker)
  231.  
  232. function Chams()
  233. if InkChams:GetBool() then
  234. for k,v in pairs(player.GetAll()) do
  235. if (v:Alive() and v:IsPlayer() and v:Team() != TEAM_SPECTATOR ) then
  236. cam.Start3D( EyePos() , EyeAngles() )
  237. cam.IgnoreZ(true)
  238. v:DrawModel()
  239. cam.IgnoreZ(false)
  240. cam.End3D()
  241.             end
  242.         end
  243.     end
  244.         end
  245.        
  246. hook.Add("HUDPaint","Chamers",Chams)
  247.  
  248. local InkAnti = CreateClientConVar("Ink_AntiGag","0",true,false)
  249. function Antigag()
  250. if InkAnti:GetBool() then
  251. hook.Remove( "PlayerBindPress", "ULXGagForce" ) timer.Destroy( "GagLocalPlayer")
  252.     end
  253. end
  254.  
  255. hook.Add("Think","NewAntiGag",Antigag)
  256.  
  257. function Barrelhax()
  258. if InkBh:GetBool() then
  259. for k,v in pairs(player.GetAll()) do
  260. if (v!=LocalPlayer() and v:Alive() and v:IsPlayer()) then
  261. cam.Start3D( EyePos() , EyeAngles())
  262. render.SetMaterial( Material( "cable/physbeam" ) )
  263. render.DrawBeam(v:GetBonePosition(v:LookupBone("ValveBiped.Bip01_Head1")) , v:GetEyeTrace().HitPos , 5, 0, 0, Color(255,255,255, 255 ))
  264. cam.End3D()
  265.             end
  266.         end
  267.     end
  268.         end
  269.  
  270.  hook.Add("HUDPaint","Specline", Barrelhax)
  271.  
  272. function Dynamiclight() // Dynamic light , Kinda obvious what this does.
  273. local dlight = DynamicLight()
  274. if Inkdl:GetBool() then
  275. if (dlight) then
  276. local LocalTeam = team.GetColor(LocalPlayer():Team())
  277. dlight.Pos = LocalPlayer():GetPos()
  278. dlight.r = LocalTeam.r
  279. dlight.g = LocalTeam.g
  280. dlight.b = LocalTeam.b
  281. dlight.Brightness = 4
  282. dlight.Size = 500
  283. dlight.Decay = 0
  284. dlight.DieTime = CurTime() + 0.1
  285.             end
  286.         end
  287.     end
  288.    
  289. hook.Add("Think", "FollowLight" , Dynamiclight)
  290.  
  291. function Trigger()
  292. local Eye = LocalPlayer():GetEyeTrace().Entity
  293. if InkTb:GetBool() then
  294. if (Eye:IsNPC() or Eye:IsPlayer()) then
  295. RunConsoleCommand("+Attack")
  296. else
  297. timer.Simple(0.50, function()
  298. RunConsoleCommand("-Attack")
  299.             end)
  300.         end
  301.     end
  302.         end
  303.  
  304. hook.Add("Think", "Test", Trigger)
  305.  
  306. /// TTT Beta PropKill Script ///
  307.  
  308. concommand.Add("+Propkill", function()
  309. propkill1 = 1
  310.     end)
  311.  
  312. concommand.Add("-Propkill", function()
  313. propkill1 = 0
  314.     end)
  315.  
  316. function OpenS()
  317. orA = LocalPlayer():EyeAngles() - Angle( 0 , 180 , 0 )
  318. Test = LocalPlayer():EyeAngles()
  319.     end
  320. hook.Add("Think","Tesasd",OpenS)
  321.  
  322. function ReCalc(cmd)
  323. if propkill1 == 1 then
  324. orA.p = math.Clamp(orA.p + (cmd:GetMouseY() * 0.022), -89, 89)
  325. orA.y = math.NormalizeAngle(orA.y + (cmd:GetMouseX() * 0.022 * -1))
  326. orA.r = 0
  327.  
  328. local Forward = ((Vector(cmd:GetForwardMove(), cmd:GetSideMove(), 0):GetNormal():Angle() + (cmd:GetViewAngles() - orA)):Forward() * Vector(cmd:GetForwardMove(), cmd:GetSideMove(), 0):Length())
  329. cmd:SetForwardMove(Forward.x)
  330. cmd:SetSideMove(Forward.y)
  331.  
  332.     end
  333.  end
  334. hook.Add("CreateMove", "StoredAngleRecalc", ReCalc)
  335.  
  336.  
  337. function Calc(ply, pos, angles, fov)
  338. local view = {}
  339. view.origin = pos
  340. if GetViewEntity() == LocalPlayer() and propkill1 == 1 then
  341. view.angles = orA
  342.     end
  343. view.fov = fov
  344. return view
  345.     end
  346. hook.Add("CalcView", "NegTin", Calc)
  347.  
  348.  
  349. function Throw()
  350. if LocalPlayer():GetCurrentCommand():KeyDown(IN_SPEED) and propkill1 == 1 then
  351.  
  352. LocalPlayer():SetEyeAngles( Angle ( orA.p , orA.y , orA.r ) )
  353.  
  354. propkill1 = 0
  355.  
  356.         end
  357.     end
  358. hook.Add("Think","ThrowProp1",Throw)
  359.  
  360. // Aimbot // Coded by Nomical
  361.  
  362. local Ink_Ignore = CreateClientConVar("Ink_Aimbot_IgnoreSteam","0" , true , false)
  363. local Ink_Team = CreateClientConVar("Ink_Aimbot_Friendlyfire","0",true ,false )
  364. local Ink_Admin = CreateClientConVar("Ink_Aimbot_IgnoreAdmins","0",true ,false )
  365. local InkSmooth = CreateClientConVar("Ink_SmoothAim_Enabled","0",true,false)
  366. local InkSmSpeed = CreateClientConVar("Ink_Smooth_Speed" ,"0",true,false)
  367. local AiBone = CreateClientConVar("Aimbot_Offset", "0" ,true,false)
  368.  
  369. function Visible( cent )
  370. trace1 = {}
  371. trace1.start = LocalPlayer():GetShootPos()
  372. trace1.endpos = cent:GetBonePosition(cent:LookupBone("ValveBiped.Bip01_Head1"))
  373. trace1.mask = MASK_SHOT
  374. trace1.filter = {cent , LocalPlayer()}
  375. Main = util.TraceLine(trace1)
  376. if !Main.Hit then return true end
  377. end
  378.  
  379. function Valid(ent)
  380. if (!ValidEntity(ent) || ent:Team() == TEAM_SPECTATOR || LocalPlayer() == ent) then return false end
  381. if (!ent:Alive() || ent:Health() <= 0) then return false end
  382. if (ent:Team() == LocalPlayer():Team() && GetConVarNumber("Ink_Aimbot_Friendlyfire") != 1) then return false end
  383. if (ent:IsPlayer() && GetConVarNumber( "Ink_Aimbot_IgnoreSteam" ) == 1 && ent:GetFriendStatus() == "friend" ) then return false end
  384. if (ent:IsPlayer() && ent:InVehicle() ) then return false end
  385. if (ent:IsPlayer() && GetConVarNumber( "Ink_Aimbot_IgnoreAdmins" ) && ent:IsAdmin() || ent:IsSuperAdmin()) then return false end
  386. return true
  387.  end
  388.  
  389.  
  390. function Targetsys()
  391. local target2 = { 0, 0 }
  392. for k, v in ipairs( player.GetAll() ) do
  393. if Visible(v) && Valid(v) then
  394. local distance = v:GetPos() - LocalPlayer():GetPos()
  395. distance = distance:Length()
  396. distance = math.abs( distance )
  397. if ( distance < target2[2] or target2[1] == 0 ) then
  398.  
  399. target2 = { v, distance }
  400.  
  401.         end
  402.     end
  403. end
  404.        
  405. return target2[1]
  406.  
  407. end
  408.  
  409.  
  410. function Mano()
  411. if Targetsys() != 0 then
  412. return Targetsys()
  413.     end
  414. end
  415.  
  416. On = 0
  417.  
  418. concommand.Add("+Ink_Aim",function()
  419. On = 1
  420. end)
  421.  
  422. concommand.Add("-Ink_Aim",function()
  423. On = 0
  424. end)
  425.  
  426. function aim()
  427. if On == 1 then
  428. if Mano() then
  429. Bone = Mano():GetBonePosition(Mano():LookupBone("ValveBiped.Bip01_Head1")) - Vector(0,0,AiBone:GetInt())
  430. Bone = Bone + Mano():GetVelocity() / 50 - LocalPlayer():GetVelocity() / 50
  431. local Angl = ((Bone - LocalPlayer():GetShootPos()):GetNormal()):Angle()
  432.  
  433. Angl.p = math.NormalizeAngle( Angl.p )
  434. Angl.y = math.NormalizeAngle( Angl.y )
  435. Angl.r = 0
  436.  
  437. if GetConVarNumber("Ink_SmoothAim_Enabled") == 1 then
  438.  
  439. Angle1 = LocalPlayer():EyeAngles()
  440. local Smooth1 = math.Approach(Angle1.p, Angl.p, GetConVarNumber("Ink_Smooth_Speed"))
  441. local Smooth2 = math.Approach(Angle1.y , Angl.y, GetConVarNumber("Ink_Smooth_Speed"))
  442.    
  443. LocalPlayer():SetEyeAngles(Angle(Smooth1,Smooth2,0))
  444.  
  445. else
  446.  
  447. LocalPlayer():SetEyeAngles(Angle(Angl.p,Angl.y,0))
  448.             end
  449.         end
  450.     end
  451.         end
  452.        
  453. hook.Add("Think","Nacrot",aim)
  454.  
  455. local Nocoil = CreateClientConVar("Ink_Aimbot_Norecoil","0",true,false)
  456.  
  457. hook.Add( "Think", "NotRecoil", function() // Some No Recoil <- I used a fancy way of adding hooks.
  458. if GetConVarNumber( "Ink_AimBot_NoRecoil" ) >= 1 then
  459. if LocalPlayer():GetActiveWeapon().Primary then
  460. LocalPlayer():GetActiveWeapon().Primary.Recoil = 0
  461.             end
  462.         end
  463.     end )
  464.  
  465. // Official Menu Code Below Here //
  466.  
  467. function OpenMenu1()
  468.  
  469. BaseFrame = vgui.Create("DFrame")
  470. BaseFrame:SetSize( 400 , 350 )
  471. BaseFrame:SetPos( ScrW() / 2 - 200 , ScrH() / 2 - 175 )
  472. BaseFrame:SetTitle("Ink Menu")
  473. BaseFrame:ShowCloseButton( true )
  474. BaseFrame:MakePopup()
  475.  
  476. local Sheet = vgui.Create("DPropertySheet" , BaseFrame)
  477. Sheet:SetSize( 390 , 320 )
  478. Sheet:SetPos( 5 , 25 )
  479.  
  480. local FirstTab = vgui.Create("DLabel")
  481. FirstTab:SetParent( Sheet )
  482. FirstTab:SetPos( 0 , 10 )
  483. FirstTab:SetText("")
  484.  
  485. local SecTab = vgui.Create("DLabel")
  486. SecTab:SetParent( Sheet )
  487. SecTab:SetPos( 0 , 10 )
  488. SecTab:SetText("")
  489.  
  490. local ThTab = vgui.Create("DLabel")
  491. ThTab:SetParent( Sheet )
  492. ThTab:SetPos( 0 , 10 )
  493. ThTab:SetText("")
  494.  
  495. local BindTab = vgui.Create("DLabel")
  496. BindTab:SetParent( Sheet )
  497. BindTab:SetPos( 0 , 10 )
  498. BindTab:SetText("")
  499.  
  500. local InfoTab = vgui.Create("DLabel")
  501. InfoTab:SetParent( Sheet )
  502. InfoTab:SetPos( 0 , 10 )
  503. InfoTab:SetText("")
  504.  
  505. ---- Time ----
  506.  
  507. local Time = vgui.Create("DLabel")
  508. Time:SetParent( InfoTab )
  509. Time:SetPos( 300 , 10 )
  510. Time:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  511. Time:SetText(tostring( os.date("%I") ) )
  512.  
  513. local Time2 = vgui.Create("DLabel")
  514. Time2:SetParent( InfoTab )
  515. Time2:SetPos( 317 , 10 )
  516. Time2:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  517. Time2:SetText(tostring( os.date("%M") ) )
  518.  
  519. local Time3 = vgui.Create("DLabel")
  520. Time3:SetParent( InfoTab )
  521. Time3:SetPos( 313.5 , 10 )
  522. Time3:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  523. Time3:SetText(":")
  524.  
  525. local Time4 = vgui.Create("DLabel")
  526. Time4:SetParent( InfoTab )
  527. Time4:SetPos( 330 , 10 )
  528. Time4:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  529. Time4:SetText( tostring( os.date( "%p" ) ) )
  530.  
  531.  
  532. // DLabels
  533.  
  534. local Label1 = vgui.Create("DLabel")
  535. Label1:SetParent( FirstTab )
  536. Label1:SetPos ( 30 , 10 )
  537. Label1:SetTextColor( Color ( 0 , 0 , 0 , 255) )
  538. Label1:SetText( "Basic Settings" )
  539. Label1:SizeToContents()
  540.  
  541. local Label2 = vgui.Create("DLabel")
  542. Label2:SetParent( FirstTab )
  543. Label2:SetPos ( 30 , 110 )
  544. Label2:SetTextColor( Color ( 0 , 0 , 0 , 255) )
  545. Label2:SetText( "Other Settings" )
  546. Label2:SizeToContents()
  547.  
  548. local Label3 = vgui.Create("DLabel")
  549. Label3:SetParent( SecTab )
  550. Label3:SetPos ( 30 , 10 )
  551. Label3:SetTextColor( Color ( 0 , 0 , 0 , 255) )
  552. Label3:SetText( "Main Esp Settings" )
  553. Label3:SizeToContents()
  554.  
  555. local Label4 = vgui.Create("DLabel")
  556. Label4:SetParent( SecTab )
  557. Label4:SetPos ( 30 , 110 )
  558. Label4:SetTextColor( Color ( 0 , 0 , 0 , 255) )
  559. Label4:SetText( "Other / Misc" )
  560. Label4:SizeToContents()
  561.  
  562. local Label5 = vgui.Create("DLabel")
  563. Label5:SetParent( ThTab )
  564. Label5:SetPos ( 30 , 10 )
  565. Label5:SetTextColor( Color ( 0 , 0 , 0 , 255) )
  566. Label5:SetText( "Misc Features" )
  567. Label5:SizeToContents()
  568.  
  569. // ESP Diagram
  570.  
  571. local EspModel = vgui.Create( "DModelPanel", SecTab )
  572. EspModel:SetModel( LocalPlayer():GetModel() )
  573. EspModel:SetPos( 110 , -30 )
  574. EspModel:SetSize( 300 , 250 )
  575. EspModel:SetAnimated( true )
  576. EspModel:SetCamPos( Vector( 50 , 50 , 50 ) )
  577. EspModel:SetLookAt( Vector( 0 , 0 , 50 ) )
  578.  
  579. // Regular Check Boxes
  580.  
  581. local Box1 = vgui.Create( "DCheckBoxLabel")
  582. Box1:SetText( "Friendly Fire" )
  583. Box1:SetConVar( "Ink_Aimbot_Friendlyfire" )
  584. Box1:SetParent( FirstTab )
  585. Box1:SetPos( 20 , 30 )
  586. Box1:SetValue( GetConVarNumber("Ink_Aimbot_Friendlyfire") )
  587. Box1:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  588. Box1:SizeToContents()
  589.  
  590. local Box2 = vgui.Create( "DCheckBoxLabel")
  591. Box2:SetText( "Ignore Steam Friends" )
  592. Box2:SetPos( 20 , 50 )
  593. Box2:SetParent( FirstTab )
  594. Box2:SetConVar( "Ink_Aimbot_IgnoreSteam" )
  595. Box2:SetValue( GetConVarNumber("Ink_Aimbot_IgnoreSteam") )
  596. Box2:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  597. Box2:SizeToContents()
  598.  
  599. local Box4 = vgui.Create( "DCheckBoxLabel")
  600. Box4:SetText( "Ignore Admins" )
  601. Box4:SetConVar( "Ink_Aimbot_IgnoreAdmins" )
  602. Box4:SetValue( GetConVarNumber("Ink_Aimbot_IgnoreAdmins") )
  603. Box4:SetPos( 20 , 70 )
  604. Box4:SetParent( FirstTab )
  605. Box4:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  606. Box4:SizeToContents()
  607.  
  608. local Box5 = vgui.Create( "DCheckBoxLabel")
  609. Box5:SetText( "No Recoil" )
  610. Box5:SetConVar( "Ink_Aimbot_Norecoil" )
  611. Box5:SetValue( GetConVarNumber("Ink_Aimbot_Norecoil") )
  612. Box5:SetPos( 20 , 90 )
  613. Box5:SetParent( FirstTab )
  614. Box5:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  615. Box5:SizeToContents()
  616.  
  617. local Box6 = vgui.Create( "DCheckBoxLabel")
  618. Box6:SetText( "Smooth Aim" )
  619. Box6:SetConVar( "Ink_SmoothAim_Enabled" )
  620. Box6:SetValue( GetConVarNumber("Ink_SmoothAim_Enabled") )
  621. Box6:SetPos( 20 , 130 )
  622. Box6:SetParent( FirstTab )
  623. Box6:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  624. Box6:SizeToContents()
  625.  
  626. local Box7 = vgui.Create( "DCheckBoxLabel")
  627. Box7:SetText( "Trigger Bot" )
  628. Box7:SetConVar( "Ink_Trigger" )
  629. Box7:SetValue( GetConVarNumber("Ink_Trigger") )
  630. Box7:SetPos( 20 , 150 )
  631. Box7:SetParent( FirstTab )
  632. Box7:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  633. Box7:SizeToContents()
  634.  
  635. local Box8 = vgui.Create( "DCheckBoxLabel")
  636. Box8:SetText( "Esp" )
  637. Box8:SetConVar( "Ink_Esp" )
  638. Box8:SetValue( GetConVarNumber("Ink_Esp") )
  639. Box8:SetPos( 20 , 30 )
  640. Box8:SetParent( SecTab )
  641. Box8:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  642. Box8:SizeToContents()
  643.  
  644. local Box9 = vgui.Create( "DCheckBoxLabel")
  645. Box9:SetText( "Show Admins" )
  646. Box9:SetConVar( "Ink_Esp_Admin" )
  647. Box9:SetValue( GetConVarNumber("Ink_Esp_Admin") )
  648. Box9:SetPos( 20 , 50 )
  649. Box9:SetParent( SecTab )
  650. Box9:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  651. Box9:SizeToContents()
  652.  
  653. local Box10 = vgui.Create( "DCheckBoxLabel")
  654. Box10:SetText( "Display Distance" )
  655. Box10:SetConVar( "Ink_Esp_Distance" )
  656. Box10:SetPos( 20 , 70 )
  657. Box10:SetParent( SecTab )
  658. Box10:SetValue( GetConVarNumber("Ink_Esp_Distance") )
  659. Box10:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  660. Box10:SizeToContents()
  661.  
  662. local Box11 = vgui.Create( "DCheckBoxLabel")
  663. Box11:SetText( "Display Health" )
  664. Box11:SetConVar( "Ink_Esp_Health" )
  665. Box11:SetPos( 20 , 90 )
  666. Box11:SetParent( SecTab )
  667. Box11:SetValue( GetConVarNumber("Ink_Esp_Health") )
  668. Box11:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  669. Box11:SizeToContents()
  670.  
  671. local Box12 = vgui.Create( "DCheckBoxLabel")
  672. Box12:SetText( "Chams" )
  673. Box12:SetConVar( "Ink_Chams" )
  674. Box12:SetPos( 20 , 130 )
  675. Box12:SetParent( SecTab )
  676. Box12:SetValue( GetConVarNumber("Ink_Chams") )
  677. Box12:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  678. Box12:SizeToContents()
  679.  
  680. local Box13 = vgui.Create( "DCheckBoxLabel")
  681. Box13:SetText( "Barrel Hack" )
  682. Box13:SetConVar( "Ink_Line" )
  683. Box13:SetPos( 20 , 150 )
  684. Box13:SetParent( SecTab )
  685. Box13:SetValue( GetConVarNumber("Ink_Line") )
  686. Box13:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  687. Box13:SizeToContents()
  688.  
  689. local Box14 = vgui.Create( "DCheckBoxLabel")
  690. Box14:SetText( "Display TTT Weapons" )
  691. Box14:SetConVar( "Ink_TTT" )
  692. Box14:SetPos( 20 , 170 )
  693. Box14:SetParent( SecTab )
  694. Box14:SetValue( GetConVarNumber("Ink_TTT") )
  695. Box14:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  696. Box14:SizeToContents()
  697.  
  698. local Box15 = vgui.Create( "DCheckBoxLabel")
  699. Box15:SetText( "Dynamic Light" )
  700. Box15:SetConVar( "Ink_Light" )
  701. Box15:SetPos( 20 , 190 )
  702. Box15:SetParent( SecTab )
  703. Box15:SetValue( GetConVarNumber("Ink_Light") )
  704. Box15:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  705. Box15:SizeToContents()
  706.  
  707. local Slider1 = vgui.Create( "DNumSlider")
  708. Slider1:SetWide(100)
  709. Slider1:SetText( "Offset" )
  710. Slider1:SetMin(0)
  711. Slider1:SetMax(35)
  712. Slider1:SetDecimals(0)
  713. Slider1:SetPos( 20 , 175 )
  714. Slider1:SetParent( FirstTab )
  715. Slider1:SetConVar("Aimbot_Offset")
  716.  
  717. local Slider2 = vgui.Create( "DNumSlider")
  718. Slider2:SetWide(100)
  719. Slider2:SetText( "Smooth Speed" )
  720. Slider2:SetMin(1)
  721. Slider2:SetMax(10)
  722. Slider2:SetDecimals(0)
  723. Slider2:SetPos( 20 , 215 )
  724. Slider2:SetParent( FirstTab )
  725. Slider2:SetConVar("Ink_Smooth_Speed")
  726.  
  727. local Box22 = vgui.Create( "DCheckBoxLabel")
  728. Box22:SetText( "Bunny Hop" )
  729. Box22:SetConVar( "Ink_Bhop" )
  730. Box22:SetPos( 20 , 30 )
  731. Box22:SetParent( ThTab )
  732. Box22:SetValue( GetConVarNumber("Ink_Bhop") )
  733. Box22:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  734. Box22:SizeToContents()
  735.  
  736. local Box23 = vgui.Create( "DCheckBoxLabel")
  737. Box23:SetText( "Custom Crosshair" )
  738. Box23:SetConVar( "Ink_Crosshair" )
  739. Box23:SetPos( 20 , 50 )
  740. Box23:SetParent( ThTab )
  741. Box23:SetValue( GetConVarNumber("Ink_Crosshair") )
  742. Box23:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  743. Box23:SizeToContents()
  744.  
  745. local Box24 = vgui.Create( "DCheckBoxLabel")
  746. Box24:SetText( "ULX AntiGag" )
  747. Box24:SetConVar( "Ink_AntiGag" )
  748. Box24:SetPos( 20 , 70 )
  749. Box24:SetParent( ThTab )
  750. Box24:SetValue( GetConVarNumber("Ink_AntiGag") )
  751. Box24:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  752. Box24:SizeToContents()
  753.  
  754. local Box25 = vgui.Create( "DCheckBoxLabel")
  755. Box25:SetText( "Hit Markers" )
  756. Box25:SetConVar( "Ink_HitMarker" )
  757. Box25:SetPos( 20 , 90 )
  758. Box25:SetParent( ThTab )
  759. Box25:SetValue( GetConVarNumber("Ink_HitMarker") )
  760. Box25:SetTextColor( Color(0 , 0 , 0 , 255 ) )
  761. Box25:SizeToContents()
  762.  
  763. /// Info ///
  764.  
  765. local Info = vgui.Create("DLabel")
  766. Info:SetParent( InfoTab )
  767. Info:SetPos( 130 , 10 )
  768. Info:SetTextColor( Color ( 0 , 0 , 0 , 255 ) )
  769. Info:SetSize( 200 , 20 )
  770. Info:SetText("------ Ink Bot ------")
  771.  
  772. local Info1 = vgui.Create("DLabel")
  773. Info1:SetParent( InfoTab )
  774. Info1:SetPos( 130 , 30 )
  775. Info1:SetTextColor( Color ( 0 , 0 , 0 , 255 ) )
  776. Info1:SetSize( 200 , 20 )
  777. Info1:SetText("Downloadable Skills")
  778.  
  779. local Info2 = vgui.Create("DLabel")
  780. Info2:SetParent( InfoTab )
  781. Info2:SetPos( 5 , 50 )
  782. Info2:SetTextColor( Color ( 0 , 0 , 0 , 255 ) )
  783. Info2:SetSize( 1000 , 20 )
  784. Info2:SetText("Hi, you are using Ink Bot, A Hack Coded by Nomical it has many features")
  785.  
  786. local Info3 = vgui.Create("DLabel")
  787. Info3:SetParent( InfoTab )
  788. Info3:SetPos( 5 , 70 )
  789. Info3:SetTextColor( Color ( 0 , 0 , 0 , 255 ) )
  790. Info3:SetSize( 1000 , 20 )
  791. Info3:SetText("including Aimbot, Esp, And much more. I Hope you Enjoy My Hack.")
  792.  
  793. // Binding Tab Derma //
  794.  
  795. FunctionTable = {"Aimbot","Propkill","Menu"}
  796. ShowKey = { AimKey , PropKey , MenuKey }
  797. KeyTable = {}
  798. KeyTable["A"] = KEY_A
  799. KeyTable["B"] = KEY_B
  800. KeyTable["C"] = KEY_C
  801. KeyTable["D"] = KEY_D
  802. KeyTable["E"] = KEY_E
  803. KeyTable["F"] = KEY_F
  804. KeyTable["G"] = KEY_G
  805. KeyTable["H"] = KEY_H
  806. KeyTable["I"] = KEY_I
  807. KeyTable["J"] = KEY_J
  808. KeyTable["K"] = KEY_K
  809. KeyTable["L"] = KEY_L
  810. KeyTable["M"] = KEY_M
  811. KeyTable["N"] = KEY_N
  812. KeyTable["O"] = KEY_O
  813. KeyTable["P"] = KEY_P
  814. KeyTable["Q"] = KEY_Q
  815. KeyTable["R"] = KEY_R
  816. KeyTable["S"] = KEY_S
  817. KeyTable["T"] = KEY_T
  818. KeyTable["U"] = KEY_U
  819. KeyTable["V"] = KEY_V
  820. KeyTable["W"] = KEY_W
  821. KeyTable["X"] = KEY_X
  822. KeyTable["Y"] = KEY_Y
  823. KeyTable["Z"] = KEY_Z
  824. KeyTable["Insert"] = KEY_INSERT
  825. KeyTable["Left Alt"] = KEY_LALT
  826. KeyTable["Nothing"] = KEY_NONE
  827.  
  828. local List = vgui.Create("DListView")
  829. List:SetParent( BindTab )
  830. List:SetPos( 15 , 5 )
  831. List:SetSize( 175 , 200 )
  832. List:SetMultiSelect(false)
  833. List:AddColumn("Function")
  834.  
  835.  
  836. for k,v in pairs(FunctionTable) do
  837. List:AddLine(v)
  838.     end
  839.    
  840. local List2 = vgui.Create("DListView")
  841. List2:SetParent( BindTab )
  842. List2:SetPos( 176 , 5 )
  843. List2:SetSize( 175 , 200 )
  844. List2:SetMultiSelect(false)
  845. List2:AddColumn("Key")
  846.  
  847. for k,v in pairs(ShowKey) do
  848. List2:AddLine(v)
  849.     end
  850.  
  851.  
  852. KeyLabel = vgui.Create("DLabel", BindTab)
  853. KeyLabel:SetText("Key")
  854. KeyLabel:SetPos( 25 , 255 )
  855. KeyLabel:SetTextColor( Color (0,0,0,255) )
  856. KeyLabel:SizeToContents()
  857.  
  858. KeyLabel2 = vgui.Create("DLabel", BindTab)
  859. KeyLabel2:SetText("Function")
  860. KeyLabel2:SetPos( 165 , 255 )
  861. KeyLabel2:SetTextColor( Color (0,0,0,255) )
  862. KeyLabel2:SizeToContents()
  863.  
  864. local KeyForBind = CreateClientConVar("Ink_Key","Nothing",true,false)
  865.    
  866. local BindChoc1 = vgui.Create("DMultiChoice")
  867. BindChoc1:SetParent( BindTab )
  868. BindChoc1:SetPos( 15 , 230 )
  869. BindChoc1:SetSize( 100 , 20 )
  870. BindChoc1:SetConVar("Ink_Key")
  871. BindChoc1:ChooseOption(GetConVarString("Ink_Key"))
  872.  
  873. for k,v in pairs(KeyTable) do
  874. BindChoc1:AddChoice(k)
  875.     end
  876.    
  877. local FuncForBind = CreateClientConVar("Ink_Func","Nothing",true,false)
  878.  
  879. local BindChoc2 = vgui.Create("DMultiChoice")
  880. BindChoc2:SetParent( BindTab )
  881. BindChoc2:SetPos( 160 , 230 )
  882. BindChoc2:SetSize( 100 , 20 )
  883. BindChoc2:SetConVar("Ink_Func")
  884. BindChoc2:ChooseOption(GetConVarString("Ink_Func"))
  885.  
  886. for k,v in pairs(FunctionTable) do
  887. BindChoc2:AddChoice(v)
  888.     end
  889.  
  890. local SaveAim = CreateClientConVar("Ink_AimKeySave" , "Insert" , true , false )
  891. local SaveMenu = CreateClientConVar("Ink_MenuKeySave" , "" , true , false )
  892. local SaveProp = CreateClientConVar("Ink_PropKeySave" , "" , true , false )
  893.  
  894. local button = vgui.Create( "DButton", BindTab )
  895.     button:SetSize( 40 , 30 )
  896.     button:SetPos( 285 , 223 )
  897.     button:SetText( "Bind" )
  898.     button.DoClick = function( button )
  899.  
  900.         // Show Binds Part //
  901.         if GetConVarString("Ink_Func") == "Aimbot" then
  902.         AimKey = GetConVarString("Ink_Key")
  903.         LocalPlayer():ConCommand("Ink_AimKeySave "..GetConVarString("Ink_Key"))
  904.             end
  905.         if GetConVarString("Ink_Func") == "Menu" then
  906.         MenuKey = GetConVarString("Ink_Key")
  907.         LocalPlayer():ConCommand("Ink_MenuKeySave "..GetConVarString("Ink_Key"))
  908.             end
  909.         if GetConVarString("Ink_Func") == "Propkill" then
  910.         PropKey = GetConVarString("Ink_Key")
  911.         LocalPlayer():ConCommand("Ink_PropKeySave "..GetConVarString("Ink_Key"))
  912.        
  913.             end
  914.         /////////////////////
  915.    
  916.  
  917.     end
  918.  
  919.    
  920. // Adding The Sheets //
  921.  
  922. Sheet:AddSheet( "Home", InfoTab, "gui/silkicons/table_edit", false, false, "About Ink" )
  923. Sheet:AddSheet( "Aimbot", FirstTab, "gui/silkicons/check_on", false, false, "Aimboat!" )
  924. Sheet:AddSheet( "ESP", SecTab, "gui/silkicons/star", false, false, "Visual Hacks" )
  925. Sheet:AddSheet( "Miscellaneous", ThTab, "gui/silkicons/world", false, false, "Other Stuff" )
  926. Sheet:AddSheet( "Binds", BindTab, "gui/silkicons/wrench", false, false, "Bindings" )
  927.  
  928.  
  929.     end
  930.  
  931. concommand.Add("Ink_menu",OpenMenu1)
  932.  
  933. local Stopper2 = 1
  934. local Stopper = 1
  935.  
  936. function Binds()
  937.  
  938. KeyTable = {}
  939. KeyTable["A"] = KEY_A
  940. KeyTable["B"] = KEY_B
  941. KeyTable["C"] = KEY_C
  942. KeyTable["D"] = KEY_D
  943. KeyTable["E"] = KEY_E
  944. KeyTable["F"] = KEY_F
  945. KeyTable["G"] = KEY_G
  946. KeyTable["H"] = KEY_H
  947. KeyTable["I"] = KEY_I
  948. KeyTable["J"] = KEY_J
  949. KeyTable["K"] = KEY_K
  950. KeyTable["L"] = KEY_L
  951. KeyTable["M"] = KEY_M
  952. KeyTable["N"] = KEY_N
  953. KeyTable["O"] = KEY_O
  954. KeyTable["P"] = KEY_P
  955. KeyTable["Q"] = KEY_Q
  956. KeyTable["R"] = KEY_R
  957. KeyTable["S"] = KEY_S
  958. KeyTable["T"] = KEY_T
  959. KeyTable["U"] = KEY_U
  960. KeyTable["V"] = KEY_V
  961. KeyTable["W"] = KEY_W
  962. KeyTable["X"] = KEY_X
  963. KeyTable["Y"] = KEY_Y
  964. KeyTable["Z"] = KEY_Z
  965. KeyTable["Insert"] = KEY_INSERT
  966. KeyTable["Left Alt"] = KEY_LALT
  967. KeyTable["Nothing"] = KEY_NONE
  968.  
  969. for k,v in pairs (KeyTable) do
  970. if AimKey == k then
  971. if input.IsKeyDown(v) then
  972. On = 1
  973. elseif !input.IsKeyDown(v) then
  974. On = 0
  975.     end
  976. end
  977.  
  978. if MenuKey == k then
  979. if input.IsKeyDown(v) then
  980. if Stopper == 1 then
  981. OpenMenu1()
  982. Stopper = Stopper + 1
  983.  
  984.         end
  985.     end
  986. end
  987.  
  988. if MenuKey == k then
  989. if !input.IsKeyDown(v) then
  990. Stopper = 1
  991.         end
  992.     end
  993.    
  994. // Stop Menu Spam When Func Called
  995.  
  996. if PropKey == k then
  997. if input.IsKeyDown(v) then
  998. if Stopper2 == 1 then
  999. Stopper2 = Stopper2 + 1
  1000. propkill1 = 1
  1001.  
  1002.         end
  1003.     end
  1004. end
  1005.    
  1006. if PropKey == k then
  1007. if !input.IsKeyDown(v) then
  1008. Stopper2 = 1
  1009. propkill1 = 0
  1010.     end
  1011. end
  1012. // Stop Flipout For PropKill Func
  1013.    
  1014.  
  1015. // End Func And For Loop //
  1016.     end
  1017. end
  1018.  
  1019. hook.Add("Think","ActiveBinds",Binds)
  1020.  
  1021. function LoadBinds()
  1022. AimKey = GetConVarString("Ink_AimKeySave")
  1023. MenuKey = GetConVarString("Ink_MenuKeySave")
  1024. PropKey = GetConVarString("Ink_PropKeySave")
  1025.  
  1026. end
  1027. LoadBinds()
  1028. end
  1029. // End Hax Func
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement