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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Çözüldü ip-nick takip (https://www.ircforumlari.net/mirc-scripting-sorunlari/1018580-ip-nick-takip.html)

Kod:

alias giris {

  return giris

}

alias giris.txt {

  return giris.txt

}

on ^*!:Join:#sohbet: {

  if $regex($usermode,o) { set %tkp. [ $+ [ $nick ] ] 1 | who +I $nick }

}

on ^*!:nick: {

  if $regex($usermode,o) { set %tkp. [ $+ [ $newnick ] ] 1 | who +I $newnick }

}
 

raw 352:*: {

  if %tkp. [ $+ [ $6 ] ] {

    var %ip = $4

    ; get the previous nicks

    var %nicks = $readini(giris.txt, %ip, nicks)

    ; add the new nick ($addtok will take care of duplicates)

    var %nicks = $addtok(%nicks,$6,32)

    ; update the nicks

    writeini -n giris.txt %ip nicks %nicks

    ; update the seen time

    writeini -n giris.txt %ip seentime $date

    if ($window(@giris) == $null) { window -ne @giris }

    echo 13 -t @giris 4Bağlanan 5 $6 4 IP Adresi 5 $4 4 Önceki KuLandığı Nickler: 12 $readini(giris.txt, %ip, nicks) 4 Son Görülen Zaman 5 $readini(giris.txt, %ip, seentime)

    halt

  }

}

raw 315:*: {

  if %tkp. [ $+ [ $2 ] ] {

    unset %tkp. [ $+ [ $2 ] ]

    halt

  } 

} 
 

menu nicklist {

  NickTrack: if $regex($usermode,o) { set %tkp. [ $+ [ $1 ] ] 1 | who +I $$1 }

merhabalar hayırlı sabahlar
bu kodu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] arkadaşımız paylaşmış o posttan aldım öncelikle kendisine çok teşekkür ederim.
Yardım isteğime gelirsek; kod mIRC klasörüne giris.txt dosyası açıp kayıt alıyor.
Aldığı geçmiş kayıtlarla karşılaştırma yapması mümkün mü?
Örneğin biLecikLi nicki 3 gün önce **.***.***.*** ipinden xRay nickiyle giriş yaptı gibi ordaki kayıtları baz alarak döküm de yaptırılabilir mi?
Bir diğer sorum; bağlanan kişilerin sadece bilgilerine tarih ekliyor geçmişe dönük saat kaydı tutup o kayıtları saat olarak yansıtabilir mi?
Cevap ve yardımlarınız için şimdiden teşekkür ederim.

Cevap: ip-nick takip

Yardımcı olabilecek yok sanırım. Konuyu kilitleyebilirsiniz. Hayırlı IF`ler.

Cevap: ip-nick takip

Alıntı:

Bilecikli Nickli Üyeden Alıntı (Mesaj 1042829583)

Yardımcı olabilecek yok sanırım. Konuyu kilitleyebilirsiniz. Hayırlı IF`ler.

Kod:

on ^*!:Join:#sohbet: {

  if $regex($usermode,o) {

    set %tkp. [ $+ [ $nick ] ] 1

    who +I $nick

  }

}
 

on ^*!:nick: {

  if $regex($usermode,o) {

    set %tkp. [ $+ [ $newnick ] ] 1

    who +I $newnick

  }

}
 

raw 352:*: {

  if %tkp. [ $+ [ $6 ] ] {

    var %ip = $4

    var %nicks = $readini(%dosya, %ip, nicks)
 

    if (%nicks) {

      if ($window(@giris) == $null) { window -ne @giris }

      echo 13 -t @giris Bağlanan $6 IP Adresi $4 Önceki Kullanıldığı Nickler: %nicks

    }
 

    var %nicks = $addtok(%nicks, $6, 32)

    writeini -n %dosya %ip nicks %nicks

    writeini -n %dosya %ip seentime $date

    halt

  }

}

Bak bakalım olmuş mu güzel dostum iyi forumlar :)

Cevap: ip-nick takip

Alıntı:

Bilecikli Nickli Üyeden Alıntı (Mesaj 1042828045)

Kod:

alias giris {

  return giris

}

alias giris.txt {

  return giris.txt

}

on ^*!:Join:#sohbet: {

  if $regex($usermode,o) { set %tkp. [ $+ [ $nick ] ] 1 | who +I $nick }

}

on ^*!:nick: {

  if $regex($usermode,o) { set %tkp. [ $+ [ $newnick ] ] 1 | who +I $newnick }

}
 

raw 352:*: {

  if %tkp. [ $+ [ $6 ] ] {

    var %ip = $4

    ; get the previous nicks

    var %nicks = $readini(giris.txt, %ip, nicks)

    ; add the new nick ($addtok will take care of duplicates)

    var %nicks = $addtok(%nicks,$6,32)

    ; update the nicks

    writeini -n giris.txt %ip nicks %nicks

    ; update the seen time

    writeini -n giris.txt %ip seentime $date

    if ($window(@giris) == $null) { window -ne @giris }

    echo 13 -t @giris 4Bağlanan 5 $6 4 IP Adresi 5 $4 4 Önceki KuLandığı Nickler: 12 $readini(giris.txt, %ip, nicks) 4 Son Görülen Zaman 5 $readini(giris.txt, %ip, seentime)

    halt

  }

}

raw 315:*: {

  if %tkp. [ $+ [ $2 ] ] {

    unset %tkp. [ $+ [ $2 ] ]

    halt

  } 

} 
 

menu nicklist {

  NickTrack: if $regex($usermode,o) { set %tkp. [ $+ [ $1 ] ] 1 | who +I $$1 }

Merhaba kodda hatamı var çalışmıyor ve çalışma mantığı nedir bunun acaba?

Cevap: ip-nick takip

Alıntı:

iLLeTBey Nickli Üyeden Alıntı (Mesaj 1042837438)

Kod:

on ^*!:Join:#sohbet: {

  if $regex($usermode,o) {

    set %tkp. [ $+ [ $nick ] ] 1

    who +I $nick

  }

}
 

on ^*!:nick: {

  if $regex($usermode,o) {

    set %tkp. [ $+ [ $newnick ] ] 1

    who +I $newnick

  }

}
 

raw 352:*: {

  if %tkp. [ $+ [ $6 ] ] {

    var %ip = $4

    var %nicks = $readini(%dosya, %ip, nicks)
 

    if (%nicks) {

      if ($window(@giris) == $null) { window -ne @giris }

      echo 13 -t @giris Bağlanan $6 IP Adresi $4 Önceki Kullanıldığı Nickler: %nicks

    }
 

    var %nicks = $addtok(%nicks, $6, 32)

    writeini -n %dosya %ip nicks %nicks

    writeini -n %dosya %ip seentime $date

    halt

  }

}

Bak bakalım olmuş mu güzel dostum iyi forumlar :)

Merhaba; Bu remotede writeini hatası alıyorum.
Çalışma mantığı nedir acaba ve hatasını çözebilir miyiz?

Cevap: ip-nick takip

%dosya değişken değerine giriş/çıkışları ekleyecek dosya belirtmelisin.
/set %dosya giris.txt « şeklinde değişkene dosya adını belirtirsin veya
%dosya değerini » giris.txt olarak değiştirirsin sorun çözülür gibi duruyor.