China DOS Union

1. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
   
2. 
   
3. :: Batch2ubb.cmd -V0.30 -- Batch to UBB Code
   
4. 
   
5. :: NaiWuHe@cn-dos.net - Updated: 2005-7-30 - CMD & GAWK
   
6. 
   
7. :: Usage: Batch2ubb
   
8. 
   
9. :: Supported files: - gawk.exe winclip.exe Batch2ubb.awk batch.esy
   
10. 
    
11. :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
    
12. 
    
13. 
    
14. 
    
15. @echo off
    
16. 
    
17. setlocal
    
18. 
    
19. set path=%path%;%cd%;%~dp0
    
20. 
    
21. set error=
    
22. 
    
23. rem File integrity check.
    
24. 
    
25. for %%i in (gawk.exe winclip.exe batch.esy batch2ubb.awk) do (
    
26. 
    
27. @if "%%~$PATH:i" == "" (
    
28. 
    
29. echo Error: Dependent file "%%i" is missing.
    
30. 
    
31. set error=Error: Program files are incomplete.
    
32. 
    
33. ) else ( set %%~ni="%%~$PATH:i" )
    
34. 
    
35. )
    
36. 
    
37. if defined error goto error
    
38. 
    
39. 
    
40. 
    
41. rem Test clipboard data type.
    
42. 
    
43. winclip -i |findstr /r ".*_.*TEXT" >nul
    
44. 
    
45. if ERRORLEVEL 1 set error=Error: Clipboard is empty or contains non-text data!
    
46. 
    
47. 
    
48. 
    
49. rem Empty parameter call to get clipboard data and copy conversion result to clipboard.
    
50. 
    
51. if "%~1" == "" (
    
52. 
    
53. if defined error goto error
    
54. 
    
55. winclip -p |gawk -v line=1 -f %Batch2ubb% |winclip -c
    
56. 
    
57. goto end
    
58. 
    
59. )
    
60. 
    
61. rem When there is only one parameter, try to handle it as an input file, and treat it as a parameter if it does not exist.
    
62. 
    
63. if "%~2" == "" (
    
64. 
    
65. if exist "%~1" (
    
66. 
    
67. gawk -v line=1 -f %Batch2ubb% "%~1" |winclip -c
    
68. 
    
69. goto end
    
70. 
    
71. )
    
72. 
    
73. )
    
74. 
    
75. set line=1
    
76. 
    
77. set input=
    
78. 
    
79. set out=
    
80. 
    
81. 
    
82. 
    
83. :ParseLoop
    
84. 
    
85. if "%~1" == "" goto Start
    
86. 
    
87. if "%~1" == "/?" goto SwitchH
    
88. 
    
89. rem Parameter processing and jump to corresponding label.
    
90. 
    
91. for %%s in (i I n N o O h H) do if "%~1"=="/%%s" goto Switch%%s
    
92. 
    
93. set error=Error: Incorrect parameter format - "%1"!
    
94. 
    
95. goto error
    
96. 
    
97. 
    
98. 
    
99. :SwitchI
    
100. 
     
101. set "input=%~2"
     
102. 
     
103. if not exist "%input%" set error=Warning: File "%input%" does not exist. & goto error
     
104. 
     
105. goto Next2Arg
     
106. 
     
107. 
     
108. 
     
109. :SwitchO
     
110. 
     
111. set "out=%~2"
     
112. 
     
113. if not defined out set error=Warning: Please specify an output file. & goto error
     
114. 
     
115. goto Next2Arg
     
116. 
     
117. 
     
118. 
     
119. :SwitchN
     
120. 
     
121. set line=0
     
122. 
     
123. goto NextArg
     
124. 
     
125. 
     
126. 
     
127. :Next2Arg
     
128. 
     
129. shift
     
130. 
     
131. :NextArg
     
132. 
     
133. shift
     
134. 
     
135. goto ParseLoop
     
136. 
     
137. 
     
138. 
     
139. rem Different parameter classification judgment processing.
     
140. 
     
141. :Start
     
142. 
     
143. if defined input (
     
144. 
     
145. if defined out (
     
146. 
     
147. gawk -v line=%line% -f %Batch2ubb% "%input%" >"%out%"
     
148. 
     
149. ) else (
     
150. 
     
151. gawk -v line=%line% -f %Batch2ubb% "%input%" |winclip -c
     
152. 
     
153. )
     
154. 
     
155. ) else (
     
156. 
     
157. if defined out (
     
158. 
     
159. if defined error goto error
     
160. 
     
161. winclip -p |gawk -v line=%line% -f %Batch2ubb% >"%out%"
     
162. 
     
163. ) else (
     
164. 
     
165. if defined error goto error
     
166. 
     
167. winclip -p |gawk -v line=0 -f %Batch2ubb% |winclip -c
     
168. 
     
169. )
     
170. 
     
171. )
     
172. 
     
173. goto end
     
174. 
     
175. 
     
176. 
     
177. :error
     
178. 
     
179. echo.%error%
     
180. 
     
181. echo.
     
182. 
     
183. :SwitchH
     
184. 
     
185. echo.Batch to UBB Code.
     
186. 
     
187. echo.Batch2ubb
     
188. 
     
189. echo.
     
190. 
     
191. echo. /i Specify the file to be converted, which can include a path, and the default is obtained from the clipboard.
     
192. 
     
193. echo. /o Specify the output file, which can include a path, and the default is output to the clipboard.
     
194. 
     
195. echo. /n Generate UBB code without line numbers, the default is with line numbers.
     
196. 
     
197. echo. /h Display this brief help, equivalent command /?.
     
198. 
     
199. echo. This program depends on the following files gawk.exe winclip.exe Batch2ubb.awk batch.esy.
     
200. 
     
201. echo.
     
202. 
     
203. :end
     
204. 
     

dosz posted on: 2009-04-11 21:14

1. @echo off
   
2. cls
   
3. :loop
   
4. set filename=
   
5. set/p filename=Please enter the file name to be searched (supports wildcards, such as "*.mp3 mp3.*"):
   
6. if not defined filename (cls & if errorlevel 1 cls&msg * dosz Prompt: An incorrect command was entered, why is this~, do you want to fool? &goto loop)
   
7. echo.
   
8. set/p sheet=Please enter the file name to be written to the list: ┗┛Optional (do not expand the name)
   
9. set num=
   
10. ECHO ☆☆☆ %DATE% %time% ☆☆☆>%temp%\%sheet%.txt
    
11. set drv= C D E F G H I J K L M N O P Q R S T U V W X Y Z
    
12. for %%a in (%drv%) do (
    
13. if exist %%a:\nul (
    
14. cls&echo Searching for %%a: under the disk %filename% ...
    
15. dir>nul 2>nul /s/b/a/o "%%a:\%filename%" >>%temp%\%sheet%.txt&&set num=1
    
16. )
    
17. )
    
18. if "%num%" == "1" (
    
19. @mode con cols=120
    
20. cls&echo.&echo.
    
21. color 1f
    
22. echo =========== The following files are found for you: "%filename%" and saved to the "%temp%\%sheet%.txt" file ================
    
23. title Quick Open File
    
24. echo.
    
25. for /f "delims=" %%i in (%temp%\%sheet%.txt) do echo %%i
    
26. ) else (cls&echo.&echo.&echo ***** No file found: "%filename%" *****&pause>nul&GOTO :EOF)
    
27. start %temp%\%sheet%.txt
    
28. pause
    

dosz posted on: 2009-04-11 21:18

I've learned it, thank you everyone
It turns out to be like this





1. I've learned it, thank you everyone
   
2. It turns out to be like this