local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local PlayerGui = LocalPlayer:WaitForChild("PlayerGui")
local Pickups = workspace:FindFirstChild("Pickups")
if not Pickups then return end

local gui = Instance.new("ScreenGui", PlayerGui)
gui.Name = "StandFinderUI"
gui.ResetOnSpawn = false

local frame = Instance.new("Frame", gui)
frame.Size = UDim2.new(0, 320, 0, 440)
frame.Position = UDim2.new(0.5, -160, 0.5, -220)
frame.BackgroundColor3 = Color3.fromRGB(35, 35, 35)
frame.BorderSizePixel = 0

local close = Instance.new("TextButton", frame)
close.Size = UDim2.new(0, 30, 0, 30)
close.Position = UDim2.new(1, -35, 0, 5)
close.Text = "X"
close.BackgroundColor3 = Color3.fromRGB(200, 60, 60)
close.TextColor3 = Color3.new(1, 1, 1)
close.Font = Enum.Font.SourceSansBold
close.TextScaled = true
close.MouseButton1Click:Connect(function() gui:Destroy() end)

local refresh = Instance.new("TextButton", frame)
refresh.Size = UDim2.new(0, 80, 0, 30)
refresh.Position = UDim2.new(0, 10, 0, 5)
refresh.Text = "Refresh"
refresh.BackgroundColor3 = Color3.fromRGB(80, 80, 200)
refresh.TextColor3 = Color3.new(1, 1, 1)
refresh.Font = Enum.Font.SourceSansBold
refresh.TextScaled = true

local scroll = Instance.new("ScrollingFrame", frame)
scroll.Size = UDim2.new(1, -10, 1, -50)
scroll.Position = UDim2.new(0, 5, 0, 40)
scroll.CanvasSize = UDim2.new(0, 0, 0, 0)
scroll.ScrollBarThickness = 8
scroll.BackgroundTransparency = 1

local layout = Instance.new("UIListLayout", scroll)
layout.SortOrder = Enum.SortOrder.Name

local function getPos(model)
	if model.PrimaryPart then return model.PrimaryPart.Position end
	for _, v in ipairs(model:GetDescendants()) do
		if v:IsA("BasePart") then return v.Position end
	end
end

local function update()
	for _, b in pairs(scroll:GetChildren()) do
		if b:IsA("TextButton") then b:Destroy() end
	end
	for _, m in ipairs(Pickups:GetChildren()) do
		if m:IsA("Model") then
			local pos = getPos(m)
			if pos then
				local btn = Instance.new("TextButton", scroll)
				btn.Size = UDim2.new(1, -10, 0, 30)
				btn.Text = m.Name
				btn.BackgroundColor3 = Color3.fromRGB(70, 70, 70)
				btn.TextColor3 = Color3.new(1, 1, 1)
				btn.Font = Enum.Font.SourceSans
				btn.TextScaled = true
				btn.MouseButton1Click:Connect(function()
					local char = LocalPlayer.Character
					if char and char:FindFirstChild("HumanoidRootPart") then
						char:MoveTo(pos + Vector3.new(0, 5, 0))
					end
				end)
			end
		end
	end
	task.wait()
	scroll.CanvasSize = UDim2.new(0, 0, 0, layout.AbsoluteContentSize.Y + 10)
end

refresh.MouseButton1Click:Connect(update)
update()