Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   помогите разобраться с прогресс-баром (http://forum.oszone.net/showthread.php?t=232702)

medvedozayac@vk 12-04-2012 21:49 1898542

помогите разобраться с прогресс-баром
 
Приветствую народ, помогите пожалуйста разобраться этим батником, по возможности опешите пожалуйста что тут и куда)
как его перенастроить под свои нужды, копировать то что нужно и куда нужно...
в том виде что сейчас не копирует ничего...
за ранее благодарю

Код:

@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



Время: 06:06.

Время: 06:06.
© OSzone.net 2001-