中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-09 17:34

共 47,811 主题排行 / 349,896 发帖 / 今日 1 篇 / 48,254 会员排行

DOS批处理 & 脚本技术（批处理室） » [已结]随机赋值问题。。。

可打印版本　1,027 / 8

第1楼　pusofalse	发表于 2008-06-27 21:40
银牌会员　发帖 646　积分 1,604
[已结]随机赋值问题。。。 a=z b=q c=e ... ... a的值是z b的值是q 如此。。。都是随机赋值。。。 26个字母分别对应一个不同于本身的值，但是值不能重复，即是，如果m的值是a，那么以后出现的变量中，它们的值不能再是a。。。这是我的代码，运行之后总有几个是空值，如何避免这种情况？ @echo off&setlocal enabledelayedexpansion set str=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 var=%str: =% for %%a in (%str%) do ( set ran=!random! set/a mn=!ran!%%26 if not defined !mn! ( set !mn!=abcd call :lp %%a ) ) echo %xy% for %%a in (%str%) do echo %%a !%%a! pause>nul&exit/b :lp set %1=!var:~%mn%,1! set/a xy+=1 [ Last edited by pusofalse on 2008-6-28 at 04:13 AM ]

第2楼　bat-zw	发表于 2008-06-27 22:32
金牌会员　发帖 1,276　积分 3,105
兄弟是不是这样的： @echo off&setlocal enabledelayedexpansion set code=abcdefghijklmnopqrstuvwxyz set codes=%code%&set n=26 :begin set str=&set "var=" set /a r1=%random%%%%n%,r2=%random%%%%n% set str=!code:~%r1%,1!&set var=!codes:~%r2%,1! echo %str%=%var% set /a n-=1 set code=!code:%str%=!&set codes=!codes:%var%=! if defined code goto begin pause>nul

第3楼　moniuming	发表于 2008-06-27 22:36
银牌会员　发帖 574　积分 1,335　来自广西
是这样吗: @echo off setlocal enabledelayedexpansion set str=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 var=%str: =% for %%a in (%str%) do call :lp %%a echo %xy% for %%a in (%str%) do echo %%a !%%a! pause>nul&exit/b :lp set/a "mn=%random%%%26" if defined %mn% goto :lp set "%mn%=abcd" set "%1=!var:~%mn%,1!" set/a "xy+=1"

第4楼　bat-zw	发表于 2008-06-27 22:36
金牌会员　发帖 1,276　积分 3,105
如要按顺序就修改成如下代码： @echo off&setlocal enabledelayedexpansion set code=abcdefghijklmnopqrstuvwxyz set codes=%code%&set n=26 :begin set str=&set "var=" set /a r1=%random%%%%n% set str=!code:~,1!&set var=!codes:~%r1%,1! echo %str%=%var% set /a n-=1 set code=!code:~1!&set codes=!codes:%var%=! if defined code goto begin pause>nul

第5楼　pusofalse	发表于 2008-06-27 22:43
银牌会员　发帖 646　积分 1,604
谢谢楼上两位。。。真是太棒了！ ^_^

第6楼　26933062	发表于 2008-06-27 23:55
银牌会员　发帖 879　积分 2,268
26个字母分别对应一个不同于本身的值，但是值不能重复 2楼、3楼的难道不会出现 a=a e=e h=h 等等情况吗？ @echo off&setlocal enabledelayedexpansion set str=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 for %%a in (%str%) do ( set var=!str:%%a=! for %%b in (!num!) do set var=!var:%%b=! call :loop %%a ) pause :loop set /a max=0 for %%a in (!var!) do set /a max+=1,ttt=!random!%%max+1 for /f "tokens=%ttt%" %%i in ("!var!") do ( echo %1=%%i set num=!num! %%i ) goto :eof [ Last edited by 26933062 on 2008-6-28 at 12:07 AM ]

第7楼　moniuming	发表于 2008-06-28 10:21
银牌会员　发帖 574　积分 1,335　来自广西
Originally posted by 26933062 at 2008-6-27 23:55: 26个字母分别对应一个不同于本身的值，但是值不能重复 2楼、3楼的难道不会出现 a=a e=e h=h 等等情况吗？ @echo off&setlocal enabledelayedexpansion s ... 这种情况当然会出现,但楼主的意思是当a=a后,其它的25个字母的值都不能再等于a.

第8楼　bat-zw	发表于 2008-06-28 10:59
金牌会员　发帖 1,276　积分 3,105
Originally posted by 26933062 at 2008-6-27 23:55: 26个字母分别对应一个不同于本身的值，但是值不能重复 2楼、3楼的难道不会出现 a=a e=e h=h 等等情况吗？ @echo off&setlocal enabledelayedexpansion s ... 确实是这样，真的还没考虑全，其实也只要加个判断和返回就可以了： @echo off&setlocal enabledelayedexpansion set code=abcdefghijklmnopqrstuvwxyz set codes=%code%&set n=26 :begin set str=&set "var=" set /a r1=%random%%%%n% set str=!code:~,1!&set var=!codes:~%r1%,1! if "%str%" equ "%var%" goto begin echo %str%=%var% set /a n-=1 set code=!code:~1!&set codes=!codes:%var%=! if defined code goto begin pause>nul ps:兄弟是不是想利用这样的替换来进行代码加密啊，我看是个好办法! [ Last edited by zw19750516 on 2008-6-28 at 11:09 AM ]

第9楼　seuseuseu	发表于 2008-09-08 14:12
新手上路　发帖 6　积分 12
顶起来

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023