以下代码,生成的随机1,随机2和随即3,可能出现相同的结果,请求解决之法:
代码取自:http://www.cn-dos.net/forum/viewthread.php?tid=44870&fpage=1&highlight=
谢谢!!
[ Last edited by HAT on 2008-12-10 at 17:52 ]
@echo off&Setlocal Enabledelayedexpansion
set str=rdqthlgfvunbompkjcwseiayzx
set /a "var1=!random!%%4+5","w=0"&set "var="
call :lb
:lb
if "%w%"=="%var1%" (set /p=%var%<nul>随机1.txt&goto dsfa)
set /a w+=1,var2=%random%%%26
set "var=%var%!str:~%var2%,1!"
goto :lb
:dsfa
sleep 200
set atr=xrubkwpijnmzstvyhdceqalof
set /a "varx=!random!%%4+5","q=0"&set "wwar="
call :lbb
:lbb
if "%q%"=="%varx%" (set /p=%wwar%<nul>随机2.txt&goto dsss)
set /a q+=1,var3=%random%%%25
set "wwar=%wwar%!atr:~%var3%,1!"
goto :lbb
:dsss
sleep 300
set qtr=ghqvinpucofjtdkexrszwyamb
set /a "vart=!random!%%4+5","e=0"&set "qqar="
call :lob
:lob
if "%e%"=="%vart%" (set /p=%qqar%<nul>随机3.txt&goto fgdsq)
set /a e+=1,var4=%random%%%25
set "qqar=%qqar%!qtr:~%var4%,1!"
goto :lob
:fgdsq
pause代码取自:http://www.cn-dos.net/forum/viewthread.php?tid=44870&fpage=1&highlight=
谢谢!!
[ Last edited by HAT on 2008-12-10 at 17:52 ]
