local CoreGui = game:GetService("CoreGui")
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local TweenService = game:GetService("TweenService")
local UIS = game:GetService("UserInputService")
local LocalPlayer = Players.LocalPlayer

if CoreGui:FindFirstChild("TeleportMenu") then CoreGui.TeleportMenu:Destroy() end

local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "TeleportMenu"
ScreenGui.Parent = CoreGui
ScreenGui.ResetOnSpawn = false

local MainFrame = Instance.new("Frame")
MainFrame.Size = UDim2.new(0, 340, 0, 500)
MainFrame.Position = UDim2.new(0.5, -170, 0.5, -250)
MainFrame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
MainFrame.Active = true
MainFrame.Draggable = true
MainFrame.ClipsDescendants = true
MainFrame.Parent = ScreenGui

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

local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, 0, 0, 40)
Title.BackgroundTransparency = 1
Title.Text = "   📍 ROOM TELEPORTER (RShift to Toggle)"
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.TextSize = 13
Title.Font = Enum.Font.GothamBold
Title.TextXAlignment = Enum.TextXAlignment.Left
Title.Parent = MainFrame

-- SPEED UTILITY SECTION
local SpeedContainer = Instance.new("Frame")
SpeedContainer.Size = UDim2.new(1, -20, 0, 40)
SpeedContainer.Position = UDim2.new(0, 10, 0, 40)
SpeedContainer.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
SpeedContainer.Parent = MainFrame

local SpeedInput = Instance.new("TextBox")
SpeedInput.Size = UDim2.new(1, -110, 1, -10)
SpeedInput.Position = UDim2.new(0, 100, 0, 5)
SpeedInput.BackgroundColor3 = Color3.fromRGB(55, 55, 55)
SpeedInput.Text = "16"
SpeedInput.TextColor3 = Color3.fromRGB(255, 255, 255)
SpeedInput.Font = Enum.Font.Gotham
SpeedInput.TextSize = 14
SpeedInput.Parent = SpeedContainer

SpeedInput.FocusLost:Connect(function()
    local inputNum = tonumber(SpeedInput.Text)
    if inputNum then
        local finalSpeed = math.clamp(inputNum, 0, 100)
        SpeedInput.Text = tostring(finalSpeed)
        local char = LocalPlayer.Character
        local hum = char and char:FindFirstChildOfClass("Humanoid")
        if hum then hum.WalkSpeed = finalSpeed end
    else
        SpeedInput.Text = "16"
    end
end)

-- SEARCH FILTER BAR SECTION
local SearchContainer = Instance.new("Frame")
SearchContainer.Size = UDim2.new(1, -20, 0, 35)
SearchContainer.Position = UDim2.new(0, 10, 0, 85)
SearchContainer.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
SearchContainer.Parent = MainFrame

local SearchInput = Instance.new("TextBox")
SearchInput.Size = UDim2.new(1, -10, 1, -6)
SearchInput.Position = UDim2.new(0, 5, 0, 3)
SearchInput.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
SearchInput.Text = ""
SearchInput.PlaceholderText = "Search locations..."
SearchInput.PlaceholderColor3 = Color3.fromRGB(130, 130, 130)
SearchInput.TextColor3 = Color3.fromRGB(255, 255, 255)
SearchInput.Font = Enum.Font.Gotham
SearchInput.TextSize = 13
SearchInput.Parent = SearchContainer

-- PANIC BUTTON
local PanicButton = Instance.new("TextButton")
PanicButton.Size = UDim2.new(1, -20, 0, 35)
PanicButton.Position = UDim2.new(0, 10, 0, 125)
PanicButton.BackgroundColor3 = Color3.fromRGB(150, 35, 35)
PanicButton.Text = "🚨 EMERGENCY SPAWN RETURN"
PanicButton.TextColor3 = Color3.fromRGB(255, 255, 255)
PanicButton.Font = Enum.Font.GothamBold
PanicButton.TextSize = 12
PanicButton.Parent = MainFrame

-- SCROLLING CONTAINER
local ScrollFrame = Instance.new("ScrollingFrame")
ScrollFrame.Size = UDim2.new(1, -20, 1, -210)
ScrollFrame.Position = UDim2.new(0, 10, 0, 165)
ScrollFrame.BackgroundTransparency = 1
ScrollFrame.BorderSizePixel = 0
ScrollFrame.ScrollBarThickness = 6
ScrollFrame.ScrollBarImageColor3 = Color3.fromRGB(80, 80, 80)
ScrollFrame.Parent = MainFrame

local ListLayout = Instance.new("UIListLayout")
ListLayout.Parent = ScrollFrame
ListLayout.SortOrder = Enum.SortOrder.LayoutOrder
ListLayout.Padding = UDim.new(0, 5)

local allButtons = {} 

ListLayout:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
    ScrollFrame.CanvasSize = UDim2.new(0, 0, 0, ListLayout.AbsoluteContentSize.Y + 10)
end)

-- TELEPORT SELECTION BUTTON GENERATOR
local function createTeleportButton(text, targetPos)
    local button = Instance.new("TextButton")
    button.Size = UDim2.new(1, -10, 0, 45)
    button.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
    button.Text = text .. " [OFF]"
    button.TextColor3 = Color3.fromRGB(255, 255, 255)
    button.Font = Enum.Font.GothamMedium
    button.TextSize = 14
    button.Parent = ScrollFrame

    local bCorner = Instance.new("UICorner")
    bCorner.CornerRadius = UDim.new(0, 6)
    bCorner.Parent = button

    local isTeleported = false
    local formerLocation = nil

    local function turnOff()
        if isTeleported then
            isTeleported = false
            button.Text = text .. " [OFF]"
            button.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
        end
    end

    button.MouseButton1Click:Connect(function()
        local char = LocalPlayer.Character
        local root = char and char:FindFirstChild("HumanoidRootPart")
        if not root then return end
        isTeleported = not isTeleported
        if isTeleported then
            formerLocation = root.CFrame
            root.CFrame = CFrame.new(targetPos + Vector3.new(0, 3, 0))
            button.Text = text .. " [ON]"
            button.BackgroundColor3 = Color3.fromRGB(0, 150, 255)
        else
            if formerLocation then root.CFrame = formerLocation end
            button.Text = text .. " [OFF]"
            button.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
        end
    end)
    table.insert(allButtons, {Instance = button, SearchName = string.lower(text), ResetFunc = turnOff})
end

-- Connect search input to filtering logic
SearchInput:GetPropertyChangedSignal("Text"):Connect(function()
    local searchPattern = string.lower(SearchInput.Text)
    for _, item in ipairs(allButtons) do
        if string.find(item.SearchName, searchPattern) then
            item.Instance.Visible = true
        else
            item.Instance.Visible = false
        end
    end
end)

PanicButton.MouseButton1Click:Connect(function()
    local char = LocalPlayer.Character
    local root = char and char:FindFirstChild("HumanoidRootPart")
    if root then
        root.CFrame = CFrame.new(Vector3.new(-55, 3, 45) + Vector3.new(0, 3, 0))
        for _, item in ipairs(allButtons) do item.ResetFunc() end
    end
end)

-- ADD LOCATIONS
createTeleportButton("Spawn Room", Vector3.new(-55, 3, 45))
createTeleportButton("Police Room", Vector3.new(-166, -12, 58))
createTeleportButton("MP3 Room", Vector3.new(-9, -44, 211))
createTeleportButton("Store", Vector3.new(147, 3, -355))
createTeleportButton("Other Store", Vector3.new(-160, -92, -150))
createTeleportButton("Hospital", Vector3.new(108, 3, 92))
createTeleportButton("Government Place", Vector3.new(-56, 7, 166))
createTeleportButton("Lab", Vector3.new(-131, -42, -126))
createTeleportButton("Mining Place", Vector3.new(-172, -54, -372))

-- YIELD BUTTON
local YieldButton = Instance.new("TextButton")
YieldButton.Size = UDim2.new(1, -10, 0, 45)
YieldButton.BackgroundColor3 = Color3.fromRGB(75, 35, 120)
YieldButton.Text = "YIELD [CONSOLE MODE]"
YieldButton.TextColor3 = Color3.fromRGB(255, 255, 255)
YieldButton.Font = Enum.Font.GothamBold
YieldButton.TextSize = 14
YieldButton.Parent = ScrollFrame

local YieldCorner = Instance.new("UICorner")
YieldCorner.CornerRadius = UDim.new(0, 6)
YieldCorner.Parent = YieldButton

YieldButton.MouseButton1Click:Connect(function()
    print("[Console Log]: Yield action triggered.")
    loadstring(game:HttpGet("https://raw.githubusercontent.com/EdgeIY/infiniteyield/master/source"))()
end)

-- OPEN / CLOSE TOGGLE LOGIC
local menuVisible = true
local isTweening = false
local originalSize = MainFrame.Size

UIS.InputBegan:Connect(function(input, processed)
    if not processed and input.KeyCode == Enum.KeyCode.RightShift then
        if isTweening then return end
        isTweening = true
        menuVisible = not menuVisible
        local tweenInfo = TweenInfo.new(0.25, Enum.EasingStyle.Quad, Enum.EasingDirection.Out)
        if menuVisible then
            MainFrame.Visible = true
            local sizeTween = TweenService:Create(MainFrame, tweenInfo, {Size = originalSize})
            sizeTween:Play()
            sizeTween.Completed:Connect(function() isTweening = false end)
        else
            local sizeTween = TweenService:Create(MainFrame, tweenInfo, {Size = UDim2.new(0, 340, 0, 0)})
            sizeTween:Play()
            sizeTween.Completed:Connect(function()
                MainFrame.Visible = false
                isTweening = false
            end)
        end
    end
end)