用批处理怎么实现进度条显示？

119194993

好像是用 set 和 for 来实现。

实现功能：
显示解压文件进度，解压好一个文件后，进度条清零，继续解压下个文件，进度条从头开始。
能解压多个文件的。。
最好是再有个总进度就最好了。。
求解，上次在坛子里看到这个功能，调试不好了，求高人指导啊！

119194993

木人回到吗~~~~？？？？？

garyng

我有个模块～
自己写地～
有点乱～
地址：http://garyngzhongbo.blogspot.com/2011/10/bat.html

119194993

回复 3# garyng




打不开饿饿饿饿饿饿~~~~

garyng

啊～
这么会啊？！

算了啦 ==

源代码（有点乱。。）

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. color 0a
   
4. mode con: cols=80 lines=30
   
5. title Code By GaryNg--Loading Bar Module
   
6. set "clr=set bk="
   
7. set "kuang=set /p=[                                        ]<nul"
   
8. set "ping=ping -n 1 127.1 >nul 2>nul"
   
9. set "done=set /p=]Done<nul&echo"
   
10. set "kuang1=set /p=[::::::::::::::::::::::::::::::::::::::::]<nul"
    
11. ::1
    
12. echo\&echo 1: An Easy Loading Bar&echo\&echo\&echo\&echo\
    
13. %kuang%
    
14. call :BK 40
    
15. set /p=!bk!^|<nul
    
16. for /l %%i in (1 1 39) do (
    
17.         set /p=^|<nul
    
18. %ping%
    
19. )
    
20. %done%
    
21. pause
    
22. cls
    
23. ::2
    
24. echo\&echo 2: Sliding Loading Bar&echo\&echo\&echo\&echo\
    
25. %kuang%
    
26. call :BK 36
    
27. set /p=!bk!^<==^><nul
    
28. %ping%
    
29. call :BK 3
    
30. for /l %%i in (1 1 32) do (
    
31.                 set /p=!bk! ^<==^><nul
    
32. %ping%       
    
33. )
    
34. %done%
    
35. pause
    
36. cls
    
37. ::3
    
38. echo\&echo 3: Go and Back Loading Bar&echo\&echo\&echo\&echo\
    
39. %kuang%
    
40. call :BK 36
    
41. set /p=!bk!%cur%<nul
    
42. %ping%
    
43. call :BK 3
    
44. for /l %%i in (1 1 36) do (
    
45.                 set /p=!bk! ^<==^><nul
    
46. %ping%       
    
47. )
    
48. call :BK 5
    
49. set /p=!bk!^<==^>  <nul
    
50. %ping%
    
51. for /l %%i in (1 1 35) do (
    
52.         set /p=!bk!^<==^> <nul
    
53. %ping%
    
54. )
    
55. set /p=                                   ]Done<nul
    
56. echo\
    
57. pause
    
58. cls
    
59. ::4
    
60. echo\&echo 4: Spining Loading&echo\&echo\&echo\&echo\
    
61. %kuang%
    
62. call :BK 40
    
63. set /p=!bk!<nul
    
64. %clr%
    
65. set b=/-\ /-\ **
    
66. :b
    
67. for /l %%i in (0,1,390) do call :a %%i
    
68. goto :c
    
69. :a
    
70. set/a a=%1%%10
    
71. set/a c=%a%%%4
    
72. if %a% EQU 0 set/p=.<nul
    
73. if %c% EQU 3 (set/p=^|<nul) else (set/p=!b:~%a%,1!<nul)
    
74. set/p=!bk!<nul
    
75. goto :eof
    
76. :c
    
77. %done%
    
78. pause
    
79. cls
    
80. ::5
    
81. echo\&echo 5: Backward Loading Bar&echo\&echo\&echo\&echo\
    
82. %clr%
    
83. %kuang%
    
84. set bk=!bk!
    
85. for /l %%i in (1 1 40) do (
    
86.         set /p=!bk!^|<nul
    
87.         %ping%
    
88. )
    
89. echo\
    
90. echo Done
    
91. pause
    
92. cls
    
93. ::6
    
94. echo\&echo 6. "Under Tunnel" Loading Bar&echo\&echo\&echo\&echo\
    
95. call :SP 40
    
96. set /p=[!sp!]<nul
    
97. 
    
98. call :BK 36
    
99. set /p=!bk!<nul
    
100. %ping%
     
101. call :BK 3
     
102. for /l %%i in (1 1 36) do (
     
103.                 set /p=!bk! ::::<nul
     
104. %ping%       
     
105. )
     
106. call :BK 39
     
107. call :SP 36
     
108. set /p=!bk!:!sp!<nul
     
109. %ping%
     
110. call :BK 35
     
111. call :SP 36
     
112. for /l %%i in (1 1 3) do (
     
113.         %ping%
     
114.         set /p=!bk!:!sp!<nul
     
115. )
     
116. call :BK 35
     
117. set /p=!bk!<nul
     
118. call :BK 3
     
119. for /l %%i in (1 1 36) do (
     
120.         set /p=!bk! ::::<nul
     
121.         %ping%       
     
122. )
     
123. %done%
     
124. pause
     
125. cls
     
126. ::7
     
127. echo\&echo 7. Go Towards Center Loading Bar&echo\&echo\&echo\&echo\
     
128. %kuang%
     
129. for /l %%i in (1 1 20) do (
     
130.         set c=
     
131.         set s=
     
132.         set /a c=42-2*%%i
     
133.         set /a s=!c!-2
     
134.         call :BK !c!
     
135.         call :SP !s!
     
136.         set /p=!bk!^|!sp!^|<nul
     
137.         %ping%
     
138. )
     
139. set /p=Done<nul
     
140. echo\
     
141. pause
     
142. cls
     
143. ::8
     
144. echo\&echo 8. Replace To Load&echo\&echo\&echo\&echo\
     
145. %kuang1%
     
146. call :BK 40
     
147. set /p=!bk!^|<nul
     
148. for /l %%i in (1 1 39) do (
     
149.         set /p=^|<nul
     
150. %ping%
     
151. )
     
152. %done%
     
153. pause&exit
     
154. :SP
     
155. set sp=
     
156. for /l %%i in (1 1 %1) do (
     
157.         set sp=!sp!
     
158. )
     
159. goto :eof
     
160. 
     
161. :BK
     
162. %clr%
     
163. for /l %%i in (1 1 %1) do (
     
164.         set bk=!bk!
     
165. )
     
166. goto :eof

复制代码