Tidas

Untitled

Jun 26th, 2013
185
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.61 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. for k, v in pairs(player.GetAll()) do
  7. local pos = v:GetPos()
  8. if(v:IsAlive() and v:HasInitialized()) then
  9. cam.Start3D( EyePos(), EyeAngles() );
  10. render.SetMaterial(glowMaterial);
  11. render.DrawSprite(Vector(pos.x, pos.y, pos.z + 75), LocalPlayer():GetPos():Distance(v:GetPos()) / 20, LocalPlayer():GetPos():Distance(v:GetPos()) / 20, glowColor);
  12. cam.End3D();
  13.  
  14. 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))
  15. if(v:GetVelocity():Length() != 0) then
  16. draw.SimpleTextOutlined("<:: Velocity | "..tostring(v:GetVelocity():Length()), "DebugFixed", v:EyePos():ToScreen().x + 155, v:EyePos():ToScreen().y + 20, Color(255, 255, 255), 1, 1, 1, Color(0, 0, 0))
  17. else
  18. draw.SimpleTextOutlined("<:: Velocity | "..tostring(v:GetVelocity():Length()), "DebugFixed", v:EyePos():ToScreen().x + 105, v:EyePos():ToScreen().y + 20, Color(255, 255, 255), 1, 1, 1, Color(0, 0, 0))
  19. end;
  20. draw.SimpleTextOutlined("<:: Distance | "..tostring(LocalPlayer():GetPos():Distance(v:GetPos())), "DebugFixed", v:EyePos():ToScreen().x + 105, v:EyePos():ToScreen().y + 40, Color(255, 255, 255), 1, 1, 1, Color(0, 0, 0))
  21. 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))
  22. end;
  23. end;
  24. end);
Advertisement
Add Comment
Please, Sign In to add comment