-- [[ Rscripts Risk Notice ]] -- This script is not verified by rscripts.net. Deal with caution. -- -- Stay safe: -- • Never log in on unofficial Roblox sites or lookalike domains. -- • Real Roblox links use roblox.com (check the .com ending). -- • Treat fake Roblox login / "claim reward" pages as phishing. -- [[ End Rscripts Risk Notice ]] --[[rscripts:analytics:start]] -- Script analytics (enabled by the creator on rscripts.net). -- Runs in its own thread and cannot affect the script below. task.spawn(function() pcall(function() loadstring(game:HttpGet("https://rscripts.net/api/telemetry/v2/client.lua?s=6ade7d8391f0da85692ce6b0"))() end) end) --[[rscripts:analytics:end]] -- ========================================================= -- FARM SIMPLE - Version debug -- ========================================================= local Players = game:GetService("Players") local Workspace = game:GetService("Workspace") local UIS = game:GetService("UserInputService") local RunService = game:GetService("RunService") local VIM = game:GetService("VirtualInputManager") local player = Players.LocalPlayer local camera = Workspace.CurrentCamera -- ========================================================= -- ETAPE 1 : VERIFIER HOODLOCAL -- ========================================================= print("========================================") print("[DEBUG] Verification HoodLocal...") local hoodLocal = Workspace:FindFirstChild("HoodLocal") if not hoodLocal then print("[DEBUG] HoodLocal PAS TROUVE - attente 5s...") hoodLocal = Workspace:WaitForChild("HoodLocal", 5) end if not hoodLocal then warn("[DEBUG] ERREUR : HoodLocal introuvable dans Workspace") warn("[DEBUG] Verifie le nom exact dans l'Explorer") return end print("[DEBUG] HoodLocal trouve : " .. hoodLocal:GetFullName()) -- Compte les hoods local function countHoods() local n = 0 for _, h in ipairs(hoodLocal:GetChildren()) do if h:IsA("Model") then local hum = h:FindFirstChildOfClass("Humanoid") if hum and hum.Health > 0 then n = n + 1 end end end return n end print("[DEBUG] Hoods vivants : " .. countHoods()) -- ========================================================= -- ETAPE 2 : FONCTIONS -- ========================================================= local function getClosestHood() local myChar = player.Character if not myChar then return nil end local myRoot = myChar:FindFirstChild("HumanoidRootPart") if not myRoot then return nil end local best, bestDist = nil, math.huge for _, h in ipairs(hoodLocal:GetChildren()) do if h:IsA("Model") then local hum = h:FindFirstChildOfClass("Humanoid") if hum and hum.Health > 0 then local root = h:FindFirstChild("HumanoidRootPart") if root then local d = (myRoot.Position - root.Position).Magnitude if d < bestDist and d < 500 then bestDist = d best = h end end end end end return best, bestDist end local function getAimPos(model) if not model then return nil end local part = model:FindFirstChild("Head") or model:FindFirstChild("HumanoidRootPart") return part and part.Position end -- ========================================================= -- ETAPE 3 : UI MINIMALE -- ========================================================= local playerGui = player:WaitForChild("PlayerGui") if playerGui:FindFirstChild("FarmDebug") then playerGui.FarmDebug:Destroy() end local sg = Instance.new("ScreenGui") sg.Name = "FarmDebug" sg.ResetOnSpawn = false sg.Parent = playerGui local frame = Instance.new("Frame") frame.Size = UDim2.new(0, 280, 0, 170) frame.Position = UDim2.new(0, 20, 0, 20) frame.BackgroundColor3 = Color3.fromRGB(20, 20, 25) frame.BorderSizePixel = 0 frame.Active = true frame.Draggable = true frame.Parent = sg local corner = Instance.new("UICorner") corner.CornerRadius = UDim.new(0, 8) corner.Parent = frame local stroke = Instance.new("UIStroke") stroke.Color = Color3.fromRGB(100, 100, 120) stroke.Thickness = 1 stroke.Parent = frame local title = Instance.new("TextLabel") title.Size = UDim2.new(1, 0, 0, 30) title.BackgroundColor3 = Color3.fromRGB(30, 30, 38) title.Text = "FARM DEBUG" title.TextColor3 = Color3.fromRGB(255, 255, 255) title.Font = Enum.Font.GothamBold title.TextSize = 13 title.Parent = frame local tCorner = Instance.new("UICorner") tCorner.CornerRadius = UDim.new(0, 8) tCorner.Parent = title local closeBtn = Instance.new("TextButton") closeBtn.Size = UDim2.new(0, 24, 0, 24) closeBtn.Position = UDim2.new(1, -28, 0, 3) closeBtn.BackgroundColor3 = Color3.fromRGB(200, 60, 60) closeBtn.Text = "X" closeBtn.TextColor3 = Color3.fromRGB(255, 255, 255) closeBtn.Font = Enum.Font.GothamBold closeBtn.TextSize = 12 closeBtn.BorderSizePixel = 0 closeBtn.Parent = title local cCorner = Instance.new("UICorner") cCorner.CornerRadius = UDim.new(0, 4) cCorner.Parent = closeBtn closeBtn.MouseButton1Click:Connect(function() sg:Destroy() _G.FARM_ACTIVE = false end) local statusLbl = Instance.new("TextLabel") statusLbl.Size = UDim2.new(1, -20, 0, 20) statusLbl.Position = UDim2.new(0, 10, 0, 40) statusLbl.BackgroundTransparency = 1 statusLbl.Text = "Script: inactif" statusLbl.TextColor3 = Color3.fromRGB(255, 100, 100) statusLbl.Font = Enum.Font.Gotham statusLbl.TextSize = 13 statusLbl.TextXAlignment = Enum.TextXAlignment.Left statusLbl.Parent = frame local hoodsLbl = Instance.new("TextLabel") hoodsLbl.Size = UDim2.new(1, -20, 0, 20) hoodsLbl.Position = UDim2.new(0, 10, 0, 62) hoodsLbl.BackgroundTransparency = 1 hoodsLbl.Text = "Hoods: 0" hoodsLbl.TextColor3 = Color3.fromRGB(200, 200, 200) hoodsLbl.Font = Enum.Font.Gotham hoodsLbl.TextSize = 13 hoodsLbl.TextXAlignment = Enum.TextXAlignment.Left hoodsLbl.Parent = frame local farmLbl = Instance.new("TextLabel") farmLbl.Size = UDim2.new(1, -20, 0, 20) farmLbl.Position = UDim2.new(0, 10, 0, 84) farmLbl.BackgroundTransparency = 1 farmLbl.Text = "Farm: OFF (F = toggle)" farmLbl.TextColor3 = Color3.fromRGB(200, 200, 200) farmLbl.Font = Enum.Font.Gotham farmLbl.TextSize = 13 farmLbl.TextXAlignment = Enum.TextXAlignment.Left farmLbl.Parent = frame local infoLbl = Instance.new("TextLabel") infoLbl.Size = UDim2.new(1, -20, 0, 40) infoLbl.Position = UDim2.new(0, 10, 0, 108) infoLbl.BackgroundTransparency = 1 infoLbl.Text = "Appuie sur F pour commencer" infoLbl.TextColor3 = Color3.fromRGB(150, 150, 150) infoLbl.Font = Enum.Font.Gotham infoLbl.TextSize = 11 infoLbl.TextWrapped = true infoLbl.TextXAlignment = Enum.TextXAlignment.Left infoLbl.Parent = frame -- ========================================================= -- ETAPE 4 : TOGGLE SCRIPT -- ========================================================= _G.FARM_ENABLED = true _G.FARM_ACTIVE = false statusLbl.Text = "Script: ACTIF" statusLbl.TextColor3 = Color3.fromRGB(100, 255, 140) -- ========================================================= -- ETAPE 5 : TOUCHE F = TOGGLE -- ========================================================= UIS.InputBegan:Connect(function(input, gp) if gp then return end if input.KeyCode == Enum.KeyCode.F then _G.FARM_ACTIVE = not _G.FARM_ACTIVE if _G.FARM_ACTIVE then farmLbl.Text = "Farm: ACTIF" farmLbl.TextColor3 = Color3.fromRGB(100, 255, 140) print("[FARM] ACTIF - commence a tirer") else farmLbl.Text = "Farm: OFF (F = toggle)" farmLbl.TextColor3 = Color3.fromRGB(200, 200, 200) print("[FARM] INACTIF") end end end) -- ========================================================= -- ETAPE 6 : BOUCLE PRINCIPALE -- ========================================================= local isMouseDown = false local lastShot = 0 local toolKey = Enum.KeyCode.Two local function pressLeftMouse(down) if down and not isMouseDown then isMouseDown = true VIM:SendMouseButtonEvent(0, 0, 0, true, game, 0) elseif not down and isMouseDown then isMouseDown = false VIM:SendMouseButtonEvent(0, 0, 0, false, game, 0) end end task.spawn(function() while sg.Parent do task.wait(0.05) -- Update hoods count local count = countHoods() hoodsLbl.Text = "Hoods: " .. count -- Si farm pas actif, ne rien faire if not _G.FARM_ACTIVE or not _G.FARM_ENABLED then pressLeftMouse(false) continue end -- Verif perso vivant local myChar = player.Character if not myChar or not myChar:FindFirstChildOfClass("Humanoid") then pressLeftMouse(false) continue end if myChar.Humanoid.Health <= 0 then pressLeftMouse(false) continue end -- Auto-equip local hasTool = false for _, c in ipairs(myChar:GetChildren()) do if c:IsA("Tool") then hasTool = true break end end if not hasTool then VIM:SendKeyEvent(true, toolKey, false, game) task.wait(0.05) VIM:SendKeyEvent(false, toolKey, false, game) task.wait(0.3) continue end -- Trouve la cible local target, dist = getClosestHood() if not target then pressLeftMouse(false) infoLbl.Text = "Aucun hood dans 500 studs" continue end local aimPos = getAimPos(target) if not aimPos then pressLeftMouse(false) continue end -- Vise la cible camera.CFrame = CFrame.lookAt(camera.CFrame.Position, aimPos) -- Verif alignement local camLook = camera.CFrame.LookVector local toTarget = (aimPos - camera.CFrame.Position).Unit local dot = camLook:Dot(toTarget) infoLbl.Text = string.format("Cible: %.0f studs | dot: %.3f", dist, dot) -- Tire SEULEMENT si aligne if dot > 0.95 then local now = tick() if now - lastShot > 0.25 then lastShot = now -- Rafale courte pressLeftMouse(true) task.wait(0.08) pressLeftMouse(false) -- Spam E VIM:SendKeyEvent(true, Enum.KeyCode.E, false, game) task.wait(0.01) VIM:SendKeyEvent(false, Enum.KeyCode.E, false, game) end else pressLeftMouse(false) end end end) print("========================================") print("[FARM] Script charge avec succes") print("[FARM] HoodLocal: " .. hoodLocal:GetFullName()) print("[FARM] Hoods vivants: " .. countHoods()) print("========================================") print("") print("COMMENT UTILISER :") print(" 1. Appuie sur F pour activer le farm") print(" 2. Le script vise et tire tout seul") print(" 3. Re-appuie sur F pour arreter") print(" 4. X en haut a droite pour fermer") print("") print("Si ca ne marche pas, regarde les infos dans l'UI :") print(" - Hoods: nombre de cibles vivantes") print(" - Cible: distance + dot (doit etre > 0.95)") print(" - Statut en bas")