批处理变量截取、变量延迟及特殊符号的一个高级综合应用实例

zqz0012005

新手以读懂此代码为目标吧

@color 0a&set,=0123456&set/=青天有月来几时 我今停杯一问之 人攀明月不可得 月行却与人相随
@for /l,%%a,in,(1,1,28)do,@set/a?=1/(6/\)2>nul||(set\=0&echo\&echo\&call,call,set/=%%%%/:~%%]%%%%%%&set]=8)&call,call,call,set/p= %%%%%%%%/:~%%%%,:~%%\%%,1%%%%,1%%%%%%%%<nul&set/a\+=1&ping/n 2 127.1>nul
复制代码

zqz0012005

为便于解读，将其写成“常规”形式（先独立思考哈，实在想不明白再看此提示）

@echo off
color 0a
set ,=0123456
set /=青天有月来几时 我今停杯一问之 人攀明月不可得 月行却与人相随
for /l %%a in (1,1,28)do (
    set /a ?=1/(6/\^) 2>nul || (
        set \=0
        echo\&echo\
        call call set /=%%%%/:~%%]%%%%%%
        set ]=8
    )
    call call call set /p= %%%%%%%%/:~%%%%,:~%%\%%,1%%%%,1%%%%%%%%<nul
    set /a \+=1
    ping /n 1 127.1>nul
)
echo.&echo.&echo.&pause

如果不习惯用特殊字符作变量名，换成容易看的名字

@echo off
color 0a
set num=0123456
set str=青天有月来几时 我今停杯一问之 人攀明月不可得 月行却与人相随
for /l %%a in (1,1,28)do (
    set /a flag=1/(6/counter^) 2>nul || (
        set counter=0
        echo.&echo.
        call call set str=%%%%str:~%%n%%%%%%
        set n=8
    )
    call call call set /p= %%%%%%%%str:~%%%%num:~%%counter%%,1%%%%,1%%%%%%%%<nul
    set /a counter+=1
    ping /n 1 127.1>nul
)
echo.&echo.&echo.&pause

[ 本帖最后由 zqz0012005 于 2008-10-26 01:15 编辑 ]

qq641255849

真够牛,用"/","?"之类的特殊符号来做变量,看得头都晕了.

zqz0012005

up

是不是应该放到教学区比较好？

Batcher

看不到什么？

5566ljlj

为什么2楼是一片空白？

vsbat

是 隐形 的答案-----------
鼠标放在 代码 区拖动 即可看到----

kakalongyan

本文看了谢谢了，在我的IBAT上echo.echo是提示错误的。所以改了一下可以跑了。
set num=0123456
set str=青天有月来几时 我今停杯一问之 人攀明月不可得 月行却与人相随
for /l %%a in (1,1,28)do (
    set /a flag=1/(6/counter^) 2>nul || (
        set counter=0
        set n=8
        set #=^   #这个主要是输出一个空格
        echo %#%   
        call call set str=%%%%str:~%%n%%%%%%        
)
call call call set /p= %%%%%%%%str:~%%%%num:~%%counter%%,1%%%%,1%%%%%%%%<nul
    set /a counter+=1
)

pause
新手希望多指点

ANSL

感谢分享，谢谢！！！

tiantiandao

感谢分享
谢谢

zxlagyyy

这就有点复杂 了。