Advertisement
Guest User

Untitled

a guest
Jul 20th, 2019
93
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.05 KB | None | 0 0
  1. -- Farewell Infortality.
  2.  
  3. -- Version: 2.82
  4. -- Instances:
  5. local GUI = Instance.new("ScreenGui")
  6. local MainFrame = Instance.new("Frame")
  7. local Frame = Instance.new("Frame")
  8. local ChestTp = Instance.new("TextButton")
  9. local OnePieceOpenSeas = Instance.new("TextLabel")
  10. local Credits = Instance.new("TextLabel")
  11. --Properties:
  12. GUI.Name = "GUI"
  13. GUI.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  14. GUI.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  15.  
  16. MainFrame.Name = "MainFrame"
  17. MainFrame.Parent = GUI
  18. MainFrame.Active = true
  19. MainFrame.BackgroundColor3 = Color3.new(0.113725, 0.113725, 0.113725)
  20. MainFrame.BorderColor3 = Color3.new(0.247059, 0.247059, 0.247059)
  21. MainFrame.BorderSizePixel = 0
  22. MainFrame.Position = UDim2.new(0.337395281, 0, 0.526627243, 0)
  23. MainFrame.Selectable = true
  24. MainFrame.Size = UDim2.new(0, 285, 0, 88)
  25. MainFrame.Draggable = true
  26.  
  27. Frame.Parent = MainFrame
  28. Frame.BackgroundColor3 = Color3.new(0.247059, 0.247059, 0.247059)
  29. Frame.BorderSizePixel = 0
  30. Frame.Position = UDim2.new(0, 0, 0.185992509, 0)
  31. Frame.Size = UDim2.new(0, 285, 0, 55)
  32.  
  33. ChestTp.Name = "ChestTp"
  34. ChestTp.Parent = Frame
  35. ChestTp.BackgroundColor3 = Color3.new(0.113725, 0.113725, 0.113725)
  36. ChestTp.BorderSizePixel = 0
  37. ChestTp.Position = UDim2.new(0, 0, 0.283916086, 0)
  38. ChestTp.Size = UDim2.new(0, 285, 0, 22)
  39. ChestTp.Font = Enum.Font.Gotham
  40. ChestTp.Text = "Chest Tp"
  41. ChestTp.TextColor3 = Color3.new(1, 1, 1)
  42. ChestTp.TextScaled = true
  43. ChestTp.TextSize = 14
  44. ChestTp.TextWrapped = true
  45. ChestTp.MouseButton1Click:Connect(function()
  46. local Character = game:GetService("Players").LocalPlayer.Character
  47. local Distance = Vector3.new(0, 0, 5)
  48. local Delay = 2.5
  49.  
  50. local Chests = {}
  51.  
  52. for _, Items in next, workspace:GetDescendants() do
  53. if Items.Name:match("Chest") and Items:IsA("BasePart") then
  54. table.insert(Chests, Items)
  55. end
  56. end
  57.  
  58. for i = 1, 20 do
  59. local Chest = Chests[i]
  60. if Chest.Transparency < 1 then
  61. Character:MoveTo(Chest.Position + Distance)
  62. wait(Delay)
  63. end
  64. end
  65.  
  66. end)
  67.  
  68. OnePieceOpenSeas.Name = "OnePieceOpenSeas"
  69. OnePieceOpenSeas.Parent = MainFrame
  70. OnePieceOpenSeas.BackgroundColor3 = Color3.new(1, 1, 1)
  71. OnePieceOpenSeas.BackgroundTransparency = 5
  72. OnePieceOpenSeas.BorderSizePixel = 0
  73. OnePieceOpenSeas.Size = UDim2.new(0, 285, 0, 16)
  74. OnePieceOpenSeas.Font = Enum.Font.Gotham
  75. OnePieceOpenSeas.Text = "One Piece Open Seas [ALPHA]"
  76. OnePieceOpenSeas.TextColor3 = Color3.new(1, 1, 1)
  77. OnePieceOpenSeas.TextScaled = true
  78. OnePieceOpenSeas.TextSize = 14
  79. OnePieceOpenSeas.TextStrokeColor3 = Color3.new(0.666667, 0, 0)
  80. OnePieceOpenSeas.TextWrapped = true
  81.  
  82. Credits.Name = "Credits"
  83. Credits.Parent = MainFrame
  84. Credits.BackgroundColor3 = Color3.new(1, 1, 1)
  85. Credits.BackgroundTransparency = 5
  86. Credits.BorderSizePixel = 0
  87. Credits.Position = UDim2.new(0, 0, 0.818181813, 0)
  88. Credits.Size = UDim2.new(0, 285, 0, 16)
  89. Credits.Font = Enum.Font.Gotham
  90. Credits.Text = "Created By : @Silent"
  91. Credits.TextColor3 = Color3.new(1, 0, 1)
  92. Credits.TextScaled = true
  93. Credits.TextSize = 14
  94. Credits.TextStrokeColor3 = Color3.new(0.666667, 0, 0)
  95. Credits.TextWrapped = true
  96. -- Scripts:
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement