terse

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

terse

PS 练手

$arr = @(
"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"
)
$str = foreach ( $a in $arr) {$a.split("，") | Get-Random}
$str -join ""
复制代码