[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 悬崖之树 于 2012-8-4 19:28 编辑

我也伪造了一个:
  1. @echo off
  2. title 悬崖之树
  3. mode con cols=62 lines=21
  4. color 08
  5. call :msg
  6. call :fadein
  7. :loop
  8. set time=0
  9. call :space
  10. set time=0
  11. call :despace
  12. goto loop
  13. :despace
  14. set /a time+=1
  15. set space=%space%
  16. call :msg
  17. if "%time%"=="22" sleep 400 & exit /b
  18. goto despace
  19. :space
  20. set /a time+=1
  21. set space=%space%  
  22. call :msg
  23. if "%time%"=="22"  sleep 400 & exit /b
  24. goto space
  25. :msg
  26. cls
  27. echo.
  28. echo %space%白日依山尽
  29. echo.
  30. echo   %space%黄河入海流  
  31. echo.
  32. echo     %space%欲穷千里目
  33. echo.
  34. echo       %space%更上一层楼
  35. echo.
  36. echo.
  37. echo %space%锄禾日当午
  38. echo.
  39. echo   %space%汗滴禾下土
  40. echo.
  41. echo      %space%谁知盘中餐
  42. echo.
  43. echo        %space%粒粒皆辛苦
  44. echo.
  45. echo.
  46. echo     ——悬崖之树
  47. sleep 400 >nul
  48. exit /b
  49. :fadein
  50. color a8
  51. sheep 400 >nul
  52. color d7
  53. sleep 400 >nul
  54. color c7
  55. exit /b
复制代码

TOP

回复 10# 悬崖之树

还有一个:
  1. @echo off & setlocal enabledelayedexpansion
  2. mode con cols=50 lines=2
  3. echo 大家好! hello world …… 菜鸟制作
  4. :main
  5. title 悬崖之树
  6. color b8
  7. sleep 200
  8. :ks
  9. for /l %%a in (1 1 5) do (
  10. set str=@!str!
  11. set /a n=n+1
  12. title !str!悬崖之树
  13. sleep 200
  14. if !n!==10 set n= & set str= & goto main
  15. )  
  16. sleep 200
  17. goto ks
复制代码
ps: 要用到 sleep.com 文件!!

TOP

返回列表