中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 【视觉类】前进中的道路+飞机大炮

523066680
银牌会员

SuperCleaner

积分 2362
发帖 1133
注册 2008-2-2
状态离线

『楼主』: 【视觉类】前进中的道路+飞机大炮

::前进中的道路效果.bat
::编辑if_exist    blog:hi.baidu.com/523066680
@echo off
setlocal enabledelayedexpansion
for /l %%a in (0,1,34) do (
set n%%a=0                ii                0
)
for /l %%b in (3,5,33) do set n%%b=!n%%b:ii=  !
for /l %%b in (4,5,34) do set n%%b=!n%%b:ii=  !
set  king1=!n0: ii =IIII!
set king2=!n0:  ii  =IIIIII!
:action
for %%c in (5,4,3,2,1,0) do (
  set /a n=14+%%c
  cls
  for /l %%d in (%%c,1,!n!) do (
   echo.!n%%d!
  )
  echo.!king1!&echo.!king2!
  for /l %%n in (1,1,300) do (echo>nul)
)
goto action

--------------------------------------------------分界线----------
::飞机大炮.bat
::编辑if_exist blog:hi.baidu.com/523066680
@echo off
setlocal enabledelayedexpansion
for /l %%a in (0,1,34) do (
set n%%a=0                ii                0
)
for /l %%b in (3,5,33) do set n%%b=!n%%b:ii=  !
for /l %%b in (4,5,34) do set n%%b=!n%%b:ii=  !
set  king1=!n0: ii =IIII!
set king2=!n0:  ii  =IIIIII!
:action
for %%c in (0,1,2,3,4,5) do (
  set /a n=14+%%c
  cls
  for /l %%d in (%%c,1,!n!) do (
   echo.!n%%d!
  )
  echo.!king1!&echo.!king2!
  for /l %%n in (1,1,300) do (echo>nul)
)
goto action

此帖被 +4 点积分

点击查看详情

2008-7-4 17:16