[moonshield]

Alıntı:

on master:join:#Ankara: { $+(timer,$nick) 0 1 inc -e $+(%,$nick) } on masterart:#Ankara: { if $timer($nick) { | $+(timer,$nick) off } write $+($nick,.txt) $date tarihinde $time saatinde $replace($duration($($+(%,$nick),2)),mins,Dakika,h rs,Saat,secs,Saniye'dir,min,Dakika,hr,Saat,sec,San iye) online olmuştur | unset $+(%,$nick) } on *:quit: { if $timer($nick) { $+(.timer,$nick) off } write $+($nick,.txt) $date tarihinde $time saatinde $replace($duration($($+(%,$nick),2)),mins,Dakika,h rs,Saat,secs,Saniye'dir,min,Dakika,hr,Saat,sec,San iye) online olmuştur | unset $+(%,$nick) } on *:text:*:#IRCMaster: { if !goster == $$1 { var %Saat $lines($+($2,.txt)) while (%Saat > 0) { msg #IRCmaster $2 $read($+($2,.txt),%Saat) | dec %Saat } } } on 1:deop:#Ankara: { if $timer($nick) { | $+(timer,$nick) off } }

Abicim Bu Kod Kanala Giren Çıkan Bütün Nickleri Tutuyor ve Hepsine Tek Tek txt Acıyor Ben Diyorum ki Sadece #ahmet Kanalına Giren Nicklerin Kayıtlarını Tutsun ve Hepsini nickonline.txt Dosyasında Tutsun. ve Aşağıdaki gibi Kayıt etsin Kolay Gelsin Simdiden ellerinize Sağlık

Alıntı:

NaTSuKa 08/08/2006 15:29:05 tarihinde 3Saniye online olmuştur NaTSuKa 08/08/2006 15:30:02 tarihinde 1dakika 13Saniye online olmuştur NaTSuKa 08/08/2006 15:30:17 tarihinde 15Saniye online olmuştur

[moonshield]

Abi Kimse Bilmiyomu Ya Sunu Yapalım HelpBotu tamamlıcam İnş.

[bLaCkdeviL]

Moonshield bir txt de toplasın istemişsin öle denedim yapamadım ama söle bir kod yaptm kanal giren nickleri takip dosyasına kanaldan bir şekilde çıkış yapan nickleride çıkış dosyasında tutuyor ve script her acıldıgında bu dosyalar temizleniyor...

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

on *:join:#kanaladı: { write -s $+ $nick Takip\ $+ $nick $+ .txt $nick $date $time Online olmustur. }
on *:part:#kanaladı: { write -s $+ $nick Çıkış\ $+ $nick $+ .txt $nick $date $time Part Olmustur. }
on *:kick:#kanaladı: { write -s $+ $nick Çıkış\ $+ $nick $+ .txt $nick $date $time Kanaldan Atılmıştır. }
on *:quit: { write -s $+ $nick Çıkış\ $+ $nick $+ .txt $nick $date $time Sunucudan Çıkmıştır. }
on *:text:*:#kanaladı: { 
  if $1 == !takip { takip $chan $2 $+ .txt | cıkıs $chan $2 $+ .txt }
}
alias takip {
  if ($findfile($shortfn($mircdirTakip),$2-,1)) { 
    var %ia 1,%za $ifmatch
    while %ia <= $len(%za) {
      $iif($read(%za,%ia),msg $1 $read(%za,%ia))  
      inc %ia 
    }
  }
  else {
    msg $1 Nickin Giriş anındaki takibi bulunamadı.. 
  }
}
alias cıkıs {
  if ($findfile($shortfn($mircdir&#199;ıkış),$2-,1)) { 
    var %ia 1,%za $ifmatch
    while %ia <= $len(%za) {
      $iif($read(%za,%ia),msg $1 $read(%za,%ia)) 
      inc %ia 
    }
  }
  else {
    msg $1 Nickin &#199;ıkış anındaki takibi bulunamadı.. 
  }
}
alias sila {
  var %s = $findfile(takip\,*.txt,0)
  while (%s) {
    dec %s
    return $findfile(takip\,*.txt,0,.remove $+(",$1-,"))
  }
}
alias silb {
  var %s = $findfile(&#231;ıkış\,*.txt,0)
  while (%s) {
    dec %s
    return $findfile(&#231;ıkış\,*.txt,0,.remove $+(",$1-,"))
  }
}
on *:start:{ sila | silb }

Örnek olarak bunları verebilirim...

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

[12:20] <KGS> !takip karanlik
[12:20] <CaLvin> KaranLik 04/02/2007 12:13:10 Online olmustur.
[12:20] <CaLvin> KaranLik 04/02/2007 12:13:10 Part Olmustur.
[12:21] <KGS> !takip TeQuiLa
[12:21] <CaLvin> Nickin Giriş anındaki takibi bulunamadı..
[12:21] <CaLvin> TeQuiLa 04/02/2007 12:14:34 Part Olmustur.
[12:24] <KGS> !takip KaLpSiZzZ
[12:24] <CaLvin> KaLpSiZzZ 04/02/2007 12:18:50 Online olmustur.
[12:24] <CaLvin> KaLpSiZzZ 04/02/2007 12:24:36 Sunucudan &#199;ıkmıştır.