[Feragat]

Kullanımı: /rnd <text> veya $rnd(<text>)
Örnek: /rnd abc veya $rnd(abc)
Sonuç:

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

bac
cba
abc
acb
abc
cba
cba
bac
acb
abc
acb
cba

-

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

alias rnd {
  var %f $1, %l $len($1), %r1 $r(1,%l), %r2 $r(1,%l)
  var %fr $mid(%f, %r1, 1), %sc $mid(%f, %r2, 1), $&
    %frs $regsubex(%f,/(?<=\S(?=\S))/g,$chr(160))
  var %fx $puttok(%frs, %fr, %r2, 160), $&
    %fy $puttok(%fx, %sc, %r1, 160) 
  $iif($isid, return, echo -a) $remove(%fy,$chr(160))
}

Not: Challenge olmayınca çok şeyapmaya gerek yok. Tüm ihtiyarlara selam olsun.

[Rohit]

al benden de ufak bisey. ; )

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

on *:input:*:{ if $left($1,1) !== / && $active !== Status Window { say $replace($1-,.,4.) | .halt } }

[AsiRuh]

Not: Challenge olmayınca çok şeyapmaya gerek yok. Tüm ihtiyarlara selam olsun.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.