newgain

回复 4# zaqmlp

E:\DESK\输出.bat(10, 3) Microsoft JScript 编译错误: 缺少 ']'

zaqmlp

/*&cls&echo off&cd /d "%~dp0"
set "length=3"
set "count=100"
cscript -nologo -e:jscript "%~f0" "%length%" "%count%" > "out.txt"
pause
exit
*/
var len=WSH.Arguments(0).split(/[-,~]/),count=Number(WSH.Arguments(1));
var charlist=[
    ["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"],
    ["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"],
    ["0","1","2","3","4","5","6","7","8","9"]
];
 
var r1=Number(len[0]);
function getrandom(){
    if(len.length==2){r1=Math.floor(Math.random()*(Number(len[1])-Number(len[0]))+Number(len[0]));}
    var s=[];
    for(var i=1;i<=r1;i++){
        var r2=Math.floor(Math.random()*charlist.length);
        var r3=Math.floor(Math.random()*charlist[r2].length);
        s.push(charlist[r2][r3]);
    }
    return s.join("");
}
 
var dic={},n=0;
for(;;){
    var rs=getrandom();
    if(dic[rs]==undefined){
        WSH.echo(rs);
        n=n+1;dic[rs]='';
        if(n>=count){break;}
    }
}COPY

wanghan519

awk写了个幂集，不知道对不对，可以存入文件a.awk再运行echo asdfg | awk -f a.awk试一下
只考虑了组合，没考虑排列。。。

function powerset(x, y) {
    if (length(x) > 3 || y > length($0)) {
        print x
        return
    }
    powerset(x, y + 1)
    powerset(x substr($0, y, 1), y + 1)
}
{
    powerset("", 1)
}COPY

Nsqs

powershell -noprofile -executionpolicy bypass "1..100|%%{((97..122),(65..90),(48..57)|%%{[char[]]$_}|Get-Random -Count 4) -join ''}" > rnd.txtCOPY

生成100个随机字符,每行一组