ADVERTISEMENTREMOVE ADS
[Open Source] Auto farm script (fork)
48,068 views
Description
Forked from 24124's auto farm script.
Just auto farm case points (if possible)
Features:
- Auto farm
- Anti afk
- Votekick’d
ADVERTISEMENTREMOVE ADS
124 Lines • 3.89 KiB
if getgenv().IsRunned then
error("Already ran! @@")
else
getgenv().IsRunned = true
end
getgenv().config = {
arbmode = true,
disable3drendering = false,
fps_cap = 0
}
if game.Workspace.Map.TSpawns:WaitForChild("TSpawn") then
print("gud!")
else
print("Bugged server :(")
game:GetService("TeleportService"):Teleport(game.PlaceId)
end
local Players = game:GetService("Players")
local ReplicatedStorage = game:GetService("ReplicatedStorage")
local VirtualUser = game:GetService("VirtualUser")
local LocalPlayer = Players.LocalPlayer
local roota = Instance.new("ScreenGui", game.CoreGui)
local frame = Instance.new("Frame", roota)
local text = Instance.new("TextLabel", frame)
frame.AnchorPoint = Vector2.new(0.5, 0.5)
frame.Position = UDim2.new(0.5, 0, 0.5, 0)
if getgenv().config.arbmode then
task.spawn(function()
local h = 0
while true do
text.TextColor3 = Color3.fromHSV(h, 1, 1)
h = h + 0.01
if h > 1 then
h = 0
end
task.wait(0.5)
end
end)
end
if getgenv().config.disable3drendering then
game:GetService("RunService"):Set3dRenderingEnabled(false)
end
if getgenv().config.fps_cap ~= 0 then
setfpscap(getgenv().config.fps_cap)
end
-- If the local player is idle, simulate a click.
LocalPlayer.Idled:Connect(function()
VirtualUser:Button2Down(Vector2.new(0, 0), workspace.CurrentCamera.CFrame)
task.wait(1)
VirtualUser:Button2Up(Vector2.new(0, 0), workspace.CurrentCamera.CFrame)
end)
-- Join team (what did you expect?)
function joinTeam(teamName)
-- Join the team using the remote
ReplicatedStorage:WaitForChild("Events"):WaitForChild("JoinTeam"):FireServer(teamName)
end
--anti votekick
game:GetService("CoreGui").RobloxPromptGui.promptOverlay.ChildAdded:Connect(function(c)
if c.Name == 'ErrorPrompt' and c:FindFirstChild("MessageArea") then
game:GetService("TeleportService"):Teleport(game.PlaceId)
end
end)
-- Auto Join Loop
function autoJoinLoop()
local plr = 0
while true do
-- Declare variables
local tWins = workspace.Status.TWins.Value
local ctWins = workspace.Status.CTWins.Value
local currentTeam = LocalPlayer.Team and tostring(LocalPlayer.Team.Name) or "None"
--They won't suspect :)
local character = LocalPlayer.Character
if character then
local humanoid = character:FindFirstChildOfClass("Humanoid")
if humanoid and humanoid.Health > 0 then
humanoid.Health = 0
end
end
text.Text = ("===pleasesheds===\n Made by : @24124. Improve by @Neine.\n all on RScripts.net\n\n\nMatch point : %s/%s, Current Team : %s.\nCurrent Mony :kek: : %s "):format(ctWins, tWins, currentTeam, game.Players.LocalPlayer.PlayerGui.Menew.ShopFrame.BalanceLabel.Text)
--Players check
--lmo
for _, v in ipairs(game:GetService("Players"):GetPlayers()) do
plr = plr + 1
end
if plr < 2 then
game:GetService("TeleportService"):Teleport(game.PlaceId)
else
plr = 0
end
--[[
If the Terrorist side has more wins than CT (Counter-Terrorists), then:
- If I'm not on T side, switch.
- Wait 5 seconds.
Otherwise:
- If I'm not on CT side, switch.
- Wait 5 seconds.
]]
if tWins > ctWins then
if currentTeam ~= "Terrorists" then
joinTeam("T")
end
wait(3)
else
-- trust me bro
if currentTeam ~= "Counter-Terrorists" then
joinTeam("CT")
else
joinTeam("CT")
end
wait(3)
end
end
end
spawn(autoJoinLoop)
ADVERTISEMENTREMOVE ADS
ADVERTISEMENTREMOVE ADS


Comments