[Iska]

… и можно пока еще что-нить сделать полезное.

Вот с этим-то как раз и проблема. Я около полугода назад, наткнувшись на пост коллеги amel27, возрадовался, пошёл от него танцевать («крутилки», наподобие выложенной выше, простые проценты, учёт ширины консоли и т.п.)… Всё было замечательно. Работало изумительно. До тех пор, пока, перед выкладыванием, не понадобилось снабдить код реальным примером, где сия функциональность будет не просто сбоку припёка, а, вот так, что называется, — до зарезу. И я ничего подходящего так и не смог найти. Ибо команды, утилиты и пакетные файлы практически не реализуют частичную функциональность, подобно языкам высокого уровня (если её не вводить искусственно; скажем, копируя не одной командой «copy a:\*.txt b:\*.*», а перебирая ручками в «for …»), наподобие VBScript'ового «For Each objFile In objFSO.GetFolder(…).Files». То есть, для визуального отображения куда как более потребна простая «крутилка» или не вычисленный, а простой «безлимитный» индикатор прогресса (т.е. просто отображающего, что процесс идёт) посредством той же вышеозвученной команды «<NUL SET /P strTemp=.».

Оказалось, что нарисовать индикатор прогресса проще, нежели найти, где он действительно нужен в пакетных файлах.