Скрипт Taxi Boss: телепорт по точкам города

-- OneRoblox Taxi Boss Waypoints 1.0.0
-- MIT License. Copyright (c) 2026 OneRoblox.
-- Permission is granted, free of charge, to use, copy, modify, merge, publish,
-- distribute, sublicense, and/or sell copies, subject to including this notice.
-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND.
-- Not tested in-game. No currency rewards or anti-cheat bypass.
if game.GameId ~= 2851381018 then
    warn("OneRoblox: wrong game")
    return
end
local player = game:GetService("Players").LocalPlayer
local playerGui = player and player:FindFirstChildOfClass("PlayerGui")
if not playerGui then return end
local name = "OneRobloxtaxi"
local old = playerGui:FindFirstChild(name)
if old then old:Destroy() end
local gui = Instance.new("ScreenGui")
gui.Name = name
gui.ResetOnSpawn = false
local panel = Instance.new("Frame")
panel.Size = UDim2.fromOffset(280, 244)
panel.Position = UDim2.new(1, -292, 0, 12)
panel.BackgroundColor3 = Color3.fromRGB(22, 25, 29)
panel.Parent = gui
local connections, markers = {}, {}
local closed, enabled = false, false
local function connect(signal, callback)
    local c = signal:Connect(callback)
    table.insert(connections, c)
end
local function control(kind, text, y, height)
    local c = Instance.new(kind)
    c.Size = UDim2.fromOffset(256, height or 30)
    c.Position = UDim2.fromOffset(12, y)
    c.Text = text
    c.TextSize = 13
    c.Font = Enum.Font.Gotham
    c.TextWrapped = true
    c.TextColor3 = Color3.fromRGB(240, 242, 246)
    c.BackgroundColor3 = Color3.fromRGB(42, 47, 54)
    c.Parent = panel
    return c
end
local title = control("TextLabel", "Taxi Boss Waypoints", 8)
local first = control("TextButton", "Next point", 46)
local second = control("TextButton", "Teleport on foot", 84)
local third = control("TextButton", "Refresh points", 122)
local status = control("TextLabel", "Not tested in game", 158, 38)
local close = control("TextButton", "Close", 202)
local function clearMarkers()
    for _, objects in pairs(markers) do
        for _, object in ipairs(objects) do object:Destroy() end
    end
    markers = {}
end
connect(gui.Destroying, function()
    closed, enabled = true, false
    clearMarkers()
    for _, connection in ipairs(connections) do connection:Disconnect() end
end)
connect(close.Activated, function() gui:Destroy() end)
local places, index = {}, 1
local function positionOf(object)
    if object:IsA("BasePart") then return object.Position end
    if object:IsA("Vector3Value") then return object.Value end
    if object:IsA("CFrameValue") then return object.Value.Position end
end
local function render()
    local place = places[index]
    title.Text = place and place.Name or "Taxi Boss: no destinations"
end
local function refresh()
    places, index = {}, 1
    local folder = game:GetService("ReplicatedStorage"):FindFirstChild("Places")
    if folder then
        for _, place in ipairs(folder:GetChildren()) do
            if positionOf(place) then table.insert(places, place) end
        end
    end
    table.sort(places, function(a, b) return a.Name < b.Name end)
    render()
    status.Text = tostring(#places) .. " points | On foot only"
end
connect(first.Activated, function()
    if #places > 0 then index = index % #places + 1 end
    render()
end)
connect(second.Activated, function()
    local place = places[index]
    local character = player.Character
    local hum = character and character:FindFirstChildOfClass("Humanoid")
    local root = character and character:FindFirstChild("HumanoidRootPart")
    if not hum or hum.Health <= 0 or not root then status.Text = "Character unavailable"; return end
    if hum.Sit or hum.SeatPart then status.Text = "Leave the vehicle first"; return end
    local pos = place and place.Parent and positionOf(place)
    if not pos then status.Text = "Point unavailable: refresh"; return end
    root.CFrame = CFrame.new(pos + Vector3.new(0, 5, 0))
    status.Text = "Local move requested: server may correct it"
end)
connect(third.Activated, refresh)
refresh()

gui.Parent = playerGui