-- [[ 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 ]]
-- Auto Farm Controller (Updated for All/Single Player Logic)
-- credits to NoTrack

local ScreenGui = Instance.new("ScreenGui")
local MainFrame = Instance.new("Frame")
local FrameCorner = Instance.new("UICorner")
local TitleLabel = Instance.new("TextLabel")

-- عناصر ميزة اختيار اللاعبين
local SelectPlayerButton = Instance.new("TextButton")
local SelectCorner = Instance.new("UICorner")
local PlayerImage = Instance.new("ImageLabel")
local ImageCorner = Instance.new("UICorner")

-- قائمة اللاعبين المنسدلة
local DropdownFrame = Instance.new("ScrollingFrame")
local DropdownLayout = Instance.new("UIListLayout")
local DropdownCorner = Instance.new("UICorner")

-- الأزرار الأساسية
local FreezeButton = Instance.new("TextButton")
local FreezeCorner = Instance.new("UICorner")
local ExplodeButton = Instance.new("TextButton")
local ExplodeCorner = Instance.new("UICorner")
local CreditsLabel = Instance.new("TextLabel")

-- إعدادات الشاشة
local playersService = game:GetService("Players")
local localPlayer = playersService.LocalPlayer

local success, _ = pcall(function()
    ScreenGui.Parent = game:GetService("CoreGui")
end)

if not success or not ScreenGui.Parent then
    ScreenGui.Parent = localPlayer:WaitForChild("PlayerGui")
end

ScreenGui.ResetOnSpawn = false

-- الخلفية الرئيسية
MainFrame.Name = "MainFrame"
MainFrame.Parent = ScreenGui
MainFrame.BackgroundColor3 = Color3.fromRGB(26, 25, 29)
MainFrame.Position = UDim2.new(0.5, -115, 0.35, -135)
MainFrame.Size = UDim2.new(0, 230, 0, 310)
MainFrame.Active = true
MainFrame.Draggable = true

FrameCorner.CornerRadius = UDim.new(0, 10)
FrameCorner.Parent = MainFrame

TitleLabel.Name = "TitleLabel"
TitleLabel.Parent = MainFrame
TitleLabel.BackgroundTransparency = 1
TitleLabel.Size = UDim2.new(1, 0, 0, 40)
TitleLabel.Font = Enum.Font.SourceSansBold
TitleLabel.Text = "troll players"
TitleLabel.TextColor3 = Color3.fromRGB(240, 240, 240)
TitleLabel.TextSize = 16

-- زر فتح قائمة اللاعبين
SelectPlayerButton.Name = "SelectPlayerButton"
SelectPlayerButton.Parent = MainFrame
SelectPlayerButton.BackgroundColor3 = Color3.fromRGB(38, 37, 42)
SelectPlayerButton.Position = UDim2.new(0, 15, 0, 45)
SelectPlayerButton.Size = UDim2.new(0, 140, 0, 50)
SelectPlayerButton.Font = Enum.Font.SourceSans
SelectPlayerButton.Text = "Select Player..."
SelectPlayerButton.TextColor3 = Color3.fromRGB(255, 255, 255)
SelectPlayerButton.TextSize = 14

SelectCorner.CornerRadius = UDim.new(0, 6)
SelectCorner.Parent = SelectPlayerButton

PlayerImage.Name = "PlayerImage"
PlayerImage.Parent = MainFrame
PlayerImage.BackgroundColor3 = Color3.fromRGB(38, 37, 42)
PlayerImage.Position = UDim2.new(0, 165, 0, 45)
PlayerImage.Size = UDim2.new(0, 50, 0, 50)
PlayerImage.Image = "rbxassetid://0"

ImageCorner.CornerRadius = UDim.new(0, 6)
ImageCorner.Parent = PlayerImage

-- قائمة التمرير
DropdownFrame.Name = "DropdownFrame"
DropdownFrame.Parent = MainFrame
DropdownFrame.BackgroundColor3 = Color3.fromRGB(32, 31, 35)
DropdownFrame.Position = UDim2.new(0, 15, 0, 100)
DropdownFrame.Size = UDim2.new(0, 200, 0, 150)
DropdownFrame.Visible = false
DropdownFrame.ZIndex = 5
DropdownFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
DropdownFrame.ScrollBarThickness = 4

DropdownCorner.CornerRadius = UDim.new(0, 6)
DropdownCorner.Parent = DropdownFrame

DropdownLayout.Parent = DropdownFrame
DropdownLayout.SortOrder = Enum.SortOrder.LayoutOrder
DropdownLayout.Padding = UDim.new(0, 4)

-- زر التجميد
FreezeButton.Name = "FreezeButton"
FreezeButton.Parent = MainFrame
FreezeButton.BackgroundColor3 = Color3.fromRGB(186, 44, 44)
FreezeButton.Position = UDim2.new(0, 15, 0, 110)
FreezeButton.Size = UDim2.new(0, 200, 0, 45)
FreezeButton.Font = Enum.Font.SourceSansBold
FreezeButton.Text = "Auto Freeze: OFF"
FreezeButton.TextColor3 = Color3.fromRGB(255, 255, 255)
FreezeButton.TextSize = 15

FreezeCorner.CornerRadius = UDim.new(0, 8)
FreezeCorner.Parent = FreezeButton

-- زر التفجير
ExplodeButton.Name = "ExplodeButton"
ExplodeButton.Parent = MainFrame
ExplodeButton.BackgroundColor3 = Color3.fromRGB(186, 44, 44)
ExplodeButton.Position = UDim2.new(0, 15, 0, 170)
ExplodeButton.Size = UDim2.new(0, 200, 0, 45)
ExplodeButton.Font = Enum.Font.SourceSansBold
ExplodeButton.Text = "Auto Explode: OFF"
ExplodeButton.TextColor3 = Color3.fromRGB(255, 255, 255)
ExplodeButton.TextSize = 15

ExplodeCorner.CornerRadius = UDim.new(0, 8)
ExplodeCorner.Parent = ExplodeButton

CreditsLabel.Name = "CreditsLabel"
CreditsLabel.Parent = MainFrame
CreditsLabel.BackgroundTransparency = 1
CreditsLabel.Position = UDim2.new(0, 0, 0, 275)
CreditsLabel.Size = UDim2.new(1, 0, 0, 25)
CreditsLabel.Font = Enum.Font.SourceSansItalic
CreditsLabel.Text = "By 7s31 x gimni"
CreditsLabel.TextColor3 = Color3.fromRGB(130, 130, 130)
CreditsLabel.TextSize = 13

-- المتغيرات
local replicatedStorage = game:GetService("ReplicatedStorage")
local remotes = replicatedStorage:FindFirstChild("Remotes")
local trollRemote = remotes and remotes:FindFirstChild("TrollPlayer")

local freezeToggled = false
local explodeToggled = false
local targetPlayer = nil -- nil يعني "All Players"

-- دالة جلب الصورة
local function getPlayerPic(userId)
    local thumbType = Enum.ThumbnailType.HeadShot
    local thumbSize = Enum.ThumbnailSize.Size100x100
    local content, isReady = playersService:GetUserThumbnailAsync(userId, thumbType, thumbSize)
    return isReady and content or "rbxassetid://0"
end

-- إعادة التعيين إذا غادر اللاعب المحدد
playersService.PlayerRemoving:Connect(function(player)
    if player == targetPlayer then
        targetPlayer = nil
        SelectPlayerButton.Text = "All Players"
        PlayerImage.Image = "rbxassetid://0"
    end
end)

-- تحديث القائمة المنسدلة
local function refreshDropdown()
    for _, child in pairs(DropdownFrame:GetChildren()) do
        if child:IsA("TextButton") then child:Destroy() end
    end

    local allBtn = Instance.new("TextButton")
    allBtn.Size = UDim2.new(1, -10, 0, 35)
    allBtn.BackgroundColor3 = Color3.fromRGB(45, 44, 48)
    allBtn.Text = " [ All Players ]"
    allBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
    allBtn.TextXAlignment = Enum.TextXAlignment.Left
    allBtn.Font = Enum.Font.SourceSansBold
    allBtn.ZIndex = 6
    allBtn.Parent = DropdownFrame

    local allCorner = Instance.new("UICorner")
    allCorner.CornerRadius = UDim.new(0, 4)
    allCorner.Parent = allBtn

    allBtn.MouseButton1Click:Connect(function()
        targetPlayer = nil
        SelectPlayerButton.Text = "All Players"
        PlayerImage.Image = "rbxassetid://0"
        DropdownFrame.Visible = false
    end)

    for _, player in pairs(playersService:GetPlayers()) do
        if player ~= playersService.LocalPlayer then
            local pBtn = Instance.new("TextButton")
            pBtn.Size = UDim2.new(1, -10, 0, 35)
            pBtn.BackgroundColor3 = Color3.fromRGB(45, 44, 48)
            pBtn.Text = ""
            pBtn.ZIndex = 6
            pBtn.Parent = DropdownFrame

            local pCorner = Instance.new("UICorner")
            pCorner.CornerRadius = UDim.new(0, 4)
            pCorner.Parent = pBtn

            local smallImg = Instance.new("ImageLabel")
            smallImg.Size = UDim2.new(0, 25, 0, 25)
            smallImg.Position = UDim2.new(0, 5, 0, 5)
            smallImg.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
            smallImg.Image = getPlayerPic(player.UserId)
            smallImg.ZIndex = 7
            smallImg.Parent = pBtn

            local imgCorner = Instance.new("UICorner")
            imgCorner.CornerRadius = UDim.new(0, 4)
            imgCorner.Parent = smallImg

            -- إنشاء عنصر نص مستقل لمنع التداخل مع الصورة
            local nameLabel = Instance.new("TextLabel")
            nameLabel.Size = UDim2.new(1, -40, 1, 0)
            nameLabel.Position = UDim2.new(0, 35, 0, 0)
            nameLabel.BackgroundTransparency = 1
            nameLabel.Text = player.Name
            nameLabel.TextColor3 = Color3.fromRGB(220, 220, 220)
            nameLabel.TextXAlignment = Enum.TextXAlignment.Left
            nameLabel.Font = Enum.Font.SourceSans
            nameLabel.TextSize = 14
            nameLabel.ZIndex = 7
            nameLabel.Parent = pBtn

            pBtn.MouseButton1Click:Connect(function()
                targetPlayer = player
                SelectPlayerButton.Text = player.Name
                PlayerImage.Image = smallImg.Image
                DropdownFrame.Visible = false
            end)
        end
    end
    
    task.defer(function()
        DropdownFrame.CanvasSize = UDim2.new(0, 0, 0, DropdownLayout.AbsoluteContentSize.Y)
    end)
end

SelectPlayerButton.MouseButton1Click:Connect(function()
    DropdownFrame.Visible = not DropdownFrame.Visible
    if DropdownFrame.Visible then
        refreshDropdown()
    end
end)

-- دالة موحدة لإرسال الأمر (تحدد تلقائياً هل الهدف لاعب واحد أم الجميع)
local function sendAction(actionType)
    if not trollRemote then return end
    
    if targetPlayer then
        -- تنفيذ على لاعب محدد
        trollRemote:FireServer(targetPlayer, actionType)
    else
        -- تنفيذ على جميع اللاعبين في السيرفر
        for _, p in pairs(playersService:GetPlayers()) do
            if p ~= localPlayer then
                trollRemote:FireServer(p, actionType)
            end
        end
    end
end

-- زر التجميد
FreezeButton.MouseButton1Click:Connect(function()
    freezeToggled = not freezeToggled
    if freezeToggled then
        FreezeButton.Text = "Auto Freeze: ON"
        FreezeButton.BackgroundColor3 = Color3.fromRGB(46, 139, 87)
        task.spawn(function()
            while freezeToggled do
                sendAction("Freeze")
                task.wait(1)
            end
        end)
    else
        FreezeButton.Text = "Auto Freeze: OFF"
        FreezeButton.BackgroundColor3 = Color3.fromRGB(186, 44, 44)
    end
end)

-- زر التفجير
ExplodeButton.MouseButton1Click:Connect(function()
    explodeToggled = not explodeToggled
    if explodeToggled then
        ExplodeButton.Text = "Auto Explode: ON"
        ExplodeButton.BackgroundColor3 = Color3.fromRGB(46, 139, 87)
        task.spawn(function()
            while explodeToggled do
                sendAction("ExplodeAll")
                task.wait(1)
            end
        end)
    else
        ExplodeButton.Text = "Auto Explode: OFF"
        ExplodeButton.BackgroundColor3 = Color3.fromRGB(186, 44, 44)
    end
end)