mIRC Random Renkli Yazi Tipi

Bu kod ile yazı yazarken rastgele renklerle yazınız karşı tarafa gidicektir.

Örnek : 14D7i14z4Z4y

Kod;

on *:input:#:{
if $left($1-,1) != $readini(.ini,text,commandchar) || $ctrlenter == $true {
var %c = 1,2,3,4,5,6,7,10,12,13,14
var %i = 1
var %MAX = $len($1-)
while (%i <= %MAX) {
var %r = $gettok(%c,$rand(1,$numtok(%c,44)),44)
if $mid($1-,%i,1) == $chr(32) { var %t = %t $chr(32) }
else { var %t = %t $+  $+ %r $+ $mid($1-,%i,1) }
inc %i
}
msg $chan %t
halt def
}
}

Bir cevap yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir