[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文本处理] 批处理版中英文词典搜索工具

本帖最后由 cjiabing 于 2011-7-23 23:16 编辑

以前写的东西,比较粗糙,没什么技术性可言,只是词典本身以及它的实用性有点价值。将就着用,有空再改善吧。
下载http://dl.dbank.com/c00cfdt3bi
如有更新,以此帖为准!~
  1. @echo off
  2. ::by cjiabing&from http://hi.baidu.com/cjiabing/home
  3. title 批处理版中英文词典 V1.1
  4. ::本工具基于现代汉语词典、中国成语大辞典、现代汉语词典、牛津英汉词典、牛津高阶英汉词典、成语词典等词典,用以综合查询字词,仅供学习和研究用。
  5. ::以前写的,较为简单,有空再升级。
  6. echo ◇建议在最大化模式下运行◇ ◇建议在最大化模式下运行◇
  7. goto start1
  8. ◇◆●○
  9. :start
  10. cls
  11. echo.
  12. echo.
  13. echo ● 中英文词典查询工具 ●
  14. echo.
  15. echo ○ 1 普通查询【M1】 ○ 2 单字查询【M2】
  16. echo ○ 3 全文搜索【M3】 ○ 4 词头匹配【M4】
  17. echo ○ 5 成语词典【M5】 ○ 6 英文词典【M6】
  18. echo ○ 7 牛津高阶英汉词典【M7】 ○ 8 综合查询【M8】
  19. echo ________________________________________________________________________________
  20. echo.
  21. echo ◇ 1、本工具用于多个词典文本搜索,词典本身来自互联网,仅供学习研究。
  22. echo ◇ 4、可搜索汉字、成语和英语单词。推荐普通查询【M1】和综合查询【M8】。
  23. echo ◇ 2、为了得到更好的查询结果,请精细化、具体化搜索条件。
  24. echo ◇ 3、查询结果保存在文本“_FResults.txt”中,可进行二次搜索和导出。
  25. echo ◇ 5、可以调整窗口大小:常规【N1】中等【N2】大屏幕【N3】
  26. echo ________________________________________________________________________________
  27. echo.
  28. set /p xz= ★ 请选择:
  29. cls
  30. for /l %%a in (1,1,8) do if %xz%==%%a goto start%%a
  31. set inf=%xz%
  32. call :menu0
  33. goto start
  34. :menu0
  35. if %inf%==N1 MODE con: COLS=85 LINES=25&goto :eof
  36. if %inf%==N2 MODE con: COLS=105 LINES=57&goto :eof
  37. if %inf%==N3 MODE con: COLS=125 LINES=90&goto :eof
  38. for /l %%a in (1,1,8) do if %inf%==M%%a goto start%%a
  39. goto :eof
  40. :start1
  41. COLOR 97
  42. echo.
  43. echo.
  44. echo ◆ 普通查询 ◆
  45. echo.
  46. set /p inf= ★ 待查字词(菜单 【M】;在结果中查询 SEC):
  47. if %inf%==M goto start
  48. call :menu0
  49. if %inf%==SEC call :sec1&goto start1
  50. echo ____________________________________________________________________________________________________
  51. findstr /i /a:2c /n ""*%inf%"" 现代汉语词典.txt
  52. echo.
  53. findstr /i /a:2c /n "【%inf%" 现代汉语词典.txt
  54. echo.
  55. findstr /b /i /a:2c /n "%inf%" 牛津英汉词典.txt
  56. echo.
  57. findstr /i /a:2c /n "【%inf%】" 中国成语大辞典.txt
  58. cd.>_FResults.txt
  59. findstr /i /a:2c /n ""*%inf%"" 现代汉语词典.txt>>_FResults.txt
  60. findstr /i /a:2c /n "【%inf%" 现代汉语词典.txt>>_FResults.txt
  61. findstr /b /i /a:2c /n "%inf%" 牛津英汉词典.txt>>_FResults.txt
  62. findstr /i /a:2c /n "【%inf%】" 中国成语大辞典.txt>>_FResults.txt
  63. echo ____________________________________________________________________________________________________
  64. echo ○ 查询结果保存在文本“_FResults.txt”中。
  65. goto start1
  66. :sec1
  67. echo.
  68. echo.
  69. echo ◇ 在结果中进行第二次搜索 ◇
  70. echo.
  71. set /p infs= ★ 待查字词(菜单 【M】):
  72. if %inf%==M goto start
  73. call :menu0
  74. echo ____________________________________________________________________________________________________
  75. cd.>_查询结果.txt
  76. if exist _FResults.txt findstr /i "%infs%" _FResults.txt>>_查询结果.txt
  77. type _查询结果.txt
  78. start "" _查询结果.txt
  79. echo ____________________________________________________________________________________________________
  80. echo ○ 查询结果保存在文本“_查询结果.txt”中。
  81. goto :eof
  82. :start2
  83. echo.
  84. echo ◆ 单字查询 ◆
  85. echo.
  86. set /p inf= ★ 待查字词(菜单 【M】):
  87. if %inf%==M goto start
  88. call :menu0
  89. echo ____________________________________________________________________________________________________
  90. findstr /i ""*%inf%"" 现代汉语词典.txt
  91. echo.
  92. findstr /i "【%inf%】" 现代汉语词典.txt
  93. echo.
  94. findstr /i "%inf%" 牛津英汉词典.txt
  95. echo ____________________________________________________________________________________________________
  96. goto start2
  97. :start3
  98. echo.
  99. echo ◆ 全文搜索 ◆
  100. echo.
  101. set /p inf= ★ 待查字词(菜单 【M】;在结果中查询 SEC):
  102. if %inf%==M goto start
  103. call :menu0
  104. if %inf%==SEC call :sec1&goto start3
  105. echo ____________________________________________________________________________________________________
  106. if exist _FResults.txt echo.>_FResults.txt
  107. findstr /i "%inf%" 现代汉语词典.txt>>_FResults.txt
  108. findstr /i "%inf%" 牛津高阶英汉词典.txt>>_FResults.txt
  109. findstr /i "%inf%" 中国成语大辞典.txt>>_FResults.txt
  110. type _FResults.txt
  111. echo ____________________________________________________________________________________________________
  112. echo ○ 查询结果保存在文本“_FResults.txt”中。
  113. goto start3
  114. :start4
  115. echo.
  116. echo ◆ 词头匹配 ◆
  117. echo.
  118. set /p inf= ★ 待查字词(菜单 【M】):
  119. if %inf%==M goto start
  120. call :menu0
  121. echo ____________________________________________________________________________________________________
  122. findstr /i /b "*%inf%" 现代汉语词典.txt
  123. findstr /i /b "%inf%" 牛津英汉词典.txt
  124. echo ____________________________________________________________________________________________________
  125. goto start4
  126. :start5
  127. echo.
  128. echo ◆ 成语查询 ◆
  129. echo.
  130. set /p inf= ★ 输入需要查询的成语(菜单 【M】):
  131. if %inf%==M goto start
  132. call :menu0
  133. echo ____________________________________________________________________________________________________
  134. findstr /i ""*%inf%"" 现代汉语词典.txt
  135. echo.
  136. findstr /i "【%inf%】" 现代汉语词典.txt
  137. echo.
  138. findstr /i "%inf%" 成语字典.txt
  139. echo.
  140. findstr /i "【%inf%】" 中国成语大辞典.txt
  141. echo ____________________________________________________________________________________________________
  142. goto start5
  143. :start6
  144. echo.
  145. echo ◆ 英汉词典 ◆
  146. echo.
  147. set /p inf= ★ 输入需要查询的单词(菜单 【M】):
  148. if %inf%==M goto start
  149. call :menu0
  150. echo ____________________________________________________________________________________________________
  151. findstr /i "%inf%" 牛津英汉词典.txt
  152. echo ____________________________________________________________________________________________________
  153. goto start6
  154. :start7
  155. echo.
  156. echo ◆ 牛津高阶英汉词典 ◆
  157. echo.
  158. set /p inf= ★ 输入需要查询的单词(菜单 【M】;全文搜索 ALL):
  159. if %inf%==M goto start
  160. call :menu0
  161. if %inf%==ALL goto start77
  162. echo ____________________________________________________________________________________________________
  163. findstr /i /b "%inf%" 牛津高阶英汉词典.txt
  164. echo ____________________________________________________________________________________________________
  165. goto start7
  166. :start77
  167. echo.
  168. echo ◇ 牛津高阶英汉词典全文搜索 ◇
  169. echo.
  170. set /p inf= ★ 待查字词(菜单 【M】;在结果中查询 SEC;返回 BACK):
  171. if %inf%==M goto start
  172. call :menu0
  173. if %inf%==BACK goto start7
  174. if %inf%==SEC call :sec1&goto start77
  175. echo ____________________________________________________________________________________________________
  176. if exist _FResults.txt echo.>_FResults.txt
  177. findstr /i "%inf%" 牛津高阶英汉词典.txt>>_FResults.txt
  178. type _FResults.txt
  179. echo ____________________________________________________________________________________________________
  180. echo ○ 查询结果保存在文本“_FResults.txt”中。
  181. goto start77
  182. :start8
  183. echo.
  184. echo ◇ 综合查询 ◇
  185. echo.
  186. echo. 【请将TXT格式的文本文件(其他词典)与本程序放到同一目录下使用】
  187. echo. 【请注意修改TXT词典的编码方式,有些特殊符号无法搜索】
  188. echo.
  189. echo.
  190. set /p inf= ★ 待查字词(菜单 【M】;在结果中查询 SEC;返回 BACK):
  191. if %inf%==M goto start
  192. call :menu0
  193. if %inf%==BACK goto start8
  194. if %inf%==SEC call :sec1&goto start77
  195. echo ____________________________________________________________________________________________________
  196. if exist _FResults.txt echo.>_FResults.txt
  197. for /f "tokens=*" %%a in ('dir /b') do if /i not %%~nxa=="_FResults.txt" findstr /i /a:2c /n "%inf%" %%a
  198. for /f "tokens=*" %%a in ('dir /b') do if /i not %%~nxa=="_FResults.txt" findstr /i /a:2c /n "%inf%" %%a>>_FResults.txt
  199. ::type _FResults.txt
  200. echo ____________________________________________________________________________________________________
  201. echo ○ 查询结果保存在文本“_FResults.txt”中。
  202. goto start77
复制代码
寂寞是黑白的,但黑白不是寂寞,是永恒。BAT 需要的不是可能,而是智慧。

功能很全啊

TOP

这个还不错,

TOP

回复 2# tmplinshi


    很好,不过要用三方
寂寞是黑白的,但黑白不是寂寞,是永恒。BAT 需要的不是可能,而是智慧。

TOP

本帖最后由 tmplinshi 于 2011-7-23 23:25 编辑

在线查询:
  1. curl -s http://dict.cn/ws.php?q=test | sed -n "/^<def>/,/<\/def>$/p"
复制代码

TOP

返回列表