local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local lp = Players.LocalPlayer
local playerGui = lp:WaitForChild("PlayerGui")
-- REMOTE
local rewardRemote = ReplicatedStorage
:WaitForChild("Events")
:WaitForChild("Reward")
-- GUI
local gui = Instance.new("ScreenGui")
gui.ResetOnSpawn = false
gui.Parent = playerGui
local main = Instance.new("Frame", gui)
main.Size = UDim2.new(0, 230, 0, 155)
main.Position = UDim2.new(0.5, -115, 0.4, 0)
main.BackgroundColor3 = Color3.fromRGB(35,35,35)
main.BorderSizePixel = 0
Instance.new("UICorner", main).CornerRadius = UDim.new(0,12)
-- DRAG
local dragging, dragStart, startPos
main.InputBegan:Connect(function(i)
if i.UserInputType == Enum.UserInputType.MouseButton1
or i.UserInputType == Enum.UserInputType.Touch then
dragging = true
dragStart = i.Position
startPos = main.Position
end
end)
main.InputChanged:Connect(function(i)
if dragging then
local d = i.Position - dragStart
main.Position = UDim2.new(
startPos.X.Scale, startPos.X.Offset + d.X,
startPos.Y.Scale, startPos.Y.Offset + d.Y
)
end
end)
main.InputEnded:Connect(function()
dragging = false
end)
-- TITLE
local title = Instance.new("TextLabel", main)
title.Size = UDim2.new(1,0,0,26)
title.Text = "Reward Executor"
title.TextSize = 14
title.Font = Enum.Font.GothamBold
title.TextColor3 = Color3.new(1,1,1)
title.BackgroundTransparency = 1
-- INPUT (KEYBOARD)
local box = Instance.new("TextBox", main)
box.Size = UDim2.new(1,-20,0,34)
box.Position = UDim2.new(0,10,0,32)
box.Text = "1000"
box.PlaceholderText = "Enter amount"
box.TextSize = 16
box.Font = Enum.Font.Gotham
box.TextColor3 = Color3.new(1,1,1)
box.BackgroundColor3 = Color3.fromRGB(60,60,60)
box.ClearTextOnFocus = false
box.TextXAlignment = Enum.TextXAlignment.Center
Instance.new("UICorner", box).CornerRadius = UDim.new(0,8)
-- NUMBERS ONLY
box:GetPropertyChangedSignal("Text"):Connect(function()
box.Text = box.Text:gsub("%D", "")
end)
-- EXECUTE BUTTON
local exec = Instance.new("TextButton", main)
exec.Size = UDim2.new(1,-20,0,36)
exec.Position = UDim2.new(0,10,1,-40)
exec.Text = "EXECUTE"
exec.TextSize = 14
exec.Font = Enum.Font.GothamBold
exec.TextColor3 = Color3.new(1,1,1)
exec.BackgroundColor3 = Color3.fromRGB(70,140,70)
Instance.new("UICorner", exec).CornerRadius = UDim.new(0,10)
-- FAST EXECUTION LOGIC
exec.MouseButton1Click:Connect(function()
local amount = tonumber(box.Text)
if not amount or amount <= 0 then return end
local fired = 0
local PER_FRAME = 800 -- increase if your device can handle it
local conn
conn = RunService.Heartbeat:Connect(function()
for i = 1, PER_FRAME do
if fired >= amount then
conn:Disconnect()
return
end
rewardRemote:FireServer(1229, 100)
fired += 1
end
end)
end)
Comments
No comments yet
Be the first to share your thoughts!