Advertisement
Guest User

Untitled

a guest
Oct 23rd, 2012
3,043
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 36.22 KB | None | 0 0
  1. -- hera v1.1 [Fixed to work in GMod 13]
  2. -- if this gets leaked, I don't care much.
  3. -- this will be released when GMod 13 comes out anyways.
  4. if ( SERVER ) then AddCSLuaFile() return end
  5. MsgN("Cock")
  6.  
  7. local Hera = {};
  8. local Version = "2.3";
  9. local RandomColor = Color(math.random(1,255),math.random(1,255),math.random(1,255),255)
  10. -- Localizing commonly used functions for speed
  11.  
  12. for k,v in pairs(_G) do
  13.     local k = v
  14.  
  15. end
  16.  
  17. require("cvar3")
  18. local cvar2 = {}
  19. cvar2.SetValue = function(var, value)
  20.  
  21.     GetConVar(var):SetValue(value)
  22.    
  23. end
  24.  
  25. chat.AddText(
  26. Color(255,69,0,255), "[Hera]: ",
  27. Color(0,255,0,255),"Player Authed: ",
  28. Color(0,255,0,255),""..LocalPlayer():Nick" ","("..LocalPlayer():SteamID" ",")")
  29.  
  30.  
  31. // thanks fr1kin i hate this too
  32.  
  33.  
  34. chat.AddText(
  35. Color(255,69,0,255), "[Hera]: ",
  36. Color(100,100,100,255), "Modules Loaded");
  37.  
  38. chat.AddText(
  39. Color(255,69,0,255), "[Hera]: ",
  40. Color(100,100,100,255), "sv_cheats bypassed");
  41.  
  42.  
  43.  
  44. -- start of cvars
  45. CreateClientConVar("hera_calcview",0,true,false)
  46. CreateClientConVar("hera_esp_info",0,true,false)
  47. CreateClientConVar("hera_esp_box",0,true,false)
  48. CreateClientConVar("hera_esp_chams",0,true,false)
  49. CreateClientConVar("hera_esp_health",0,true,false)
  50. CreateClientConVar("hera_esp_2dbox",0,true,false)
  51. CreateClientConVar("hera_esp_3dbox",0,true,false)
  52. CreateClientConVar("hera_esp_weapons",0,true,false)
  53. CreateClientConVar("hera_misc_crosshair",0,true,false)
  54. CreateClientConVar("hera_misc_bhop",0,true,false)
  55. CreateClientConVar("hera_misc_fullbright",0,true,false)
  56. CreateClientConVar("hera_misc_status",0,true,false)
  57. CreateClientConVar("hera_misc_spammessage","SpamMessage",true,false)
  58. CreateClientConVar("hera_misc_chatspam",0,true,false)
  59. CreateClientConVar("hera_misc_logips",0,true,false)
  60. CreateClientConVar("hera_aim_spinbot",0,true,false)
  61. CreateClientConVar("hera_esp_tracer",0,true,false)
  62. CreateClientConVar("hera_aim_silent",0,true,false)
  63. CreateClientConVar("hera_aim_anti",0,true,false)
  64. CreateClientConVar("hera_aim_toggle",0,true,false)
  65. CreateClientConVar("hera_speedhack_speed",3,true,false)
  66. CreateClientConVar("hera_esp_info_color_r",0,true,false)
  67. CreateClientConVar("hera_esp_info_color_g",0,true,false)
  68. CreateClientConVar("hera_esp_info_color_b",0,true,false)
  69. CreateClientConVar("hera_esp_box_color_r",0,true,false)
  70. CreateClientConVar("hera_esp_box_color_g",0,true,false)
  71. CreateClientConVar("hera_esp_box_color_b",0,true,false)
  72.  
  73. surface.PlaySound("buttons/button19.wav")
  74. chat.AddText(
  75. Color(255,69,0,255), "[Hera]: ",
  76. Color(100,100,100,255), "Loaded")
  77. chat.AddText(
  78. Color(255,69,0,255), "[Hera]: ",
  79. Color(100,100,100,255), "Current Version: "..Version.."")
  80.    
  81.    
  82.    
  83. cvar2.SetValue("sv_cheats","1")
  84.  
  85. local function IsisCreateHook(Type,Function)
  86. Name = tostring(math.random(1,500)..math.random(1,500)..math.random(1,500)..math.random(1,500)..math.random(1,500)..math.random(1,500)..math.random(1,500))
  87. return hook.Add(Type,Name,Function)
  88. end
  89.  
  90. local function HeraMakeMat()   
  91. local Texture = {
  92. ["$basetexture"] = "models/debug/debugwhite",
  93. ["$model"]       = 1,
  94. ["$translucent"] = 1,
  95. ["$alpha"]       = 1,
  96. ["$nocull"]      = 1,
  97. ["$ignorez"]     = 1
  98. }
  99. local material = CreateMaterial( "hera_solid", "VertexLitGeneric", Texture )
  100. return material
  101. end
  102.  
  103. local function Chams()
  104. local Div = (1 / 255)
  105. local Div2 = ( 0 / 0 )
  106. local m = HeraMakeMat()
  107. if GetConVarNumber("hera_esp_chams") == 1 then
  108. for k,v in pairs(player.GetAll()) do
  109. if IsValid(v) and v:Health() > 0 and v:Team() != TEAM_SPECTATOR then
  110. cam.Start3D(EyePos(),EyeAngles())
  111. local TCol = team.GetColor(v:Team())
  112. local Alpha2 = Color(0,0,0,255)
  113. render.SuppressEngineLighting( true )
  114. render.SetColorModulation( ( TCol.r * Div ), ( TCol.g * Div ), ( TCol.b * Div ), (Alpha2.a * Div2) )
  115. render.MaterialOverride( m )
  116. v:DrawModel()
  117. render.SuppressEngineLighting( false )
  118. render.SetColorModulation(1,1,1)
  119. render.MaterialOverride( )
  120. cam.End3D()
  121. end
  122. end
  123. end
  124. end
  125. IsisCreateHook("RenderScreenspaceEffects",Chams)
  126.  
  127. local function Weapons()
  128. if GetConVarNumber("hera_esp_weapons") == 1 then
  129. for k, v in pairs( ents.GetAll() ) do
  130. if IsValid( v ) then
  131. if v:IsWeapon() && v:GetMoveType() != 0 then
  132. if string.sub( v:GetClass(), 1, 7 ) == "weapon_" then
  133. WeaponPos = v:EyePos():ToScreen()
  134. draw.SimpleText( v:GetClass(), "TargetID", WeaponPos.x, WeaponPos.y, Color(0,255,0,255), TEXT_ALIGN_CENTER,
  135.  
  136. TEXT_ALIGN_CENTER )
  137. end
  138. end
  139. end
  140. end
  141. end
  142. end
  143. IsisCreateHook("HUDPaint", Weapons)
  144.  
  145. function Crosshair() -- Thanks Sykranos
  146. if GetConVarNumber("hera_misc_crosshair") == 1 then
  147. surface.SetDrawColor(255,0,0,255)
  148. surface.DrawLine(ScrW()/2, ScrH()/2, ScrW()/2 + 20, ScrH()/2)
  149. surface.DrawLine(ScrW()/2 + 20, ScrH()/2, ScrW()/2 + 20, ScrH()/2 + 20)
  150. surface.DrawLine(ScrW()/2 , ScrH()/2, ScrW()/2 - 20, ScrH()/2)
  151. surface.DrawLine(ScrW()/2 - 20 , ScrH()/2, ScrW()/2 - 20, ScrH()/2 - 20)
  152. surface.DrawLine(ScrW()/2, ScrH()/2, ScrW()/2, ScrH()/2 - 20)
  153. surface.DrawLine(ScrW()/2, ScrH()/2 - 20, ScrW()/2 + 20, ScrH()/2 - 20)
  154. surface.DrawLine(ScrW()/2, ScrH()/2, ScrW()/2, ScrH()/2 + 20)
  155. surface.DrawLine(ScrW()/2, ScrH()/2 + 20, ScrW()/2 - 20, ScrH()/2 + 20)
  156. end
  157. end
  158. IsisCreateHook("HUDPaint", Crosshair)
  159.  
  160. function ESP()
  161. draw.RoundedBox( 8, -10, 0, 10000, 25, Color(255,255,255,100))
  162. draw.SimpleTextOutlined( "Hera " .. "[Private]","Default",1250,5,Color(50,50,50,255),0,0,1,Color(255,69,0,255))
  163. if GetConVarNumber("hera_esp_info") == 1 then
  164. for k, v in pairs( player.GetAll() ) do
  165. if( v:Alive() && v != LocalPlayer() ) then
  166. local Pos = ( v:GetPos() + Vector( 0, 0, 170 ) ):ToScreen();
  167. local Dist = v:GetPos():Distance(LocalPlayer():GetPos());
  168. local wep = "Unknown"
  169. local SteamID = v:SteamID()
  170. local Team = v:Team()
  171. if v:GetActiveWeapon() != nil then
  172. if type(v:GetActiveWeapon()) == "Weapon" then
  173. if v:GetActiveWeapon() and v:GetActiveWeapon():IsValid() then
  174. wep = v:GetActiveWeapon():GetClass()
  175. local InfoColor = Color(GetConVarNumber("hera_esp_info_color_r"),GetConVarNumber("hera_esp_info_color_g"),GetConVarNumber("hera_esp_info_color_b"),255)
  176. draw.SimpleText(v:Name(), "TargetID", Pos.x, Pos.y, InfoColor, TEXT_ALIGN_CENTER )
  177. draw.SimpleText("HP: " .. v:Health(), "TargetID", Pos.x, Pos.y + 12, InfoColor, TEXT_ALIGN_CENTER )
  178. draw.SimpleText("Distance: " .. math.floor(Dist), "TargetID", Pos.x, Pos.y + 22, InfoColor, TEXT_ALIGN_CENTER);
  179. draw.SimpleText("Weapon: " .. wep, "TargetID", Pos.x, Pos.y + 32, InfoColor, TEXT_ALIGN_CENTER );
  180. draw.SimpleText("Team: " ..Team, "TargetID", Pos.x, Pos.y + 42, InfoColor,TEXT_ALIGN_CENTER);
  181. draw.SimpleText("SteamID: " ..SteamID, "TargetID", Pos.x, Pos.y + 52, InfoColor,TEXT_ALIGN_CENTER);
  182. if v:IsAdmin() then
  183. draw.SimpleText("[ADMIN]", "TabLarge", Pos.x, Pos.y - 12, Color(0,255,0,255), TEXT_ALIGN_CENTER );
  184. end
  185. if v:GetFriendStatus() == "friend" then
  186. draw.SimpleText("-Friend-", "TabLarge", Pos.x, Pos.y - 22, Color(0,255,0,255), TEXT_ALIGN_CENTER );
  187. end
  188. end
  189. end
  190. end
  191. end
  192. end
  193. end
  194. end
  195. IsisCreateHook("HUDPaint", ESP)
  196.  
  197. function BarrelHack()
  198. for k, v in pairs( player.GetAll() ) do
  199. if( v:Alive() && v != LocalPlayer() ) then
  200. if GetConVarNumber("hera_esp_tracer") == 0 then return; end
  201. local ViewModel = LocalPlayer():GetViewModel()
  202. local pos = v:GetBonePosition(v:LookupBone("ValveBiped.Bip01_Head1"))
  203. local Attach = ViewModel:LookupAttachment("1")
  204. local Div = (1 / 255)
  205. if( !LocalPlayer():Alive() || LocalPlayer():GetActiveWeapon() == NULL ) then return; end
  206. if ( Attach == 0 ) then Attach = ViewModel:LookupAttachment("muzzle") end
  207. cam.Start3D( EyePos(), EyeAngles() )
  208. render.SetMaterial(Material("tripmine_laser"))
  209. render.DrawBeam( ViewModel:GetAttachment( Attach ).Pos, pos, 10,0,0,team.GetColor( v:Team()))
  210. cam.End3D()
  211. end
  212. end
  213. end
  214. IsisCreateHook("HUDPaint", Barrelhack)
  215.  
  216. function BarrelHackClient()
  217. if GetConVarNumber("hera_esp_tracer") == 0 then return end
  218. local ViewModel2 = LocalPlayer():GetViewModel()
  219. local Attach2 = ViewModel2:LookupAttachment("1")
  220. if( !LocalPlayer():Alive() || LocalPlayer():GetActiveWeapon() == NULL ) then return; end
  221. if ( Attach2 == 0 ) then Attach2 = ViewModel2:LookupAttachment("muzzle") end
  222. cam.Start3D( EyePos(), EyeAngles() )
  223. render.SetMaterial( Material("tripmine_laser"))
  224. render.DrawBeam( ViewModel2:GetAttachment( Attach2 ).Pos, LocalPlayer():GetEyeTrace().HitPos, 5, 0, 0, Color(0,255,0,255))
  225. cam.End3D()
  226. end
  227. IsisCreateHook("RenderScreenspaceEffects", BarrelHackClient)
  228.  
  229. function Health()
  230. if GetConVarNumber("hera_esp_health") == 1 then
  231. for k, v in pairs(ents.GetAll()) do
  232. if IsValid( v ) then
  233. if v ~= LocalPlayer() then
  234. if v:IsPlayer() or v:IsNPC() then
  235. local pos = ( v:GetPos() ):ToScreen()
  236. if v:Health() >= 75 then
  237. HPColor = Color( 0,255,0,255)
  238. elseif v:Health() >= 35 and v:Health() < 75 then
  239. HPColor = Color(255,255,0,255)
  240. elseif v:Health() < 35 then
  241. HPColor = Color(255,0,0,255)
  242. end
  243. draw.RoundedBox( 0, pos.x-17, pos.y+4, 42, 6,Color(0,0,0,255))
  244. draw.RoundedBox( 0, pos.x-16, pos.y+5, 0.4 * math.Clamp( v:Health(), 1, 100 ), 4,HPColor)
  245. end
  246. end
  247. end
  248. end
  249. end
  250. end
  251. IsisCreateHook("HUDPaint", Health)
  252.  
  253. function TwoDBox()
  254. if GetConVarNumber("hera_esp_2dbox") == 1 then
  255. cam.Start3D(EyePos(), EyeAngles());
  256. for k, ply in pairs(player.GetAll()) do
  257. if( ply:Alive() && ( IsValid(ply) && ply != LocalPlayer() )) then
  258. local pos = ply:GetPos();
  259. local width = 32;
  260. local height = 80;
  261. local scale = 1;
  262. local BoxColor = Color(GetConVarNumber("hera_esp_box_color_r"),GetConVarNumber("hera_esp_box_color_g"),GetConVarNumber("hera_esp_box_color_b"),255)
  263. local ang = EyeAngles();
  264. ang.p = ang.p - 90;
  265. pos = pos - (ang:Right() * (width / 2))
  266. cam.Start3D2D(pos, ang, (1 / scale));
  267. surface.SetDrawColor(BoxColor)
  268. surface.DrawOutlinedRect(0, 0, (height * scale), (width * scale));
  269. cam.End3D2D();
  270. end
  271. end
  272. cam.End3D();
  273. end
  274. end
  275. IsisCreateHook("HUDPaint", TwoDBox)
  276.  
  277.  
  278. local function DrawBoundingBox() -- thanks Anthr4x
  279. if GetConVarNumber("hera_esp_3dbox") == 1 then
  280. cam.Start3D(EyePos(), EyeAngles());
  281. for k, ply in pairs(player.GetAll()) do
  282. if ( ply:Alive() && ( IsValid(ply) && ply != LocalPlayer() )) then
  283. local ang = ply:EyeAngles();
  284. ang.p = 0;
  285. ang.r = 0;
  286. local pos = ply:GetPos();
  287. local width = 32;
  288. local height = 74;
  289. local scale = 2;
  290. local BoxColor = Color(GetConVarNumber("hera_esp_box_color_r"),GetConVarNumber("hera_esp_box_color_g"),GetConVarNumber("hera_esp_box_color_b"),255)
  291.  
  292. local ang1 = Angle(ang.p, ang.y, ang.r);
  293. local pos1 = pos;
  294. pos1 = pos1 - (ang1:Forward() * (width / 2));
  295. pos1 = pos1 - (ang1:Right() * (width / 2));
  296. cam.Start3D2D(pos1, ang1, (1 / scale));
  297. surface.SetDrawColor(BoxColor);
  298. surface.DrawOutlinedRect(0, 0, (width * scale), (width * scale));
  299. surface.SetDrawColor(Color(0, 0, 0, 0));
  300. surface.DrawRect(0, 0, (width * scale), (width * scale));
  301. cam.End3D2D();
  302. -- Top Face
  303. local ang2 = Angle(ang.p, ang.y, ang.r);
  304. local pos2 = pos;
  305. pos2 = pos2 - (ang2:Forward() * (width / 2));
  306. pos2 = pos2 - (ang2:Right() * (width / 2));
  307. pos2 = pos2 + (ang2:Up() * (height));
  308. cam.Start3D2D(pos2, ang2, (1 / scale));
  309. surface.SetDrawColor(BoxColor);
  310. surface.DrawOutlinedRect(0, 0, (width * scale), (width * scale));
  311. surface.SetDrawColor(Color(0, 0, 0, 0));
  312. surface.DrawRect(0, 0, (width * scale), (width * scale));
  313. cam.End3D2D();
  314.  
  315. -- Front Face
  316. local ang3 = Angle(ang.p + 90, ang.y, ang.r);
  317. local pos3 = pos;
  318. pos3 = pos3 - (ang3:Forward() * height);
  319. pos3 = pos3 - (ang3:Right() * (width / 2));
  320. pos3 = pos3 + (ang3:Up() * (width / 2));
  321. cam.Start3D2D(pos3, ang3, (1 / scale));
  322. surface.SetDrawColor(BoxColor)
  323. surface.DrawOutlinedRect(0, 0, (height * scale), (width * scale));
  324. surface.SetDrawColor(Color(0, 0, 0, 0));
  325. surface.DrawRect(0, 0, (height * scale), (width * scale));
  326. cam.End3D2D();
  327.  
  328.                     -- Back Face
  329. local ang4 = Angle(ang.p + 90, ang.y, ang.r);
  330. local pos4 = pos;
  331. pos4 = pos4 - (ang4:Forward() * height);
  332. pos4 = pos4 - (ang4:Right() * (width / 2));
  333. pos4 = pos4 - (ang4:Up() * (width / 2));
  334. cam.Start3D2D(pos4, ang4, (1 / scale));
  335. surface.SetDrawColor(BoxColor);
  336. surface.DrawOutlinedRect(0, 0, (height * scale), (width * scale));
  337. surface.SetDrawColor(Color(0, 0, 0, 0));
  338. surface.DrawRect(0, 0, (height * scale), (width * scale));
  339. cam.End3D2D();
  340.  
  341. -- Right Face
  342. local ang5 = Angle(ang.p + 90, ang.y, ang.r + 90);
  343. local pos5 = pos;
  344. pos5 = pos5 - (ang5:Forward() * height);
  345. pos5 = pos5 - (ang5:Right() * (width / 2));
  346. pos5 = pos5 - (ang5:Up() * (width / 2));
  347. cam.Start3D2D(pos5, ang5, (1 / scale));
  348. surface.SetDrawColor(BoxColor);
  349. surface.DrawOutlinedRect(0, 0, (height * scale), (width * scale));
  350. surface.SetDrawColor(Color(0, 0, 0, 0));
  351. surface.DrawRect(0, 0, (height * scale), (width * scale));
  352. cam.End3D2D();
  353. -- Left Face
  354. local ang6 = Angle(ang.p + 90, ang.y, ang.r + 90);
  355. local pos6 = pos;
  356. pos6 = pos6 - (ang6:Forward() * height);
  357. pos6 = pos6 - (ang6:Right() * (width / 2));
  358. pos6 = pos6 + (ang6:Up() * (width / 2));
  359. cam.Start3D2D(pos6, ang6, (1 / scale));
  360. surface.SetDrawColor(BoxColor);
  361. surface.DrawOutlinedRect(0, 0, (height * scale), (width * scale));
  362. surface.SetDrawColor(Color(0, 0, 0, 0));
  363. surface.DrawRect(0, 0, (height * scale), (width * scale));
  364. cam.End3D2D();
  365. end
  366. end
  367. cam.End3D();
  368. end
  369. end
  370. IsisCreateHook("RenderScreenspaceEffects", DrawBoundingBox)
  371.  
  372. function Dead()
  373. if GetConVarNumber("hera_esp_info") == 1 then
  374. for k, v in pairs( player.GetAll() ) do
  375. if v != LocalPlayer() then
  376. local Pos = ( v:GetPos() + Vector( 0, 0, 100 ) ):ToScreen();
  377. if v:Health() < 1 then
  378. draw.SimpleText( "*Dead* (" .. v:Nick() .. ")", "TargetID", Pos.x, Pos.y - 12, Color( 255, 0, 0, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
  379. end
  380. end
  381. end
  382. end
  383. end
  384. IsisCreateHook("HUDPaint", Dead)
  385.  
  386. function Bunnyhop()
  387. if GetConVarNumber("hera_misc_bhop") == 1 then
  388. if input.IsKeyDown( KEY_SPACE ) then
  389. if LocalPlayer():IsOnGround() then
  390. RunConsoleCommand("+Jump")
  391. timer.Create("Bhop",0.01, 0 ,function() RunConsoleCommand("-Jump") end)
  392. end
  393. end
  394. end
  395. end  
  396. IsisCreateHook("Think", Bunnyhop)
  397.  
  398. function ChatSpam()
  399. local SpamMessage = GetConVarString("hera_misc_spammessage")
  400. if GetConVarNumber("hera_misc_chatspam") == 1 then
  401. RunConsoleCommand("say",""..SpamMessage.."")
  402. end
  403. end
  404. IsisCreateHook("Think", ChatSpam)
  405.  
  406. -- gotta go fast
  407. timer.Create("SpeedHake",2,1,function()
  408. concommand.Add("+Hera_Speed" , function() cvar2.SetValue("sv_Cheats","1") cvar2.SetValue("Host_TimeScale",tostring(GetConVarNumber("Hera_Speedhack_Speed"))) end)
  409. concommand.Add("-Hera_Speed", function() cvar2.SetValue("Host_TimeScale","1") end)
  410. end)
  411.  
  412. function ToggleAim()
  413. if GetConVarNumber("hera_aim_toggle") == 1 then
  414. Aimon = 1
  415. end
  416. end
  417. IsisCreateHook("Think", ToggleAim)
  418.  
  419.  
  420. Spins = {{ pitch = 360 , yaw = -180 , roll = 180 },{ pitch = -360 , yaw = 180 , roll = -180 }}
  421. XAXE = 0
  422. YAXE = 0
  423. Blickrichtung = Angle( 0 , 0 , 0 )
  424. function Spinbot( cmd )
  425. if GetConVarNumber("hera_aim_spinbot") == 0 then return end;
  426. if Aimon == 1 then return end;
  427. local PlayerView = cmd:GetViewAngles()
  428. local pitch = PlayerView.p
  429. local yaw = PlayerView.y
  430. local roll = PlayerView.r
  431. cmd:SetViewAngles(Angle(0,math.random(0,270),math.random(0,180)))
  432. Blickrichtung = cmd:GetViewAngles()
  433. if(Blickrichtung.y < 270 ) then
  434. elseif(Blickrichtung.y > 270 ) then      
  435. end
  436. end
  437. IsisCreateHook("CreateMove", Spinbot)
  438.  
  439. function Mouse( cmd )
  440. XAXE = cmd:GetMouseX()
  441. YAXE = cmd:GetMouseY()*-1
  442. if YAXE or XAXE > 0 then
  443. end
  444. end
  445. IsisCreateHook("CreateMove", Mouse)
  446. value = 180
  447. value2 = 180
  448. function NormaliziseView(ply, pos, angles, fov)
  449. if GetConVarNumber("hera_aim_spinbot") == 0 then return end
  450. local x = gui.MouseX() * - 1
  451. local y = gui.MouseY()
  452. value = value - YAXE
  453. value2 = value2 - XAXE
  454. local view = {}
  455. view.origin = pos
  456. view.angles = angles
  457. view.angles.r = 0
  458. view.angles.p = value
  459. view.angles.y = value2
  460. view.fov = fov
  461. return view
  462. end
  463. IsisCreateHook("CalcView", NormaliziseView)
  464.  
  465. -- thanks Herahack ( I just needed a simple logger, didn't really care how i got it )
  466. local function PlayerConnect( name, ip )
  467.     if GetConVarNumber("hera_misc_logips") == 1 then
  468.     surface.PlaySound("ambient/levels/canals/drip4.wav")
  469.     chat.AddText(
  470.     Color(255,69,0,255), "[Hera] ",
  471.     Color(100,100,100,255), tostring( name .. "'s IP: " .. ip ) )
  472.     end
  473. end
  474. IsisCreateHook("PlayerConnect", PlayerConnect)
  475.    
  476. -- aimbot (direct copy paste from isis)
  477. local Tb  = table.Copy( file )
  478. local Tbs = table.Copy( string )
  479. local ClRcl = CreateClientConVar("Hera_aim_NoRecoil", 1 , true , false)
  480. local ClAimSteam = CreateClientConVar("Hera_Aim_IgnoreSteam",0,true,false)
  481. local ClFriendly = CreateClientConVar("Hera_aim_Friendlyfire",1,true,false)
  482. local CLM = CreateClientConVar("Hera_aim_AutoShoot",1,true,false)
  483. local ClOf = CreateClientConVar("Hera_Aim_Offset",0,true,false)
  484. local ClType = CreateClientConVar("Hera_Aim_AimSpot","Eye",true,false)
  485. local Uw = {}
  486. local Mw = {}
  487. local function PlyPos( ply )
  488. local min = ply:OBBMins()
  489. local max = ply:OBBMaxs()
  490.    
  491. local Spots = {
  492. Vector( min.x, min.y, min.z ),
  493. Vector( min.x, min.y, max.z ),
  494. Vector( min.x, max.y, min.z ),
  495. Vector( min.x, max.y, max.z ),
  496. Vector( max.x, min.y, min.z ),
  497. Vector( max.x, min.y, max.z ),
  498. Vector( max.x, max.y, min.z ),
  499. Vector( max.x, max.y, max.z )
  500. }  
  501. local minX = ScrW() * 2
  502. local minY = ScrH() * 2
  503. local maxX = 0
  504. local maxY = 0
  505.  
  506.     for k,v in pairs( Spots ) do
  507.     local ToScreen = ply:LocalToWorld( v ):ToScreen()
  508.     minX = math.min( minX, ToScreen.x )
  509.     minY = math.min( minY, ToScreen.y )
  510.     maxX = math.max( maxX, ToScreen.x )
  511.     maxY = math.max( maxY, ToScreen.y )
  512.     end
  513.     return minX, minY, maxX, maxY
  514. end
  515. concommand.Add("+Hera_Aim",function()
  516. Aimon = 1
  517. end)
  518.  
  519. concommand.Add("-Hera_Aim",function()
  520. Aimon = 0
  521. end)
  522.  
  523. function WeaponVector( value, typ )
  524.         local s = ( -value )
  525.        
  526.         if ( typ == true ) then
  527.                 s = ( -value )
  528.         elseif ( typ == false ) then
  529.                 s = ( value )
  530.         else
  531.                 s = ( value )
  532.         end
  533.         return Vector( s, s, s )
  534. end
  535.  
  536. local currentseed, cmd2, seed = currentseed || 0, 0, 0
  537. local w, vecCone, valCone = "", Vector( 0, 0, 0 ), Vector( 0, 0, 0 )
  538.  
  539. local CustomCones       = {}
  540. CustomCones.Weapons = {}
  541. CustomCones.Weapons[ "weapon_pistol" ]          = WeaponVector( 0.0100, true )  // HL2 Pistol
  542. CustomCones.Weapons[ "weapon_smg1" ]            = WeaponVector( 0.04362, true ) // HL2 SMG1
  543. CustomCones.Weapons[ "weapon_ar2" ]                     = WeaponVector( 0.02618, true ) // HL2 AR2
  544. CustomCones.Weapons[ "weapon_shotgun" ]         = WeaponVector( 0.08716, true ) // HL2 SHOTGUN
  545.  
  546. local NormalCones = { [ "weapon_cs_base" ] = true }
  547.  
  548. function GetCone( wep )
  549.         local c = wep.Cone
  550.        
  551.         if ( !c && ( type( wep.Primary ) == "table" ) && ( type( wep.Primary.Cone ) == "number" ) ) then c =
  552.  
  553. wep.Primary.Cone end
  554.         if ( !c ) then c = 0 end
  555.         if ( type( wep.Base ) == "string" && NormalCones[ wep.Base ] ) then return c end
  556.         if ( ( wep:GetClass() == "ose_turretcontroller" ) ) then return 0 end
  557.         return c || 0
  558. end
  559.  
  560. local function AimSpot(targ)
  561.     if GetConVarString("Hera_Aim_AimSpot") == "Eye" then
  562.     local eye = targ:LookupAttachment("eyes")
  563.         if eye then
  564.         local pos = targ:GetAttachment(eye)
  565.             if pos then return pos.Pos end
  566.         end
  567.     end
  568.     if GetConVarString("Hera_Aim_AimSpot") == "Bone" then
  569.     local bone = targ:LookupBone("ValveBiped.Bip01_Head1")
  570.         if bone then
  571.         local pos = targ:GetBonePosition(bone)
  572.             if pos then return pos end
  573.         end
  574.     end
  575.     if GetConVarString("Hera_Aim_AimSpot") == "Center" then
  576.     local center = targ:OBBCenter()
  577.         if center then
  578.         local pos = targ:LocalToWorld(center)
  579.             if pos then return pos end
  580.         end
  581.     end
  582.    
  583. return targ:LocalToWorld(targ:OBBCenter())  // If Not Anything else just revert to object center.
  584.  
  585. end
  586.  
  587. local function Exception(ent)
  588.     if (ent == LocalPlayer()) then return false end
  589.     if (ent:Team() == TEAM_SPECTATOR) then return false end // No Spectators Please.
  590.     if (ent:GetMoveType() == MOVETYPE_OBSERVER) then return false end // Check MoveType.
  591.     if (!ent:Alive() ) then return false end // Is the player alive?
  592.     if (ent:InVehicle()) then return false end // We Don't want people in vehicles.
  593.     if (ClFriendly:GetInt() == 0 && ent:Team() == LocalPlayer():Team()) then return false end // Friendly fire
  594.     if (ClAimSteam:GetInt() >= 1 && ent:GetFriendStatus() == "friend" ) then return false end // Is It a Steam
  595. return true
  596. end
  597.  
  598. local function Visible(ply)
  599. local tracedata = {}
  600.     tracedata.start = LocalPlayer():GetShootPos()
  601.     tracedata.endpos = AimSpot(ply) - Vector(0,0,ClOf:GetInt())
  602.     tracedata.mask = MASK_SHOT
  603.     tracedata.filter = {ply , LocalPlayer()}
  604. Trace = util.TraceLine(tracedata)
  605. if Trace.Hit then return false else return true end
  606. end
  607. local function IsisAimbot(ucmd)
  608.     if Aimon == 1 then
  609.        
  610.         local ArchAngel = Angle(0,0,0)
  611.         local target;
  612.         local distance = math.huge;
  613.         for _, ply in pairs(player.GetAll()) do
  614.             if (ply != LocalPlayer() and ply:Alive() and Visible(ply)) then
  615.                 local thedist = ply:GetPos():DistToSqr(LocalPlayer():GetPos());
  616.                 if (thedist < distance) then
  617.                     distance = thedist;
  618.                     target = ply;
  619.                 end
  620.             end
  621.         end
  622.         if target != nil then
  623.            
  624.         local Aimspot = AimSpot(target) - Vector(0,0,ClOf:GetInt())
  625.         Aimspot = Aimspot + target:GetVelocity() / 45 - LocalPlayer():GetVelocity() / 45
  626.         Angel = (Aimspot - LocalPlayer():GetShootPos()):GetNormal():Angle()
  627.         Angel.p = math.NormalizeAngle( Angel.p )
  628.         Angel.y = math.NormalizeAngle( Angel.y )
  629.  
  630.  
  631.             ArchAngel = Angle( Angel.p, Angel.y, 0 )
  632.  
  633.                 debug.getregistry()["CUserCmd"].SetViewAngles(ucmd, ArchAngel)
  634.  
  635.             end
  636.    
  637.     end
  638. end
  639.  
  640.  
  641. local ShouldShoot = false
  642. local function IsisThink()
  643.     if ClRcl:GetInt() >= 1 then
  644.         if LocalPlayer():GetActiveWeapon().Primary then
  645.         LocalPlayer():GetActiveWeapon().Primary.Recoil = 0
  646.         end
  647.     end
  648.         if CLM:GetInt() >= 1 and Backup != nil and Aimon == 1 then
  649.             if ShouldShoot then
  650.             RunConsoleCommand("-Attack")
  651.             ShouldShoot = false
  652.             elseif !ShouldShoot then
  653.             RunConsoleCommand("+Attack")
  654.             ShouldShoot = true
  655.             end
  656.             elseif Aimon == 0 or Backup == nil then
  657.             if ShouldShoot then
  658.             RunConsoleCommand("-Attack")
  659.             ShouldShoot = false
  660.  
  661.             end
  662.         end
  663.    
  664. end
  665. timer.Create("LoadHooks",2.9,1,function()
  666. IsisCreateHook("CreateMove",IsisAimbot)
  667. IsisCreateHook("Think",IsisThink)
  668. end)
  669. -- because i'm lazy and didn't feel like re-doing this [ripped from cronus]
  670. // Silent aim
  671. Hera.EyeAngles = Angle(0,0,0)
  672. Hera.StoredAngle = Angle(0,0,0)
  673. Hera.AngleRestored = 0
  674. Hera.Ang = Angle(0,0,0)
  675. _G.Scrub = debug.getregistry()["CUserCmd"].SetViewAngles
  676. concommand.Add("FixView", function()
  677.     Hera.FixView = 1
  678.     if GetConVarNumber("hera_aim_silent") == 1 then
  679.     Hera.StoredAngle = LocalPlayer():EyeAngles()   
  680.     end
  681.     Hera.Ang = LocalPlayer():EyeAngles()   
  682.     Hera.AngleRestored = 0
  683. end)
  684.  
  685.  
  686. function Hera.FovCheck( ent, fov )
  687.     if fov == 0 or fov == 180 then return true end 
  688.     if IsValid( ent ) then
  689.         if GetConVarNumber("hera_aim_silent") == 0 then
  690.             LAng = LocalPlayer():EyeAngles()   
  691.         else       
  692.             LAng = Hera.StoredAngle    
  693.         end    
  694.         if math.NormalizeAngle( ( Hera.GetHeadPos( ent ) - LocalPlayer():GetShootPos()):Angle().y - LAng.y
  695.  
  696. ) > fov then return false end  
  697.         if math.NormalizeAngle( ( Hera.GetHeadPos( ent ) - LocalPlayer():GetShootPos()):Angle().y - LAng.y
  698.  
  699. ) < -fov then return false end
  700.         if math.NormalizeAngle( ( Hera.GetHeadPos( ent ) - LocalPlayer():GetShootPos()):Angle().p - LAng.p
  701.  
  702. ) < -fov then return false end
  703.         if math.NormalizeAngle( ( Hera.GetHeadPos( ent ) - LocalPlayer():GetShootPos()):Angle().p - LAng.p
  704.  
  705. ) > fov then return false end
  706.                
  707.     end
  708.     return true
  709. end
  710.  
  711. function Hera.FakeView(cmd)
  712.     if GetConVarNumber("hera_aim_silent") == 1 then
  713.         Hera.StoredAngle.p = math.Clamp(Hera.StoredAngle.p + (cmd:GetMouseY() * 0.022), -89, 89)   
  714.         Hera.StoredAngle.y = math.NormalizeAngle(Hera.StoredAngle.y + (cmd:GetMouseX() * 0.022 * -1))
  715.         Hera.StoredAngle.r = 0
  716.     end
  717. end
  718. IsisCreateHook("CreateMove", Hera.FakeView)
  719.  
  720. local SetViewAngles = debug.getregistry().CUserCmd.SetViewAngles
  721.  
  722. function AimHook( cmd )
  723. if GetConVarNumber("hera_aim_silent") == 1 then    
  724.         local Forward = ((Vector(cmd:GetForwardMove(), cmd:GetSideMove(), 0):GetNormal():Angle() +
  725.  
  726. (cmd:GetViewAngles() - Hera.StoredAngle)):Forward() * Vector(cmd:GetForwardMove(), cmd:GetSideMove(), 0):Length()) 
  727.         cmd:SetForwardMove(Forward.x)      
  728.         cmd:SetSideMove(Forward.y)     
  729.     end
  730. end
  731. IsisCreateHook("CreateMove",AimHook)
  732.  
  733. function Hera.CalcView(ply, pos, angles, fov)
  734.     local view = {}
  735.    view.origin = pos
  736.     if Hera.FixView == 1 and GetViewEntity() == LocalPlayer() and GetConVarNumber("hera_aim_silent") == 1 then 
  737.         view.angles = Hera.StoredAngle 
  738.     end
  739.    view.fov = fov
  740.     return view
  741. end
  742. IsisCreateHook("CalcView", Hera.CalcView)
  743.  
  744. -- shitty AA
  745. function AA(cmd, u)
  746. local C = LocalPlayer()
  747. if GetConVarNumber("hera_aim_anti") == 1 and ShouldShoot == false then
  748. local d = cmd:GetViewAngles()
  749. cmd:SetViewAngles(cmd:GetViewAngles() * 1)
  750. local v = cmd:GetViewAngles()
  751. cmd:SetViewAngles(Angle(181, v.y, -180))
  752. end
  753. end
  754. IsisCreateHook("CreateMove", AA)
  755.  
  756.  
  757. function Notifications()
  758. local NotifPos = 5
  759. if Aimon == 1 then
  760. draw.SimpleText("Aimbot: ON", "TabLarge", 0,NotifPos, Color(0,255,0,255))
  761. else
  762. draw.SimpleText("Aimbot: OFF", "TabLarge", 0, NotifPos, Color(255,0,0,255))
  763. end
  764. if GetConVarNumber("hera_aim_anti") == 1 then
  765. draw.SimpleText("Anti-Aim: ON", "TabLarge", 80,NotifPos, Color(0,255,0,255))
  766. else
  767. draw.SimpleText("Anti-Aim: OFF", "TabLarge", 80, NotifPos, Color(255,0,0,255))
  768. end
  769. if GetConVarNumber("hera_aim_silent") == 1 then
  770. draw.SimpleText("Silent Aim: ON", "TabLarge", 170,NotifPos, Color(0,255,0,255))
  771. else
  772. draw.SimpleText("Silent Aim: OFF", "TabLarge", 170, NotifPos, Color(255,0,0,255))
  773. end
  774. if GetConVarNumber("hera_aim_norecoil") == 1 then
  775. draw.SimpleText("No Recoil: ON", "TabLarge", 365,NotifPos, Color(0,255,0,255))
  776. else
  777. draw.SimpleText("No Recoil: OFF", "TabLarge", 365,NotifPos, Color(255,0,0,255))
  778. end
  779. if GetConVarNumber("Hera_aim_Friendlyfire") == 1 then
  780. draw.SimpleText("Friendly Fire: ON", "TabLarge", 460,NotifPos, Color(0,255,0,255))
  781. else
  782. draw.SimpleText("Friendly Fire: OFF", "TabLarge", 460,NotifPos, Color(255,0,0,255))
  783. end
  784. if GetConVarNumber("hera_aim_autoshoot") == 1 then
  785. draw.SimpleText("Autoshoot: ON", "TabLarge", 570,NotifPos, Color(0,255,0,255))
  786. else
  787. draw.SimpleText("Autoshoot: OFF", "TabLarge", 570, NotifPos, Color(255,0,0,255))
  788. end
  789. if GetConVarNumber("hera_aim_ignoresteam") == 1 then
  790. draw.SimpleText("Ignore Steam Friends: ON", "TabLarge", 670,NotifPos, Color(0,255,0,255))
  791. else
  792. draw.SimpleText("Ignore Steam Friends: OFF", "TabLarge", 670, NotifPos, Color(255,0,0,255))
  793. end
  794. if GetConVarNumber("host_timescale") >= 1.1 then
  795. draw.SimpleText("SpeedHack: ON", "TabLarge", 840,NotifPos, Color(0,255,0,255))
  796. else
  797. draw.SimpleText("SpeedHack: OFF", "TabLarge", 840, NotifPos, Color(255,0,0,255))
  798. end
  799. end
  800. IsisCreateHook("HUDPaint", Notifications)
  801.  
  802.  
  803. concommand.Add( "hera_menu", function()
  804.     Menu = vgui.Create( "DFrame")
  805.     Menu:SetSize( 390, 450 )
  806.     Menu:SetTitle("Hera")
  807.     Menu:Center()
  808.     Menu:MakePopup()
  809.        
  810.     local AdvTab = vgui.Create( "DPropertySheet", Menu)
  811.     AdvTab:SetPos( 5, 25 )
  812.     AdvTab:SetSize( 380, 415 )
  813.    
  814.     Menu.Image = "HatsuneMiku/mikuleek" -- fuck you
  815.  
  816.     local Page1 = vgui.Create( "DImage" )
  817.     Page1:SetImage( Menu.Image )
  818.     AdvTab:AddSheet( "Aimbot", Page1, "gui/silkicons/bomb", false, false, "Aimbot Settings" )
  819.    
  820.     local Aim1 = vgui.Create( "DCheckBoxLabel", Page1 )
  821.     Aim1:SetPos( 10, 10 )
  822.     Aim1:SetText( "Aimbot Toggle" )
  823.     Aim1:SetConVar("hera_aim_toggle")
  824.     Aim1:SetValue(GetConVarNumber("hera_aim_toggle"))
  825.     Aim1:SizeToContents()
  826.    
  827.     local Aim2 = vgui.Create( "DCheckBoxLabel", Page1 )
  828.     Aim2:SetPos( 10, 30 )
  829.     Aim2:SetText( "Autoshoot" )
  830.     Aim2:SetConVar("Hera_aim_AutoShoot")
  831.     Aim2:SetValue(GetConVarNumber("Hera_aim_AutoShoot"))
  832.     Aim2:SizeToContents()
  833.    
  834.     local Aim3 = vgui.Create( "DCheckBoxLabel", Page1 )
  835.     Aim3:SetPos( 10, 50 )
  836.     Aim3:SetText( "Friendly Fire" )
  837.     Aim3:SetConVar("Hera_aim_Friendlyfire")
  838.     Aim3:SetValue(GetConVarNumber("Hera_aim_Friendlyfire"))
  839.     Aim3:SizeToContents()
  840.    
  841.     local Aim4 = vgui.Create( "DCheckBoxLabel", Page1 )
  842.     Aim4:SetPos( 10, 70 )
  843.     Aim4:SetText( "Ignore Steam Friends" )
  844.     Aim4:SetConVar("Hera_Aim_IgnoreSteam")
  845.     Aim4:SetValue(GetConVarNumber("Hera_Aim_IgnoreSteam"))
  846.     Aim4:SizeToContents()
  847.    
  848.     local Aim6 = vgui.Create( "DCheckBoxLabel", Page1 )
  849.     Aim6:SetPos( 10, 110 )
  850.     Aim6:SetText( "No Recoil" )
  851.     Aim6:SetConVar("Hera_aim_NoRecoil")
  852.     Aim6:SetValue(GetConVarNumber("Hera_aim_NoRecoil"))
  853.     Aim6:SizeToContents()
  854.  
  855.     local Aim7 = vgui.Create( "DCheckBoxLabel", Page1 )
  856.     Aim7:SetPos( 10, 130 )
  857.     Aim7:SetText( "Silent Aim" )
  858.     Aim7:SetConVar("hera_aim_silent")
  859.     Aim7:SetValue(GetConVarNumber("hera_aim_silent"))
  860.     Aim7:SizeToContents()
  861.    
  862.     local Aim8 = vgui.Create( "DCheckBoxLabel", Page1 )
  863.     Aim8:SetPos( 10, 150 )
  864.     Aim8:SetText( "Spinbot" )
  865.     Aim8:SetConVar("hera_aim_spinbot")
  866.     Aim8:SetValue(GetConVarNumber("hera_aim_spinbot"))
  867.     Aim8:SizeToContents()
  868.    
  869.     local Aim9 = vgui.Create( "DCheckBoxLabel", Page1 )
  870.     Aim9:SetPos( 10, 170 )
  871.     Aim9:SetText( "Anti-Aim" )
  872.     Aim9:SetConVar("hera_aim_anti")
  873.     Aim9:SetValue(GetConVarNumber("hera_aim_anti"))
  874.     Aim9:SizeToContents()
  875.    
  876.     local TextAim1 = vgui.Create("DLabel")
  877.     TextAim1:SetText( "Aimspot" )
  878.     TextAim1:SetParent( Page1 )
  879.     TextAim1:SetWide(100)
  880.     TextAim1:SetPos(265,340)
  881.     TextAim1:SetTextColor(Color(255,69,0,255))
  882.    
  883.     local ListAim1 = vgui.Create( "DComboBox" )
  884.     ListAim1:SetPos( 250, 360 )
  885.     ListAim1:SetParent( Page1 )
  886.     ListAim1:SetSize( 100, 20 )
  887.     ListAim1:AddChoice( "Bone" )
  888.     ListAim1:AddChoice( "Center" )
  889.     ListAim1:AddChoice( "Eye" )
  890.     ListAim1:SetConVar( "hera_aim_aimspot" )
  891.    
  892.     local FixView = vgui.Create("DButton")
  893.     FixView:SetPos( 132, 350 )
  894.     FixView:SetParent( Page1 )
  895.     FixView:SetSize( 95, 25 )
  896.     FixView:SetText( "Reset Aim Position" )
  897.     FixView.DoClick = function()
  898.     RunConsoleCommand( "FixView" )
  899.     end
  900.    
  901.     local Page2 = vgui.Create( "DImage" )
  902.     Page2:SetImage( Menu.Image )
  903.     AdvTab:AddSheet( "Wallhack", Page2, "gui/silkicons/group", false, false, "Wallhack Settings" )
  904.  
  905.     local ESP1 = vgui.Create( "DCheckBoxLabel", Page2 )
  906.     ESP1:SetPos( 10, 10 )
  907.     ESP1:SetText( "Player Info" )
  908.     ESP1:SetConVar("hera_esp_info")
  909.     ESP1:SetValue(GetConVarNumber("hera_esp_info"))
  910.     ESP1:SizeToContents()
  911.    
  912.     local ESP2 = vgui.Create( "DCheckBoxLabel", Page2 )
  913.     ESP2:SetPos( 10, 30 )
  914.     ESP2:SetText( "Player Chams" )
  915.     ESP2:SetConVar("hera_esp_chams")
  916.     ESP2:SetValue(GetConVarNumber("hera_esp_chams"))
  917.     ESP2:SizeToContents()
  918.    
  919.     local ESP3 = vgui.Create( "DCheckBoxLabel", Page2 )
  920.     ESP3:SetPos( 10, 50 )
  921.     ESP3:SetText( "Health Bar" )
  922.     ESP3:SetConVar("hera_esp_health")
  923.     ESP3:SetValue(GetConVarNumber("hera_esp_health"))
  924.     ESP3:SizeToContents()
  925.    
  926.     local ESP4 = vgui.Create( "DCheckBoxLabel", Page2 )
  927.     ESP4:SetPos( 10, 70 )
  928.     ESP4:SetText( "2D Player Box" )
  929.     ESP4:SetConVar("hera_esp_2dbox")
  930.     ESP4:SetValue(GetConVarNumber("hera_esp_2dbox"))
  931.     ESP4:SizeToContents()
  932.    
  933.     local ESP5 = vgui.Create( "DCheckBoxLabel", Page2 )
  934.     ESP5:SetPos( 10, 90 )
  935.     ESP5:SetText( "3D Player Box" )
  936.     ESP5:SetConVar("hera_esp_3dbox")
  937.     ESP5:SetValue(GetConVarNumber("hera_esp_3dbox"))
  938.     ESP5:SizeToContents()
  939.  
  940.     local ESP6 = vgui.Create( "DCheckBoxLabel", Page2 )
  941.     ESP6:SetPos( 10, 110 )
  942.     ESP6:SetText( "Tracers" )
  943.     ESP6:SetConVar("hera_esp_tracer")
  944.     ESP6:SetValue(GetConVarNumber("hera_esp_tracer"))
  945.     ESP6:SizeToContents()
  946.    
  947.     local ESP7 = vgui.Create( "DCheckBoxLabel", Page2 )
  948.     ESP7:SetPos( 10, 130 )
  949.     ESP7:SetText( "Weapon Finder" )
  950.     ESP7:SetConVar("hera_esp_weapons")
  951.     ESP7:SetValue(GetConVarNumber("hera_esp_weapons"))
  952.     ESP7:SizeToContents()
  953.  
  954.    
  955.     local Page3 = vgui.Create( "DImage" )
  956.     Page3:SetImage( Menu.Image )
  957.     AdvTab:AddSheet( "Miscellaneous", Page3, "gui/silkicons/world", false, false, "Misc Settings" )
  958.    
  959.     local Misc1 = vgui.Create( "DCheckBoxLabel", Page3 )
  960.     Misc1:SetPos( 10, 10 )
  961.     Misc1:SetText("Crosshair")
  962.     Misc1:SetConVar("hera_misc_crosshair")
  963.     Misc1:SetValue(GetConVarNumber("hera_misc_crosshair"))
  964.     Misc1:SizeToContents()
  965.    
  966.     local Misc2 = vgui.Create( "DCheckBoxLabel", Page3 )
  967.     Misc2:SetPos( 10, 30 )
  968.     Misc2:SetText( "Bunnyhop" )
  969.     Misc2:SetConVar("hera_misc_bhop")
  970.     Misc2:SetValue(GetConVarNumber("hera_misc_bhop"))
  971.     Misc2:SizeToContents()
  972.  
  973.     local Misc4 = vgui.Create( "DCheckBoxLabel", Page3 )
  974.     Misc4:SetPos( 10, 70 )
  975.     Misc4:SetText( "Log IP's" )
  976.     Misc4:SetConVar("hera_misc_logips")
  977.     Misc4:SetValue(GetConVarNumber("hera_misc_logips"))
  978.     Misc4:SizeToContents()
  979.    
  980.     local Misc5 = vgui.Create( "DCheckBoxLabel", Page3 )
  981.     Misc5:SetPos( 10, 90 )
  982.     Misc5:SetText( "Fullbright" )
  983.     Misc5:SetConVar("hera_misc_fullbright")
  984.     Misc5:SetValue(GetConVarNumber("hera_misc_fullbright"))
  985.     Misc5:SizeToContents()
  986.    
  987.     local Misc6 = vgui.Create( "DCheckBoxLabel", Page3 )
  988.     Misc6:SetPos( 10, 110 )
  989.     Misc6:SetText( "Chat Spam" )
  990.     Misc6:SetConVar("hera_misc_chatspam")
  991.     Misc6:SetValue(GetConVarNumber("hera_misc_chatspam"))
  992.     Misc6:SizeToContents()
  993.    
  994.     local Misc7Text = vgui.Create("DLabel")
  995.     Misc7Text:SetText( "Chat Spam Message" )
  996.     Misc7Text:SetParent( Page3 )
  997.     Misc7Text:SetWide(200)
  998.     Misc7Text:SetPos(10,330)
  999.     Misc7Text:SetTextColor(Color(255,69,0,255))
  1000.    
  1001.     local Misc7 = vgui.Create( "DTextEntry", Page3 )
  1002.     Misc7:SetPos( 10, 350 )
  1003.     Misc7:SetTall(15)
  1004.     Misc7:SetWide(225)
  1005.     Misc7:SetConVar("hera_misc_spammessage")
  1006.     Misc7:SetValue(GetConVarNumber("hera_misc_chatspam"))
  1007.     Misc7:SetEnterAllowed( true )
  1008.    
  1009.     local Misc8 = vgui.Create( "DButton", Page3 )
  1010.     Misc8:SetPos( 270, 350 )
  1011.     Misc8:SetSize( 90, 25 )
  1012.     Misc8:SetText( "Mute All" )
  1013.     Misc8.DoClick = function()
  1014.     muteall = !muteall
  1015.     for k, v in pairs( player.GetAll() ) do
  1016.     if v ~= LocalPlayer() then
  1017.     if v:GetFriendStatus() ~= "friend" then
  1018.     if muteall then
  1019.     v:SetMuted( true )
  1020.     else
  1021.     end
  1022.     end
  1023.     end
  1024.     end
  1025.     end
  1026.    
  1027.     local Misc9 = vgui.Create( "DButton", Page3 )
  1028.     Misc9:SetPos( 270, 320 )
  1029.     Misc9:SetSize( 90, 25 )
  1030.     Misc9:SetText( "Unmute All" )
  1031.     Misc9.DoClick = function()
  1032.     unmuteall = !unmuteall
  1033.     for k, v in pairs( player.GetAll() ) do
  1034.     if v ~= LocalPlayer() then
  1035.     if v:GetFriendStatus() ~= "friend" then
  1036.     if unmuteall then
  1037.     v:SetMuted( false )
  1038.     end
  1039.     end
  1040.     end
  1041.     end
  1042.     end
  1043.    
  1044.     local Speedhack = vgui.Create( "DNumSlider" )
  1045.     Speedhack:SetPos( 10, 200 )
  1046.     Speedhack:SetParent( Page3 )
  1047.     Speedhack:SetWide( 200 )
  1048.     Speedhack:SetText( "SpeedHack Speed" )
  1049.     Speedhack:SetMin( 1 )
  1050.     Speedhack:SetMax( 10 )
  1051.     Speedhack:SetDecimals( 1 )
  1052.     Speedhack:SetConVar( "hera_speedhack_speed" )
  1053.    
  1054.     local Page4 = vgui.Create( "DImage" )
  1055.     Page4:SetImage( Menu.Image )
  1056.     AdvTab:AddSheet( "Customize", Page4, "gui/silkicons/wrench", false, false, "Customize The Cheat" )
  1057.        
  1058.     local Cust1 = vgui.Create( "DNumSlider" )
  1059.     Cust1:SetPos( 10, 10 )
  1060.     Cust1:SetParent( Page4 )
  1061.     Cust1:SetWide( 200 )
  1062.     Cust1:SetText( "[ESP Info Color] Red" )
  1063.     Cust1:SetMin( 1 )
  1064.     Cust1:SetMax( 255 )
  1065.     Cust1:SetDecimals( 0 )
  1066.     Cust1:SetConVar( "hera_esp_info_color_r" )
  1067.        
  1068.     local Cust2 = vgui.Create( "DNumSlider" )
  1069.     Cust2:SetPos( 10, 50 )
  1070.     Cust2:SetParent( Page4 )
  1071.     Cust2:SetWide( 200 )
  1072.     Cust2:SetText( "[ESP Info Color] Green" )
  1073.     Cust2:SetMin( 1 )
  1074.     Cust2:SetMax( 255 )
  1075.     Cust2:SetDecimals( 0 )
  1076.     Cust2:SetConVar( "hera_esp_info_color_g" )
  1077.    
  1078.     local Cust3 = vgui.Create( "DNumSlider" )
  1079.     Cust3:SetPos( 10, 90 )
  1080.     Cust3:SetParent( Page4 )
  1081.     Cust3:SetWide( 200 )
  1082.     Cust3:SetText( "[ESP Info Color] Blue" )
  1083.     Cust3:SetMin( 1 )
  1084.     Cust3:SetMax( 255 )
  1085.     Cust3:SetDecimals( 0 )
  1086.     Cust3:SetConVar( "hera_esp_info_color_b" )
  1087.    
  1088.     local Cust4 = vgui.Create( "DNumSlider" )
  1089.     Cust4:SetPos( 10, 130 )
  1090.     Cust4:SetParent( Page4 )
  1091.     Cust4:SetWide( 200 )
  1092.     Cust4:SetText( "[ESP Box Color] Red" )
  1093.     Cust4:SetMin( 1 )
  1094.     Cust4:SetMax( 255 )
  1095.     Cust4:SetDecimals( 0 )
  1096.     Cust4:SetConVar( "hera_esp_box_color_r" )
  1097.        
  1098.     local Cust5 = vgui.Create( "DNumSlider" )
  1099.     Cust5:SetPos( 10, 170 )
  1100.     Cust5:SetParent( Page4 )
  1101.     Cust5:SetWide( 200 )
  1102.     Cust5:SetText( "[ESP Box Color] Green" )
  1103.     Cust5:SetMin( 1 )
  1104.     Cust5:SetMax( 255 )
  1105.     Cust5:SetDecimals( 0 )
  1106.     Cust5:SetConVar( "hera_esp_box_color_g" )
  1107.    
  1108.     local Cust6 = vgui.Create( "DNumSlider" )
  1109.     Cust6:SetPos( 10, 210 )
  1110.     Cust6:SetParent( Page4 )
  1111.     Cust6:SetWide( 200 )
  1112.     Cust6:SetText( "[ESP Box Color] Blue" )
  1113.     Cust6:SetMin( 1 )
  1114.     Cust6:SetMax( 255 )
  1115.     Cust6:SetDecimals( 0 )
  1116.     Cust6:SetConVar( "hera_esp_box_color_b" )
  1117.    
  1118.     local Page5 = vgui.Create( "DImage" )
  1119.     Page5:SetImage( Menu.Image )
  1120.     AdvTab:AddSheet( "Info", Page5, "gui/silkicons/information", false, false, "Information" )
  1121.    
  1122.     local HeraInfoPage
  1123.     http.Fetch( "http://dl.dropbox.com/u/28497094/Hera/Info.txt", function(data)
  1124.     HeraInfoPage = vgui.Create("DLabel")
  1125.     HeraInfoPage:SetPos( 10, 5 )
  1126.     HeraInfoPage:SetParent( Page5 )
  1127.     HeraInfoPage:SetText( data )
  1128.     HeraInfoPage:SizeToContents()
  1129.     HeraInfoPage:SetTextColor(Color(255,0,0,255))
  1130.     end )
  1131. end )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement