批处理实现的文字的飞入+变色效果代码

 更新时间:2011年02月27日 01:30:36   作者:  
批处理实现的文字的飞入+变色效果代码,喜欢的朋友可以参考下。
复制代码 代码如下:

@echo off&setlocal enabledelayedexpansion&cls&color 0f&title Welcome to CN-DOS!
mode con: cols=30 lines=3
set "a= PC-X69"
set b=
set "c=12345689abcde"
echo\
:c
for /l %%a in (6,1,28) do (
set /a d=%random%%%13+1
call :pp %%a
)
goto c
:pp
set/p=!a:~-%1!<nul
set/p=!b:~0,%1!<nul
color 0!c:~%d%,1!
goto :eof

相关文章

最新评论