SHADOWCRAFTER666

thanks

Apr 28th, 2019
76
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. local coordinateTP = Instance.new("ScreenGui")
  2. local bar = Instance.new("TextLabel")
  3. local mainframe = Instance.new("Frame")
  4. local coordX = Instance.new("TextBox")
  5. local coordZ = Instance.new("TextBox")
  6. local coordY = Instance.new("TextBox")
  7. local teleport = Instance.new("TextButton")
  8. local underline = Instance.new("Frame")
  9. local minimize = Instance.new("TextButton")
  10. local currentCoord = Instance.new("TextLabel")
  11.  
  12. coordinateTP.Name = "coordinateTP"
  13. coordinateTP.Parent = game:GetService("CoreGui")
  14. coordinateTP.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  15.  
  16. bar.Name = "bar"
  17. bar.Parent = coordinateTP
  18. bar.Active = true
  19. bar.AnchorPoint = Vector2.new(0.5, 0)
  20. bar.BackgroundColor3 = Color3.new(0.686275, 0.686275, 0.686275)
  21. bar.BorderSizePixel = 0
  22. bar.Draggable = true
  23. bar.Position = UDim2.new(0.5, 0, 0.25, 0)
  24. bar.Selectable = true
  25. bar.Size = UDim2.new(0, 350, 0, 30)
  26. bar.Font = Enum.Font.GothamBlack
  27. bar.Text = "Coordinate Teleport"
  28. bar.TextColor3 = Color3.new(1, 1, 1)
  29. bar.TextSize = 15
  30.  
  31. mainframe.Name = "mainframe"
  32. mainframe.Parent = bar
  33. mainframe.AnchorPoint = Vector2.new(0.5, 0)
  34. mainframe.BackgroundColor3 = Color3.new(0.784314, 0.784314, 0.784314)
  35. mainframe.BorderSizePixel = 0
  36. mainframe.Position = UDim2.new(0.5, 0, 1, 0)
  37. mainframe.Size = UDim2.new(1, 0, 0, 150)
  38.  
  39. currentCoord.Name = "currentCoord"
  40. currentCoord.Parent = mainframe
  41. currentCoord.AnchorPoint = Vector2.new(0.5, 1)
  42. currentCoord.BackgroundColor3 = Color3.new(1, 1, 1)
  43. currentCoord.BackgroundTransparency = 1
  44. currentCoord.BorderSizePixel = 0
  45. currentCoord.Position = UDim2.new(0.5, 0, 1, 0)
  46. currentCoord.Size = UDim2.new(1, 0, 0.100000001, 0)
  47. currentCoord.Font = Enum.Font.SourceSans
  48. currentCoord.Text = "Your current coordinates are [ Loading... ]"
  49. currentCoord.TextColor3 = Color3.new(1, 1, 1)
  50. currentCoord.TextSize = 14
  51. currentCoord.TextWrapped = true
  52.  
  53. coordX.Name = "coordX"
  54. coordX.Parent = mainframe
  55. coordX.AnchorPoint = Vector2.new(0.5, 0)
  56. coordX.BackgroundColor3 = Color3.new(0.588235, 0.588235, 0.588235)
  57. coordX.BorderColor3 = Color3.new(0.490196, 0.490196, 0.490196)
  58. coordX.BorderSizePixel = 3
  59. coordX.Position = UDim2.new(0.200000003, 0, 0.219999999, 0)
  60. coordX.Size = UDim2.new(0.25, 0, 0.25, 0)
  61. coordX.Font = Enum.Font.SourceSans
  62. coordX.PlaceholderColor3 = Color3.new(1, 1, 1)
  63. coordX.PlaceholderText = "X Coordinate"
  64. coordX.Text = ""
  65. coordX.TextColor3 = Color3.new(1, 1, 1)
  66. coordX.TextSize = 14
  67.  
  68. coordZ.Name = "coordZ"
  69. coordZ.Parent = mainframe
  70. coordZ.AnchorPoint = Vector2.new(0.5, 0)
  71. coordZ.BackgroundColor3 = Color3.new(0.588235, 0.588235, 0.588235)
  72. coordZ.BorderColor3 = Color3.new(0.490196, 0.490196, 0.490196)
  73. coordZ.BorderSizePixel = 3
  74. coordZ.Position = UDim2.new(0.800000012, 0, 0.219999999, 0)
  75. coordZ.Size = UDim2.new(0.25, 0, 0.25, 0)
  76. coordZ.Font = Enum.Font.SourceSans
  77. coordZ.PlaceholderColor3 = Color3.new(1, 1, 1)
  78. coordZ.PlaceholderText = "Z Coordinate"
  79. coordZ.Text = ""
  80. coordZ.TextColor3 = Color3.new(1, 1, 1)
  81. coordZ.TextSize = 14
  82.  
  83. coordY.Name = "coordY"
  84. coordY.Parent = mainframe
  85. coordY.AnchorPoint = Vector2.new(0.5, 0)
  86. coordY.BackgroundColor3 = Color3.new(0.588235, 0.588235, 0.588235)
  87. coordY.BorderColor3 = Color3.new(0.490196, 0.490196, 0.490196)
  88. coordY.BorderSizePixel = 3
  89. coordY.Position = UDim2.new(0.5, 0, 0.219999999, 0)
  90. coordY.Size = UDim2.new(0.25, 0, 0.25, 0)
  91. coordY.Font = Enum.Font.SourceSans
  92. coordY.PlaceholderColor3 = Color3.new(1, 1, 1)
  93. coordY.PlaceholderText = "Y Coordinate"
  94. coordY.Text = ""
  95. coordY.TextColor3 = Color3.new(1, 1, 1)
  96. coordY.TextSize = 14
  97.  
  98. teleport.Name = "teleport"
  99. teleport.Parent = mainframe
  100. teleport.AnchorPoint = Vector2.new(0.5, 0)
  101. teleport.BackgroundColor3 = Color3.new(0.588235, 0.588235, 0.588235)
  102. teleport.BorderColor3 = Color3.new(0.490196, 0.490196, 0.490196)
  103. teleport.BorderSizePixel = 3
  104. teleport.Position = UDim2.new(0.5, 0, 0.600000024, 0)
  105. teleport.Size = UDim2.new(0.5, 0, 0.25, 0)
  106. teleport.Font = Enum.Font.SourceSansBold
  107. teleport.Text = "Teleport!"
  108. teleport.TextColor3 = Color3.new(1, 1, 1)
  109. teleport.TextSize = 16
  110. teleport.TextTruncate = Enum.TextTruncate.AtEnd
  111.  
  112. underline.Name = "underline"
  113. underline.Parent = bar
  114. underline.AnchorPoint = Vector2.new(0.5, 0)
  115. underline.BackgroundColor3 = Color3.new(0.588235, 0.588235, 0.588235)
  116. underline.BorderSizePixel = 0
  117. underline.Position = UDim2.new(0.5, 0, 1, 0)
  118. underline.Size = UDim2.new(1, 0, 0, 5)
  119.  
  120. minimize.Name = "minimize"
  121. minimize.Parent = bar
  122. minimize.AnchorPoint = Vector2.new(1, 0)
  123. minimize.BackgroundColor3 = Color3.new(0.627451, 0.627451, 0.627451)
  124. minimize.BorderSizePixel = 0
  125. minimize.Position = UDim2.new(1, 0, 0, 0)
  126. minimize.Size = UDim2.new(1, 0, 1, 0)
  127. minimize.SizeConstraint = Enum.SizeConstraint.RelativeYY
  128. minimize.Font = Enum.Font.GothamBlack
  129. minimize.Text = "-"
  130. minimize.TextColor3 = Color3.new(1, 1, 1)
  131. minimize.TextScaled = true
  132. minimize.TextSize = 14
  133. minimize.TextWrapped = true
  134.  
  135. coroutine.resume(coroutine.create(function()
  136.     teleport.MouseButton1Click:Connect(function()
  137.         if (coordX.Text ~= "") and (coordY.Text ~= "") and (coordZ.Text ~= "") then
  138.             if (tonumber(coordX.Text)) and (tonumber(coordY.Text)) and (tonumber(coordZ.Text)) then
  139.                 local position = CFrame.new(tonumber(coordX.Text), tonumber(coordY.Text), tonumber(coordZ.Text))
  140.                 game:GetService("Players").LocalPlayer.Character.HumanoidRootPart.CFrame = position
  141.             end
  142.         end
  143.     end)
  144. end))
  145.  
  146. local canMinimize = true
  147. local minimized = false
  148. coroutine.resume(coroutine.create(function()
  149.     minimize.MouseButton1Click:Connect(function()
  150.         if (canMinimize == true) then
  151.             minimized = not minimized
  152.             if (minimized == true) then
  153.                 canMinimize = false
  154.                 minimize.Text = "+"
  155.                 for __,v in pairs(mainframe:GetChildren()) do
  156.                     pcall(function() v.Visible = false end)
  157.                 end
  158.                 mainframe:TweenSize(UDim2.new(1,0,0,0), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.75, true)
  159.                 wait(0.75)
  160.                 canMinimize = true
  161.             else
  162.                 canMinimize = false
  163.                 minimize.Text = "-"
  164.                 for __,v in pairs(mainframe:GetChildren()) do
  165.                     pcall(function() v.Visible = true end)
  166.                 end
  167.                 mainframe:TweenSize(UDim2.new(1,0,0,150), Enum.EasingDirection.Out, Enum.EasingStyle.Quad, 0.75, true)
  168.                 wait(0.75)
  169.                 canMinimize = true
  170.             end
  171.         end
  172.     end)
  173. end))
  174.  
  175. local function round(n)
  176.     return math.floor(n+0.5)
  177. end
  178.  
  179. coroutine.resume(coroutine.create(function()
  180.     while wait() do
  181.         local cf = game:GetService("Players").LocalPlayer.Character.HumanoidRootPart.CFrame
  182.         currentCoord.Text = string.format("Your current coordinates are (%s, %s, %s).", tostring(round(cf.X)), tostring(round(cf.Y)), tostring(round(cf.Z)))
  183.     end
  184. end))
RAW Paste Data