local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local UserInputService = game:GetService("UserInputService")
local Workspace = game:GetService("Workspace")
local LocalPlayer = Players.LocalPlayer

local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "tarekscripter_troller"
ScreenGui.ResetOnSpawn = false
ScreenGui.Parent = LocalPlayer:WaitForChild("PlayerGui")

local MainFrame = Instance.new("Frame")
MainFrame.Size = UDim2.new(0, 240, 0, 110)
MainFrame.Position = UDim2.new(0.05, 0, 0.4, 0)
MainFrame.BackgroundColor3 = Color3.fromRGB(20, 20, 20)
MainFrame.BorderSizePixel = 0
MainFrame.Active = true
MainFrame.Draggable = true
MainFrame.Parent = ScreenGui

local Corner = Instance.new("UICorner")
Corner.CornerRadius = UDim.new(0, 8)
Corner.Parent = MainFrame

local TitleFrame = Instance.new("Frame")
TitleFrame.Size = UDim2.new(1, 0, 0, 30)
TitleFrame.BackgroundColor3 = Color3.fromRGB(12, 12, 12)
TitleFrame.BorderSizePixel = 0
TitleFrame.Parent = MainFrame

local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, -60, 1, 0)
Title.Position = UDim2.new(0, 8, 0, 0)
Title.Text = "tarekscripter troller (BETA)"
Title.TextColor3 = Color3.fromRGB(255, 50, 50)
Title.TextSize = 12
Title.Font = Enum.Font.SourceSansBold
Title.TextXAlignment = Enum.TextXAlignment.Left
Title.BackgroundTransparency = 1
Title.Parent = TitleFrame

local CloseBtn = Instance.new("TextButton")
CloseBtn.Size = UDim2.new(0, 25, 1, 0)
CloseBtn.Position = UDim2.new(1, -25, 0, 0)
CloseBtn.Text = "X"
CloseBtn.TextColor3 = Color3.fromRGB(255, 80, 80)
CloseBtn.TextSize = 14
CloseBtn.Font = Enum.Font.SourceSansBold
CloseBtn.BackgroundTransparency = 1
CloseBtn.Parent = TitleFrame

local MinimizeBtn = Instance.new("TextButton")
MinimizeBtn.Size = UDim2.new(0, 25, 1, 0)
MinimizeBtn.Position = UDim2.new(1, -50, 0, 0)
MinimizeBtn.Text = "-"
MinimizeBtn.TextColor3 = Color3.fromRGB(200, 200, 200)
MinimizeBtn.TextSize = 16
MinimizeBtn.Font = Enum.Font.SourceSansBold
MinimizeBtn.BackgroundTransparency = 1
MinimizeBtn.Parent = TitleFrame

local DestroyBtn = Instance.new("TextButton")
DestroyBtn.Size = UDim2.new(0.88, 0, 0, 50)
DestroyBtn.Position = UDim2.new(0.06, 0, 0.4, 0)
DestroyBtn.BackgroundColor3 = Color3.fromRGB(180, 40, 40)
DestroyBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
DestroyBtn.Text = "تدمير: معطل"
DestroyBtn.TextSize = 16
DestroyBtn.Font = Enum.Font.SourceSansBold
DestroyBtn.Parent = MainFrame

local BtnCorner = Instance.new("UICorner")
BtnCorner.CornerRadius = UDim.new(0, 6)
BtnCorner.Parent = DestroyBtn

local coordsList = {
    CFrame.new(24.8, -16.5, -76.3),
    CFrame.new(-1.4, -18.5, -67.7),
    CFrame.new(-15.4, -18.5, -67.0),
    CFrame.new(-29.8, -18.5, -65.5)
}

local returnCFrame = CFrame.new(33.1, -18.5, -65.7)

local isDestroyActive = false
local isMinimized = false
local currentIndex = 1

local camPos = Vector3.new(0, 0, 0)
local yaw = 0
local pitch = 0
local freeCamSpeed = 1.2
local keysDown = {}

local function toggleFreeCam(enable)
    local camera = Workspace.CurrentCamera
    if enable then
        camPos = camera.CFrame.Position
        local rx, ry, _ = camera.CFrame:ToOrientation()
        pitch = rx
        yaw = ry
        camera.CameraType = Enum.CameraType.Scriptable
    else
        local character = LocalPlayer.Character
        if character and character:FindFirstChild("Humanoid") then
            camera.CameraSubject = character.Humanoid
        end
        camera.CameraType = Enum.CameraType.Custom
    end
end

UserInputService.InputBegan:Connect(function(input, gpe)
    if gpe then return end
    if input.UserInputType == Enum.UserInputType.Keyboard then
        keysDown[input.KeyCode] = true
    end
end)

UserInputService.InputEnded:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.Keyboard then
        keysDown[input.KeyCode] = false
    end
end)

RunService.RenderStepped:Connect(function()
    if isDestroyActive then
        local character = LocalPlayer.Character
        if character then
            local root = character:FindFirstChild("HumanoidRootPart")
            if root then
                root.CFrame = coordsList[currentIndex]
                currentIndex = currentIndex + 1
                if currentIndex > #coordsList then
                    currentIndex = 1
                end
            end
        end

        local isRightClick = UserInputService:IsMouseButtonPressed(Enum.UserInputType.MouseButton2)
        local isTouch = UserInputService:GetPlatform() == Enum.Platform.IOS or UserInputService:GetPlatform() == Enum.Platform.Android

        if isRightClick or isTouch then
            local delta = UserInputService:GetMouseDelta()
            if delta.Magnitude > 0 then
                local sensitivity = 0.003
                yaw = yaw - (delta.X * sensitivity)
                pitch = math.clamp(pitch - (delta.Y * sensitivity), -math.rad(88), math.rad(88))
            end
        end

        local camRot = CFrame.Angles(0, yaw, 0) * CFrame.Angles(pitch, 0, 0)
        local moveVector = Vector3.new(0, 0, 0)

        if keysDown[Enum.KeyCode.W] then moveVector = moveVector + Vector3.new(0, 0, -1) end
        if keysDown[Enum.KeyCode.S] then moveVector = moveVector + Vector3.new(0, 0, 1) end
        if keysDown[Enum.KeyCode.A] then moveVector = moveVector + Vector3.new(-1, 0, 0) end
        if keysDown[Enum.KeyCode.D] then moveVector = moveVector + Vector3.new(1, 0, 0) end
        if keysDown[Enum.KeyCode.E] then moveVector = moveVector + Vector3.new(0, 1, 0) end
        if keysDown[Enum.KeyCode.Q] then moveVector = moveVector + Vector3.new(0, -1, 0) end

        if moveVector.Magnitude > 0 then
            moveVector = moveVector.Unit * freeCamSpeed
        end

        camPos = camPos + (camRot * moveVector)
        Workspace.CurrentCamera.CFrame = CFrame.new(camPos) * camRot
    end
end)

DestroyBtn.MouseButton1Click:Connect(function()
    isDestroyActive = not isDestroyActive
    if isDestroyActive then
        DestroyBtn.Text = "تدمير: مفعل 🔥"
        DestroyBtn.BackgroundColor3 = Color3.fromRGB(40, 180, 40)
        toggleFreeCam(true)
    else
        DestroyBtn.Text = "تدمير: معطل"
        DestroyBtn.BackgroundColor3 = Color3.fromRGB(180, 40, 40)
        
        local character = LocalPlayer.Character
        if character then
            local root = character:FindFirstChild("HumanoidRootPart")
            if root then
                root.CFrame = returnCFrame
            end
        end
        toggleFreeCam(false)
    end
end)

MinimizeBtn.MouseButton1Click:Connect(function()
    isMinimized = not isMinimized
    if isMinimized then
        MainFrame.Size = UDim2.new(0, 240, 0, 30)
        DestroyBtn.Visible = false
        MinimizeBtn.Text = "+"
    else
        MainFrame.Size = UDim2.new(0, 240, 0, 110)
        DestroyBtn.Visible = true
        MinimizeBtn.Text = "-"
    end
end)

CloseBtn.MouseButton1Click:Connect(function()
    if isDestroyActive then
        local character = LocalPlayer.Character
        if character and character:FindFirstChild("HumanoidRootPart") then
            character.HumanoidRootPart.CFrame = returnCFrame
        end
        toggleFreeCam(false)
    end
    isDestroyActive = false
    ScreenGui:Destroy()
end)