Online Süresi 5 gün den fazla olana oto voice

[Erroneous]

on *:join:[COLOR=#ff0000]#kanal[/COLOR]: { .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 [COLOR=#ff0000]#kanal [/COLOR]+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 } } }

• 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.
• İyi forumlar

 

[Linux]

Çok güzel ve işlevli kod.
Teşekkür güzel insan.

 

[DarK]

paylasımın icin tesekkur ederim.