himorogiの日記

主にプログラミングに関することなど。少々ハード(電子工作)についても。

Loto

■□WindowsScriptHost で Loto の数字を生成する script
■□ lotos() ※ 改訂版

function lotos(ltMd){
  var ltCeil;
  L = new Array(ltMd);

  function getLtAtom(){ return(Math.ceil(Math.random()*ltCeil)); }

  for(i=c=0; i<md; c+= ++i); ltCeil=c*2+1;

  for(L[0]=getLtAtom(),_do=false,i=1;i<ltMd ;i++){
    do{ for(j=0,L[i]=getLtAtom();j<i && !_do;_do=(L[i]==L[j++])) ;
    }while(_do)
  }
  for(i=0;i<ltMd;i++){ s= "00"+ L[i]; L[i]=s.substr(s.length-2,2) }
  return(L.sort().toString());
}

WScript.Echo(lotos(6));