[Reqal]

Sa arkadaşlar ßen cloneyi statüste yakalayıp atabilicek ve attığı ipyi kayıt edip aynı zaman da #kanalım `a bilgi verebilicek örneğin;

Proxy girişi: nick Mask:proxynick!sadas@85.102.3.132 Gzline Uygulandı

şeklinde bilgi verebilen bir remote arıyorum yardımcı olursanız sevinirim iyi forumlar.

[IRC-Dancer]

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

menu status,menubar,channel {
  .-
  .ı|ı C-Flood
  ..Açık:.enable #C-Flood | .echo -a   #C-Flood  Kontrol Açıldı  
  ..Kapalı:.disable #C-Flood  | .echo -a #C-Flood  Kontrol Kapatıldı  
  .-
}

#C-Flood off
on *:snotice:*client connecting*: {
  if $nick == irc.sunucuismi.com { 
    %::Con.ident.on = $right($gettok($10,1,64),-1) | %::Con.nick.on = $9 | %::Con.ip.on = $left($gettok($10,2,64),-1) 
    cf %::Con.nick.on %::Con.ident.on %::Con.ip.on 
  }
}
#C-Flood end
alias cf { 
  ;-Connect Flood -1-
  hinc -mu1 cf2 $3 1 | var %t $hget(cf2,$3) 
  if %t == 2 {
    gline $+(*@,$3) :  ban Sebebi 
    $iif(!$window(@kSc-Conned),window -e @kSc-Conned) | aline -p @kSc-Conned $+([,$time(HH:nn),]) $+(<2,kSc-Conned,>) 5K-Edildi - Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3)
    msg #a 2[RPR] -6• 3Agresif C-Giriş-1 6• 5Atilan Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3)
    halt
  }
  ;-Connect Flood -2-
  hinc -mu2 cf $3 1 | var %t $hget(cf,$3) 
  if %t == 3 { 
    gline $+(*@,$3) :  ban Sebebi 
    $iif(!$window(@kSc-Conned),window -e @kSc-Conned) | aline -p @kSc-Conned $+([,$time(HH:nn),]) $+(<2,kSc-Conned,>) 5K-Edildi - Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3)
    msg #a  2[RPR] -6• 3Agresif C-Giriş-2 6•5Atilan Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3)
    halt
  }
  ;-Connect Flood -3- 
  hinc -mu8 cf3 $3 1 | var %t $hget(cf3,$3) 
  if %t == 3 { 
    gline $+(*@,$3) :  ban Sebebi 
    $iif(!$window(@kSc-Conned),window -e @kSc-Conned) | aline -p @kSc-Conned $+([,$time(HH:nn),]) $+(<2,kSc-Conned,>) 5K-Edildi - Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3)
    msg #a  2[RPR] -6• 3Agresif C-Giriş-3 6• 5Atilan Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3)
    halt
  }

;--- Rapor verilcek kanal : #a
;--- Gline şeklinde ayarlandı.
;--- Özel pencere bildirim simgesi mevcud.
;--- Ac\kapa özellikli.

[Reqal]

IRC-Dancer 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! menu status,menubar,channel { .- .ı|ı C-Flood ..Açık:.enable #C-Flood | .echo -a #C-Flood Kontrol Açıldı ..Kapalı:.disable #C-Flood | .echo -a #C-Flood Kontrol Kapatıldı .- } #C-Flood off on *:snotice:*client connecting*: { if $nick == irc.sunucuismi.com { %::Con.ident.on = $right($gettok($10,1,64),-1) | %::Con.nick.on = $9 | %::Con.ip.on = $left($gettok($10,2,64),-1) cf %::Con.nick.on %::Con.ident.on %::Con.ip.on } } #C-Flood end alias cf { ;-Connect Flood -1- hinc -mu1 cf2 $3 1 | var %t $hget(cf2,$3) if %t == 2 { gline $+(*@,$3) : ban Sebebi $iif(!$window(@kSc-Conned),window -e @kSc-Conned) | aline -p @kSc-Conned $+([,$time(HH:nn),]) $+(<2,kSc-Conned,>) 5K-Edildi - Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3) msg #a 2[RPR] -6• 3Agresif C-Giriş-1 6• 5Atilan Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3) halt } ;-Connect Flood -2- hinc -mu2 cf $3 1 | var %t $hget(cf,$3) if %t == 3 { gline $+(*@,$3) : ban Sebebi $iif(!$window(@kSc-Conned),window -e @kSc-Conned) | aline -p @kSc-Conned $+([,$time(HH:nn),]) $+(<2,kSc-Conned,>) 5K-Edildi - Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3) msg #a 2[RPR] -6• 3Agresif C-Giriş-2 6•5Atilan Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3) halt } ;-Connect Flood -3- hinc -mu8 cf3 $3 1 | var %t $hget(cf3,$3) if %t == 3 { gline $+(*@,$3) : ban Sebebi $iif(!$window(@kSc-Conned),window -e @kSc-Conned) | aline -p @kSc-Conned $+([,$time(HH:nn),]) $+(<2,kSc-Conned,>) 5K-Edildi - Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3) msg #a 2[RPR] -6• 3Agresif C-Giriş-3 6• 5Atilan Mask: $+(1[2Nick1]: $1 - 1[2IP1]: $3) halt } ;--- Rapor verilcek kanal : #a ;--- Gline şeklinde ayarlandı. ;--- Özel pencere bildirim simgesi mevcud. ;--- Ac\kapa özellikli.

üST VAR BUNDAN BENİM ELİMDE VARSA DAHA DEĞİŞİK DAHA SAĞLAM BİR KORUMA LÜTFEN