Konu: ip takip
Tekil Mesaj gösterimi
  #1  
Alt 08 Ocak 2012, 18:16
Avatar Yok
fav fav isimli Üye şimdilik offline konumundadır

mS Puan: 11
mS Derece: fav Meraklı
 
Üyelik tarihi: 11 Eylül 2011
Mesajlar: 40
Konular: 16
Eklentiler: 1
Alınan Teşekkür: 1
Yapılan Teşekkür: 17
Mentioned: 0 Post(s)
Tagged: 0 Thread(s)
Standart ip takip

herkese kolay gelsin arkadaşlar

bu kodu difuzyon arkadaşımız buhale getirdi kendisine cok tesekkur ederim

bu koda bir ek yapmak istiyorum yanlızca bir önceki nicki söylüyor takip kodumuz bunu geriye dönük kişinin tüm kullandığı nickleri göstere bilir hale getirebilirmiyiz.


Kod:
on *:connect: { .hashtable profil.ini | dify }
on !*:JOIN:#:{ 
set %nick $nick
set %mask $token($address($nick,2),3,46)
set %nick2 $readini profil.ini %mask nick
set %mask2 $readini profil.ini %mask mask
if (%mask == %mask2) && (%nick != %nick2) {
set %quand $readini profil.ini %mask quand
$iif(!$window(@İP_Takip),window -enz @İP_Takip)
inc -eu20 $+(%,time,$nick) 
if $($+(%,time,$nick),2) == 1 { echo -t @İP_Takip 4 $+ $nick  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick 4 $+ %nick2 7(saat $gettok(%quand,1,45) 7gün $gettok(%quand,2,45) $+ 7) }
}
if (!$ini(profil.ini,mask)) hashtable
}
alias hashtable { if (!$hget(profil)) { hmake profil 5 } | hadd profil nick %nick | hadd profil mask %mask | hadd profil quand $time $+ - $+ $date | hsave -ai profil profil.ini $hget(profil,mask) | hfree profil }
alias -l dify {
if $isid {
if $ctime($token($readini(profil.ini,$remove($1,],[),quand),2,45)) < $calc($ctime - 2592000) { remini profil.ini $remove($1,],[) }
}
else { filter -fkg profil.ini dify \[.+\] }
}
iyi forumlar arkadaşlar
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