Online süresi 5 gün ve fazlası olanlara oto voice ( for channel ) )

Kod:
on *:join:#kanal: { .timer 1 1 .denetlee $nick $chan | set %:Mylife $nick }

alias denetlee {
if ($1 isreg $2) { nickserv info %:Mylife }
}
on ^*:notice:*:?:{
if ($nick == NickServ) {
if ($regex($4-,/online/Si)) { set %:Kod $1 }
if ($regex($1,/toplam/Si)) && ($regex($4,/[1-9]\d+|[56789]/Si)) { .voicee }
}
unset %:Mylife
}
alias voicee {
if $read(yasakli.txt,w,$nick) { return }
else {
mode #kanal +v %:Kod
unset %:Kod
}
}
on $*:text:/^[.!]yasak/Si:#kanal: { if (!$2 || !$3) { msg # Hatalı kullanım. ( .yasak ekle nick ) } | elseif ($regex($2,/ekle/Si) && $3) { msg # $qt($3) #Egitim kanalı oto voice muaf listesine eklendi. | write yasakli.txt $3 ekleyen nick: $nick } | elseif ($regex($2,/s[iı]l/Si) && $3) { msg # $qt($3) yasakli listesinden silindi. | write $+(-dl,$readn) yasakli.txt } | elseif $regex($2,/l[ıi]st/Si) && $regex($3,/voice/Si) { msg # #Egitim kanalı voice yasaklı listesi sıralanıyor. | var %:Mylife = 1 | while %:Mylife <= $lines(yasakli.txt) { msg # $read(yasakli.txt,%:Mylife) | inc %:Mylife } } }

kullanım;
Belirtilen kanal icerisinde 5 gün üzeri online süresi olanlara voice verir.
Bu şartı yerine getirmiş olsa da manuel muaf ekleyip voice verilmesi engellenebilir.
.yasak ekle nick - Belirtilen kanalda oto voice muaf ekler ( yani şartlar yerine getirilse bile voice verilmez)
.yasak sil nick - Muaf siler
.yasak list voice - Eklenen muaf ları listeler.