Tidas

Untitled

Jun 26th, 2013
159
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.78 KB | None | 0 0
  1. local set = CreateClientConVar("bio", 0, FCVAR_SERVER_CAN_EXECUTE)
  2. local glowMaterial = Material("sprites/glow04_noz");
  3. local glowColor = Color(0, 162, 255, 255);
  4.  
  5. hook.Add( "HUDPaint", "Tracking", function()
  6. if(Schema:PlayerIsCombine(LocalPlayer())) then
  7. if(string.find(name, "EpU") or string.find(name, "DvL") or string.find(name, "SeC") or string.find(name, "CmD") or string.find(name, "OfC")) then
  8. for k, v in pairs(player.GetAll()) do
  9. local pos = v:GetPos()
  10. if(v:Health() > 0 and v:HasInitialized() and v != LocalPlayer() and Schema:PlayerIsCombine(v)) then
  11. if(set:GetInt() == 1) then
  12. local distance = math.floor(tostring(LocalPlayer():GetPos():Distance(v:GetPos()) / 16 * .3048))
  13. draw.SimpleTextOutlined(v:Name(), "DebugFixed", v:EyePos():ToScreen().x, v:EyePos():ToScreen().y - 20, Color(255, 255, 255), 1, 1, 1, Color(0, 0, 0))
  14. if(distance == 1) then
  15. draw.SimpleTextOutlined("<:: Distance | "..distance.." meter", "DebugFixed", v:EyePos():ToScreen().x + 132, v:EyePos():ToScreen().y + 20, Color(255, 255, 255), 1, 1, 1, Color(0, 0, 0))
  16. else
  17. draw.SimpleTextOutlined("<:: Distance | "..distance.." meters", "DebugFixed", v:EyePos():ToScreen().x + 132, v:EyePos():ToScreen().y + 20, Color(255, 255, 255), 1, 1, 1, Color(0, 0, 0))
  18. end;
  19. draw.SimpleTextOutlined("<:: Health | "..v:Health(), "DebugFixed", v:EyePos():ToScreen().x + 105, v:EyePos():ToScreen().y, Color(255, 255, 255), 1, 1, 1, Color(0, 0, 0))
  20. end;
  21. cam.Start3D( EyePos(), EyeAngles() );
  22. render.SetMaterial(glowMaterial);
  23. render.DrawSprite(Vector(pos.x, pos.y, pos.z + 75), LocalPlayer():GetPos():Distance(v:GetPos()) / 20, LocalPlayer():GetPos():Distance(v:GetPos()) / 20, glowColor);
  24. cam.End3D();
  25. end;
  26. end;
  27. end;
  28. end;
  29. end);
Advertisement
Add Comment
Please, Sign In to add comment