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

Kod:

on *^:text:*:#: {

  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 (üstteki deger ile aynı-yüksek olmamalıdır.)  

    RETURN 1

  }

  :U.mem {

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

    RETURN 60

  }

  :U.sb {

    ;# Kick Sebebi..

    RETURN 5 HarfLeri Uzatmama Konusunda Sizi Daha Once UyarmIstIm ... %logo

  }

  :U.yr {

    ;# Uyarı mesajı

    RETURN  2Uyari 1: 5Lutfen KanaL GeneLinde HarfLerI Uzatmadan YazInIz ...

  }

  :U.kbs {

    ;# kikc\ban süresi "Dk."

    RETURN  15

  }

}

CoCoRiCo'nun Yazmis oLduqu bu Kodu KuLLaniyorum Ama OpLarda HarfLeri Uzatsa OnLarada Uyari Veriyor OpLara Uyari Vermemesi IcIn Ne YapabiLirim Yardim Edermisiniz