- 帖子
- 86
- 积分
- 3008
- 技术
- 2
- 捐助
- 0
- 注册时间
- 2008-7-4
|
批处理中各种逐字显示方法
@echo off
title 标题逐显
color 2b
:Head
cls
setlocal EnableDelayedExpansion
set line=批处理之家--我永远支持-哈哈
set display=
for /l %%i in (0,1,14) do (
if not !dispaly! == !line! (set display=!display!!line:~%%i,1!) else ( set display= )
title !display!
ping/n 1 127.1>nul
)
goto Head
@echo off
title 水平逐显
color 2b
:Head
cls
setlocal EnableDelayedExpansion
set line=批处理之家--我永远支持-哈哈
for /l %%i in (0,1,14) do (
set/p=!line:~%%i,1!<nul
ping/n 1 127.1>nul
)
goto Head
@echo off
title 竖直逐显
color 2b
:Head
cls
setlocal EnableDelayedExpansion
set line=批处理之家--我永远支持-哈哈
for /l %%i in (0,1,14) do (
echo !line:~%%i,1!<nul
ping/n 1 127.1>nul
)
goto Head
@echo off&&setlocal EnableDelayedExpansion
title 彩色输出逐显
set line=批处理之家--我永远支持-哈哈
for /l %%i in (0,1,14) do (
set /a a=!random:~,1!%%5+1
set filename=!line:~%%i,1!
set /p= <nul>!filename!
call findstr /a:!a! .* "!filename!*"
ping -n 2 127.0.0.1 >nul
del /q "!filename!*"
)
pause>nul
希望大家继续补充,谢谢!!
[ 本帖最后由 小勇12 于 2009-4-15 14:30 编辑 ] |
-
1
评分人数
-
|