Creat0R,
Цитата:
Пример с отображением в самой консоли
|
в твоем примере зачищается хистори... давно хотел такое же, но без затирания, вроде нашел:
Код:

@Echo Off
Setlocal EnableDelayedExpansion
Echo. Процесс запущен
For /L %%i In (1,1,100) Do (
Call :SHOW %%i Тестирование...
Ping -n 1 127.0.0.1 >Nul
)
Echo.
Echo.
Echo. Процесс завершен
Echo.
Pause
Exit
:SHOW
Set $COLS=70
If Not Defined $P (
Set /A $P=0
Set $X=[
For /L %%a In (1,1,%$COLS%) Do Set $X=!$X!.
Set $X=!$X!]
For /L %%a In (1,1,%$COLS%) Do Set $X=!$X!
Set $X=!$X!
Echo.
<Nul Set /P $X=!$X!
)
Set $X=
Set /A $D = (%$COLS%*%1)/100 - (%$COLS%*%$P%)/100
If %$D% GTR 0 For /L %%a In (1,1,%$D%) Do Set $X=!$X!#
If %1 EQU 100 Set $X=!$X!]
<Nul Set /P $X=!$X!
Title %2%1%% Done
Set $P=%1
GoTo :EOF