local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "Auto click PRO"
ScreenGui.Parent = game.CoreGui
ScreenGui.ResetOnSpawn = false
local UIS = game:GetService("UserInputService")
local VirtualInputManager = game:GetService("VirtualInputManager")
local TweenService = game:GetService("TweenService")
local function makeDraggable(frame, handle)
handle = handle or frame
local dragging = false
local dragStart
local startPos
local activeInput
handle.InputBegan:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1
or input.UserInputType == Enum.UserInputType.Touch then
dragging = true
dragStart = input.Position
startPos = frame.Position
activeInput = input
input.Changed:Connect(function()
if input.UserInputState == Enum.UserInputState.End then
dragging = false
activeInput = nil
end
end)
end
end)
local function updatePosition(input)
if not dragging then return end
local delta = input.Position - dragStart
frame.Position = UDim2.new(
startPos.X.Scale, startPos.X.Offset + delta.X,
startPos.Y.Scale, startPos.Y.Offset + delta.Y
)
end
UIS.InputChanged:Connect(function(input)
if dragging and input.UserInputType == Enum.UserInputType.MouseMovement then
updatePosition(input)
end
end)
UIS.TouchMoved:Connect(function(input)
if dragging and activeInput == input then
updatePosition(input)
end
end)
end
-- BARRA PRINCIPAL
local Bar = Instance.new("Frame")
Bar.Name = "Bar"
Bar.Size = UDim2.new(0, 50, 0, 150)
Bar.Position = UDim2.new(0, 50, 0.5, -75)
Bar.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
Bar.BorderSizePixel = 0
Bar.Active = true
Bar.Parent = ScreenGui
-- TÍTULO ÚNICO
local Title = Instance.new("TextButton")
Title.Name = "Title"
Title.Size = UDim2.new(0, 110, 0, 24)
Title.Position = UDim2.new(0, 0, 0, -24)
Title.BackgroundColor3 = Color3.fromRGB(100, 100, 100)
Title.BorderSizePixel = 0
Title.Text = ""
Title.AutoButtonColor = false
Title.Active = true
Title.Parent = Bar
-- TEXTO ÚNICO, SEM SEPARAR LABEL E PRO
local TitleText = Instance.new("TextLabel")
TitleText.Name = "TitleText"
TitleText.Size = UDim2.new(1, -4, 1, 0)
TitleText.Position = UDim2.new(0, 2, 0, 0)
TitleText.BackgroundTransparency = 1
TitleText.RichText = true
TitleText.Text = 'Auto click PRO'
TitleText.TextColor3 = Color3.fromRGB(255, 255, 255)
TitleText.TextSize = 11
TitleText.Font = Enum.Font.GothamBold
TitleText.TextXAlignment = Enum.TextXAlignment.Center
TitleText.TextYAlignment = Enum.TextYAlignment.Center
TitleText.TextScaled = false
TitleText.Parent = Title
-- BRILHO EM TODAS AS PALAVRAS
task.spawn(function()
while TitleText.Parent do
local a = TweenService:Create(
TitleText,
TweenInfo.new(0.4, Enum.EasingStyle.Sine),
{TextColor3 = Color3.fromRGB(210, 140, 255)}
)
a:Play()
a.Completed:Wait()
if not TitleText.Parent then break end
local b = TweenService:Create(
TitleText,
TweenInfo.new(0.4, Enum.EasingStyle.Sine),
{TextColor3 = Color3.fromRGB(255, 255, 255)}
)
b:Play()
b.Completed:Wait()
end
end)
makeDraggable(Bar, Title)
-- CORES DOS BOTÕES
local blue = Color3.fromRGB(0, 100, 255)
local green = Color3.fromRGB(0, 200, 0)
local red = Color3.fromRGB(200, 0, 0)
local running = false
local targets = {}
local clickDelay = 0.04
-- BOTÃO LIGAR/DESLIGAR
local BtnToggle = Instance.new("TextButton")
BtnToggle.Size = UDim2.new(1, 0, 0, 50)
BtnToggle.Position = UDim2.new(0, 0, 0, 0)
BtnToggle.BackgroundColor3 = blue
BtnToggle.Text = "⏯"
BtnToggle.TextColor3 = Color3.new(1, 1, 1)
BtnToggle.Parent = Bar
-- BOTÃO ADICIONAR QUADRADO
local BtnAdd = Instance.new("TextButton")
BtnAdd.Size = UDim2.new(1, 0, 0, 50)
BtnAdd.Position = UDim2.new(0, 0, 0, 50)
BtnAdd.BackgroundColor3 = green
BtnAdd.Text = "+"
BtnAdd.TextColor3 = Color3.new(1, 1, 1)
BtnAdd.Parent = Bar
-- BOTÃO LIMPAR
local BtnClear = Instance.new("TextButton")
BtnClear.Size = UDim2.new(1, 0, 0, 50)
BtnClear.Position = UDim2.new(0, 0, 0, 100)
BtnClear.BackgroundColor3 = red
BtnClear.Text = "X"
BtnClear.TextColor3 = Color3.new(1, 1, 1)
BtnClear.Parent = Bar
-- CLIQUE AUTOMÁTICO
local function clickAt(pos)
VirtualInputManager:SendMouseButtonEvent(
pos.X, pos.Y, 0, true, game, 0
)
VirtualInputManager:SendMouseButtonEvent(
pos.X, pos.Y, 0, false, game, 0
)
end
task.spawn(function()
while ScreenGui.Parent do
if running then
for _, square in ipairs(targets) do
if not running then break end
if square.Parent then
clickAt(Vector2.new(
square.AbsolutePosition.X + square.AbsoluteSize.X / 2,
square.AbsolutePosition.Y + square.AbsoluteSize.Y / 2
))
task.wait(clickDelay)
end
end
end
task.wait()
end
end)
BtnToggle.MouseButton1Click:Connect(function()
running = not running
for _, square in ipairs(targets) do
square.Active = not running
end
end)
BtnAdd.MouseButton1Click:Connect(function()
local square = Instance.new("Frame")
square.Size = UDim2.new(0, 40, 0, 40)
square.Position = UDim2.new(0.5, -20, 0.5, -20)
square.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
square.BackgroundTransparency = 0.5
square.Active = true
square.Parent = ScreenGui
makeDraggable(square)
table.insert(targets, square)
end)
BtnClear.MouseButton1Click:Connect(function()
for _, square in ipairs(targets) do
square:Destroy()
end
targets = {}
end)
-- BRILHO NEON PULSANTE
task.spawn(function()
while TitleText.Parent do
TitleText.TextStrokeColor3 = Color3.fromRGB(255, 0, 255)
TitleText.TextStrokeTransparency = 0
TitleText.TextColor3 = Color3.fromRGB(255, 255, 255)
task.wait(0.3)
if not TitleText.Parent then break end
TitleText.TextStrokeColor3 = Color3.fromRGB(120, 0, 255)
TitleText.TextStrokeTransparency = 0.1
TitleText.TextColor3 = Color3.fromRGB(200, 0, 255)
task.wait(0.3)
end
end)