刚做的滚动文字批处理，大家来看下

raymai97

最近不知道要做什么批处理好，就做个滚动文字的批处理，发上来给大家看看，顺便问下大家感觉如何

再附上几个问题：
1. 除了用退格符，还有没有其他方法，可以达到同样的功能？（即去除一个空格）
2. 感觉文字有点闪，能做到更好么？

如果要运行，请下载这个sleep.com，放到批处理的目录下

1. @echo off
   
2. title My eye hurt when I done a program!
   
3. mode con cols=80 lines=18
   
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. 
    
14. :despace
    
15. set /a time+=1
    
16. set space=%space%
    
17. call :msg
    
18. if "%time%"=="17" exit /b
    
19. goto despace
    
20. 
    
21. :space
    
22. set /a time+=1
    
23. set space=%space%  
    
24. call :msg
    
25. if "%time%"=="17" exit /b
    
26. goto space
    
27. 
    
28. :msg
    
29. cls
    
30. echo.
    
31. echo   %space%For my dream
    
32. echo.
    
33. echo      %space%For improving my program..
    
34. echo.
    
35. echo         %space%I alway need to stuck with these..
    
36. echo.
    
37. echo    %space%Hurting eye code.. I HATE IT! (╰_╯)#
    
38. echo.
    
39. echo.
    
40. echo       %space%But I think it is worth.. for me..
    
41. echo.
    
42. echo         %space%As no pay, no get... right?
    
43. echo.
    
44. echo     %space%How about... you?   O(∩_∩)O
    
45. sleep 200
    
46. exit /b
    
47. 
    
48. :fadein
    
49. color 08
    
50. sleep 200
    
51. color 07
    
52. sleep 200
    
53. color 0f
    
54. exit /b

复制代码

CUer

用ping来延时不好吗？为嘛要依赖sleep

garyng

My eye hurt when I done a program!
语法有点错误~
建议写为：
My eye hurt when I done this program!
第一个意思为：我的眼睛在写完一个程序后受伤
第二个意思为：我的眼睛在写完这个程序后受伤

看了那程序
只有一个字：赞
超帅地！

CUer

回复 3# garyng


My ladygaga，楼上两位的初中老师没有教过什么是被动语态？

garyng

回复 4# CUer


    那应该怎么写呢？

raymai97

回复 3# garyng


    我要表达的意思的确是第一句的啊~ “每当完成一个程序，我的眼睛痛了”

raymai97

回复 2# CUer


    ping的精简度只有一秒，放一秒太慢，放ping -n 1 127.1>nul太快，无奈就用sleep了

garyng

回复 7# raymai97


    明白~明白~误解了~

xiaoyuanan2000

pathping -n -h 1 -q 1 -p 毫秒数 127.0.0.1 >nul

悬崖之树

我也伪造了一个：

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. 
    
14. :despace
    
15. set /a time+=1
    
16. set space=%space%
    
17. call :msg
    
18. if "%time%"=="22" sleep 400 & exit /b
    
19. goto despace
    
20. 
    
21. :space
    
22. set /a time+=1
    
23. set space=%space%  
    
24. call :msg
    
25. if "%time%"=="22"  sleep 400 & exit /b
    
26. goto space
    
27. 
    
28. :msg
    
29. cls
    
30. echo.
    
31. echo %space%白日依山尽
    
32. echo.
    
33. echo   %space%黄河入海流  
    
34. echo.
    
35. echo     %space%欲穷千里目
    
36. echo.
    
37. echo       %space%更上一层楼
    
38. echo.
    
39. echo.
    
40. echo %space%锄禾日当午
    
41. echo.
    
42. echo   %space%汗滴禾下土
    
43. echo.
    
44. echo      %space%谁知盘中餐
    
45. echo.
    
46. echo        %space%粒粒皆辛苦
    
47. echo.
    
48. echo.
    
49. echo     ——悬崖之树
    
50. 
    
51. sleep 400 >nul
    
52. exit /b
    
53. 
    
54. :fadein
    
55. color a8
    
56. sheep 400 >nul
    
57. color d7
    
58. sleep 400 >nul
    
59. color c7
    
60. exit /b

复制代码

悬崖之树

回复 10# 悬崖之树

还有一个：

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

复制代码

ps： 要用到 sleep.com 文件！！

wh1234567

高手都在这里？咋不帮我伪造几个答案啊，哈哈哈，