Advertisement
princeofheaven

Untitled

Jul 17th, 2015
233
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.68 KB | None | 0 0
  1. me = game.Players.PrinceOfHeaven
  2. char = me.Character
  3. torso = char.Torso
  4. dist = 50
  5. mapsize = 160
  6.  
  7. function makeguis(parent)
  8. local tab = {}
  9. for i,v in pairs(game.Players:GetPlayers()) do
  10. local c = v.Character
  11. if c then
  12. local t = c:findFirstChild("Torso")
  13. if t then
  14. local mag = (torso.Position - t.Position).magnitude
  15. if mag < dist-5 then
  16. local g = Instance.new("ImageLabel",parent)
  17. g.Size = UDim2.new(0, (mapsize/8)-(mag/(mapsize/50)), 0, (mapsize/8)-(mag/(mapsize/50)))
  18. g.BackgroundTransparency = 1
  19. g.Image = "http://www.roblox.com/asset/?id=42302520"
  20. table.insert(tab, {t, g})
  21. end
  22. end
  23. end
  24. end
  25. return tab
  26. end
  27.  
  28. sc = Instance.new("ScreenGui")
  29. sc.Name = "Map"
  30.  
  31. fr = Instance.new("ImageLabel",sc)
  32. fr.Size = UDim2.new(0,mapsize*2,0,mapsize*2)
  33. fr.Position = UDim2.new(0,10,0.5,-50)
  34. fr.BackgroundTransparency = 1
  35. fr.Image = "http://www.roblox.com/asset/?id=42302151"
  36.  
  37. meh = Instance.new("ImageLabel",fr)
  38. meh.Size = UDim2.new(0,mapsize/7,0,mapsize/7)
  39. meh.Position = UDim2.new(0.5,-meh.Size.X.Offset/2,0.5,-meh.Size.Y.Offset/2)
  40. meh.BackgroundTransparency = 1
  41. meh.Image = "http://www.roblox.com/asset/?id=42302520"
  42.  
  43. sc.Parent = me.PlayerGui
  44.  
  45. while true do
  46. local guys = makeguis(meh)
  47. local lol = {}
  48. for i,v in pairs(guys) do
  49. local a, b, c = workspace.CurrentCamera.CoordinateFrame:toEulerAnglesXYZ()
  50. local lolpos = CFrame.new(torso.CFrame.p) * CFrame.fromEulerAnglesXYZ(0,b,0)
  51. local pos = lolpos:pointToObjectSpace(v[1].Position)
  52. v[2].Position = UDim2.new(0, pos.X*(mapsize/(mapsize/3)), 0, pos.Z*(mapsize/(mapsize/3)))
  53. table.insert(lol, v[2])
  54. end
  55. wait()
  56. for i,v in pairs(lol) do v:remove() end
  57. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement