mIRC Karışık Renk Kodu
alias cm {
var %msg $replace($1-,$chr(32),_)
var %x 1
while (%x < $calc($len(%msg) + 1)) {
if (%x == 1) {
set %out $+ $rand(2,15) $+ $upper($left(%msg,1))
}
else {
if ($int($calc(%x / 2)) == $calc(%x / 2)) {
set %out %out $+ $+ $rand(2,15) $+ $lower($right($left(%msg,%x),1))
}
else {
set %out %out $+ $+ $rand(2,15) $+ $upper($right($left(%msg,%x),1))
}
}
inc %x
}
if ($isid == $true) { return $replace(%out,_,$chr(32)) }
else { say $replace(%out,_,$chr(32)) }
}
Kullanımı: /cm mesajınız