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

moonman · 21 Temmuz 2012, 19:16

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

Kod: Kodu kopyalamak için üzerine çift tıklayın!

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

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

Difuzyon · 21 Temmuz 2012, 20:19

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

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

Difuzyon · 21 Temmuz 2012, 20:38

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: Kodu kopyalamak için üzerine çift tıklayın!

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

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

Difuzyon Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

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: Kodu kopyalamak için üzerine çift tıklayın!

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ı

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Tekrar Koruması	moonman	mIRC Scripting Sorunları	1	18 Şubat 2012 22:16
tekrar koruması yardım	DenperaS	mIRC Scripting Sorunları	2	14 Haziran 2010 12:06
Tekrar koruması	Cyptm	mIRC Scripting Sorunları	1	25 Nisan 2008 16:21
özel tekrar koruması	arananadam1	mIRC Scripting Sorunları	39	26 Şubat 2006 22:55

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.