Progressbar Powershell

<#
    AUTO COPY DISK ON INSERT
#>
# ==============
# drive letter to monitor
$drive = 'D:'  
# backup root folder
$target = 'C:\tmp'  
# =============
# only continue if PS >= Version 3.0
if ($PSVersionTable.PSVersion.Major -lt 3){write-host "ERROR: Minimum Powershell Version 3.0 is required!" -F Yellow; return}  
# create root folder if not exist
if (!(Test-Path $target)) {md $target -Force | out-null}

# delete eventcubscriber if there are still open ones
Get-EventSubscriber | Unregister-Event -Force
# shell object
$global:shell = New-Object -Com Shell.Application

# WMI Event Registration (Action fires when CD-Drive changes it's state)  
Register-WmiEvent -Query "Select * From __InstanceModificationEvent Within 1 where TargetInstance isa 'Win32_LogicalDisk' and TargetInstance.DriveType = 5 and TargetInstance.Size != null and TargetInstance.DeviceId = '$drive'" -SourceIdentifier 'RemovableDetector' -Action {  
    $deviceid = $Event.SourceEventArgs.NewEvent.TargetInstance.DeviceID
    
    

    # create target subfolder with name format 
    $targetfolder = "c:\tmp\$(Read-host 'Patientennamen eingeben')$('_')$(get-date -f yyyy)$('__')$(get-date -f HH.mm.ss)"  
    md $targetfolder -Force | out-null



    # list drive information
    write-host "CD lädt..." -F Green  
    write-host ($Event.SourceEventArgs.NewEvent.TargetInstance | select DeviceId | ft -AutoSize | out-string)
    write-host "CD-Inhalte werden kopiert ... '$targetfolder' ... " -F Green  

    # copy to target
    copy-item "$deviceid\*" -Recurse -Destination $targetfolder -Force -exclude *.txt  
    

    # eject disk
    write-host "Fertig. CD wird ausgeworfen ... '$deviceid' ..." -F Red  
    $global:shell.Namespace(17).ParseName($deviceid).Verbs() | ?{$_.Name.replace('&','') -match '^(Auswerfen|Eject)$'} | %{$_.Doit()}  
    write-host 'Nächste CD einlegen ...' -F white  
} | out-null
cls
write-host 'CD einlegen ...' -F Green  
while($true){sleep 1}