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

[游戏娱乐] 批处理跑马灯逐个显示字符小动画

&&那天在群里听到大家谈论动画,所以写下这个这个小动画:
  1. @echo off&setlocal enabledelayedexpansion
  2. color 1c&mode con cols=50 lines=8&title 小动画 by batman
  3. set "str=b b s . b a t h o m e . c n"&set /a n=31
  4. echo.&echo.&echo.&set /p=               <nul
  5. for %%a in (%str%) do (
  6.      set /a n-=1
  7.      for /l %%b in (!n!,-1,0) do (
  8.          for /l %%c in (1,1,%%b) do set /p=_<nul
  9.          set /p=%%a<nul&set /a num=%%b+1
  10.          for /l %%d in (1,1,100) do echo>nul
  11.          for /l %%e in (1,1,!num!) do set /p= <nul
  12.      )
  13.      set /p=%%a<nul
  14. )
  15. ping /n 3 127.1>nul&set /a n=1
  16. for /l %%a in (1,1,8) do (
  17.      for /l %%c in (1,1,14) do set /p= <nul
  18.      set /a n+=1&color 1!n!
  19.      set /p=bbs.bathome.net<nul
  20.      for /l %%b in (1,1,100) do echo>nul
  21. )
  22. pause>nul
复制代码
***共同提高***

挺有创意的。嘻嘻。
批处理之家论坛官方 QQ 群 :【当前人数/人数上限】【2009-07-08】
群①:43011867(181/200);群②:(暂缺数据);群③:66165582(120/200)。

TOP

确实有创意

呵呵

蛮好玩儿

TOP

很牛啊 我下了 看了 不错!

TOP

那个字符就像被绳子拉着似的~
有创意~
不愧是超级版主啊~

TOP

返回列表