bilenler bilir Loremp vardır. bende mIRC kullananlar için kendi çapında geliştirmeye açık ve anlaşılır yazmaya alıştım umarım işinize yarar..
kod rastgele ama akılcı kelimeler oluşturuyor..
kelimeleri 3 farklı tipte oluşturuyor..
birinde yalnızca metin..
digerinde bazen sonuna _23 gibi ekler yapıyor..
sonuncuda ise tamamen karmaşık karakterler..
güle güle kullanın.
PHP- Kodu:
alias rendom {
var %l' $r($1,$2),%s' a e i o u,%a' . b c d f g h j k l m n p r s t v x w y z | :r
var %k' $addtok(%k',$gettok(%a',$r(1,$numtok(%a',32)),32),32)
if $len(%k') < %l' goto r
if $len(%k') >= %l' {
; type: ## VokuZURuYOu hutak
var %r' $regsubex($regsubex(%k',/(\W)/ig,$gettok(%s',$r(1,$numtok(%s',32)),32)),/([a-f]|[c-g]|[h-z])/g,$iif($r(0,20) > 15,$upper(\t),\t))
echo 3 %r'
;type: ## yAmuwAHufikax_10 yAmuwAHufikax
echo 4 %r' $+ $iif($r(1,100) < 35,$+($gettok(_.-.|.\.[.].^.´,$r(1,8),46),$r(1,85)),$null)
;type: ## x[o_bI[t]e|c_e\g_
echo 5 $regsubex($regsubex(%k',/(\W)/ig,$gettok(%s',$r(1,$numtok(%s',32)),32)),/([a-f]|[c-g]|[h-z])/g,$&
$iif($r(1,100) > 10, $+($iif($r(0,20) > 15,$upper(\t),\t),$gettok(_.-.|.\.[.].^.´,$r(1,8),46)),$iif($r(0,20) > 15,$upper(\t),\t)))
echo $crlf
}
}
komut: /rendom 2 10
(2 ila 10 harf arasında bir kelime)
çıktı:
yemawIHefakex
yAmuwAHufikax|10
y]im-Aw\o´H\u^F_a_k|o|x|