Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- Made by Memo1332
- -- Objects
- local Bill = Instance.new("BillboardGui")
- local currentBill = nil
- local Frame = Instance.new("Frame")
- local TextLabel = Instance.new("TextLabel")
- -- Properties
- Bill.Name = "Bill"
- Bill.Parent = nil
- Bill.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
- Bill.Active = true
- Bill.Size = UDim2.new(0, 40, 0, 40)
- Bill.AlwaysOnTop = true
- Frame.Parent = Bill
- Frame.BackgroundColor3 = Color3.new(1, 1, 1)
- Frame.BackgroundTransparency = 1
- Frame.Size = UDim2.new(1, 0, 1, 0)
- TextLabel.Parent = Frame
- TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
- TextLabel.BackgroundTransparency = 1
- TextLabel.Size = UDim2.new(1, 0, 1, 0)
- TextLabel.Font = Enum.Font.GothamSemibold
- TextLabel.Text = "X"
- TextLabel.TextColor3 = Color3.new(1, 0.0117647, 0.952941)
- TextLabel.TextSize = 40
- TextLabel.TextWrapped = true
- -- Objects
- local Track = Instance.new("ScreenGui")
- local Frame = Instance.new("Frame")
- local Input = Instance.new("TextBox")
- local Track_2 = Instance.new("TextLabel")
- local Distance = Instance.new("TextLabel")
- -- Properties
- Track.Name = "Track"
- Track.Parent = game.Players.LocalPlayer.PlayerGui
- Track.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
- Track.ResetOnSpawn = false
- Frame.Parent = Track
- Frame.AnchorPoint = Vector2.new(1, 1)
- Frame.BackgroundColor3 = Color3.new(0.968628, 0.00784314, 1)
- Frame.BackgroundTransparency = 0.5
- Frame.BorderColor3 = Color3.new(1, 0.686275, 0.996078)
- Frame.BorderSizePixel = 5
- Frame.ClipsDescendants = true
- Frame.Position = UDim2.new(1, -10, 1, -10)
- Frame.Size = UDim2.new(0.300000012, 0, 0.100000001, 0)
- Frame.SizeConstraint = Enum.SizeConstraint.RelativeXX
- Input.Name = "Input"
- Input.Parent = Frame
- Input.BackgroundColor3 = Color3.new(1, 1, 1)
- Input.BackgroundTransparency = 0.40000000596046
- Input.BorderSizePixel = 0
- Input.Size = UDim2.new(1, 0, 0.333333343, 0)
- Input.Font = Enum.Font.GothamBold
- Input.PlaceholderColor3 = Color3.new(0.615686, 0.615686, 0.615686)
- Input.Text = ""
- Input.TextColor3 = Color3.new(1, 1, 1)
- Input.TextSize = 14
- Track_2.Name = "Track"
- Track_2.Parent = Frame
- Track_2.BackgroundColor3 = Color3.new(0.427451, 0.427451, 0.427451)
- Track_2.BackgroundTransparency = 0.40000000596046
- Track_2.BorderSizePixel = 0
- Track_2.Position = UDim2.new(0, 0, 0.333333343, 0)
- Track_2.Size = UDim2.new(1, 0, 0.333333343, 0)
- Track_2.Font = Enum.Font.GothamBold
- Track_2.Text = ""
- Track_2.TextColor3 = Color3.new(1, 1, 1)
- Track_2.TextSize = 14
- Track_2.TextWrapped = true
- Distance.Name = "Distance"
- Distance.Parent = Frame
- Distance.BackgroundColor3 = Color3.new(0.427451, 0.427451, 0.427451)
- Distance.BackgroundTransparency = 0.40000000596046
- Distance.BorderSizePixel = 0
- Distance.Position = UDim2.new(0, 0, 0.666666687, 0)
- Distance.Size = UDim2.new(1, 0, 0.333333343, 0)
- Distance.Font = Enum.Font.GothamBold
- Distance.Text = ""
- Distance.TextColor3 = Color3.new(1, 1, 1)
- Distance.TextSize = 14
- Distance.TextWrapped = true
- -- Scripts
- function round(number)
- local kek = nil
- local kek2 = nil
- local strnum = tostring(number)
- for i=1,#strnum do
- if string.sub(strnum,i,i) == "." then
- kek = tonumber(string.sub(strnum,i+1,i+1))
- kek2 = tonumber(string.sub(strnum,1,i-1))
- end
- end
- if kek ~= nil then
- if 3 > 3 then
- kek2 = kek2 + 1
- else
- kek2 = kek2
- end
- end
- if kek2 == nil then
- return number
- end
- return tostring(kek2)
- end
- function findplayer(player,target)
- local tab = {}
- local child = target:GetChildren()
- for i=1,#child do
- if string.sub(child[i].Name,1,#player):lower() == player:lower() then
- print(child[i])
- if child[i]:FindFirstChild("Head") ~= nil and child[i]:FindFirstChild("Torso") ~= nil then
- return child[i]
- end
- end
- end
- end
- local homes = {}
- function findhome(player)
- local tab = {}
- local child = homes
- local homename
- for i,v in pairs(homes) do
- --find the string name
- local str
- for g=1,#v do
- if string.sub(v,g,g) == ":" then
- str = string.sub(v,1,g-1)
- end
- end
- --test for home
- if string.sub(v,1,#player):lower() == player:lower() then
- return v
- end
- end
- end
- local tracked_player = nil
- local distance
- local player = game.Players.LocalPlayer
- local mouse = player:GetMouse()
- mouse.KeyDown:Connect(function(e)
- if string.byte(e) == 39 then
- Input:CaptureFocus()
- end
- end)
- Input.FocusLost:Connect(function(enter)
- if enter == true then
- local inp = Input.Text
- if string.sub(inp,1,6):lower() == "track/" then
- local player = findplayer(string.sub(inp,7),workspace)
- if player ~= nil then
- Input.Text = ""
- tracked_player = player
- if currentBill ~= nil then
- currentBill:Destroy()
- currentBill = Bill:Clone()
- currentBill.Parent = player.Torso
- else
- currentBill = Bill:Clone()
- currentBill.Parent = player.Torso
- end
- end
- elseif string.sub(inp,1,3):lower() == "tp/" then
- local sub2
- local sub3
- for i=4,#inp do
- if string.sub(inp,i,i) == "/" then
- sub2 = i
- break
- end
- end
- for i=sub2+1,#inp do
- if string.sub(inp,i,i) == "/" then
- sub3 = i
- break
- end
- end
- local x = tonumber(string.sub(inp,4,sub2-1))
- local y = tonumber(string.sub(inp,sub2+1,sub3-1))
- local z = tonumber(string.sub(inp,sub3+1))
- game.Players.LocalPlayer.Character:MoveTo(Vector3.new(x*3,y*3,z*3))
- Input.Text = ""
- elseif string.sub(inp,1,8):lower() == "sethome/" then
- local homename = string.sub(inp,9)
- local pos = game.Players.LocalPlayer.Character.Torso.Position
- local home = homename..":"..pos.X.."|"..pos.Y+150.."|"..pos.Z
- table.insert(homes,home)
- Input.Text = ""
- elseif string.sub(inp,1,5):lower() == "home/" then
- local home = findhome(string.sub(inp,6))
- if home == nil then
- Input.Text = "NOT A VALID HOME"
- return
- end
- local intsub
- for i=1,#home do
- if string.sub(home,i,i) == ":" then
- intsub = i
- break
- end
- end
- local sub2
- local sub3
- for i=intsub+1,#home do
- if string.sub(home,i,i) == "|" then
- sub2 = i
- break
- end
- end
- for i=sub2+1,#home do
- if string.sub(home,i,i) == "|" then
- sub3 = i
- break
- end
- end
- local x = tonumber(string.sub(home,intsub+1,sub2-1))
- local y = tonumber(string.sub(home,sub2+1,sub3-1))
- local z = tonumber(string.sub(home,sub3+1))
- game.Players.LocalPlayer.Character:MoveTo(Vector3.new(x,y,z))
- Input.Text = ""
- elseif string.sub(inp,1,10):lower() == "listhomes/" then
- local keker = ""
- for i=1,#homes do
- for k=1,#homes[i] do
- if string.sub(homes[i],k,k) == ":" then
- if i ~= #homes then
- keker = keker..string.sub(homes[i],1,k-1)..", "
- else
- keker = keker..string.sub(homes[i],1,k-1)
- end
- end
- end
- end
- Input.Text = keker
- end
- end
- end)
- game:GetService("RunService").RenderStepped:Connect(function()
- if tracked_player ~= nil then
- local pos = tracked_player.Head.Position
- pos = Vector3.new(round(pos.X/3),round(pos.Y/3),round(pos.Z/3))
- Track_2.Text = tracked_player.Name.."'s location : ("..pos.X..", "..pos.Y..", "..pos.Z..")"
- local local_pos = game.Players.LocalPlayer.Character.Head.Position
- local_pos = Vector3.new(round(local_pos.X/3),round(local_pos.Y/3),round(local_pos.Z/3))
- distance = pos-local_pos
- distance = Vector3.new(round(distance.X),round(distance.Y),round(distance.Z))
- Distance.Text = "Distance from "..tracked_player.Name.." : ("..distance.X..", "..distance.Y..", "..distance.Z..")"
- end
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement