API tools faq
paste
Advertisement
ProScripter29

The Lost Lands Teleport Script

ProScripter29
Jun 21st, 2023 (edited)
25,940
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.87 KB | None | 0 0
raw download clone embed print report
  1. local player = game.Players.LocalPlayer
  2.  
  3. loadstring(game:HttpGet("https://pastebin.com/raw/M17VFji3"))() -- Use vital script automatically
  4.  
  5. -- :: Teleports :: --
  6. local spinelArea = Vector3.new(-1402, -272, 502)
  7. local apatiteArea = Vector3.new(-466,-110,205)
  8. local serpentineArea = Vector3.new(-167, -231, 1060)
  9. local volcanoArea = Vector3.new(729, 13, 668)
  10. local waterfallArea = Vector3.new(102, 21, 584)
  11.  
  12. -- :: GUI Maker From Another Old Script :: --
  13.  
  14. function createGui()
  15. local gui = Instance.new("ScreenGui", player.PlayerGui)
  16. gui.Name = "theLostLands"
  17. gui.ResetOnSpawn = false
  18. gui.Enabled = true
  19. gui.IgnoreGuiInset = true
  20. return gui
  21. end
  22.  
  23. function createFrame(guiParent)
  24. local frame = Instance.new("Frame")
  25. frame.Parent = guiParent
  26. frame.AnchorPoint = Vector2.new(0.5,0.5)
  27. frame.BackgroundColor3 = Color3.fromRGB(35,35,35)
  28. frame.BorderSizePixel = 0
  29. frame.Position = UDim2.new(0.5,0,0.5,0)
  30. frame.Size = UDim2.new(0, 145, 0, 176)
  31. local title = Instance.new("TextLabel", frame)
  32. title.BackgroundColor3 = Color3.new(30,30,30)
  33. title.BorderSizePixel = 0
  34. title.BackgroundColor3 = Color3.fromRGB(30,30,30)
  35. title.BorderSizePixel = 0
  36. title.Size = UDim2.new(0, 145, 0, 18)
  37. title.Font = Enum.Font.SourceSansBold
  38. title.Text = " The Lost Land ="
  39. title.TextSize = 14
  40. title.TextColor3 = Color3.new(1,1,1)
  41. title.TextXAlignment = Enum.TextXAlignment.Left
  42. return frame
  43. end
  44.  
  45. function createButton(frameParent, yPos, text)
  46. local button = Instance.new("TextButton")
  47. button.Name = "button"
  48. button.Parent = frameParent
  49. button.BackgroundColor3 = Color3.fromRGB(30,30,30)
  50. button.BorderSizePixel = 0
  51. button.Position = UDim2.new(0,0,0,yPos)
  52. button.Size = UDim2.new(1,0,00,18)
  53. button.Font = Enum.Font.SourceSansBold
  54. button.Text = text
  55. button.TextSize = 14
  56. button.TextColor3 = Color3.new(1,1,1)
  57. return button
  58. end
  59.  
  60. -- :: Main Script :: --
  61.  
  62. local gui = createGui()
  63.  
  64. local frame = createFrame(gui)
  65.  
  66. local b1 = createButton(frame, 25, "Volcano")
  67. local b2 = createButton(frame, 49, "Waterfall")
  68. local b3 = createButton(frame, 73, "Apatite Area")
  69. local b4 = createButton(frame, 97, "Serpentine Area")
  70. local b5 = createButton(frame, 121, "Spinel Area")
  71.  
  72. local rejoinB = createButton(frame, 158, "REJOIN")
  73.  
  74. b1.Activated:Connect(function()
  75. if player and player.Character then
  76. local humRoot = player.Character:FindFirstChild("HumanoidRootPart")
  77. if humRoot then
  78. humRoot.CFrame = CFrame.new(volcanoArea + Vector3.new(0, 4, 0))
  79. end
  80. end
  81. end)
  82.  
  83. b2.Activated:Connect(function()
  84. if player and player.Character then
  85. local humRoot = player.Character:FindFirstChild("HumanoidRootPart")
  86. if humRoot then
  87. humRoot.CFrame = CFrame.new(waterfallArea + Vector3.new(0, 4, 0))
  88. end
  89. end
  90. end)
  91.  
  92. b3.Activated:Connect(function()
  93. if player and player.Character then
  94. local humRoot = player.Character:FindFirstChild("HumanoidRootPart")
  95. if humRoot then
  96. humRoot.CFrame = CFrame.new(apatiteArea + Vector3.new(0, 4, 0))
  97. end
  98. end
  99. end)
  100.  
  101. b4.Activated:Connect(function()
  102. if player and player.Character then
  103. local humRoot = player.Character:FindFirstChild("HumanoidRootPart")
  104. if humRoot then
  105. humRoot.CFrame = CFrame.new(serpentineArea + Vector3.new(0, 4, 0))
  106. end
  107. end
  108. end)
  109.  
  110. b5.Activated:Connect(function()
  111. if player and player.Character then
  112. local humRoot = player.Character:FindFirstChild("HumanoidRootPart")
  113. if humRoot then
  114. humRoot.CFrame = CFrame.new(spinelArea + Vector3.new(0, 4, 0))
  115. end
  116. end
  117. end)
  118.  
  119. rejoinB.Activated:Connect(function()
  120. game:GetService("TeleportService"):TeleportToPlaceInstance(game.PlaceId, game.JobId, player)
  121. end)
  122.  
  123. local UIS = game:GetService("UserInputService")
  124. function dragify(Frame)
  125. dragToggle = nil
  126. local dragSpeed = 0
  127. dragInput = nil
  128. dragStart = nil
  129. local dragPos = nil
  130. function updateInput(input)
  131. local Delta = input.Position - dragStart
  132. local Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + Delta.X, startPos.Y.Scale, startPos.Y.Offset + Delta.Y)
  133. game:GetService("TweenService"):Create(Frame, TweenInfo.new(0.25), {Position = Position}):Play()
  134. end
  135. Frame.InputBegan:Connect(function(input)
  136. if (input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch) and UIS:GetFocusedTextBox() == nil then
  137. dragToggle = true
  138. dragStart = input.Position
  139. startPos = Frame.Position
  140. input.Changed:Connect(function()
  141. if input.UserInputState == Enum.UserInputState.End then
  142. dragToggle = false
  143. end
  144. end)
  145. end
  146. end)
  147. Frame.InputChanged:Connect(function(input)
  148. if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  149. dragInput = input
  150. end
  151. end)
  152. game:GetService("UserInputService").InputChanged:Connect(function(input)
  153. if input == dragInput and dragToggle then
  154. updateInput(input)
  155. end
  156. end)
  157. end
  158.  
  159. dragify(frame)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!