Tekil Mesaj gösterimi
  #31  
Alt 07 Ekim 2011, 15:42
Avatar Yok
L4roXyL L4roXyL isimli Üye şimdilik offline konumundadır
 Chief 

mS Puan: 1031
mS Derece: L4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisiL4roXyL Kod delisi
 
Üyelik tarihi: 10 Temmuz 2009
Yaş: 40
Mesajlar: 339
Konular: 100
Eklentiler: 3
Alınan Teşekkür: 146
Yapılan Teşekkür: 0
Mentioned: 0 Post(s)
Tagged: 0 Thread(s)
Standart

Tarih: 14-01-2008, 00:02

Bu kod sunucuya giren kullanıcının IP adresine bakarak clone/klon taraması yapar ve bu tarama sonuçlarını /echo komutu ile aktif ekrana yansıtır.


Kod:
on *:snotice:*: { 
  if *client connect* iswm $1- { 
    var %s = $remove($gettok($10,2,64),$chr(41)) | hadd -m ip $+($9,½,%s) 
    if $hmatch(ip,$+(*,%s),0) >= 2 {
      var %q 1,%qq,%qqq = $gettok($hmatch(ip,$+(*,%s),1),2,189) 
      while %q <= $hmatch(ip,$+(*,%s),0) { 
      %qq = $addtok(%qq,$gettok($hmatch(ip,$+(*,%s),%q),1,189),44) 
      inc %q 
    } 
    echo -at Bilgi: %qqq adresiden bağlantı kuranlar: %qq  } 
  } 
  if *client exiting* iswm $1- { 
    if ($hmatch(ip,$+(*,$remove($gettok($7,2,64),$chr(41))))) hdel ip $v1 
  }
}
__________________
C/co/cod/code^man.
Alıntı ile Cevapla
Sponsored Links
 
1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76