-- **Ana GUI Oluşturma**
local gui = Instance.new("ScreenGui")
gui.Name = "HymerGUIv1"
gui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")

-- **Ana Panel (Frame)**
local frame = Instance.new("Frame", gui)
frame.Size = UDim2.new(0, 400, 0, 500)
frame.Position = UDim2.new(0.5, -200, 0.5, -250)
frame.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
frame.Active = true
frame.Draggable = true

-- **Başlık (Label)**
local title = Instance.new("TextLabel", frame)
title.Size = UDim2.new(1, 0, 0, 50)
title.Position = UDim2.new(0, 0, 0, 0)
title.BackgroundTransparency = 1
title.Font = Enum.Font.SourceSansBold
title.TextSize = 30
title.Text = "Türk Sohbet Oyunu Scripts"
title.TextColor3 = Color3.fromRGB(255, 0, 0)

-- **Buton Oluşturma Fonksiyonu**
function createButton(name, position, callback)
    local btn = Instance.new("TextButton", frame)
    btn.Size = UDim2.new(0, 380, 0, 40)
    btn.Position = UDim2.new(0, 10, 0, position)
    btn.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
    btn.TextColor3 = Color3.fromRGB(255, 255, 255)
    btn.Font = Enum.Font.SourceSansBold
    btn.TextSize = 20
    btn.Text = name
    btn.MouseButton1Click:Connect(callback)
end

-- **1. Buton - Türk Şarkı Kod**
createButton("Türk Şarkı Kod (Küfür)", 60, function()
    local message = Instance.new("Message", game.Workspace)
    message.Text = "Şarkı Kodları: 553431365, 1843239895"
    wait(20)
    message:Destroy()
end)

-- **2. Buton - Animasyon**
createButton("Animasyon", 110, function()
    local humanoid = game.Players.LocalPlayer.Character:FindFirstChildOfClass("Humanoid")
    if humanoid then
        local animation = Instance.new("Animation")
        animation.AnimationId = "rbxassetid://10714352626"
        local animator = humanoid:FindFirstChildOfClass("Animator")
        if animator then
            animator:LoadAnimation(animation):Play()
        end
    end
end)

-- **3. Buton - Spam Tool**
local spamLoop
createButton("Spam Tool", 160, function()
    if spamLoop then
        spamLoop:Disconnect()
        spamLoop = nil
        return
    end
    spamLoop = game:GetService("RunService").RenderStepped:Connect(function()
        local backpack = game.Players.LocalPlayer.Backpack:GetChildren()
        for _, tool in ipairs(backpack) do
            game.Players.LocalPlayer.Character.Humanoid:EquipTool(tool)
            wait(0.1)
            game.Players.LocalPlayer.Character.Humanoid:UnequipTools()
        end
    end)
end)

-- **4. Buton - Boombox Vgo**
createButton("Boombox Vgo", 210, function()
    local character = game.Players.LocalPlayer.Character
    if character then
        local boombox = character:FindFirstChildOfClass("Tool")
        if boombox and boombox.Name == "Boombox" then
            local remote = boombox:FindFirstChild("ServerControl")
            if remote then
                remote:FireServer("PlaySong", 6827433277)
                wait(2)
                while wait(2) do
                    remote:FireServer("PlaySong", 6495958945)
                end
            end
        end
    end
end)

-- **5. Buton - Animasyon Glitch**
createButton("Animasyon Glitch", 260, function()
    local humanoid = game.Players.LocalPlayer.Character:FindFirstChildOfClass("Humanoid")
    if humanoid then
        local animator = humanoid:FindFirstChildOfClass("Animator")
        if animator then
            while wait(1) do
                local animList = {"rbxassetid://1083195517", "rbxassetid://616111295", "rbxassetid://657595757"}
                for _, animID in ipairs(animList) do
                    local animation = Instance.new("Animation")
                    animation.AnimationId = animID
                    animator:LoadAnimation(animation):Play()
                    wait(1)
                end
            end
        end
    end
end)

-- **6. Buton - Spin & Sit**
createButton("SPINVESIT", 310, function()
    local character = game.Players.LocalPlayer.Character
    if character then
        local humanoid = character:FindFirstChildOfClass("Humanoid")
        if humanoid then
            humanoid.Sit = true
        end
        while wait(0.1) do
            character:SetPrimaryPartCFrame(character.PrimaryPart.CFrame * CFrame.Angles(0, math.rad(10), 0))
        end
    end
end)

-- **7. Buton - Troll (Rastgele Oyuncunun Arkasına Git)**
createButton("TROLL (RANDOM)", 360, function()
    local player = game.Players.LocalPlayer
    local character = player.Character
    if character then
        local humanoid = character:FindFirstChildOfClass("Humanoid")
        if humanoid then
            local animation = Instance.new("Animation")
            animation.AnimationId = "rbxassetid://10714352626"
            local animator = humanoid:FindFirstChildOfClass("Animator")
            if animator then
                animator:LoadAnimation(animation):Play()
            end
        end
        local players = game.Players:GetPlayers()
        local randomPlayer = players[math.random(1, #players)]
        if randomPlayer and randomPlayer ~= player and randomPlayer.Character then
            character:SetPrimaryPartCFrame(randomPlayer.Character.PrimaryPart.CFrame * CFrame.new(0, 0, 2))
        end
    end
end)

-- **8. Buton - Animasyon Troll (Etrafında Dönme)**
createButton("Animasyon Troll", 410, function()
    local humanoid = game.Players.LocalPlayer.Character:FindFirstChildOfClass("Humanoid")
    if humanoid then
        local animator = humanoid:FindFirstChildOfClass("Animator")
        if animator then
            local animation = Instance.new("Animation")
            animation.AnimationId = "rbxassetid://6797888062"
            animator:LoadAnimation(animation):Play()
        end
    end
    -- Etrafında dönme işlemi
    local character = game.Players.LocalPlayer.Character
    if character then
        while true do
            character:SetPrimaryPartCFrame(character.PrimaryPart.CFrame * CFrame.Angles(0, math.rad(5), 0))
            wait(0.1)
        end
    end
end)

-- **9. Buton - Para Toplama (Teleport)**
createButton("Para Toplama", 460, function()
    local character = game.Players.LocalPlayer.Character
    if character then
        local paraModels = workspace:GetChildren()
        for _, model in ipairs(paraModels) do
            if model:IsA("Model") and model:FindFirstChild("Coin") then
                local distance = (character.HumanoidRootPart.Position - model.HumanoidRootPart.Position).magnitude
                if distance < 10 then
                    character:SetPrimaryPartCFrame(model.HumanoidRootPart.CFrame)
                    -- Ekleme: Para toplandı mesajı
                    game.ReplicatedStorage:WaitForChild("Chat"):FireAllClients("Para toplandı!")
                end
            end
        end
    end
end)