Created by ExHackey
Features:
- ITEM AUTOFARM
local STR = Instance.new("ScreenGui")
local Main = Instance.new("Frame")
local Title = Instance.new("TextLabel")
local St = Instance.new("TextButton")
local Sp = Instance.new("TextButton")
local pp = game.Players.LocalPlayer.Character
local u = pp:WaitForChild("HumanoidRootPart")
local it = game.Workspace.Items
local ts = game:GetService("TweenService")
local st = TweenInfo.new(2)
local y = 0
local function yes()
if y == 1 then
while y == 1 do
wait(.1)
for i, v in pairs(it:GetChildren()) do
if v.Name == ("Rokakaka") or ("Stand Arrow") then
local ani = ts:Create(u, st, {CFrame = v.Handle.CFrame})
ani:Play()
wait(5)
if y == 0 then
return
end
end
end
end
end
end
STR.Name = "STR"
STR.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
STR.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
Main.Name = "Main"
Main.Parent = STR
Main.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Main.BorderColor3 = Color3.fromRGB(0, 0, 0)
Main.BorderSizePixel = 2
Main.Position = UDim2.new(0.582861781, 0, 0.342723012, 0)
Main.Size = UDim2.new(0, 322, 0, 142)
Title.Name = "Title"
Title.Parent = Main
Title.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Title.BorderColor3 = Color3.fromRGB(0, 0, 0)
Title.BorderSizePixel = 2
Title.Size = UDim2.new(0, 322, 0, 20)
Title.Font = Enum.Font.SourceSans
Title.Text = "Stand Upright: Reborn Item AutoFarm"
Title.TextColor3 = Color3.fromRGB(0, 0, 0)
Title.TextScaled = true
Title.TextSize = 14.000
Title.TextWrapped = true
St.Name = "St"
St.Parent = Main
St.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
St.BorderColor3 = Color3.fromRGB(0, 0, 0)
St.BorderSizePixel = 2
St.Position = UDim2.new(0.0527950302, 0, 0.464788735, 0)
St.Size = UDim2.new(0, 135, 0, 24)
St.Font = Enum.Font.SourceSans
St.Text = "Start"
St.TextColor3 = Color3.fromRGB(0, 0, 0)
St.TextScaled = true
St.TextSize = 14.000
St.TextWrapped = true
Sp.Name = "Sp"
Sp.Parent = Main
Sp.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Sp.BorderColor3 = Color3.fromRGB(0, 0, 0)
Sp.BorderSizePixel = 2
Sp.Position = UDim2.new(0.527950346, 0, 0.464788735, 0)
Sp.Size = UDim2.new(0, 135, 0, 24)
Sp.Font = Enum.Font.SourceSans
Sp.Text = "Stop"
Sp.TextColor3 = Color3.fromRGB(0, 0, 0)
Sp.TextScaled = true
Sp.TextSize = 14.000
Sp.TextWrapped = true
St.MouseButton1Click:Connect(function()
y = 1
yes()
end)
Sp.MouseButton1Click:Connect(function()
y = 0
end)
--Gui Dragg script snice the draggable function has been removed.
local UserInputService = game:GetService("UserInputService")
local gui = Main
local dragging
local dragInput
local dragStart
local startPos
local function update(input)
local delta = input.Position - dragStart
gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
end
gui.InputBegan:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
dragging = true
dragStart = input.Position
startPos = gui.Position
input.Changed:Connect(function()
if input.UserInputState == Enum.UserInputState.End then
dragging = false
end
end)
end
end)
gui.InputChanged:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
dragInput = input
end
end)
UserInputService.InputChanged:Connect(function(input)
if input == dragInput and dragging then
update(input)
end
end)ENJOY!
