IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet odaları

>
+
Etiketlenen Kullanıcılar

14Beğeni(ler)

 
 
LinkBack Seçenekler Arama Stil
Prev önceki Mesaj   sonraki Mesaj Next
Alt 21 Haziran 2019, 18:16   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
IP tabanlı yapabilirmiyiz




alias giris {
return giris
}

on ^*!:Join:#sohbet: { window -De @Giris
var %ip = $mask($fulladdress,2)
var %nfname = $mask($fulladdress,0)

; get the previous nicks
var %nicks = $readini(giris.txt, %ip, nicks)

; get the pervious full names
var %fname = $readini(giris.txt, %ip, fullname)

; add the new nick ($addtok will take care of duplicates)
var %nicks = $addtok(%nicks,$nick,32)

; add the new fname ($addtok will take care of duplicates)
var %fname = $addtok(%fname,$ial(%ip).user,32)

; update the nicks
writeini -n giris.txt %ip nicks %nicks

; update the seen time
writeini -n giris.txt %ip seentime $date

; update the fullname
writeini -n giris.txt %ip fullname %fname

msg #moos 4Bağlanan 5 $nick 4 IP Adresi 5 $address($nick,2) 4 Önceki KuLandığı Nickler: 12 $readini(giris.txt, %ip, nicks) 4 Fullname:5 $readini(giris.txt, %ip, fullname) 4 Son Görülen Zaman 5 $readini(giris.txt, %ip, seentime)
}

alias ntrack {
var %ip = $address($7,2)
var %nfname = $address($7,0)
; get the previous nicks
var %nicks = $readini(giris.txt, %ip, nicks)
; get the pervious full names
var %fname = $readini(giris.txt, %ip, fullname)
; add the new nick ($addtok will take care of duplicates)
var %nicks = $addtok(%nicks,$nick,32)
; add the new fname ($addtok will take care of duplicates)
var %fname = $addtok(%fname,$ial(%ip).user,32)
msg #moos 12 $1 on the ip %ip has used the nicks: $readini(giris.txt, %ip, nicks) and the full names: $readini(giris.txt, %ip, fullname) and was last seen on $readini(giris.txt, %ip, seentime)
}
menu nicklist {
NickTrack:ntrack $$1
}

alias giris.txt {
return giris.txt
}

on ^*!:nick: { window -De @giris
var %ip = $mask($fulladdress,2)
var %nfname = $mask($fulladdress,0)

; get the previous nicks
var %nicks = $readini(giris.txt, %ip, nicks)

; get the previous newnicks
var %newnicks = $readini(giris.txt, %ip, newnicks)

; get the pervious full names
var %fname = $readini(giris.txt, %ip, fullname)

; add the new nick ($addtok will take care of duplicates)
var %nicks = $addtok(%nicks,$newnick,32)

; add the new fname ($addtok will take care of duplicates)
var %fname = $addtok(%fname,$ial(%ip).user,32)

; update the nicks
writeini -n giris.txt %ip nicks %nicks

; update the seen time
writeini -n giris.txt %ip seentime $+($time,-,$date)

; update the fullname
writeini -n giris.txt %ip fullname %fname
}

 
Alıntı ile Cevapla

 

Etiketler
host takip, ip takip. kullandığı nickler, mirc kodları


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Selamün Aleyküm Amelia İslamiyet 2 02 Haziran 2023 13:46
Selamın aleyküm. Janissary06 Hey Sen! Beni Tanıyor Musun? 6 30 Haziran 2013 13:44
Selamün Aleyküm Mehmet Hey Sen! Beni Tanıyor Musun? 20 07 Eylül 2011 17:08
Selamın Aleyküm Ruhadam Hey Sen! Beni Tanıyor Musun? 6 06 Ocak 2010 23:12
Selamün Aleyküm Survivor Hey Sen! Beni Tanıyor Musun? 12 29 Mayıs 2009 11:07