[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程批处理在线视频分享
返回列表 发帖
求源码啊。。。一同学习与分享嘛~!

TOP

这东西确实挺受用的,目前很多xp都有

TOP

本帖最后由 dengyuli 于 2013-9-27 19:36 编辑
打开乱码的,复制一份,将扩展名改为DOC 打开时选择MS-DOS编码就OK了

开头还有一部分乱码
建议用这个工具自带的解密功能来解密,可以完美翻译(要先把主程序名改成1.5.0.0.bat)
以下是开头部分:
  1. :内核数据
  2. @Echo off
  3. setlocal EnableDelayedExpansion
  4. @rem ↓ Set:
  5. Call :总体设置
  6. @rem Set Over↑
  7. Mode con cols=127 lines=44&color a
  8. Title %wds% Xp 系统优化工具 %verfor% [-☆Ver: %ToolsIVer% -☆ By_ %TGp% ☆-]
  9. if not exist "%RunT_c%"  (
  10. md "%F_Tem%"2>nul
  11. if not ""%1"" == """" goto 快速拖拽
  12. ECHO 0 >%RunT_c%
  13. cls
  14. ECHO.
  15. ECHO _______________________________________________________________________________________________________________________________
  16. call :点阵字 "/ / / 17 -2 / 17 -2 9 -2 2 -2 6 -4 1 -3 / 12 -2 2 -5 7 -2 2 -2 1 -2 3 -5 2 -1 / 16 -4 7 -2 3 -2 1 -2 5 -1 1 -3 / 12 -2 2 -5 5 -2 4 -4 8 -3 / 11 -3 2 -6 5 -7 9 -3 2 -2 / 9 -4 3 -5 6 -2 1 -3 10 -8 / 11 -1 3 -6 5 -3 2 -4 4 -5 1 -4 / 10 -2 2 -2 1 -4 4 -5 1 -5 3 -3 1 -6 / 10 -2 1 -1 2 -1 1 -3 3 -2 1 -2 2 -5 6 -3 1 -1 / 10 -4 2 -5 5 -4 1 -2 1 -2 7 -4 / 10 -3 3 -1 1 -3 5 -4 1 -5 10 -1 / 15 -2 2 -2 5 -1 1 -2 1 -1 1 -3 9 -2 / 16 -1 2 -2 6 -2 4 -3 9 -2 / / /"
  17. ECHO                  这是您第一次使用本软件,软件正在进行自我配置 请稍后。。。。
  18. call :点阵字 "/ 4 -2 48 -2 / 4 -2 9 -2 1 -2 1 -2 20 -5 6 -2 / 4 -2 2 -1 6 -2 1 -2 1 -2 6 -2 9 -6 1 -1 6 -2 1 -3 / 3 -8 3 -2 2 -2 6 -4 1 -3 1 -2 3 -4 1 -3 6 -7 / 2 -4 2 -3 3 -8 5 -3 2 -1 2 -2 3 -8 2 -1 2 -3 2 -2 / 3 -1 4 -2 4 -6 6 -5 3 -2 7 -4 3 -6 1 -2 / 2 -8 3 -3 3 -1 1 -1 4 -5 1 -4 4 -7 2 -3 2 -4 / 2 -4 2 -2 1 -6 2 -1 1 -1 3 -9 7 -5 3 -8 / 2 -2 2 -4 4 -3 2 -3 3 -8 8 -5 4 -1 1 -4 / 2 -8 4 -2 3 -3 3 -2 2 -4 4 -2 2 -6 7 -2 / 2 -2 4 -2 3 -3 3 -2 4 -1 1 -6 4 -2 2 -6 7 -2 / 2 -2 4 -2 3 -3 4 -2 1 -1 1 -6 1 -2 1 -4 2 -4 1 -1 7 -2 / 2 -8 4 -2 5 -3 2 -2 1 -2 1 -6 4 -5 7 -2 / 7 -3 13 -2 15 -10 4 -2 / 8 -2 31 -1 12 -2 / / /"
  19. ECHO _______________________________________________________________________________________________________________________________
  20. :快速拖拽
  21. call :气泡模块
  22. if not ""%1"" == """" goto Bat加解密
  23. call :延迟模块
  24. call :更新与抓取文件模块
  25. Wscript.exe //b "%DownAC_v%" "%NVer_Mlist%" "%Ver_ML_FName%" "%LocaF_Ver_ML%" ""
  26. call :音乐播放模块
  27. call :检查更新
  28. ) else (
  29. if not exist "%RunT_c%" ECHO 0 >%RunT_c%
  30. call :气泡模块
  31. call :延迟模块
  32. call :音乐播放模块
  33. call :更新与抓取文件模块
  34. if not ""%1"" == """" goto Bat加解密
  35. FOR /F "tokens=*" %%x in (%RunT_c%) do (
  36. set /a count=%%x+1
  37. echo 10 >%RunT_c%
  38. set /a 奇偶=10%%2
复制代码

TOP

很强大啊!!!!!!!!!!!

TOP

下载一个学习,回帖感谢。。。。

TOP

回复 1# tkaven

确实不错,学习中

TOP

大工程啊,支持下。。。

TOP

下了的 请用 自带的 更新选项更新

TOP

非常强大。膜拜

TOP

很好,很强大 !!!!

TOP

感谢楼主辛苦了

TOP

感谢分享,真的提供了一个很好的批处理样本。已下载学习中

TOP

返回列表