Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Googler


Сообщения: 3665
Благодарности: 1563

Профиль | Отправить PM | Цитировать


например, добавлять по два символа:
Код: Выделить весь код
@Echo Off
Setlocal EnableDelayedExpansion

Set N_Col=40
Set cntA=100
Set cnt=0
for /l %%i in (0,2,98) do (
  dd bs=%$z%c >nul 2>&1
  ping -n 1 127.0.0.1 >nul
  Call :Bar
)
pause >nul& exit

:Bar
If %cnt%==0 (
For /L %%a In (1,1,%N_Col%) Do Set Line0=!Line0!
)
Set /a Inc=((%cnt%+2)*%N_Col%)/%cntA%-(%cnt%*%N_Col%)/%cntA%
If %Inc% GTR 0 For /L %%a In (1,1,%Inc%) Do <Nul Set /p X= Ы
Set /a cnt+=2
Set /a prsnt=cnt*100/cntA
Title %1 %prsnt%%% Loaded
Это сообщение посчитали полезным следующие участники:

Отправлено: 08:39, 26-09-2010 | #4