czq19731102

@echo off&setlocal enabledelayedexpansion
cd.>test.txt
set BIG=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
set a=1
set b=1
:for
set /a n=%RANDOM%%%5
set /a n+=1
for /f "tokens=%n%" %%I in ("abdefg kmli socsd pdxy nq") do (set var=%%I)
set /a m=%RANDOM%%%2
if %m% EQU 1 (for %%i in (%BIG%) do (set var=!var:%%i=%%i!))
set /p var=!var! <nul>>test.txt
set /a a+=1
if %a% GTR 10 (echo.>>test.txt&goto end) else goto for
:end
set /a b+=1
if %b% GTR 10 (goto exit) else set a=1&goto for
:exit
exit
复制代码

[ 本帖最后由 czq19731102 于 2009-4-23 21:06 编辑 ]

czq19731102

哇！不到一月就这么厉害了啊！
好另类的思维模式啊！不看作者解说，还真没想到他是这么想的，学习了

[ 本帖最后由 czq19731102 于 2009-4-23 23:02 编辑 ]