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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Tekrar Koruması (https://www.ircforumlari.net/mirc-scripting-sorunlari/496679-tekrar-korumasi.html)

moonman

21 Temmuz 2012 19:16

Tekrar Koruması

Merhabalar ustalar kolay gelsin. Aşağıda verdiğim Tekrar korumasına 1-2 kod daha eklemek istiyorum denedim ama çalışmadı yardımcı olurmusunuz, istediğim kod şu 4 saniye içinde alt alta 3 defa 15 kelime yazanı kanaldan atmasını istiyorum, ve sadece nicke ban maskını alıyor IP adresini de alsa olur mu aynı anda, yardımcı olurmusunuz rica etsem ???

on @*:text:*:#: {
if ($nick !isop #) {
if (%r. [ $+ [ $nick ] $+ . $+ [ $chan ] ] == $null) {
if $istok(%knickler,$nick,32) { halt }
set -u10 %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ] 1
set -u10 %r.text. [ $+ [ $nick ] $+ . $+ [ $chan ] ] $1-
return
}
var %rps = %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ]
var %rpt = %r.text. [ $+ [ $nick ] $+ . $+ [ $chan ] ]
if (%rpt == $1-) {
inc %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ]
if (%rps => 2) {
mode # +b $+(~q:,$nick) | $+(.timer,$nick) 1 60 mode # -b $+(~q:,$nick) }
}
}
}

Difuzyon

21 Temmuz 2012 19:48

Cevap: Tekrar Koruması

Kod:

on @*:text:*:#: {

  if ($nick !isop #) {

    if (%r. [ $+ [ $nick ] $+ . $+ [ $chan ] ] == $null) {

      if $istok(%knickler,$nick,32) { halt }

      set -u4 %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ] 1

      set -u4 %r.text. [ $+ [ $nick ] $+ . $+ [ $chan ] ] $1-

      return

    }

    var %rps = %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

    var %rpt = %r.text. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

    if (%rpt == $1-) && ($count($1-,$chr(32)) >= 14) {

      inc %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

      if (%rps == 2) { ban -k # $nick 2 }

    }

  }

}

moonman

21 Temmuz 2012 20:12

Cevap: Tekrar Koruması

Kardeş yardığımın için sağolasın ama kod çalışmadı olmuyor ?

Difuzyon

21 Temmuz 2012 20:19

Cevap: Tekrar Koruması

Düzenleme yaptığım kodda; kanala 4sn. içerisinde 15 yada daha fazla kelime içeren bir satır 3 defa yazılırsa ban uygular.

Olmayan ne ?

moonman

21 Temmuz 2012 20:21

Cevap: Tekrar Koruması

15 20 defa tekrar yaptım selammmmmmmmmmmmmmmm diye yazdım ama nicke ve IP e ban koymuyor kod ?

Difuzyon

21 Temmuz 2012 20:38

Cevap: Tekrar Koruması

Son yazdığın örnek 15'den fazla harf olması demek oysa ilk mesajında kelime demişsin.
Kelime başka şey harf başka şey!

Ramazan dalgınlığı olsa gerek.
İstemiş olduğun kod aşağıda:

Kod:

on @*:text:*:#: {

  if ($nick !isop #) {

    if (%r. [ $+ [ $nick ] $+ . $+ [ $chan ] ] == $null) {

      if $istok(%knickler,$nick,32) { halt }

      set -u4 %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ] 1

      set -u4 %r.text. [ $+ [ $nick ] $+ . $+ [ $chan ] ] $1-

      return

    }

    var %rps = %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

    var %rpt = %r.text. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

    if (%rpt == $1-) && ($len($1-) >= 14) {

      inc %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

      if (%rps == 2) { ban -k # $nick 2 }

    }

  }

}

moonman

22 Temmuz 2012 14:18

Cevap: Tekrar Koruması

Kardeş kod sorunsuz çalışıyor ama biraz gec atıyor saniyeyi azaltma şansımız var mı 5-6 defa tekrarlayınca attı ve halfop a görede duyarlı ayarlanabilir mi sana zahmet ?

PuSsS

28 Haziran 2013 13:17

Cevap: Tekrar Koruması

Alıntı:

Difuzyon Nickli Üyeden Alıntı (Mesaj 1041175522)

Kod:

on @*:text:*:#: {

  if ($nick !isop #) {

    if (%r. [ $+ [ $nick ] $+ . $+ [ $chan ] ] == $null) {

      if $istok(%knickler,$nick,32) { halt }

      set -u4 %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ] 1

      set -u4 %r.text. [ $+ [ $nick ] $+ . $+ [ $chan ] ] $1-

      return

    }

    var %rps = %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

    var %rpt = %r.text. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

    if (%rpt == $1-) && ($len($1-) >= 14) {

      inc %r. [ $+ [ $nick ] $+ . $+ [ $chan ] ]

      if (%rps == 2) { ban -k # $nick 2 }

    }

  }

}

Bu Tekrar korumasnını eggdrop botta çalıştırabileceğimiz tcl si varmı

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:25.