-- // FPS Counter + Recent IDs + Save + Draggable + Close

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

local pastedIDs = {}

-- GUI Base
local ScreenGui = Instance.new("ScreenGui", game.CoreGui)
ScreenGui.Name = "AdvancedGameCopierGUI"

local Frame = Instance.new("Frame", ScreenGui)
Frame.Size = UDim2.new(0, 380, 0, 480)
Frame.Position = UDim2.new(0.5, -190, 0.5, -240)
Frame.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
Frame.Active = true
Frame.Draggable = true

local Title = Instance.new("TextLabel", Frame)
Title.Size = UDim2.new(1, -40, 0, 40)
Title.Position = UDim2.new(0, 0, 0, 0)
Title.Text = "Uncopylocked Game Copier"
Title.TextColor3 = Color3.new(1, 1, 1)
Title.BackgroundTransparency = 1
Title.Font = Enum.Font.SourceSansBold
Title.TextSize = 22

-- Close Button
local CloseButton = Instance.new("TextButton", Frame)
CloseButton.Size = UDim2.new(0, 40, 0, 40)
CloseButton.Position = UDim2.new(1, -40, 0, 0)
CloseButton.Text = "X"
CloseButton.TextColor3 = Color3.fromRGB(255, 255, 255)
CloseButton.BackgroundColor3 = Color3.fromRGB(120, 0, 0)
CloseButton.Font = Enum.Font.SourceSansBold
CloseButton.TextSize = 20

CloseButton.MouseButton1Click:Connect(function()
    ScreenGui:Destroy()
end)

-- FPS Counter
local FpsLabel = Instance.new("TextLabel", Frame)
FpsLabel.Size = UDim2.new(0, 100, 0, 30)
FpsLabel.Position = UDim2.new(1, -110, 0, 45)
FpsLabel.BackgroundTransparency = 0.3
FpsLabel.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
FpsLabel.TextColor3 = Color3.new(0, 1, 0)
FpsLabel.Font = Enum.Font.SourceSansBold
FpsLabel.TextSize = 18
FpsLabel.Text = "FPS: 0"

-- FPS Update
local lastUpdate = tick()
local frames = 0

RunService.RenderStepped:Connect(function()
	frames += 1
	local now = tick()
	if now - lastUpdate >= 1 then
		local fps = frames / (now - lastUpdate)
		FpsLabel.Text = string.format("FPS: %d", fps)
		if fps < 20 then
			FpsLabel.TextColor3 = Color3.fromRGB(255, 0, 0)
		elseif fps < 40 then
			FpsLabel.TextColor3 = Color3.fromRGB(255, 165, 0)
		else
			FpsLabel.TextColor3 = Color3.fromRGB(0, 255, 0)
		end
		lastUpdate = now
		frames = 0
	end
end)

-- Main Inputs
local PlaceIdBox = Instance.new("TextBox", Frame)
PlaceIdBox.PlaceholderText = "Enter Place ID"
PlaceIdBox.Position = UDim2.new(0, 20, 0, 90)
PlaceIdBox.Size = UDim2.new(1, -40, 0, 40)
PlaceIdBox.Font = Enum.Font.SourceSans
PlaceIdBox.TextSize = 20

local CopyButton = Instance.new("TextButton", Frame)
CopyButton.Text = "Copy & Paste Game"
CopyButton.Position = UDim2.new(0, 20, 0, 140)
CopyButton.Size = UDim2.new(1, -40, 0, 40)
CopyButton.BackgroundColor3 = Color3.fromRGB(60, 120, 60)
CopyButton.TextColor3 = Color3.new(1, 1, 1)
CopyButton.Font = Enum.Font.SourceSansBold
CopyButton.TextSize = 20

local SaveButton = Instance.new("TextButton", Frame)
SaveButton.Text = "Save as .rbxm"
SaveButton.Position = UDim2.new(0, 20, 0, 190)
SaveButton.Size = UDim2.new(1, -40, 0, 40)
SaveButton.BackgroundColor3 = Color3.fromRGB(60, 60, 120)
SaveButton.TextColor3 = Color3.new(1, 1, 1)
SaveButton.Font = Enum.Font.SourceSansBold
SaveButton.TextSize = 20

local RecentLabel = Instance.new("TextLabel", Frame)
RecentLabel.Text = "Recent IDs:"
RecentLabel.Position = UDim2.new(0, 20, 0, 240)
RecentLabel.Size = UDim2.new(1, -40, 0, 20)
RecentLabel.TextColor3 = Color3.new(1, 1, 1)
RecentLabel.BackgroundTransparency = 1
RecentLabel.Font = Enum.Font.SourceSansBold
RecentLabel.TextSize = 18

local RecentFrame = Instance.new("ScrollingFrame", Frame)
RecentFrame.Position = UDim2.new(0, 20, 0, 270)
RecentFrame.Size = UDim2.new(1, -40, 0, 190)
RecentFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
RecentFrame.ScrollBarThickness = 8
RecentFrame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)

-- Recent List Refresh
local function refreshRecentList()
	RecentFrame:ClearAllChildren()
	for i, id in ipairs(pastedIDs) do
		local Button = Instance.new("TextButton", RecentFrame)
		Button.Size = UDim2.new(1, 0, 0, 30)
		Button.Position = UDim2.new(0, 0, 0, (i - 1) * 32)
		Button.Text = tostring(id)
		Button.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
		Button.TextColor3 = Color3.new(1, 1, 1)
		Button.Font = Enum.Font.SourceSans
		Button.TextSize = 18
		Button.MouseButton1Click:Connect(function()
			PlaceIdBox.Text = tostring(id)
		end)
	end
	RecentFrame.CanvasSize = UDim2.new(0, 0, 0, #pastedIDs * 32)
end

-- Copy/Paste Action
CopyButton.MouseButton1Click:Connect(function()
	local placeId = tonumber(PlaceIdBox.Text)
	if placeId then
		local success, model = pcall(function()
			return InsertService:LoadAsset(placeId)
		end)
		if success and model then
			-- Clear Workspace
			for _, v in pairs(workspace:GetChildren()) do
				if v:IsA("BasePart") or v:IsA("Model") or v:IsA("Folder") then
					v:Destroy()
				end
			end
			-- Paste
			model.Parent = workspace
			table.insert(pastedIDs, 1, placeId)
			if #pastedIDs > 10 then
				table.remove(pastedIDs)
			end
			refreshRecentList()
			print("Game pasted successfully!")
		else
			warn("Failed to load asset. Make sure it's uncopylocked!")
		end
	else
		warn("Invalid Place ID!")
	end
end)

-- Save as .rbxm Helper
SaveButton.MouseButton1Click:Connect(function()
	if #workspace:GetChildren() == 0 then
		warn("Nothing to save! Paste a game first.")
		return
	end
	local tempModel = Instance.new("Model")
	tempModel.Name = "SavedGameCopy"
	for _, v in pairs(workspace:GetChildren()) do
		v.Parent = tempModel
	end
	tempModel.Parent = workspace
	print("Select 'SavedGameCopy' in Explorer and export as .rbxm manually!")
end)

refreshRecentList()