-- Smooth Lock-On Script with GUI Implementation
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local Camera = game:GetService("Workspace").CurrentCamera
local ToggleKey = Enum.KeyCode.F -- Change to any desired toggle key
local LockedOn = false
local Target

-- GUI
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")

local ToggleButton = Instance.new("TextButton")
ToggleButton.Text = "Toggle Lock-On"
ToggleButton.Size = UDim2.new(0, 150, 0, 50)
ToggleButton.Position = UDim2.new(0.5, -75, 0.5, -25)
ToggleButton.Parent = ScreenGui

function LockOn(target)
    Target = target
    LockedOn = true
end

function Unlock()
    Target = nil
    LockedOn = false
end

function UpdateCamlock()
    if LockedOn and Target then
        local Char = Target.Character
        if Char then
            Camera.CFrame = CFrame.new(Camera.CFrame.Position, Char.HumanoidRootPart.Position)
        end
    end
end

function UpdateAim()
    if LockedOn and Target then
        local Char = Target.Character
        if Char then
            local Prediction = Char.HumanoidRootPart.Velocity * 0.1 -- Adjust the multiplier for prediction accuracy
            local TargetPos = Char.HumanoidRootPart.Position + Prediction
            Camera.CFrame = CFrame.new(Camera.CFrame.Position, TargetPos)
        end
    end
end

UserInputService.InputBegan:Connect(function(input)
    if input.KeyCode == ToggleKey then
        LockedOn = not LockedOn
        if LockedOn then
            local Player = Players:GetPlayerFromCharacter(Camera.Focus)
            if Player then
                LockOn(Player)
            end
        else
            Unlock()
        end
    end
end)

ToggleButton.MouseButton1Click:Connect(function()
    LockedOn = not LockedOn
    if LockedOn then
        local Player = Players:GetPlayerFromCharacter(Camera.Focus)
        if Player then
            LockOn(Player)
            ToggleButton.Text = "Unlock"
        end
    else
        Unlock()
        ToggleButton.Text = "Toggle Lock-On"
    end
end)

game:GetService("RunService").RenderStepped:Connect(function()
    UpdateCamlock()
    UpdateAim()
end)