IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Merhaba Forumda Bir kisinin Yazmis oldugu kodu gordum ve suanda yapmaya calistigim bir bota ekledim kod gayet guzel calisiyor ama arkadasin sordugu soruya bir cevap yazilmamis bende tekrar hatirlatmak babinda yazmak istedim. umarim yanlis anlasilmaz.

Kod:

on *^:text:*:#: {
 if $istok(ali veli deli amca abdul rezzak apo,$nick,32) { return }

  if ($regex($1-,/([[:print:]])\1\1/ig) >= $calc($coconf(U.limit)/3)) {

    inc $+(-u,$coconf(U.mem)) %uz [ $+ [ $nick ] ] 1

    if (%uz [ $+ [ $nick ] ] >= $coconf(U.LM)) {

      .ban $+(-ku,$calc($coconf(U.kbs)*60)) $chan $nick $coconf(U.sb)

      .unset %uz [ $+ [ $nick ] ]

    }

    if (%uz [ $+ [ $nick ] ] >= $coconf(U.AL)) {

      msg $chan $nick $coconf(U.yr) 

    }   

  }

}

alias coconf {

  goto $1

  :U.Limit {

    ;# harf limiti 

    RETURN 15

  }

  :U.LM {

    ;# Kac kezde atsın..

    RETURN 2

  }

  :U.AL {

    ;# Uyarı limiti (&#252;stteki deger ile aynı-y&#252;ksek olmamalıdır.)  

    RETURN 1

  }

  :U.mem {

    ;# Hatayı yapan nikc-Adres'in Hafızada kalacagı s&#252;re (sn)

    RETURN 60

  }

  :U.sb {

    ;# Kick Sebebi..

    RETURN Sizi daha Once Harfleri uzatmamaniz icin uyarmistim.!

  }

  :U.yr {

    ;# Uyarı mesajı

    RETURN   :  Lutfen Harfleri Uzatmayiniz Aksi Taktirde Kanaldan Uzaklastirilicaksiniz.! 

  }

  :U.kbs {

    ;# kikc\ban s&#252;resi "Dk."

    RETURN  15

  }

}

Evet bu kodu forumda degerli bir arkadasimiz Cocorico yazmis anladigim kadari ile. ben bu kodda belirledigim nicklerin muaf olmasini istiyorum. Tskler.

[box=Moderator yanıtı:diEfoRyoU] Kodu istediğin gibi düzenledim. Kırmızı yerleri, koddan muaf kalmasını istediğin nickler ile değiştirmelisin.[/box]