aynı ident yada benzerliği gzline - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

angry1 · 15 Aralık 2011, 22:22

SLM ArkadaşLar şöyle bi girişler oluyor sunucuya ben bunu sanoticeden tespit edip gzline uygulatmak istiyorum

[+2SCRC] [21:20] *** Giriş: KaraoKe (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[+2SCRC] [21:20] *** Giriş: anet_ (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[+2SCRC] [21:20] *** Giriş: Doty (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[+2SCRC] [21:20] *** Giriş: CH4TOM4N (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[+2SCRC] [21:20] *** Giriş: shari (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[+2SCRC] [21:20] *** Giriş: Orfield (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[+2SCRC] [21:20] *** Giriş: LickMyAxe (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)
[+2SCRC] [21:20] *** Giriş: Tatar (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

bu identi spam alsam baska idenle gelıyor

aynı ident yada cokfazla benzerlik taşıyan ident girişinde maximum 3 giriş olsa fazlasında sanoticeden gzline uygulatsak ?

Set kardeşimin yazdıgı bir kode var
ident deilde bunu nick için yazdı cokta harıka calısıyor bunu idente göre ayarlamamız mumkunmu kodeye baktıqınızda daha anlasılır olcaktır..

on *:snotice:*connecting*: { if ($regex($9,/(Sohbet|kelebek)/i)) { halt } if ($tnick($9)) { if (!$hget(tnick)) { hmake tnick 100 } hinc -u10 tnick $tnick($9) if ($hget(tnick,$tnick($9)) >= 3) { gzline $9 +0 Ban sebebin. } } } alias tnick { var %t 1 while %t <= $len($1) { if $mid($1,%t,1) !isalpha { if $len($left($1,$calc(%t - 1))) > 2 { return $mid($1,1,$calc(%t - 1)) } } inc %t } }

kode budur bunu ident e göre ayarlamak mumkunmu

angry1 · 15 Aralık 2011, 22:22

on *:snotice:*connecting*: { if ($regex($9,/(Sohbet|kelebek)/i)) { halt } if ($tnick($9)) { if (!$hget(tnick)) { hmake tnick 100 } hinc -u10 tnick $tnick($9) if ($hget(tnick,$tnick($9)) >= 3) { gzline $9 +0 Ban sebebin. } } } alias tnick { var %t 1 while %t <= $len($1) { if $mid($1,%t,1) !isalpha { if $len($left($1,$calc(%t - 1))) > 2 { return $mid($1,1,$calc(%t - 1)) } } inc %t } }

Paint · 15 Aralık 2011, 22:29

$9 olan yerleri $gettok($10,1,64) ile değişirsen istediğin olur. Bu arada bir dahakine lütfen kodları kod tagları içerisinde ver.

angry1 · 15 Aralık 2011, 22:36

Paint dostum cok sağol ayrıca gelişmişle yapıorum kodları ama tağa almıyor
başka ne sekilde kod tağları içine alabılırım acaba ? birde hatalı bi değişim yapabılırım yanlıs gzlıne uygulatmayım vaktın varsa sen kodu düzeltip verebılırmısın ?

Paint · 15 Aralık 2011, 22:59

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

on *:snotice:*connecting*: {
  if ($regex($gettok($10,1,64),/(Sohbet|kelebek)/i)) { halt }
  if ($tnick($gettok($10,1,64))) {
    if (!$hget(tnick)) { hmake tnick 100 }
    hinc -u10 tnick $tnick($gettok($10,1,64))
    if ($hget(tnick,$tnick($gettok($10,1,64))) >= 3) { 
    gzline $gettok($10,1,64) +0 Ban sebebin.  } 
} }
alias tnick {
  var %t 1
  while %t <= $len($1) {
    if $mid($1,%t,1) !isalpha { 
      if $len($left($1,$calc(%t - 1))) > 2 {
        return $mid($1,1,$calc(%t - 1))
    } }
inc %t } }

Code tagları:
[CODE]
/CODE]
not: kapatma tagının başına [ ekle . Ben eklersem kod alanı açılıyor otomatikman.

angry1 · 16 Aralık 2011, 23:44

paint kardesim kod hiç tepkı vermedi tekrar bi bakarmıısn acaba

angry1 · 16 Aralık 2011, 23:48

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

on *:snotice:*connecting*: {   if ($regex($9,/(Sohbet|kelebek)/i)) { halt }   if ($tnick($9)) {     if (!$hget(tnick)) { hmake tnick 100 }     hinc -u10 tnick $tnick($9)     if ($hget(tnick,$tnick($9)) >= 3) {        gzline $9 +0 Ban sebebin.     }    } } alias tnick {   var %t 1   while %t <= $len($1) {     if $mid($1,%t,1) !isalpha {        if $len($left($1,$calc(%t - 1))) > 2 {         return $mid($1,1,$calc(%t - 1))       }     }     inc %t   } }

kodun orjınal halınde tnick diyor ya acaba ondanmı kaynaklanıyor ?

SiLuet · 17 Aralık 2011, 15:05

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

on *:snotice:*connecting*: {
  var %id. $remove($gettok($10,1,64),$chr(40))
  if ($regex(%id.,/(Sohbet|kelebek)/i)) { halt }
  if ($tnick(%id.)) {
    if (!$hget(tident)) { hmake tident 100 }
    hinc -u10 tident $tnick(%id.)
    if ($hget(tident,$tnick(%id.)) >= 3) { 
      gzline $9 +0 Ban sebebin.  
    } 
  } 
}
alias tnick {
  var %t 1
  while %t <= $len($1) {
    if $mid($1,%t,1) !isalpha { 
      if $len($left($1,$calc(%t - 1))) > 2 {
        return $mid($1,1,$calc(%t - 1))
      } 
    }
    inc %t 
  }
}

Bu şekilde dene.
Ayrıca Aynı mesajı 2-3 defa neden Yazıyorsun Merak ediyorum. Diğer Konunun Altınada Aynı Sorunu Yazmışsın. Bir defa Yazdıktan Sonra Sabırlı bir şekilde Beklemen Gerek.Gereksiz Yere Post tekrarı yapmanın Anlamı Yok diye düşünüyorum.

angry1 · 17 Aralık 2011, 15:32

haklısın kardesim onu yanlışlıkla yazdım fakat silemedim

angry1 · 17 Aralık 2011, 19:13

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

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

on *:snotice:*connecting*: {
  var %id. $remove($gettok($10,1,64),$chr(40))
  if ($regex(%id.,/(Sohbet|kelebek)/i)) { halt }
  if ($tnick(%id.)) {
    if (!$hget(tident)) { hmake tident 100 }
    hinc -u10 tident $tnick(%id.)
    if ($hget(tident,$tnick(%id.)) >= 3) { 
      gzline $9 +0 Ban sebebin.  
    } 
  } 
}
alias tnick {
  var %t 1
  while %t <= $len($1) {
    if $mid($1,%t,1) !isalpha { 
      if $len($left($1,$calc(%t - 1))) > 2 {
        return $mid($1,1,$calc(%t - 1))
      } 
    }
    inc %t 
  }
}

Bu şekilde dene.

Kardeşim bu çalışmadı bi bakabilcenmi

bi baksanız ustad lar ?

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
litmus ; ident fullname benzerliği hakkında	angry1	mIRC Scripting Sorunları	16	08 Ağustos 2012 01:03
fulname gzline yada spamm ekleme	angry1	mIRC Scripting Sorunları	5	02 Nisan 2011 20:04
Zamanlı gzline yada kill	eLsukr	mIRC Scripting Sorunları	2	19 Şubat 2011 16:33
Aynı ident mass join'e gzline	Emrax	mIRC Scripting Sorunları	12	22 Mayıs 2010 15:27
Nick ve ident Randomsa gzline	Emrax	mIRC Scripting Sorunları	11	31 Aralık 2009 10:34

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

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.