function cdp.ps1

function cdp {
    $shell = New-Object -ComObject Shell.Application
    $windows = $shell.Windows() | Where-Object { $_.FullName -eq 'C:\Windows\explorer.exe' && $_.LocationURL -match 'file:///' }
    if ($windows.Count -eq 0) {
        Write-Host "No window found"
        return
    }
    $selectedWindow = if ($windows.Count -eq 1) {
        $windows
    }
    else {
        $windows | Select-Object -Property LocationName, LocationURL | Out-GridView -PassThru -Title "Select a path"
    }
    if ($selectedWindow) {
        $path = $selectedWindow.LocationURL -replace 'file:///', '' -replace '/', '\'
        $path = [System.Uri]::UnescapeDataString($path)
        try {
            $localPath = [System.Uri]::new($path).LocalPath
            Set-Location $localPath
        }
        catch {
            Write-Host "Failed to set location: $path"
        }
    }
}