!arsiv IP Nick

Aytac

Developer
Yönetici
Developer
Katılım
4 Şub 2020
Mesajlar
372
Tepkime puanı
17
Puanları
18
Konum
ircland
Web sitesi
www.ircalem.net
Sunucuda IRCop düzeyinde bulunan mirc botunuz yukarıdaki snotice satırlarını görebiliyorsa aşağıdaki kodu mirc botunuzun remote kısmına eklemeniz halinde;sunucuya giriş yapan veya sunucuda nick değiştiren nicki,ident bilgisini ve ip numarasını kayıt altına alacaktır.
Bir nevi giriş yapan tüm nick ve ip noları arşivleyecektir.

Bu kayıtlar bir metin belgesine yazdırılıp istem halinde (#KANAL'da uygulanacak komutlar) !arsiv IP veya !arsiv Nick komutlarını belirttiğiniz #kanal da uyguladığınızda istemde bulunan verileri filtreleyip size sunacaktır..

Kod:
on *:snotice:*:{
  if (*client*connect* iswm $1-) { 
    var %difyip = $remove($token($10,2,64),$chr(41)), %difynick = $9, %difyident = $remove($token($10,1,64),$chr(40))
    if $read(arsiv.txt,w,$+(*,%difyip,$chr(32),%difynick,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyip %difynick 14Ident: %difyident 02Son Girişi: $+($time,-,$date) 
  }
  elseif (*changed*his*her*nickname* iswm $1-) {
    var %difyzip = $remove($token($5,2,64),$chr(41)), %difynickz = $11, %difyidentz = $remove($token($5,1,64),$chr(40))
    if $read(arsiv.txt,w,$+(*,%difyzip,$chr(32),%difynickz,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt }
    write arsiv.txt %difyzip %difynickz 14Ident: %difyidentz 02Son Girişi: $+($time,-,$date) 
  }
}
;kod içerisindeki #KANAL kısmını kendinize göre değişebilirsiniz
on *:text:!arsiv &:#KANAL:{
  if $regex($2,/^\d+.\d+/) {
    if $read(arsiv.txt,r,/^\Q $+ $2 $+ \E\s/) { 
      msg $chan $2 arşivi listeleniyor 
      filter -ffcg arsiv.txt depo.txt /^\Q $+ $2 $+ \E\s/ 
      play $chan depo.txt 750
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
  if $regex($2,/^[^\d]/) {
    if $read(arsiv.txt,r,/[^:]\s\Q $+ $2 $+ \E\s/i) { 
      msg $chan $2 arşivi listeleniyor 
      filter -ffcg arsiv.txt depo.txt /[^:]\s\Q $+ $2 $+ \E\s/i 
      play $chan depo.txt 750 
    }
    else { msg $chan $2 arşivde bulunmuyor }
  }
}


Kode Sahibi: Difuzyon
 
Üst