سكربت العرب V1 Grow a Garden

-- العرب v4.0 | Grow a Garden | Auto Farm متطور + Server Hop
local lib = loadstring(game:HttpGet("https://pastebin.com/raw/Zz9bA1vU"))()
local win = lib:CreateWindow("🕌 العرب | Grow a Garden v4.0", Color3.fromRGB(255,0,0), "Delta Edition")

-- تبويبات الواجهة
local farm = win:CreateTab("🌾 Farm")
local boost = win:CreateTab("💎 Boost")
local tools = win:CreateTab("⚙️ Tools")
local system = win:CreateTab("🛡️ System")

-- إعدادات عامة
getgenv().smartFarm = false
getgenv().autoReplant = false
getgenv().autoUpgrade = false
getgenv().autoCollect = false
getgenv().antiAfk = true
getgenv().flyMode = false

-- 🌾 تبويب Farm
farm:CreateToggle("✅ Smart Auto Farm", function(v) getgenv().smartFarm = v end)
farm:CreateToggle("♻️ Auto Replant", function(v) getgenv().autoReplant = v end)
farm:CreateToggle("⬆️ Auto Upgrade", function(v) getgenv().autoUpgrade = v end)
farm:CreateToggle("🎁 Auto Daily Box", function(v) getgenv().autoCollect = v end)

-- 💎 تبويب Boost
boost:CreateButton("🚀 Speed x3", function()
    local plr = game.Players.LocalPlayer
    if plr.Character and plr.Character:FindFirstChildOfClass("Humanoid") then
        plr.Character.Humanoid.WalkSpeed = 100
    end
end)
boost:CreateButton("🦘 Jump Power x3", function()
    local plr = game.Players.LocalPlayer
    if plr.Character and plr.Character:FindFirstChildOfClass("Humanoid") then
        plr.Character.Humanoid.JumpPower = 120
    end
end)
boost:CreateButton("🛫 Fly Toggle", function()
    getgenv().flyMode = not getgenv().flyMode
    local plr = game.Players.LocalPlayer
    local char = plr.Character
    if not char or not char:FindFirstChild("HumanoidRootPart") then return end

    if getgenv().flyMode then
        local bg = Instance.new("BodyGyro")
        bg.P = 9e4
        bg.MaxTorque = Vector3.new(9e9,9e9,9e9)
        bg.CFrame = char.HumanoidRootPart.CFrame
        bg.Parent = char.HumanoidRootPart

        local bv = Instance.new("BodyVelocity")
        bv.Velocity = Vector3.new(0,0,0)
        bv.MaxForce = Vector3.new(9e9,9e9,9e9)
        bv.Parent = char.HumanoidRootPart

        spawn(function()
            while getgenv().flyMode do
                wait()
                local move = Vector3.new()
                if game:GetService("UserInputService"):IsKeyDown(Enum.KeyCode.W) then
                    move = move + char.HumanoidRootPart.CFrame.LookVector
                end
                if game:GetService("UserInputService"):IsKeyDown(Enum.KeyCode.S) then
                    move = move - char.HumanoidRootPart.CFrame.LookVector
                end
                if game:GetService("UserInputService"):IsKeyDown(Enum.KeyCode.A) then
                    move = move - char.HumanoidRootPart.CFrame.RightVector
                end
                if game:GetService("UserInputService"):IsKeyDown(Enum.KeyCode.D) then
                    move = move + char.HumanoidRootPart.CFrame.RightVector
                end
                bv.Velocity = move.Unit * 50
                bg.CFrame = char.HumanoidRootPart.CFrame
            end
            bg:Destroy()
            bv:Destroy()
        end)
    else
        for _, obj in pairs(char.HumanoidRootPart:GetChildren()) do
            if obj:IsA("BodyGyro") or obj:IsA("BodyVelocity") then
                obj:Destroy()
            end
        end
    end
end)

-- ⚙️ تبويب Tools
tools:CreateButton("🧲 جذب الأدوات", function()
    local plr = game.Players.LocalPlayer
    if not plr.Character or not plr.Character:FindFirstChild("HumanoidRootPart") then return end
    for _,v in pairs(workspace:GetDescendants()) do
        if v:IsA("Tool") and v:FindFirstChild("Handle") then
            v.Handle.CFrame = plr.Character.HumanoidRootPart.CFrame
        end
    end
end)
tools:CreateButton("🧼 Clear Lag", function()
    for _,v in pairs(workspace:GetDescendants()) do
        if v:IsA("Part") and not v.Anchored then
            v:Destroy()
        end
    end
end)
tools:CreateButton("🔁 Reset Speed", function()
    local plr = game.Players.LocalPlayer
    if plr.Character and plr.Character:FindFirstChildOfClass("Humanoid") then
        plr.Character.Humanoid.WalkSpeed = 16
        plr.Character.Humanoid.JumpPower = 50
    end
end)

-- 🛡️ تبويب System
system:CreateToggle("🙅‍♂️ Anti-AFK", function(v) getgenv().antiAfk = v end)
system:CreateButton("🔄 إعادة تشغيل الشخصية", function()
    game.Players.LocalPlayer:LoadCharacter()
end)
system:CreateButton("❌ إغلاق السكربت", function()
    win:Destroy()
end)

-- ==================== الذكاء الاصطناعي في الزراعة ====================
task.spawn(function()
    while wait(1) do
        if getgenv().smartFarm then
            local plr = game.Players.LocalPlayer
            local rs = game:GetService("ReplicatedStorage")
            local cash = plr:FindFirstChild("Stats").Cash.Value
            local seeds = {
                {name="MysticMelon", price=2500},
                {name="GiantCarrot", price=1000},
                {name="Blueberry", price=500},
                {name="Pumpkin", price=250},
                {name="Wheat", price=100},
                {name="Corn", price=50},
                {name="Tomato", price=25},
            }
            for _, s in ipairs(seeds) do
                if cash >= s.price then
                    rs.BuySeed:FireServer(s.name)
                    break
                end
            end
            for _, plot in pairs(workspace.Plots:GetChildren()) do
                if plot:FindFirstChild("Empty") and plot.Owner.Value == plr then
                    rs.PlantSeed:FireServer(plot)
                end
            end
            for _, plant in pairs(workspace.Crops:GetChildren()) do
                if plant:FindFirstChild("Ripe") and plant.Owner.Value == plr then
                    rs.HarvestCrop:FireServer(plant)
                end
            end
            rs.SellAll:FireServer()
        end
    end
end)

-- ==================== زرع تلقائي ====================
task.spawn(function()
    while wait(3) do
        if getgenv().autoReplant then
            local rs = game:GetService("ReplicatedStorage")
            for _, plot in pairs(workspace.Plots:GetChildren()) do
                if plot:FindFirstChild("Empty") and plot.Owner.Value == game.Players.LocalPlayer then
                    rs.PlantSeed:FireServer(plot)
                end
            end
        end
    end
end)

-- ==================== ترقية تلقائية ====================
task.spawn(function()
    while wait(5) do
        if getgenv().autoUpgrade then
            local rs = game:GetService("ReplicatedStorage")
            local upgrades = {"Fertilizer", "Watering", "Expansion"}
            for _, u in pairs(upgrades) do
                rs.UpgradeSystem:FireServer(u)
                wait(0.3)
            end
        end
    end
end)

-- ==================== جمع صندوق يومي تلقائي ====================
task.spawn(function()
    while wait(10) do
        if getgenv().autoCollect then
            local box = workspace:FindFirstChild("DailyBox")
            if box and box:FindFirstChild("ClickDetector") then
                fireclickdetector(box.ClickDetector)
            end
        end
    end
end)

-- ==================== منع الطرد (Anti AFK) ====================
game:GetService("Players").LocalPlayer.Idled:Connect(function()
    if getgenv().antiAfk then
        local vu = game:GetService("VirtualUser")
        vu:Button2Down(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
        wait(1)
        vu:Button2Up(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
    end
end)

-- ==================== التبديل التلقائي للسيرفر عند الطرد ====================
local HttpService = game:GetService("HttpService")
local TeleportService = game:GetService("TeleportService")
local PlaceID = game.PlaceId
local Player = game.Players.LocalPlayer

local function serverHop()
    local servers = {}
    local cursor = ""
    repeat
        local success, response = pcall(function()
            return HttpService:JSONDecode(game:HttpGetAsync("https://games.roblox.com/v1/games/"..PlaceID.."/servers/Public?limit=100&cursor="..cursor))
        end)
        if success and response and response.data then
            for _, server in ipairs(response.data) do
                if server.playing < server.maxPlayers then
                    table.insert(servers, server.id)
                end
            end
            cursor = response.nextPageCursor or ""
        else
            cursor = ""
        end
    until cursor == ""

    if #servers > 0 then
        local newServer = servers[math.random(1,#servers)]
        TeleportService:TeleportToPlaceInstance(PlaceID, newServer, Player)
    else
        warn("ما حصلت سيرفر فاضي للتبديل")
    end
end

Player.OnKick:Connect(function(reason)
    warn("تم الطرد من السيرفر! السبب: "..reason)
    serverHop()
end)

-- ==================== بداية السكربت ====================
print("🌱 العرب Grow a Garden | سكربت متكامل شغال على Delta Android")