Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function MySeer()
- --print("START!!!")
- if SeerWork == nil or SeerWork then SeerWork = false else SeerWork = true end
- function CreateInstance(cls,props)
- local inst = Instance.new(cls)
- for i,v in pairs(props) do
- inst[i] = v
- end
- return inst
- end
- function NewGui()
- local Gui = CreateInstance("BillboardGui", {Name = "Seer", ExtentsOffset = Vector3.new(0, 2, 0), Size = UDim2.new(0, 120, 0, 60), Active = true, AlwaysOnTop = true, LightInfluence = 1, ClipsDescendants = true, ZIndexBehavior = 1})
- local Gui2 = CreateInstance("Frame", {BackgroundColor3 = Color3.fromRGB(255, 255, 0), BackgroundTransparency = 0.5, BorderColor3 = Color3.fromRGB(0, 0, 255), BorderMode = 2, BorderSizePixel = 2, Size = UDim2.new(0, 120, 0, 60), Parent = Gui})
- local Gui3 = CreateInstance("TextLabel", {Text = "?", Name = "T", Font = 3, TextScaled = true, BackgroundTransparency = 1, TextStrokeTransparency = 0, BackgroundColor3 = Color3.fromRGB(255, 255, 255), Position = UDim2.new(0, 0, 0, -2), Size = UDim2.new(0, 120, 0, 20), TextColor3 = Color3.fromRGB(255, 255, 255), TextStrokeColor3 = Color3.fromRGB(255, 170, 0), Parent = Gui2})
- local Gui3 = CreateInstance("TextLabel", {Text = "?/? d: ?", Name = "T2", Font = 3, TextScaled = true, BackgroundTransparency = 1, TextStrokeTransparency = 0, BackgroundColor3 = Color3.fromRGB(255, 255, 255), Position = UDim2.new(0, 0, 0, 17), Size = UDim2.new(0, 120, 0, 20), TextColor3 = Color3.fromRGB(255, 255, 255), TextStrokeColor3 = Color3.fromRGB(255, 170, 0), Parent = Gui2})
- local Gui3 = CreateInstance("TextLabel", {Text = "0,0,0 0,0,0", Name = "T3", Font = 3, TextScaled = true, BackgroundTransparency = 1, TextStrokeTransparency = 0, BackgroundColor3 = Color3.fromRGB(255, 255, 255), Position = UDim2.new(0, 0, 0, 36), Size = UDim2.new(0, 120, 0, 20), TextColor3 = Color3.fromRGB(255, 255, 255), TextStrokeColor3 = Color3.fromRGB(255, 170, 0), Parent = Gui2})
- return Gui
- end
- function NewPlayer(Player)
- local Name = Player.Name
- --print("New seer added: " .. Name)
- local Model = game.Workspace:WaitForChild(Name)
- local Head = Model:WaitForChild("Head")
- local Gui = NewGui()
- Gui.Parent = Head
- end
- function Distance(PosA, PosB)
- local X = PosA.X - PosB.X
- local Y = PosA.Y - PosB.Y
- local Z = PosA.Z - PosB.Z
- return math.floor(math.sqrt(X * X + Y * Y + Z * Z))
- end
- local Me = game.Players.LocalPlayer
- local MeName = Me.Name
- local Health, MHealth
- local MeModel, MeHead, MePos
- local Name, Model, Head, Gui, R, Pos, Vel
- local SW2 = false
- while wait() do
- if SeerWork then SW2 = true end
- for _, Player in pairs(game.Players:children()) do
- Name = Player.Name
- Model = game.Workspace:FindFirstChild(Name)
- if Model ~= nil then
- Head = Model:FindFirstChild("Head")
- if Head ~= nil then
- Gui = Head:FindFirstChild("Seer")
- if Gui == nil then
- if not SW2 then NewPlayer(Player) end
- elseif SW2 then
- Gui:Destroy()
- else
- Gui.Frame.T.Text = Name
- local Human = Model:FindFirstChild("Humanoid")
- if Human == nil then
- Health = "?"
- MHealth = "?"
- else
- Health = Human.Health
- MHealth = Human.MaxHealth
- end
- R = "?"
- Pos = Head.Position
- Vel = Head.Velocity
- MeModel = game.Workspace:FindFirstChild(MeName)
- if MeModel ~= nil then
- MeHead = MeModel:FindFirstChild("Head")
- if MeHead ~= nil then
- MePos = MeHead.Position
- R = Distance(Pos, MePos)
- end
- end
- Gui.Frame.T2.Text = Health .. "/" .. MHealth .. " d: " .. R
- Gui.Frame.T3.Text = math.floor(Pos.X) .. "," .. math.floor(Pos.Y) .. "," .. math.floor(Pos.Z) .. " " .. math.floor(Vel.X) .. "," .. math.floor(Vel.Y) .. "," .. math.floor(Vel.Z)
- end
- end
- end
- end
- if SW2 then break end
- end
- --print("MAY!!!")
- end
- MySeer()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement