local screenGui = Instance.new("ScreenGui")
screenGui.Name = "GemsGui"
screenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")

local frame = Instance.new("Frame")
frame.Size = UDim2.new(0.3, 0, 0.3, 0)
frame.Position = UDim2.new(0.35, 0, 0.35, 0)
frame.BackgroundColor3 = Color3.new(1, 1, 1)
frame.Parent = screenGui

local textLabel = Instance.new("TextLabel")
textLabel.Size = UDim2.new(1, 0, 0.2, 0)
textLabel.Position = UDim2.new(0, 0, 0, 0)
textLabel.Text = "Kiet_,Scriptgame"
textLabel.BackgroundColor3 = Color3.new(1, 1, 1)
textLabel.TextColor3 = Color3.new(0, 0, 0)
textLabel.Parent = frame

local button = Instance.new("TextButton")
button.Size = UDim2.new(0.5, 0, 0.2, 0)
button.Position = UDim2.new(0.25, 0, 0.3, 0)
button.Text = "Dupe Gems"
button.BackgroundColor3 = Color3.new(0, 0.5, 1)
button.TextColor3 = Color3.new(1, 1, 1)
button.Parent = frame

local timeLabel = Instance.new("TextLabel")
timeLabel.Size = UDim2.new(1, 0, 0.2, 0)
timeLabel.Position = UDim2.new(0, 0, 0.6, 0)
timeLabel.Text = ""
timeLabel.BackgroundColor3 = Color3.new(1, 1, 1)
timeLabel.TextColor3 = Color3.new(0, 0, 0)
timeLabel.Parent = frame

local dragging = false
local dragInput, dragStart, startPos

frame.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = true
        dragStart = input.Position
        startPos = frame.Position

        -- Connect to input changed to update frame position
        dragInput = input.Changed:Connect(function()
            if dragging then
                local delta = input.Position - dragStart
                frame.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
            end
        end)
    end
end)

frame.InputEnded:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 then
        dragging = false
        if dragInput then
            dragInput:Disconnect()
            dragInput = nil
        end
    end
end)

button.MouseButton1Click:Connect(function()
    timeLabel.Text = "Receiving gems in 5 seconds..."
    wait(5)
    local player = game.Players.LocalPlayer
    player.leaderstats.Gems.Value += 500
    timeLabel.Text = "Received 500 gems!"
end)