[yepaa]

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias permute {
  var %x 0,%y
  while ($regsub($1,(.{ $+ %x $+ })(.),1,%y)) scon -r inc $(%x |,) $iif(? iswm $1,echo -a,permute %y) $2 $+ $regml(2)
} 

Bu kod hazır addon şeklinde ve /kelime yazdığımızda harfleri karıştırarak bize veriyor . Şu şekilde.

emelik
kimlee

gibi ne kadar olabilecek yapı var ise o kadar bize sunuyor alt alt alta

Tek bir sefer karıştırması için random şekilde nasıl yaparız ? yani her yazışımızda rastgele 1 tane verecek .

Böyle bir şeyi neden sorduğumuda açıklıyayım belki içinizden yapmak isteyenler olur. Bu kelimeleri oyun botuna eklemek amacım bu tarzda bir oyun yapmak.

Bu Harflerle Bir Kelime Oluşturunuz : tapmie*empati

doğru cevap empati yanındakide soru , bu şekilde hazırlayıp oyun.questions a ekliyeceğim . Ama işte bu kod 8 harfli bir kelimeyi karıştırmaya çalışınca 250 den fazla kelime veriyor script kitleniyor.

[SCouNDReL]

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias karisik {
  var %i 1,%q,%z,%t
  while (%i <= $len($1)) {
    :bas    
    %z = $rand(1,$len($1))
    if (!$istok(%q,%z,46)) { %q = $+(%q,.,%z) | %t = $+(%t,$mid($1,%z,1)) }
    else { goto bas }
    inc %i
  }
  return %t
}

//echo -a $karisik(kelime)