Version / Update: v1.0.0
- Download / Script Link
- local Players=game:GetService("Players")
local RunService=game:GetService("RunService")
local vim=game:GetService("VirtualInputManager")
local gs=game:GetService("GuiService")
local player=Players.LocalPlayer
local playerGui=player.PlayerGui
if playerGui:FindFirstChild("FarmGUI") then playerGui.FarmGUI:Destroy() end
local screenGui=Instance.new("ScreenGui")
screenGui.Name="FarmGUI"
screenGui.ResetOnSpawn=false
screenGui.Parent=playerGui
local frame=Instance.new("Frame")
frame.Name="Main"
frame.Size=UDim2.new(0,280,0,312)
frame.Position=UDim2.new(0.5,-140,0,20)
frame.BackgroundColor3=Color3.fromRGB(25,25,25)
frame.BorderSizePixel=0;frame.Active=true;frame.Draggable=true;frame.Parent=screenGui
local function mc(p,r) Instance.new("UICorner",p).CornerRadius=UDim.new(0,r) end
mc(frame,10)
local function makeLine(y)
local d=Instance.new("Frame",frame)
d.Size=UDim2.new(1,-16,0,1);d.Position=UDim2.new(0,8,0,y)
d.BackgroundColor3=Color3.fromRGB(60,60,60);d.BorderSizePixel=0
end
local titleLabel=Instance.new("TextLabel",frame)
titleLabel.Size=UDim2.new(1,-150,0,28);titleLabel.Position=UDim2.new(0,10,0,0)
titleLabel.BackgroundTransparency=1;titleLabel.Text="Collect Dinos Script"
titleLabel.TextColor3=Color3.fromRGB(200,200,200);titleLabel.TextSize=12
titleLabel.Font=Enum.Font.GothamBold;titleLabel.TextXAlignment=Enum.TextXAlignment.Left
local muteBtn=Instance.new("TextButton",frame)
muteBtn.Size=UDim2.new(0,26,0,20);muteBtn.Position=UDim2.new(1,-124,0,4)
muteBtn.BackgroundColor3=Color3.fromRGB(45,160,45);muteBtn.Text="$"
muteBtn.TextColor3=Color3.fromRGB(255,255,255);muteBtn.TextSize=13
muteBtn.Font=Enum.Font.GothamBold;muteBtn.BorderSizePixel=0;mc(muteBtn,5)
local fpsLabel=Instance.new("TextLabel",frame)
fpsLabel.Size=UDim2.new(0,60,0,20);fpsLabel.Position=UDim2.new(1,-96,0,4)
fpsLabel.BackgroundTransparency=1;fpsLabel.Text="Fps: 0"
fpsLabel.TextColor3=Color3.fromRGB(255,200,80);fpsLabel.TextSize=12
fpsLabel.Font=Enum.Font.GothamBold;fpsLabel.TextXAlignment=Enum.TextXAlignment.Left
local closeBtn=Instance.new("TextButton",frame)
closeBtn.Size=UDim2.new(0,22,0,22);closeBtn.Position=UDim2.new(1,-26,0,3)
closeBtn.BackgroundColor3=Color3.fromRGB(160,45,45);closeBtn.BorderSizePixel=0;closeBtn.Text=""
mc(closeBtn,6)
local x1=Instance.new("Frame",closeBtn);x1.Size=UDim2.new(0,12,0,2);x1.Position=UDim2.new(0.5,-6,0.5,-1)
x1.Rotation=45;x1.BackgroundColor3=Color3.fromRGB(255,255,255);x1.BorderSizePixel=0
local x2=Instance.new("Frame",closeBtn);x2.Size=UDim2.new(0,12,0,2);x2.Position=UDim2.new(0.5,-6,0.5,-1)
x2.Rotation=-45;x2.BackgroundColor3=Color3.fromRGB(255,255,255);x2.BorderSizePixel=0
makeLine(29)
local function makeBtn(y,text)
local b=Instance.new("TextButton",frame)
b.Size=UDim2.new(1,-16,0,34);b.Position=UDim2.new(0,8,0,y)
b.BackgroundColor3=Color3.fromRGB(190,45,45);b.Text=text
b.TextColor3=Color3.fromRGB(255,255,255);b.TextSize=13
b.Font=Enum.Font.GothamBold;b.BorderSizePixel=0;mc(b,8)
return b
end
local farmCont=Instance.new("Frame",frame)
farmCont.Size=UDim2.new(1,-16,0,34);farmCont.Position=UDim2.new(0,8,0,38)
farmCont.BackgroundTransparency=1;farmCont.BorderSizePixel=0
local farmBtn=Instance.new("TextButton",farmCont)
farmBtn.Size=UDim2.new(0.5,-2,1,0);farmBtn.BackgroundColor3=Color3.fromRGB(190,45,45)
farmBtn.Text="FARM";farmBtn.TextColor3=Color3.fromRGB(255,255,255)
farmBtn.TextSize=13;farmBtn.Font=Enum.Font.GothamBold;farmBtn.BorderSizePixel=0;mc(farmBtn,8)
local fd=Instance.new("Frame",farmCont);fd.Size=UDim2.new(0,2,1,0);fd.Position=UDim2.new(0.5,-1,0,0)
fd.BackgroundColor3=Color3.fromRGB(25,25,25);fd.BorderSizePixel=0
local silentBtn=Instance.new("TextButton",farmCont)
silentBtn.Size=UDim2.new(0.5,-2,1,0);silentBtn.Position=UDim2.new(0.5,2,0,0)
silentBtn.BackgroundColor3=Color3.fromRGB(190,45,45);silentBtn.Text="SILENT FARM"
silentBtn.TextColor3=Color3.fromRGB(255,255,255);silentBtn.TextSize=13
silentBtn.Font=Enum.Font.GothamBold;silentBtn.BorderSizePixel=0;mc(silentBtn,8)
makeLine(80)
local hatchBtn=makeBtn(88,"AUTO HATCH EGG")
makeLine(130)
local digBtn=makeBtn(138,"AUTO DIG")
makeLine(180)
local skipLbl=Instance.new("TextLabel",frame)
skipLbl.Size=UDim2.new(1,-16,0,14);skipLbl.Position=UDim2.new(0,8,0,186)
skipLbl.BackgroundTransparency=1;skipLbl.Text="skip eggs to dig:"
skipLbl.TextColor3=Color3.fromRGB(120,120,120);skipLbl.TextSize=11
skipLbl.Font=Enum.Font.Gotham;skipLbl.TextXAlignment=Enum.TextXAlignment.Left
local EGG_TYPES={"Small","Large","Giant","Colossal","Titanic","Legendary","Mythic"}
local EGG_COLORS={
Color3.fromRGB(160,160,160),
Color3.fromRGB(100,210,100),
Color3.fromRGB(80,140,255),
Color3.fromRGB(160,80,220),
Color3.fromRGB(220,180,40),
Color3.fromRGB(220,60,60),
Color3.fromRGB(124,244,200)
}
local skipState={}
local checksRow=Instance.new("Frame",frame)
checksRow.Size=UDim2.new(1,-16,0,26);checksRow.Position=UDim2.new(0,8,0,202)
checksRow.BackgroundTransparency=1;checksRow.BorderSizePixel=0
local btnW=math.floor(264/#EGG_TYPES)
for i,name in ipairs(EGG_TYPES) do
skipState[name]=false
local btn=Instance.new("TextButton",checksRow)
btn.Size=UDim2.new(0,btnW-2,1,0);btn.Position=UDim2.new(0,(i-1)*btnW,0,0)
btn.BackgroundColor3=Color3.fromRGB(45,45,45);btn.Text=name:sub(1,3)
btn.TextColor3=EGG_COLORS[i];btn.TextSize=10
btn.Font=Enum.Font.GothamBold;btn.BorderSizePixel=0;mc(btn,6)
local col=EGG_COLORS[i]
btn.MouseButton1Click:Connect(function()
skipState[name]=not skipState[name]
btn.BackgroundColor3=skipState[name] and col or Color3.fromRGB(45,45,45)
btn.TextColor3=skipState[name] and Color3.fromRGB(255,255,255) or col
end)
end
makeLine(234)
local speedRow=Instance.new("Frame",frame)
speedRow.Size=UDim2.new(1,-16,0,28);speedRow.Position=UDim2.new(0,8,0,242)
speedRow.BackgroundTransparency=1;speedRow.BorderSizePixel=0
local speedLbl=Instance.new("TextLabel",speedRow)
speedLbl.Size=UDim2.new(0,50,1,0);speedLbl.BackgroundTransparency=1
speedLbl.Text="Speed:";speedLbl.TextColor3=Color3.fromRGB(160,160,160)
speedLbl.TextSize=12;speedLbl.Font=Enum.Font.Gotham;speedLbl.TextXAlignment=Enum.TextXAlignment.Left
local speedInput=Instance.new("TextBox",speedRow)
speedInput.Size=UDim2.new(0,55,1,-4);speedInput.Position=UDim2.new(0,52,0,2)
speedInput.BackgroundColor3=Color3.fromRGB(45,45,45);speedInput.Text="32"
speedInput.TextColor3=Color3.fromRGB(255,255,255);speedInput.TextSize=13
speedInput.Font=Enum.Font.Gotham;speedInput.BorderSizePixel=0
speedInput.ClearTextOnFocus=false;mc(speedInput,6)
local afkBtn=Instance.new("TextButton",speedRow)
afkBtn.Size=UDim2.new(1,-114,1,-4);afkBtn.Position=UDim2.new(0,112,0,2)
afkBtn.BackgroundColor3=Color3.fromRGB(50,90,160);afkBtn.Text="ANTI-AFK"
afkBtn.TextColor3=Color3.fromRGB(255,255,255);afkBtn.TextSize=12
afkBtn.Font=Enum.Font.GothamBold;afkBtn.BorderSizePixel=0;mc(afkBtn,6)
makeLine(276)
local statusLabel=Instance.new("TextLabel",frame)
statusLabel.Size=UDim2.new(1,-16,0,14);statusLabel.Position=UDim2.new(0,8,1,-16)
statusLabel.BackgroundTransparency=1;statusLabel.Text="ready"
statusLabel.TextColor3=Color3.fromRGB(120,120,120);statusLabel.TextSize=11
statusLabel.Font=Enum.Font.Gotham;statusLabel.TextXAlignment=Enum.TextXAlignment.Left
local GREEN=Color3.fromRGB(45,170,45)
local RED=Color3.fromRGB(190,45,45)
local BLUE=Color3.fromRGB(50,90,160)
local BLUE_ON=Color3.fromRGB(60,140,60)
local TeleportHome=game.ReplicatedStorage.RemoteEvents.TeleportHome
local coinSound=game.ReplicatedStorage.Audio.AddCurrency
local farming=false
local silentFarming=false
local autoHatch=false
local autoDig=false
local antiAfk=false
local soundMuted=false
local myPlot=nil
local farmThread=nil
local hatchThread=nil
local digThread=nil
local speedConn=nil
local afkConn=nil
local loopSpeedConn=nil
local origCFrames={}
local currentSpeed=32
local MIN_CD=0.82
local STEP=0.04
local MAX_MISSES=3
pcall(function() workspace.CurrentCamera.MaxZoomDistance=9999 end)
local function goHome()
pcall(function() TeleportHome:FireServer() end)
task.wait(1.5)
end
local function parseCash(str)
if not str then return 0 end
str=tostring(str):gsub("%$",""):gsub(",",""):gsub(" ","")
local num=tonumber(str:match("[%d%.]+"))
if not num then return 0 end
local s=(str:match("[KMBTkmbt]+$") or ""):upper()
if s=="K" then return num*1e3
elseif s=="M" then return num*1e6
elseif s=="B" then return num*1e9
elseif s=="T" then return num*1e12 end
return num
end
local function getRemoteHatchLimit()
local limit=0
pcall(function()
if not myPlot then return end
local t=myPlot.ParkTierModel.Screen1.Screen:FindFirstChild("RemoteHatchText",true)
if t then
local s=t.Text:match("%$[%d%.]+[KMBTkmbt]*")
if s then limit=parseCash(s) end
end
end)
return limit
end
local function getMyPlot()
local hrp=player.Character and player.Character:FindFirstChild("HumanoidRootPart")
if not hrp then return nil end
local closest,minDist=nil,math.huge
for _,plot in ipairs(game.Workspace.Plots:GetChildren()) do
local center=plot:FindFirstChild("Center")
if center then
local dist=(hrp.Position-center.Position).Magnitude
if dist<minDist then minDist=dist;closest=plot end
end
end
return closest
end
local function ensurePlot()
if not myPlot then
myPlot=getMyPlot()
statusLabel.Text="plot: "..(myPlot and myPlot.Name or "?")
task.wait(0.3)
end
end
local function getSortedButtons()
if not myPlot then return {} end
local left,right={},{}
for _,unit in ipairs(myPlot.UnitSigns:GetChildren()) do
local btn=unit:FindFirstChild("Button")
if btn and btn.Transparency==0 then
if btn.Position.X<0 then table.insert(left,btn)
else table.insert(right,btn) end
end
end
table.sort(left,function(a,b) return a.Position.Z>b.Position.Z end)
table.sort(right,function(a,b) return a.Position.Z>b.Position.Z end)
local res={}
local max=math.max(#left,#right)
for i=1,max do
if left[i] then table.insert(res,left[i]) end
if right[i] then table.insert(res,right[i]) end
end
return res
end
local function restoreButtons()
for btn,cf in pairs(origCFrames) do pcall(function() btn.CFrame=cf end) end
origCFrames={}
end
local function guiClick(btn)
if not btn then return false end
for _=1,10 do
gs.SelectedObject=btn
task.wait(0.15)
if gs.SelectedObject==btn then
vim:SendKeyEvent(true,Enum.KeyCode.Return,false,game)
task.wait(0.05)
vim:SendKeyEvent(false,Enum.KeyCode.Return,false,game)
task.wait(0.1)
gs.SelectedObject=nil
return true
end
task.wait(0.1)
end
gs.SelectedObject=nil
return false
end
-- Ждём пока диалог ПОЛНОСТЬЮ готов:
-- либо HatchButton видна (можно брать на месте)
-- либо NotInZoneFrame видна (нужно идти домой)
-- возвращает "hatch", "home" или "" если таймаут
local function waitForDialogReady()
for _=1,100 do
local ok1,hbVis=pcall(function()
return playerGui.EggGui.EggInfo.HatchMenu.HatchButton.Visible
end)
local ok2,nizVis=pcall(function()
return playerGui.EggGui.EggInfo.HatchMenu.NotInZoneFrame.Visible
end)
local ok3,name=pcall(function()
return playerGui.EggGui.EggInfo.ItemName.Text
end)
local realName=ok3 and name~="Item Name" and name~="" and name
if realName then
if ok1 and hbVis then return "hatch" end
if ok2 and nizVis then return "home" end
end
task.wait(0.1)
end
return ""
end
local function getEggDialogInfo()
local eggName,eggPrice,hasUnknown="",0,false
local ok1,n=pcall(function() return playerGui.EggGui.EggInfo.ItemName.Text end)
local ok2,p=pcall(function() return playerGui.EggGui.EggInfo.HatchMenu.PriceFrame.ItemPrice.Text end)
eggName=(ok1 and n~="Item Name" and n~="" and n) or ""
eggPrice=(ok2 and parseCash(p)) or 0
local ok3,sf=pcall(function() return playerGui.EggGui.EggInfo.ScrollingFrame end)
if ok3 and sf then
for _,v in ipairs(sf:GetChildren()) do
local nt=v:FindFirstChild("NameText")
if nt and nt.Text=="???" then hasUnknown=true;break end
end
end
return eggName,eggPrice,hasUnknown
end
local function anySkipped()
for _,v in pairs(skipState) do if v then return true end end
return false
end
local function handleEggDialog()
statusLabel.Text="waiting for egg..."
local dialogState=waitForDialogReady()
if dialogState=="" then return end
local eggName,eggPrice,hasUnknown=getEggDialogInfo()
if eggName=="" then return end
if dialogState=="home" then
local remoteLimit=getRemoteHatchLimit()
if remoteLimit>0 and eggPrice<=remoteLimit then
else
statusLabel.Text="going home: "..eggName
goHome()
task.wait(0.5)
myPlot=getMyPlot()
for _=1,15 do
local ok,vis=pcall(function()
return playerGui.EggGui.EggInfo.HatchMenu.NotInZoneFrame.Visible
end)
if ok and not vis then break end
task.wait(0.3)
end
eggName,eggPrice,hasUnknown=getEggDialogInfo()
end
end
local ok,cashTxt=pcall(function() return playerGui.CurrencyGui.Frame.CashText.Text end)
local myCash=(ok and parseCash(cashTxt)) or 0
local shouldTake=false
if not anySkipped() then
shouldTake=hasUnknown and (eggPrice==0 or myCash>=eggPrice)
else
shouldTake=true
for shortName,isSkipped in pairs(skipState) do
if isSkipped and string.find(eggName,shortName,1,true) then
shouldTake=false;break
end
end
if eggPrice>0 and myCash<eggPrice then shouldTake=false end
end
local clicked=false
if shouldTake then
statusLabel.Text="hatching: "..eggName
local ok2,hb=pcall(function() return playerGui.EggGui.EggInfo.HatchMenu.HatchButton end)
if ok2 then
while not clicked and autoDig do
clicked=guiClick(hb)
if not clicked then task.wait(0.2) end
end
end
else
statusLabel.Text="discarding: "..eggName
local ok3,db=pcall(function() return playerGui.EggGui.EggInfo.DiscardMenu.DiscardButton end)
if ok3 then
while not clicked and autoDig do
clicked=guiClick(db)
if not clicked then task.wait(0.2) end
end
end
end
task.wait(0.5)
end
local function farmLoop()
local stepWait=STEP
local zeroCycles=0
origCFrames={}
while farming or silentFarming do
local char=player.Character
local hrp=char and char:FindFirstChild("HumanoidRootPart")
if not hrp then task.wait(1);continue end
local buttons=getSortedButtons()
if #buttons==0 then task.wait(1);continue end
statusLabel.Text="dinos:"..#buttons.." cd:"..string.format("%.2f",stepWait)
local cycleStart=tick()
local collected=0
local conn=game.ReplicatedStorage.RemoteEvents.UpdateCurrencyEvent.OnClientEvent:Connect(function()
collected=collected+1
end)
for _,btn in ipairs(buttons) do
if not farming and not silentFarming then break end
if silentFarming then
if not origCFrames[btn] then origCFrames[btn]=btn.CFrame end
btn.CFrame=hrp.CFrame
task.wait(stepWait)
btn.CFrame=origCFrames[btn]
origCFrames[btn]=nil
task.wait(stepWait)
else
local rot=hrp.CFrame-hrp.CFrame.p
hrp.CFrame=CFrame.new(btn.Position+Vector3.new(0,2,0))*rot
task.wait(stepWait)
end
end
conn:Disconnect()
if collected==0 then
zeroCycles=zeroCycles+1
if zeroCycles>=10 then
statusLabel.Text="wrong plot? going home..."
goHome()
task.wait(0.5)
myPlot=getMyPlot()
zeroCycles=0
end
else
zeroCycles=0
end
local missed=#buttons-collected
if missed>=MAX_MISSES then stepWait=math.min(stepWait+0.05,0.5)
else stepWait=math.max(stepWait-0.01,STEP) end
local elapsed=tick()-cycleStart
if elapsed<MIN_CD then task.wait(MIN_CD-elapsed) end
end
restoreButtons()
end
local function hatchLoop()
while autoHatch do
myPlot=getMyPlot()
if myPlot then
for _,slot in ipairs(myPlot.EggSlots:GetChildren()) do
if not autoHatch then break end
local pp=slot:FindFirstChildWhichIsA("ProximityPrompt")
local timerPart=slot:FindFirstChild("TimerPart")
if pp and timerPart and pp.ActionText=="Hatch" then
local sg=timerPart:FindFirstChildWhichIsA("SurfaceGui",true)
local tf=sg and sg:FindFirstChild("TimerFrame",true)
local tt=tf and tf:FindFirstChild("TimerText")
if tt and tt.Text=="Ready" then
local hrp=player.Character and player.Character:FindFirstChild("HumanoidRootPart")
if hrp then
local rot=hrp.CFrame-hrp.CFrame.p
hrp.CFrame=CFrame.new(timerPart.Position+Vector3.new(0,4,0))*rot
task.wait(0.5)
fireproximityprompt(pp)
task.wait(0.5)
goHome()
task.wait(0.3)
myPlot=getMyPlot()
end
end
end
end
end
task.wait(1)
end
end
local function digLoop()
while autoDig do
local hrp=player.Character and player.Character:FindFirstChild("HumanoidRootPart")
if not hrp then task.wait(1);continue end
local found=false
for _,v in ipairs(game.Workspace.EggSpawnZones:GetDescendants()) do
if not autoDig then break end
if v and v.Name=="TakeEggPrompt" and v:IsA("ProximityPrompt") then
local part=v.Parent
if part and part:IsA("BasePart") then
hrp=player.Character and player.Character:FindFirstChild("HumanoidRootPart")
if not hrp then break end
local rot=hrp.CFrame-hrp.CFrame.p
hrp.CFrame=CFrame.new(part.Position+Vector3.new(0,3,0))*rot
task.wait(0.5)
for _=1,3 do
pcall(function() fireproximityprompt(v) end)
task.wait(0.3)
end
handleEggDialog()
found=true
task.wait(0.3)
end
end
end
if not found then task.wait(2) end
end
end
local function startLoopSpeed(val)
currentSpeed=val
if loopSpeedConn then loopSpeedConn:Disconnect() end
if speedConn then speedConn:Disconnect() end
local char=player.Character
if char then
local hum=char:FindFirstChildWhichIsA("Humanoid")
if hum then hum.WalkSpeed=val end
end
loopSpeedConn=RunService.Heartbeat:Connect(function()
local c=player.Character
if c then
local h=c:FindFirstChildWhichIsA("Humanoid")
if h and h.WalkSpeed~=currentSpeed then h.WalkSpeed=currentSpeed end
end
end)
speedConn=player.CharacterAdded:Connect(function(c)
c:WaitForChild("Humanoid").WalkSpeed=currentSpeed
end)
end
local function stopLoopSpeed()
if loopSpeedConn then loopSpeedConn:Disconnect();loopSpeedConn=nil end
if speedConn then speedConn:Disconnect();speedConn=nil end
currentSpeed=32
local char=player.Character
if char then
local hum=char:FindFirstChildWhichIsA("Humanoid")
if hum then hum.WalkSpeed=32 end
end
end
local function startAntiAfk()
if afkConn then afkConn:Disconnect() end
afkConn=RunService.Heartbeat:Connect(function()
if antiAfk then
pcall(function()
vim:SendKeyEvent(true,Enum.KeyCode.W,false,game)
vim:SendKeyEvent(false,Enum.KeyCode.W,false,game)
end)
end
end)
end
local function stopAntiAfk()
if afkConn then afkConn:Disconnect();afkConn=nil end
end
local fpsCount=0
local fpsLast=tick()
RunService.RenderStepped:Connect(function()
fpsCount=fpsCount+1
local now=tick()
if now-fpsLast>=0.5 then
fpsLabel.Text="Fps: "..math.floor(fpsCount/(now-fpsLast))
fpsCount=0;fpsLast=now
end
end)
local function stopFarm()
farming=false;silentFarming=false
restoreButtons()
if farmThread then task.cancel(farmThread);farmThread=nil end
farmBtn.BackgroundColor3=RED;farmBtn.Text="FARM"
silentBtn.BackgroundColor3=RED;silentBtn.Text="SILENT FARM"
statusLabel.Text="stopped"
end
muteBtn.MouseButton1Click:Connect(function()
soundMuted=not soundMuted
pcall(function() coinSound.Volume=soundMuted and 0 or 1 end)
muteBtn.BackgroundColor3=soundMuted and Color3.fromRGB(160,45,45) or Color3.fromRGB(45,160,45)
end)
closeBtn.MouseButton1Click:Connect(function()
farming=false;silentFarming=false;autoHatch=false;autoDig=false;antiAfk=false
restoreButtons()
if farmThread then task.cancel(farmThread) end
if hatchThread then task.cancel(hatchThread) end
if digThread then task.cancel(digThread) end
pcall(function() coinSound.Volume=1 end)
stopLoopSpeed();stopAntiAfk();screenGui:Destroy()
end)
farmBtn.MouseButton1Click:Connect(function()
if silentFarming then stopFarm();return end
farming=not farming
if farming then
silentFarming=false
farmBtn.BackgroundColor3=GREEN;farmBtn.Text="STOP"
silentBtn.BackgroundColor3=RED;silentBtn.Text="SILENT FARM"
ensurePlot()
farmThread=task.spawn(farmLoop)
else stopFarm() end
end)
silentBtn.MouseButton1Click:Connect(function()
if farming then stopFarm();return end
silentFarming=not silentFarming
if silentFarming then
farming=false
silentBtn.BackgroundColor3=GREEN;silentBtn.Text="STOP"
farmBtn.BackgroundColor3=RED;farmBtn.Text="FARM"
ensurePlot()
farmThread=task.spawn(farmLoop)
else stopFarm() end
end)
hatchBtn.MouseButton1Click:Connect(function()
autoHatch=not autoHatch
if autoHatch then
hatchBtn.BackgroundColor3=GREEN;hatchBtn.Text="STOP HATCH"
ensurePlot()
hatchThread=task.spawn(hatchLoop)
else
hatchBtn.BackgroundColor3=RED;hatchBtn.Text="AUTO HATCH EGG"
if hatchThread then task.cancel(hatchThread);hatchThread=nil end
end
end)
digBtn.MouseButton1Click:Connect(function()
autoDig=not autoDig
if autoDig then
digBtn.BackgroundColor3=GREEN;digBtn.Text="STOP DIG"
ensurePlot()
digThread=task.spawn(digLoop)
else
digBtn.BackgroundColor3=RED;digBtn.Text="AUTO DIG"
if digThread then task.cancel(digThread);digThread=nil end
gs.SelectedObject=nil
end
end)
speedInput.FocusLost:Connect(function()
local val=tonumber(speedInput.Text)
if val then
val=math.clamp(val,1,500)
speedInput.Text=tostring(val)
startLoopSpeed(val)
else
speedInput.Text="32"
stopLoopSpeed()
end
end)
afkBtn.MouseButton1Click:Connect(function()
antiAfk=not antiAfk
if antiAfk then
afkBtn.BackgroundColor3=BLUE_ON;afkBtn.Text="AFK: ON"
startAntiAfk()
else
afkBtn.BackgroundColor3=BLUE;afkBtn.Text="ANTI-AFK"
stopAntiAfk()
end
end)[ View More ]
This is the first script I made. It's KEYLESSMAIN:
Auto Collect Money
Auto Digging (Buggy)
Auto Hatch Eggs (by default - smart mode - looks if you unlocked all dinos from the egg. If not, looks to see if you can afford it. If you choose the eggs class to skip - collects everything except that class)MISC:
Change your speed
Anti-afk Kick
Disable Annoying Money Claimed Sound*Created and tested on Solara. Xeno is a stealer