Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » CMD/BAT - помогите разобраться с прогресс-баром

Ответить
Настройки темы
CMD/BAT - помогите разобраться с прогресс-баром

Новый участник


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

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


Изменения
Автор: medvedozayac@vk
Дата: 13-04-2012
Приветствую народ, помогите пожалуйста разобраться этим батником, по возможности опешите пожалуйста что тут и куда)
как его перенастроить под свои нужды, копировать то что нужно и куда нужно...
в том виде что сейчас не копирует ничего...
за ранее благодарю

Код: Выделить весь код
@Echo Off
Setlocal EnableDelayedExpansion

Set $f=E:\1\test.iso
Set $d=F:\2\test.iso

If Exist "%$d%" DEL "%$d%"
For %%i In ("%$f%") Do Set $z=%%~zi
Set /A $z=$z/99

Set N_Col=79
Set cntA=100
Set cnt=0
rem -----------------------------
Echo Начало
for /l %%i in (0,1,99) do (
dd bs=%$z% count=1 if="%f%" of="%d%" skip=%%i seek=%%i >nul 2>&1
Call :Bar
)
rem -----------------------------
Echo.
Echo конец
pause
Exit

:Bar
If %cnt%==0 (
For /L %%a In (1,1,%N_Col%) Do Set Line0=!Line0!░
For /L %%a In (1,1,%N_Col%) Do Set Line0=!Line0!
<Nul Set /p X=!Line0!
)
Set /a Inc=((%cnt%+1)*%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+=1
Set /a prsnt=cnt*100/cntA
Title %1 %prsnt%%% of %cntA%

GoTo :EOF

Отправлено: 21:49, 12-04-2012

 


Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » CMD/BAT - помогите разобраться с прогресс-баром

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Proxy/NAT - Помогите разобраться twinzzz75 Сетевые технологии 2 20-05-2011 08:49
Помогите разобраться pogo Microsoft Windows NT/2000/2003 2 06-07-2009 13:00
Помогите разобраться Larich Хочу все знать 1 08-06-2007 08:25
помогите разобраться! Guest Общий по Linux 7 16-03-2004 21:45




 
Переход