Der Quelltext ist kurz und einfach:
; File 4 File ; kopiert Dateien einzeln, nachdem sie sortiert wurden loop, %1%\*.*, 0,0 ; Alle Dateien im Verzeichnis werden abgeklappert ... { tmp = %tmp%%A_LoopFileLongPath%`n num = %A_Index% } sort, tmp StringReplace, tmp, tmp,`n,¢, All StringReplace, tmp, tmp,c:\windows\temp,, All StringTrimRight, tmp, tmp, 1 FileSelectFolder, fold,,2, %num% Files to copy Progress, M R0-%num% W400 FM10 FS8, Warte..., 0/%num%, %num% Files to copy, Arial loop, Parse, tmp,¢ { Progress, %A_Index%, %A_LoopField%, %A_Index%/%num% FileCopy, %A_LoopField%, %fold% } ;run, explorer.exe %fold%