IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Parça Kodlar (https://www.ircforumlari.net/mirc-parca-kodlar/)

- - Random mix /rnd <text> (https://www.ircforumlari.net/mirc-parca-kodlar/977752-random-mix-rnd-lttextgt.html)

Random mix /rnd <text>

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

Kod:

bac

cba

abc

acb

abc

cba

cba

bac

acb

abc

acb

cba

Kod:

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.

Cevap: Random mix /rnd <text>

al benden de ufak bisey. ; )

Kod:

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

Cevap: Random mix /rnd <text>

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