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

KivanC · 03 Ocak 2012, 19:47

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

on *:JOIN:#:{ 
  if ($level($nick) == muafnlist) { halt }
  if ($level($chan) == muafclist) { halt }
  if ($regex($address($nick,2),/(helper|admin|ircop|services|dj.|tech|global)/i)) { halt }
  if $nick isop $chan { halt }  
  if ($ial == $false) .ial on 
  if ($chan(#).ial == $false) { who # | return } 
  var %total = $ialchan($wildsite,#,0) 
  if (%total > 4) { 
    var %i = 0 
    while (%i < %total) { 
      inc %i 
      var %nick = $ialchan($wildsite,#,%i).nick 
      var %all.nicks = $addtok(%all.nicks,%nick,32) 
      if (%nick !== $me) {  
        .raw gzline %nick 2Agresif Giris Tespit Edilmistir  Trojen:4 %total 
        .unset %nick  
      } 
    } 
  } 
}

Kodlama Bu, peki ben Bunu Direk Snotice 'den girislerde, kanallara girmeden Nasıl atarım cevirmemiz mümkünmüdür

DaDaS · 03 Ocak 2012, 19:51

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

#sericlone on
on *:snotice:*Client connecting on*:{
  .timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] 
  inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] 
  if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 5 { 
    .kline $+(*@,$gettok($gettok($10,2,64),1,41)) 4C12Lone 4G12irişi 4Y12apmak 4Y12asaktır 4T12RBot..!
    unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]
  }
}
#sericlone end

Dangerous123 · 16 Ekim 2013, 13:46

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

#sericlone on on *:snotice:*Client connecting on*:{   .timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]    inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]    if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 5 {      .kline $+(*@,$gettok($gettok($10,2,64),1,41)) 4C12Lone 4G12irişi 4Y12apmak 4Y12asaktır 4T12RBot..!     unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ]   } } #sericlone end

buna muaf ip ve nick nasıl ekleriz nick ve muaf ip i text dosyasından okusa dahada kullanışlı olur 

yada hali hazırda clone koruması snotice eventli muaf ip ve nick de olucak

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 13:46 -->-> Daha önceki mesaj 13:45 --

#sericlone on on *:snotice:*Client connecting on*:{ .timer 1 15 unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] inc %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] if %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] >= 5 { .kline $+(*@,$gettok($gettok($10,2,64),1,41)) 4C12Lone 4G12irişi 4Y12apmak 4Y12asaktır 4T12RBot..! unset %xxx. [ $+ [ $gettok($gettok($10,2,64),1,41) ] ] } } #sericlone end

uFuK · 16 Ekim 2013, 14:46

Cloneler girişte öyle taranmaz eğer adam sunucuya 3 defa girip cıkarsa yukardaki kodlar vatandaşı clone diye uçuracaktır. Client Connecting ile 1 arttirdiğiniz veriyi ayni şekilde Client Exiting ilede 1 düşürmeniz gerekir.

uFuK · 16 Ekim 2013, 15:01

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

on *:snotice:*: { 
  if *client conn* iswm $1- {
if !$istok(nick1,nick2,nick3,nick4,nick5,$9,32) { 
    if !$hget(clone) { hmake clone 1000 }  
    if ($hget(clone,$gettok($gettok($10,2,64),1,41)) > 2) { 
      zline *@ $+ $gettok($gettok($10,2,64),1,41) 900 clone yogunlugu 
    }
    hinc -m clone $gettok($gettok($10,2,64),1,41)
  }
}
  if *client exiting* iswm $1- { 
    hdec clone $gettok($gettok($10,2,64),1,41)
  }
}

nick1 nick2 nick3 diye geçen yerlere nick yazın. 3 ve 3'ten fazla cloneyi atıcaktır kırmızı ile belirttiğim yeri değiştirin. > 2 olan kısım.

Dangerous123 · 16 Ekim 2013, 15:45

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buna ilave muaf ip 2 tane muaf ip girebilsek tam istediğim gibi olcak

örnek 88.244.55.63 | 75.61.412.79 gibi bu 2 ip kaç nickle girerse girsin muaf tutucak

uFuK · 16 Ekim 2013, 15:58

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

on *:snotice:*: { 
  if *client conn* iswm $1- {
    if !$istok(nick1,nick2,nick3,nick4,nick5,$9,32) { 
      if $gettok($gettok($10,2,64),1,41)) != 124.22.22.22 || $gettok($gettok($10,2,64),1,41)) != 141.4141.414.414 { 
        if !$hget(clone) { hmake clone 1000 }  
        if ($hget(clone,$gettok($gettok($10,2,64),1,41)) > 2) { 
          zline *@ $+ $gettok($gettok($10,2,64),1,41) 900 clone yogunlugu 
        }
        hinc -m clone $gettok($gettok($10,2,64),1,41)
      }
    }
  }
  if *client exiting* iswm $1- { 
    hdec clone $gettok($gettok($10,2,64),1,41)
  }
}

Sadece 2 tane dedin diye böyle yaptım 124 ve 141 ile başlayan atmasyon ipleri değiştirirsin. Daha geniş yapmak için ya wildcard kullan != kısmını iswm yapıp ip aralıgınıda 124.* diye belirtebilirsin

Çok daha fazla tekil ip istiyorsanda hash table kullanmalısın.

uFuK · 16 Ekim 2013, 17:37

Evet forum penceresinden yazınca öyle oluyor remoteden yazmak lazım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

dec olayında -1 olarak mı sayıyor yoksa zaten değer yok diye hepmi hata veriyor onada bakmak lazım tahminimce yok demesi lazım kodun çalışmasını engellemezde tabi ekran kirliliği yapar

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Clone Koruması Proxy Koruması ve SaldırıProgramına OnLem KOdu Lazım	neobre	mIRC Scripting Sorunları	13	09 Ekim 2009 00:07
Clone Koruması !	YaGMuR_PreNSi	mIRC Scripting Hazır Kodlar	35	01 Eylül 2007 22:39
Clone koruması	TrancEnergy	mIRC Scripting Sorunları	5	02 Temmuz 2006 09:19
Clone koruması	Yeppa	mIRC Scripting Sorunları	37	14 Nisan 2006 15:25
Clone Koruması	aLtinCoCuq	mIRC Scripting Sorunları	14	02 Mart 2006 17:29

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.