SirMeme

AUTO FARM ONE PIECE

Aug 1st, 2018
4,859
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.25 KB | None | 0 0
  1. local stoppp = false
  2. local opgui = Instance.new("ScreenGui")
  3. local Frame = Instance.new("Frame")
  4. local combatfarm = Instance.new("TextButton")
  5. local swordfarm = Instance.new("TextButton")
  6. local quit = Instance.new("TextButton")
  7. local credit = Instance.new("TextLabel")
  8. local farmstop = Instance.new("TextButton")
  9.  
  10. opgui.Name = math.random()
  11. opgui.Parent = game:GetService("CoreGui")
  12. Frame.Parent = opgui
  13. Frame.BackgroundColor3 = Color3.new(0.647059, 0.0313726, 1)
  14. Frame.BackgroundTransparency = 0.69999998807907
  15. Frame.Position = UDim2.new(0.182978719, 0, 0.259493679, 0)
  16. Frame.Size = UDim2.new(0, 596, 0, 380)
  17. Frame.Active = true
  18. Frame.Draggable = true
  19.  
  20. combatfarm.Name = "combat farm"
  21. combatfarm.Parent = Frame
  22. combatfarm.BackgroundColor3 = Color3.new(1, 1, 1)
  23. combatfarm.Position = UDim2.new(0.557047009, 0, 0.334210515, 0)
  24. combatfarm.Size = UDim2.new(0, 200, 0, 63)
  25. combatfarm.Text = "Combat Farm"
  26. combatfarm.TextColor3 = Color3.new(0, 0, 0)
  27. combatfarm.TextSize = 20
  28.  
  29. swordfarm.Name = "sword farm"
  30. swordfarm.Parent = Frame
  31. swordfarm.BackgroundColor3 = Color3.new(1, 1, 1)
  32. swordfarm.Position = UDim2.new(0.0889261737, 0, 0.334210515, 0)
  33. swordfarm.Size = UDim2.new(0, 200, 0, 63)
  34. swordfarm.Text = "Sword Farm"
  35. swordfarm.TextColor3 = Color3.new(0, 0, 0)
  36. swordfarm.TextSize = 20
  37.  
  38. quit.Name = "quit"
  39. quit.Parent = Frame
  40. quit.BackgroundColor3 = Color3.new(1, 1, 1)
  41. quit.BorderSizePixel = 0
  42. quit.Position = UDim2.new(0.916107357, 0, 0, 0)
  43. quit.Size = UDim2.new(0, 50, 0, 49)
  44. quit.Font = Enum.Font.SourceSans
  45. quit.Text = "X"
  46. quit.TextColor3 = Color3.new(0.666667, 0, 0)
  47. quit.TextScaled = true
  48. quit.TextSize = 14
  49. quit.TextWrapped = true
  50.  
  51. credit.Name = "credit"
  52. credit.Parent = Frame
  53. credit.BackgroundColor3 = Color3.new(1, 1, 1)
  54. credit.BorderSizePixel = 0
  55. credit.Size = UDim2.new(0, 546, 0, 49)
  56. credit.Font = Enum.Font.SourceSans
  57. credit.Text = "Created by Amnesia @ v3rm"
  58. credit.TextColor3 = Color3.new(0, 0, 0)
  59. credit.TextSize = 35
  60. credit.TextWrapped = true
  61.  
  62. farmstop.Name = "farmstop"
  63. farmstop.Parent = Frame
  64. farmstop.BackgroundColor3 = Color3.new(1, 1, 1)
  65. farmstop.Position = UDim2.new(0.332214773, 0, 0.678947389, 0)
  66. farmstop.Size = UDim2.new(0, 200, 0, 63)
  67. farmstop.Text = "Stop Farming"
  68. farmstop.TextColor3 = Color3.new(0, 0, 0)
  69. farmstop.TextSize = 20
  70.  
  71. combatfarm.MouseButton1Click:connect(function()
  72. for _,v in pairs(game:GetService("Players").LocalPlayer.Character.Head:GetChildren()) do
  73. if v:IsA("BillboardGui") then
  74. v:Remove()
  75. end
  76. end
  77. stopp = false
  78. while wait(0,1) do
  79. local players = game:GetService("Players"):GetPlayers()
  80. for i = 1, #players do
  81. for _,v in pairs(game.Workspace:GetChildren()) do
  82. if v:IsA("Model") and v:FindFirstChild("Humanoid") then
  83. if v.Name ~= players[i].Name then
  84. repeat
  85. wait(0,1)
  86. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = v.HumanoidRootPart.CFrame * CFrame.new(0,0,2)
  87. local A_1 = 3
  88. local Event = game:GetService("Players").LocalPlayer.Backpack.Combat.COMBAT
  89. Event:FireServer(A_1)
  90.  
  91. if stopp then
  92. break
  93. end
  94. until v.Humanoid.Health == 0
  95. end
  96. end
  97. end
  98. end
  99. if stopp then
  100. break
  101. end
  102. end
  103. end)
  104.  
  105. swordfarm.MouseButton1Click:connect(function()
  106. for _,v in pairs(game:GetService("Players").LocalPlayer.Character.Head:GetChildren()) do
  107. if v:IsA("BillboardGui") then
  108. v:Remove()
  109. end
  110. end
  111. stopp = false
  112. local Event = game:GetService("Players").LocalPlayer.Backpack.Sword.SwordEvents.UnSeath
  113. Event:FireServer()
  114. wait(1)
  115. while wait(0,1) do
  116. local players = game:GetService("Players"):GetPlayers()
  117. for i = 1, #players do
  118. for _,v in pairs(game.Workspace:GetChildren()) do
  119. if v:IsA("Model") and v:FindFirstChild("Humanoid") then
  120. if v.Name ~= players[i].Name then
  121. repeat
  122. wait(0,1)
  123. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = v.HumanoidRootPart.CFrame * CFrame.new(0,0,3)
  124. local A_1 = 3
  125. local Event = game:GetService("Players").LocalPlayer.Backpack.Sword.Slashes.SwordSlash
  126. Event:FireServer(A_1)
  127. if stopp then
  128. break
  129. end
  130. until v.Humanoid.Health == 0
  131. end
  132. end
  133. end
  134. end
  135. if stopp then
  136. break
  137. end
  138. end
  139. end)
  140.  
  141. farmstop.MouseButton1Click:connect(function()
  142. stopp = true
  143. wait()
  144. game.Players.LocalPlayer.Character.Humanoid.Health = 0
  145. end)
  146.  
  147. quit.MouseButton1Click:connect(function()
  148. opgui:Remove()
  149. end)
Add Comment
Please, Sign In to add comment