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

Hayır demek istediğim hazır varken birde tekrar koruması yazmıyalım :)
Bu sadece kanalda yazılan text mesajlar ve joinpart yapanlar için:

Kod:

/*Alience yazdığı kod satırı sadece isteyen kişi için düzenleme yapıldı */

on *:text:*:#: {

  ;tekrarlar arası kaç sn bekleyecek

  var %waittime = 6

 

  ;maximum kaç defa tekrar edebileceği

  var %maximumtekrar = 4

 

  ;opları bu korumadan muaf tutmak istiyormusun? (1 yazarsanız açık, 0 yazarsanız kapalı)

  var %opmuaf = 1

 

  ;half opları bu korumadan muaf tutmak istiyormusun? (1 yazarsanız açık, 0 yazarsanız kapalı)

  var %hopmuaf = 1

 

  ;voiceleri bu korumadan muaf tutmak istiyormusun? (1 yazarsanız açık, 0 yazarsanız kapalı)

  var %voicemuaf = 1

 

  ;op, halfop, voice dışında muaf tutmak istediğiniz nick var ise muaf tutmak için muaflisti aktif etmeniz gerekmekte.

  ;muaflist aktif edilsinmi? (1 yazarsanız açık, 0 yazarsanız kapalı)

  var %muaflist = 1

 

  ;muaf tutmak istediğiniz nickleri aralarında virgül koyarak yazınız (örn: nick1,nick2,nick3)

  var %muafnicks = nick1,nick2

 

  if $me isop $chan || $me ishop $chan {

    if %opmuaf && $nick isop $chan { return }

    if %hopmuaf && $nick ishop $chan { return }

    if %voicemuaf && $nick isvoice $chan { return }

    if %muaflist && $istok(%muafnicks,$nick,44) { return }

 

    if $hget($+(tkrar,$chan),$nick) == $md5($1-) {

      hinc $+(-mu,%waittime) $+(tcnt,$chan) $nick 1 

      hadd $+(-mu,%waittime) $+(tkrar,$chan) $nick $hget($+(tkrar,$chan),$nick)

      if $hget($+(tcnt,$chan),$nick) >= %maximumtekrar {

        enable #gosterme

        timer 1 10 disable #gosterme

        hdel $+(tkrar,$chan) $nick

        hdel $+(tcnt,$chan) $nick

      }

    }

    else {

      hadd $+(-mu,%waittime) $+(tkrar,$chan) $nick $md5($1-)

      hadd $+(-mu,%waittime) $+(tcnt,$chan) $nick 1 

    }

  }

}

 

#gosterme off

on ^*:text:*:#:.haltdef

#gosterme end

 

/*L4roxyL yazdığı bir kod satırı sadece isteyen kişi için düzenleme yapıldı*/

alias jpart {

  if ($isid) {

    hinc -m jp $+($1.,$2) 1

    if (!$timer($hget(jp,$+($1.,$2)))) { $+(.timer,$+($hget(jp,$+($1.,$2)))) 1 $3 hdel -s jp $+($1.,$2) }

    if ($($hget(jp,$+($1.,$2))) >= $4) { hdel -s jp $+($1.,$2) 1 | return $true }

    else { return $false }

  }

}

on @*:join:#: {

 if $jpart(#,$nick,10,3) { enable #joinpart | timer 1 10 disable #joinpart } 

}

 

#joinpart off

on ^*:join:#:.haltdef

#joinpart end

$jpart(#,$nick,kaçsaniyede,kaçgirişçıkış) düzenlenecek kısım bu
default olarak 10 saniyede 3 giriş çıkış ayarlanmış.

Yönergeleri takip ed , sorununu çözersin :)