-- Anti-Lag Back + Speed Bypass + Ctrl + Click TP Script
local player = game.Players.LocalPlayer
local runService = game:GetService("RunService")
local userInputService = game:GetService("UserInputService")
local mouse = player:GetMouse()
local character = player.Character or player.CharacterAdded:Wait()

local safePosition = nil -- Stores the last safe position
local allowedDistance = 10 -- Max distance before correction
local speedBoost = 1.1 -- Multiplier for maintaining normal speed
local debounce = false
local isCtrlDown = false -- Tracks if Ctrl is held

-- Function to bypass speed restrictions
local function bypassSpeedChecks()
    if not character or not character:FindFirstChild("Humanoid") then
        return
    end

    local humanoid = character:FindFirstChild("Humanoid")

    -- Adjust walk speed to counter anti-cheat limits
    humanoid.WalkSpeed = 16 * speedBoost

    -- Handle drag-back caused by server enforcement
    if not character:FindFirstChild("HumanoidRootPart") then
        return
    end
    local rootPart = character.HumanoidRootPart

    if safePosition then
        local distance = (safePosition - rootPart.Position).Magnitude
        if distance > allowedDistance then
            print("Lag back detected! Correcting position...")

            if not debounce then
                debounce = true
                rootPart.CFrame = CFrame.new(safePosition)
                task.wait(0.1)
                debounce = false
            end
        end
    end

    -- Update safe position for lag correction
    safePosition = rootPart.Position
end

-- Monitor physics disruptions to maintain smooth gameplay
local function preventPhysicsIssues()
    if not character or not character:FindFirstChild("Humanoid") then
        return
    end

    local humanoid = character:FindFirstChild("Humanoid")

    -- Disable disruptive states
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Climbing, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Ragdoll, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.FallingDown, false)
    humanoid:SetStateEnabled(Enum.HumanoidStateType.Seated, false)

    -- Force stable state if required
    if humanoid:GetState() == Enum.HumanoidStateType.Physics then
        humanoid:ChangeState(Enum.HumanoidStateType.GettingUp)
    end
end

-- Ctrl + Click to teleport
local function setupTeleportation()
    userInputService.InputBegan:Connect(function(input, processed)
        if processed then return end
        if input.KeyCode == Enum.KeyCode.LeftControl or input.KeyCode == Enum.KeyCode.RightControl then
            isCtrlDown = true
        end
    end)

    userInputService.InputEnded:Connect(function(input)
        if input.KeyCode == Enum.KeyCode.LeftControl or input.KeyCode == Enum.KeyCode.RightControl then
            isCtrlDown = false
        end
    end)

    mouse.Button1Down:Connect(function()
        if isCtrlDown and character and character:FindFirstChild("HumanoidRootPart") then
            local rootPart = character.HumanoidRootPart
            local targetPosition = mouse.Hit.p -- Get the position clicked

            -- Teleport the player to the clicked location
            rootPart.CFrame = CFrame.new(targetPosition + Vector3.new(0, 5, 0)) -- Add 5 studs height to prevent falling through the ground
            print("Teleported to:", targetPosition)
        end
    end)
end

-- Continuously monitor and adjust for anti-cheat restrictions
runService.Heartbeat:Connect(function()
    if character and character:FindFirstChild("HumanoidRootPart") then
        bypassSpeedChecks()
        preventPhysicsIssues()
    end
end)

-- Handle character respawn
player.CharacterAdded:Connect(function(newCharacter)
    character = newCharacter
    safePosition = nil
end)

-- Initialize teleportation
setupTeleportation()