while task.wait(0.06) do
    local pals = workspace:WaitForChild("Pals")
    local parts = {}

    for _, obj in ipairs(pals:GetChildren()) do
        if obj:IsA("BasePart") then
            table.insert(parts, obj)
        end
    end

    table.sort(parts, function(a, b)
        return a.Name < b.Name
    end)

    local hrp = game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:FindFirstChild("HumanoidRootPart")
    if hrp then
        for _, part in ipairs(parts) do
            local ti = part:FindFirstChildOfClass("TouchTransmitter") or part:FindFirstChild("TouchInterest")
            if ti then
                firetouchinterest(hrp, part, 0)
                firetouchinterest(hrp, part, 1)
            end
        end
    end
end