aynı rakamları $r(0,49) dersen 0 zaten oyunda yok ve aynı rakamın gelme olasılıgı da var.
yanı iki kez (3 5 7
13 13 40) gibi bi rakam diziside çıkabilir.. 6 adet 49 rakamının farklı olması için.
aşağıdaki gibi bir kod gerekir.
kullanımı $lotonum yada /lotonum
Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias lotonum {
var %i 6
while %i { :.
var %r $r(1,49)
if ($istok(%l,%r,32)) goto .
var %l $addtok(%l,%r,32)
dec %i
}
$iif($isid,return,echo ) $regsubex($sorttok(%l,32,n),/(\w+)/ig,[[ \t ]])
}