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

[文本处理] 批处理如何实现部分字幕的移动?

看了FOXJL的那个批处理走字效果好,想到,可不可以利用走字把自己的名字(novaa) 从窗口右端走到左端呢
就像下雨一样,只不过是从右往左下。。。
自己试了一个多小时还是不成功。老手指教。
我的失败代码是
  1. @echo off&setlocal enabledelayedexpansion
  2. set num=20
  3. for /l %%a in (1 1 20) do call :Again
  4. :Again
  5. for /l %%i in (1 1 !num!) do set /p= <NUL
  6. set /p=novaa<NUL
  7. set /l %%i in (1 1 25) do set /p=<NUL
  8. set /l %%i in (1 1 25) do set /p= <NUL
  9. set /l %%i in (1 1 25) do set /p=<NUL
  10. set /a num-=1
  11. call :Pause
  12. goto :eof
  13. :Pause
  14. for /l %%i in (1 1 1000) do set /p=<NUL
  15. goto :eof
复制代码
ㄗs:A good programming is 99% sweat and 1% coffee!--①個亾

============ >   hi.baidu.com/novaa   <============

  1. @echo off&setlocal enabledelayedexpansion
  2. set "table= Novaa"
  3. :Echo
  4. cls
  5. set /p=!table!<NUL
  6. call :Delay
  7. set table=!table:~2!&goto :Echo
  8. :Delay
  9. ping /n 1 127.1>nul
复制代码

这个是可以用的。但是是通过清屏来达到效果的
ㄗs:A good programming is 99% sweat and 1% coffee!--①個亾

============ >   hi.baidu.com/novaa   <============

TOP

不是。是在一条直线上运动。从右到左。
ㄗs:A good programming is 99% sweat and 1% coffee!--①個亾

============ >   hi.baidu.com/novaa   <============

TOP

嗯!
是FOXJL写的。
研究下

[ 本帖最后由 novaa 于 2007-12-15 22:54 编辑 ]
ㄗs:A good programming is 99% sweat and 1% coffee!--①個亾

============ >   hi.baidu.com/novaa   <============

TOP

返回列表