inittab

谢谢楼上指出.这是以前写的.我也是新手有考虑不周之处. 其实这句也是多余的.
修正如下

@echo off&setlocal enabledelayedexpansion

set "var=abdefg ABDEFG kmli KMLI socsd SOCSD pdxy PDXY nq NQ"
set n=0
for %%i in (%var%) do (set !n!=%%i&set/a n+=1)

:begin
set "str="
for /l %%a in (1,1,10) do set/a ran=!random!%%10&set "str=!str! !ran! "
set out=%str: =!!%
echo !out!>>b.txt
set/a n-=1&if !n! gtr 0 (goto :begin)
start b.txt
复制代码

curious

set ram=%random%%random%%random%&set "str="
此ram难道一定就超过11位？

netbenton

第一题，换种方法

 
@echo off&setlocal enabledelayedexpansion
set "sou=abdefg ABDEFG kmli KMLI socsd SOCSD pdxy PDXY nq NQ"
(for %%a in (%sou%) do (
set des=
for %%b in (%sou%) do (
  set str= %sou%
  set/a a=!random!%%11
  for /l %%c in (0,1,!a!) do (set str=!str:* =!)
  for /f %%d in ("!str!") do set des=!des!%%d
)
echo !des!
))>a.txt
start a.txt
pause
复制代码

netbenton

偶认为echo.%com%>>a.txt是预处理。
同一组数据里面只对%号进行一次替换和减半操作，（加call 后面算是组外的了）
而for 令牌，本来就是只用一个%号的，只要经预处理后形成合适的参数形式，for运行时就会进行取值替换。
如：set  `=%%
for /f "tokens=1,2,3" %%a in ("aa bb cc") do (echo %`%a %`%b %`%c)
一样能正确执行。

其实com的值是%0%1%3。。。而不是：%%0%%1%%3
可用set com查看就知道了。

谢谢测试，确实不能处理所有的特殊字符，君的方法好像处理格时也会出问题。

[ 本帖最后由 netbenton 于 2009-4-24 22:34 编辑 ]

zqz0012005

预处理并非一次性处理完毕，而是边执行边处理。
set "com=!com!!``!!r!"
这个语句基本上不需要“预处理”做什么，设置变量com是语句中的命令完成的。
set ``=%%
预处理时将两个%%号变成一个，然后才是set赋值，所以变量``的值是一个%
“我认为，其实 echo.%com%>>a.txt 就是和 echo %%0 %%1 %%2 %%3 ..... 是一样的”
在预处理之前，形式上明显不同。预处理后，前者是%6%4%1%...（预处理对变量com进行展开的结果），此时才出现%n（如果对com不赋予这样的值，就没有for变量%1、%2等，所以说是隐式的），后者直接是echo %1 %2 %3...。预处理后两者才是一样。

可能是大家对“预处理”这个词的理解不一样，但只要明白语句的执行方式，不管怎么理解都一样，毕竟没有官方说法。

随风

新意确实有，但这和预处理好像相关不大，
你说“echo.%com%>>a.txt，并不是像echo %%0、%%1那样显式地出现for的变量，必要经过预处理”
我不这么认为，其实预处理应该在set "com=!com!!``!!r!" 的时候就已经处理了，这应该也是
作者为什么要 set ``＝两个%% 而不＝ 一个 % 号的原因吧。
我认为，其实 echo.%com%>>a.txt 就是和 echo %%0 %%1 %%2 %%3 ..... 是一样的，
只不过这里的数字不是按顺序排列的而是通过前面得到的随机数0－9 ，
而%%0 就是为了保证后面的   %%+数字 能够正确显示，
就象我们要  echo %%b 前面就要定义 %%a 是一个道理。
for 用数字作变量，一直都知道，但始终认为它容易和批处理的参数搞混，
所以个人一直不提倡这种用法，只是没想到在这里却发挥了它的独到作用。
15楼的也是如此。

sjzong

@echo off
setlocal enabledelayedexpansion
set "var=abdefg ABDEFG kmli KMLI socsd SOCSD pdxy PDXY nq NQ"
set/a n=0
for %%i in (%var%) do (set !n!=%%i&set/a n+=1)
cd.>a.txt
set/a m=0
:a
if !m! lss 10 (
set/a n=0
set str=
:b
set/a s=%random%%%10
set str=!str!!%s%!
if !n!==9 (
echo !str!>>a.txt
set/a m+=1
goto :a) else (set/a n+=1&goto :b)
)
start a.txt
pause
复制代码

[ 本帖最后由 sjzong 于 2009-4-25 00:10 编辑 ]

batman

对for中变量的用法，大家有兴趣的可以看看此贴的七楼这段代码（可别晕了哦）。。。。
http://bbs.bathome.net/viewthrea ... hlight=%C1%B7%CF%B0

zqz0012005

这样的用法虽然技术原理没有什么不同，但确有新意。
首先一般不易想到%%0是for的变量（帮助中提到的都是字母形式），如果不是以前对这种形式有所接触，刚见到它时我也觉得可能有问题。
其次是echo.%com%>>a.txt，并不是像echo %%0、%%1那样显式地出现for的变量，必要经过预处理，进行变量展开后才变成%6%4%1%2%1%8%2%3（注意不是%%而是%，因为变量``的值是%） 之类的字串。这样非显式出现使得%%0的作用更难弄清楚。而对于tokens=1-10，指定变量%0之后的变量引用是%1、%2等依次递增的数字（for的变量其实是%i的形式，bat中写成%%i是为了预处理），它们是隐式出现于%com%中。

在这个问题上犯迷糊很正常，没有相关水平连迷糊都犯不上（干脆不懂），实在是有新意。

[ 本帖最后由 zqz0012005 于 2009-4-24 17:07 编辑 ]

随风

特殊字符是cmd的软肋，无论怎么考虑都很难考虑周全，增加代码量不说对运行效率也有一定影响，
所以一般写bat代码通常不用兼容特殊字符（或是根据实际情况针对性的兼容），
当然若在不明显影响效率的情况下是兼容的越多越好
楼主之所以声明不用考虑特殊字符的原因我想应该也是如此吧
你39楼的代码，再给你下面两个字符串试试？看看都替换成了什么。
ABDEFG!%^@#!ABDEFG!abdefgabdefgabdefgABDEFG
ABDEFG!%^@#!ABDEFGabdefgabdefgabdefgABDEFG

随风

多谢zqz001205的链接，预处理一直是一道我无法迈入的门槛，看来看去总是晕晕沉沉的。
但此题我的疑问和预处理好像没什么太大关系，不过看帖的时候却突然灵光一现茅塞顿开。
我知道经过第一个for后com变成了%%6%%4%%1%%2%%1%%8%%2%%3 样字串，
只是没明白for /f "tokens=1-10" %%0 这里取 1-10 的用意，当然也就搞不清 %%0 的作用了。
原来如此简单。。。
汗！ 一个主题帖中居然两次对初级问题犯迷糊，惭愧。。。

[ 本帖最后由 随风 于 2009-4-24 15:57 编辑 ]

netbenton

用加尾巴，最后再丢弃，解决不能正确替换问题
用单个引号转为两个引号（用变量代入法才做到)，最后再换回来。解决双引号错误问题

@echo off
set so=ABDEFG
set de=bathome
set @="
set @@=""
(for /f "tokens=*" %%a in (a.txt) do (
 set str=%%a#批处理#&setlocal enabledelayedexpansion
 set "str=!str:%@%=%@@%!"
 call :sub
 endlocal
))>b.txt
start b.txt
pause
goto :eof
:sub
set "cs=!str:*%so%=!"
if "!cs!"=="!str!" (
 set ok=!ok!!str!
 set "ok=!ok:%@@%=%@%!"
 echo !ok:~,-5!
 goto :eof
)
set "cr=!str:%so%%cs%=!"
set "``=!str:%cs%=!"
if defined cr set "``=!``:%cr%=!"
if "!``!"=="%so%" set ``=%de%
set ok=!ok!!cr!!``!
set str=!cs!
goto :sub
复制代码

这种方法，偶认为肯定比用findstr要高效。

[ 本帖最后由 netbenton 于 2009-4-24 13:54 编辑 ]

netbenton

1:>a.txt指在产生一个空文件，出错提示，不会有任何影响，
这个说明了1:是可以作为盘符的，如果存在。刚看了别人的多种产生临时文件的方法，所以就试一下，没别的什么意思。
ABDEFGABDEFGabdefgabdefgabdefgABDEFGABDEFGABDEFG
和“”
不能正确的问题确实没有考虑到。回头再想想，

batman

看来大家都很积极，这确实是一个好现象，现给出本人第一题的解(第二题由于没有新思
路暂不公布)：

@echo off&setlocal enabledelayedexpansion
cd.>a.txt
set "str=abdefg kmli socsd pdxy nq ABDEFG KMLI SOCSD PDXY NQ"
for /l %%a in (1,1,100) do (
     set /a a=!random!%%10+1,b=%%a%%10&call :lp
     if !b! equ 0 echo.>>a.txt
)
start a.txt&goto :eof
:lp
for /f "tokens=%a%" %%a in ("%str%") do set /p=%%a<nul>>a.txt
复制代码

[ 本帖最后由 batman 于 2009-4-24 11:37 编辑 ]

zqz0012005

关于%%0可以看看此帖：
http://bbs.verybat.org/viewthread.php?tid=10871&page=1&highlight=for%B5%C4%B1%E4%C1%BF%C3%BB%D3%D0%B9%E6%B6%A8%B1%D8%D0%EB%CA%C7%D7%D6%C4%B8&fromuid=37#pid150103