-- [[ Blox Fruits - Ultimate Protected Chest Farm ]] --
local Players = game:GetService("Players")
local Workspace = game:GetService("Workspace")
local TweenService = game:GetService("TweenService")
local VirtualUser = game:GetService("VirtualUser")
local CoreGui = game:GetService("CoreGui")
local Player = Players.LocalPlayer
-- حماية مضاعفة وقوية جداً ضد الطرد بسبب الخمول (Anti-AFK Pro)
if not getgenv().AntiKickLoaded then
getgenv().AntiKickLoaded = true
task.spawn(function()
while true do
pcall(function()
for _, connection in pairs(getconnections(Player.Idled)) do
connection:Disable()
end
VirtualUser:CaptureController()
VirtualUser:ClickButton2(Vector2.new())
end)
task.wait(50)
end
end)
end
-- تنظيف الواجهة القديمة إن وجدت
local targetGui = CoreGui:FindFirstChild("ProChestGUI") or Player.PlayerGui:FindFirstChild("ProChestGUI")
if targetGui then targetGui:Destroy() end
-- واجهة مستخدم مصغرة، أنيقة، وضد الاختفاء
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "ProChestGUI"
ScreenGui.ResetOnSpawn = false
ScreenGui.Parent = CoreGui
local MainFrame = Instance.new("Frame")
MainFrame.Size = UDim2.new(0, 210, 0, 100)
MainFrame.Position = UDim2.new(0.05, 0, 0.2, 0)
MainFrame.BackgroundColor3 = Color3.fromRGB(15, 15, 20)
MainFrame.BorderSizePixel = 0
MainFrame.Active = true
MainFrame.Draggable = true
MainFrame.Parent = ScreenGui
local UICorner = Instance.new("UICorner")
UICorner.CornerRadius = UDim.new(0, 8)
UICorner.Parent = MainFrame
local TitleBar = Instance.new("TextLabel")
TitleBar.Size = UDim2.new(1, 0, 0, 28)
TitleBar.BackgroundColor3 = Color3.fromRGB(25, 25, 32)
TitleBar.Text = " Safe Chest Farm [AFK]"
TitleBar.TextColor3 = Color3.fromRGB(255, 255, 255)
TitleBar.TextSize, TitleBar.Font = 12, Enum.Font.SourceSansBold
TitleBar.TextXAlignment = Enum.TextXAlignment.Left
TitleBar.Parent = MainFrame
local TitleCorner = Instance.new("UICorner")
TitleCorner.CornerRadius = UDim.new(0, 8)
TitleCorner.Parent = TitleBar
local ToggleButton = Instance.new("TextButton")
ToggleButton.Size = UDim2.new(0.9, 0, 0, 30)
ToggleButton.Position = UDim2.new(0.05, 0, 0.35, 0)
ToggleButton.BackgroundColor3 = Color3.fromRGB(0, 170, 127)
ToggleButton.Text = "تشغيل الفرم (OFF)"
ToggleButton.TextColor3 = Color3.fromRGB(255, 255, 255)
ToggleButton.TextSize, ToggleButton.Font = 12, Enum.Font.SourceSansBold
ToggleButton.Parent = MainFrame
local ButtonCorner = Instance.new("UICorner")
ButtonCorner.CornerRadius = UDim.new(0, 6)
ButtonCorner.Parent = ToggleButton
local StatusLabel = Instance.new("TextLabel")
StatusLabel.Size = UDim2.new(0.9, 0, 0, 22)
StatusLabel.Position = UDim2.new(0.05, 0, 0.72, 0)
StatusLabel.BackgroundTransparency = 1
StatusLabel.Text = "الحالة: متوقف بأمان"
StatusLabel.TextColor3 = Color3.fromRGB(150, 150, 150)
StatusLabel.TextSize, StatusLabel.Font = 11, Enum.Font.SourceSans
StatusLabel.TextXAlignment = Enum.TextXAlignment.Center
StatusLabel.Parent = MainFrame
local CloseButton = Instance.new("TextButton")
CloseButton.Size = UDim2.new(0, 20, 0, 20)
CloseButton.Position = UDim2.new(1, -22, 0, 4)
CloseButton.BackgroundTransparency = 1
CloseButton.Text = "X"
CloseButton.TextColor3 = Color3.fromRGB(255, 90, 90)
CloseButton.TextSize, CloseButton.Font = 11, Enum.Font.SourceSansBold
CloseButton.Parent = MainFrame
CloseButton.MouseButton1Click:Connect(function()
ScreenGui:Destroy()
end)
-- إحداثيات جزر العالم الثالث بالترتيب
local islands = {
Vector3.new(-12463, 331, -7552), -- Port Town
Vector3.new(-380, 331, 5336), -- Hydra Island
Vector3.new(5734, 609, -704), -- Great Tree
Vector3.new(2884, 43, -3253), -- Floating Turtle
Vector3.new(-5029, 315, -5356), -- Castle on the Sea
Vector3.new(5314, 22, 1047), -- Haunted Castle
Vector3.new(-9515, 147, 5636), -- Peanut Island
Vector3.new(-11025, 103, 8780), -- Ice Cream Island
Vector3.new(-12224, 5, 10515), -- Cake Land
Vector3.new(-10467, 73, -1257) -- Chocolate Island
}
local farming = false
local visitedChests = {}
local activeTween = nil
local function smoothMove(targetCFrame)
pcall(function()
if not Player.Character or not Player.Character:FindFirstChild("HumanoidRootPart") then return end
local hrp = Player.Character.HumanoidRootPart
local distance = (hrp.Position - targetCFrame.Position).Magnitude
local speed = 220 -- سرعة آمنة ومستقرة
if activeTween then
activeTween:Cancel()
end
local tweenInfo = TweenInfo.new(distance / speed, Enum.EasingStyle.Linear)
activeTween = TweenService:Create(hrp, tweenInfo, {CFrame = targetCFrame})
activeTween:Play()
local finished = false
local connection
connection = activeTween.Completed:Connect(function()
finished = true
if connection then connection:Disconnect() end
end)
while not finished and farming do
task.wait(0.05)
end
end)
end
local function startEngine()
task.spawn(function()
while farming do
pcall(function()
for idx, islandPos in ipairs(islands) do
if not farming then break end
StatusLabel.Text = "الانتقال للجزيرة: " .. idx
smoothMove(CFrame.new(islandPos + Vector3.new(0, 40, 0)))
local cleaning = true
local timer = tick()
while cleaning and farming do
local bestChest = nil
local minDistance = math.huge
if not Player.Character or not Player.Character:FindFirstChild("HumanoidRootPart") then break end
local currentPos = Player.Character.HumanoidRootPart.Position
for _, obj in ipairs(Workspace:GetDescendants()) do
pcall(function()
local objName = obj.Name:lower()
if objName == "chest" or objName:find("chest") then
local partRef = nil
if obj:IsA("BasePart") then
partRef = obj
elseif obj:IsA("Model") then
partRef = obj.PrimaryPart or obj:FindFirstChildWhichIsA("BasePart")
end
if partRef then
local key = tostring(math.floor(partRef.Position.X / 12)) .. "_" .. tostring(math.floor(partRef.Position.Z / 12))
if not visitedChests[key] then
local dist = (currentPos - partRef.Position).Magnitude
if dist < 1600 and dist 4 then
cleaning = false
else
task.wait(0.4)
end
end
end
end
StatusLabel.Text = "reload..."
visitedChests = {}
task.wait(1)
end)
end
if activeTween then
activeTween:Cancel()
end
end)
end
ToggleButton.MouseButton1Click:Connect(function()
farming = not farming
if farming then
ToggleButton.Text = "stop farm (OFF)"
ToggleButton.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
startEngine()
else
ToggleButton.Text = "start farm (ON)"
ToggleButton.BackgroundColor3 = Color3.fromRGB(0, 170, 127)
StatusLabel.Text = "الحالة: متوقف بأمان"
end
end)