Kodda Hata Var Online Takip - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

moonshield · 02 Şubat 2007, 13:00

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 · 02 Şubat 2007, 14:07

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

bLaCkdeviL · 04 Şubat 2007, 12:25

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 &#199;ıkış\ $+ $nick $+ .txt $nick $date $time Part Olmustur. }
on *:kick:#kanaladı: { write -s $+ $nick &#199;ıkış\ $+ $nick $+ .txt $nick $date $time Kanaldan Atılmıştır. }
on *:quit: { write -s $+ $nick &#199;ıkış\ $+ $nick $+ .txt $nick $date $time Sunucudan &#199;ı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.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Kodda Hata	TİGeR	mIRC Scripting Sorunları	1	30 Nisan 2014 21:21
Kodda Hata	moonman	mIRC Scripting Sorunları	9	25 Şubat 2012 19:27
Bu kodda hata nerde?	Bleda	mIRC Scripting Sorunları	14	19 Haziran 2005 19:45
Kodda 1 Hata var ama bulamadım ?	Requiem	mIRC Scripting Sorunları	1	26 Mayıs 2005 20:42
bu kodda hata ne?	UOnur	mIRC Scripting Sorunları	2	27 Aralık 2004 13:44

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.