mIRCForumlari - mIRC ve IRC Kullanıcılarının Paylaşım Platformu
  https://www.sosyalchat.com/


SohbetG.Com

Kullanıcı Etiket Listesi

Ağaç Şeklinde Aç2Beğeni

Yeni Konu aç Cevapla
 
Seçenekler
Alt 18 Aralık 2022, 12:24   #1
Çevrimdışı
Üyelik tarihi: 07 Aralık 2022
Konular: 21281
Mesajlar: 24.385
Nerden: İstanbul
Cinsiyet: Erkek
Web Site: TRmIRC.Net
IRC Sunucu: IRC.TRmIRC.Net
Alınan Beğeni: 3914
Beğendikleri: 7042
@RahmetLi
Ruh Hali : : Olu Gibi
Standart Nick Takip ( Txt )

Kodun çalışma mantığı giris.txt dosyasına hostunu baz alarak kanala giren kullanıcıları kayıt eder ve @giris penceresinde bize ispiyonlar.



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

alias giris { return giris } on !1:JOIN:#: { window -De @Giris var %mask = $mask($fulladdress,2) var %nfname = $mask($fulladdress,0) ; get the previous nicks var %nicks = $readini(giris.txt, %mask, nicks) ; get the pervious full names var %fname = $readini(giris.txt, %mask, 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(%mask).user,32) ; update the nicks writeini -n giris.txt %mask nicks %nicks ; update the seen time writeini -n giris.txt %mask seentime $date ; update the fullname writeini -n giris.txt %mask fullname %fname echo -t @giris 4Bağlanan 5 $nick ------------------------------------------ echo -t @giris 4IP Adresi 5 %mask echo -t @giris 4Önceki Nick:5 $readini(giris.txt, %mask, nicks) echo -t @giris 4Kullanıcı Adı:5 $readini(giris.txt, %mask, fullname) echo -t @giris 4Son Görülen Zaman 5 $readini(giris.txt, %mask, seentime) echo -t @giris 4Kanal:5 $chan echo -t @giris 2End $nick ------------------------------------------ } alias ntrack { var %mask = $address($1,2) var %nfname = $address($1,0) ; get the previous nicks var %nicks = $readini(giris.txt, %mask, nicks) ; get the pervious full names var %fname = $readini(giris.txt, %mask, 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(%mask).user,32) echo -a 12 $1 on the ip %mask has used the nicks: $readini(giris.txt, %mask, nicks) and the full names: $readini(giris.txt, %mask, fullname) and was last seen on $readini(giris.txt, %mask, seentime) } menu nicklist { NickTrack:ntrack $$1 } alias giris.txt { return giris.txt } on !1:nick: { window -De @giris var %mask = $mask($fulladdress,2) var %nfname = $mask($fulladdress,0) ; get the previous nicks var %nicks = $readini(giris.txt, %mask, nicks) ; get the pervious full names var %fname = $readini(giris.txt, %mask, 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(%mask).user,32) ; update the nicks writeini -n giris.txt %mask nicks %nicks ; update the seen time writeini -n giris.txt %mask seentime $date ; update the fullname writeini -n giris.txt %mask fullname %fname echo -t @giris 4Bağlanan 5 $nick ------------------------------------------ echo -t @giris 4IP Adresi 5 %mask echo -t @giris 4Önceki Nick:5 $readini(giris.txt, %mask, nicks) echo -t @giris 4Kullanıcı Adı:5 $readini(giris.txt, %mask, fullname) echo -t @giris 4Son Görülen Zaman 5 $readini(giris.txt, %mask, seentime) echo -t @giris 4Kanal:5 $chan echo -t @giris 2End $nick ------------------------------------------ }





Kalbim Atar Cansız, Geçmez Gün Ahsız, Vahsız..
  Alıntı ile Cevapla
Alt 18 Aralık 2022, 12:32   #2
Çevrimdışı
1yLXqBHpAM.gif
Üyelik tarihi: 12 Aralık 2022
Konular: 51
Mesajlar: 1.832
Nerden: Adana
Cinsiyet: Erkek
Web Site: ForumTurk.ORG
Alınan Beğeni: 1190
Beğendikleri: 1679
@LoDoS
Ruh Hali : : Urkek
Standart

quzel kod tesekkurler @RahmetLi

  Alıntı ile Cevapla

Cevapla
Etiketler
adresi, adı, alarak, bize, çalışma, dosyası, dosyasına, giren, giris.txt, hostunu, kanala, kayıt, kodu, kodun, kullanıcıları, mantığı, takip, txt, user, zaman


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