
26 Ocak 2012, 16:35
|
 | mS Puan: 11 mS Derece:  | | Ü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) | |
Alıntı: fav Nickli Üyeden Alıntı
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 1 ay geriye dönük kişinin tüm kullandığı nickleri göstere bilir hale getirebilirmiyiz. yani bir aylık kayıt tutacak kanala girdiğinde okişinin nicklerini echo ile bildireçek 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 | Kod takibi @7AF3A002.AF192DF8. D0E4550C.IP kırmızı olan kısım için tutuyor
|