Tarih: 14/07/2013 / 18:31:01 , Kod sahibi: Why
on ^*:text:*:*: {
if ($ini(renk.ini,$nick) == 0) { echo # $+([,$time,]) $+(<,$nick,>) $1- | halt }
echo # $+([,$time,]) $+(<,$nick,>) $+($chr(3),$renkgoster($nick,renk)) $1-
halt
}
alias renk {
if ($1 == -r) { write -c renk.ini | echo -a Butun renk parametreleri silindi. | halt }
if ($1 == del) { remini renk.ini $1 host $renkgoster($1,renk) | echo -a $2 renk paremetresi silinmistir. | halt }
if ($ini(renk.ini,$1) == 1) { echo -a $1 nickinde eskiden kayit bulunmaktadir ve degistirilmistir }
if (!$istok(1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 ,$2,32)) { echo -a Renk Numaralari 1 - 15 aralarindadir sadece! | halt }
writeini renk.ini $1 renk $2
echo -a $qt($1) Yazi Tipi $qt($2) Olarak Kayit Edilmistir.
}
alias renkgoster return $iif(!$readini(renk.ini,$1,$2),$false,$readini(renk.ini,$1,$2))

Saygılarımla ; k.S.c
