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

批处理中各种逐字显示方法

@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

评分人数

所发代码若不止一行,请务必用code标记把代码部分首尾括起来,以便他人复制;

Q: 如何用code把代码扩起来?
A: http://bbs.bathome.net/thread-404-1-1.html
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 1楼 的帖子

请问大侠:竖直显示的那段批处理能显示多列吗?

TOP

感谢

我觉得还是最后一个有意思。
谢谢

TOP

返回列表