[已解决]BAT批处理如何生成随机排列组合

forliuning

初学批处理应用，多次尝试不得要领，请教各位老师。

若有如下6组数值，每组有10个
如：
12，06，86，46，12，DF，55，SE，11，CA
F5，F4，DG，4S，6G，4S，65，ZG，14，65
ZS，D4，FG，SZ，1G，8S，ZD，4G，56，S4
GZ，SG，4S，D5，4G，FD，84，H5，6D，FY
7J，1T，Y6，K4，E6，84，54，87，E9，01
1K，HY，F1，K6，DR，4J，6R，D1，J5，RD
要求依次从每一组中随机抽取一个数值进行组合
结果显示其中一个随机组合结果并输出到1.TXT
例：466G8SFD01DR
呵呵，貌似密码卡的组合方式
十分感谢

terse

1. @echo off&setlocal enabledelayedexpansion
   
2. set "arr1=12，06，86，46，12，DF，55，SE，11，CA"
   
3. set "arr2=F5，F4，DG，4S，6G，4S，65，ZG，14，65"
   
4. set "arr3=ZS，D4，FG，SZ，1G，8S，ZD，4G，56，S4"
   
5. set "arr4=GZ，SG，4S，D5，4G，FD，84，H5，6D，FY"
   
6. set "arr5=7J，1T，Y6，K4，E6，84，54，87，E9，01"
   
7. set "arr6=1K，HY，F1，K6，DR，4J，6R，D1，J5，RD"
   
8. For /L %%i in (1,1,6) do (
   
9.     set /a rn=!random!%%10+1
   
10.     call:next !rn! "!arr%%i!" str
    
11. )
    
12. echo !str!
    
13. pause&exit
    
14. :next
    
15. for /f "tokens=%1 delims=，" %%i in (%2) do set "%3=!%3!%%i"
    

复制代码

forliuning

回复 2# terse


学习了。十分感谢！！！

PowerShell

powershell代码，都是些个简单的东西

1. 
   
2. $a =  '12','06','86','46','12','DF','55','SE','11','CA' |Get-Random
   
3. $b = 'F5','F4','DG','4S','6G','4S','65','ZG','14','65' |Get-Random
   
4. $c = 'ZS','D4','FG','SZ','1G','8S','ZD','4G','56','S4' |Get-Random
   
5. $d = 'GZ','SG','4S','D5','4G','FD','84','H5','6D','FY' |Get-Random
   
6. $e = '7J','1T','Y6','K4','E6','84','54','87','E9','01' |Get-Random
   
7. $f = '1K','HY','F1','K6','DR','4J','6R','D1','J5','RD' |Get-Random
   
8. 
   
9. 
   
10. $结果 = "" + $a  + $b +  $c + $d + $e + $f
    
11. Write-Host $结果
    
12. #这个基本上就是，产生随机密码的脚本   

复制代码

terse

PS 练手

1. 
   
2. $arr = @(
   
3. "12，06，86，46，12，DF，55，SE，11，CA"
   
4. "F5，F4，DG，4S，6G，4S，65，ZG，14，65"
   
5. "ZS，D4，FG，SZ，1G，8S，ZD，4G，56，S4"
   
6. "GZ，SG，4S，D5，4G，FD，84，H5，6D，FY"
   
7. "7J，1T，Y6，K4，E6，84，54，87，E9，01"
   
8. "1K，HY，F1，K6，DR，4J，6R，D1，J5，RD"
   
9. )
   
10. $str = foreach ( $a in $arr) {$a.split("，") | Get-Random}
    
11. $str -join ""

复制代码