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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Operatorler hakkında giriş çıkış bilgisi (https://www.ircforumlari.net/mirc-scripting-sorunlari/201176-operatorler-hakkinda-giris-cikis-bilgisi.html)

pent 22 Nisan 2009 14:39
Operatorler hakkında giriş çıkış bilgisi
 
Merhabalar forumda çok baktım onlines takip konusu vs. vardı onlarada bakdım ama benim istediğim o değil varsada kusura bakmayın arkadaşlar.
Şimdi benim istediğim şu #x kanalına % halfop ve üzeri prefix ile giriş yapan bir nick mIRC'in ana klasöründe bulunan takip klasörüne nicki.txt şeklinde eklenicek örneğin pent nicki #x kanalına % ve üzeri yetki ile girdiğinde takip klasörünün içine pent.txt şeklinde eklenicek. Esas mesele şu o nick'in #x kanalına ne zaman join ne zaman part yaptığı bilgilerini almak #y kanalında !takip nick denildiğinde örneğin: pent nick'i 22/04/2009 (çarşamba günü) saat 13:05 de #x kanalına giriş yaptı.
pent nick'i 22/04/2009 (çarşamba günü) saat 14:05 de #x kanalından çıkış yaptı. gibi...
Bu bilgiler her nick için çıkış/giriş yaptıklarında takip klasöründe bulanan kendi txt dosyalarına alt alta işlenicek.
#y kanalında !takip nick denildiğinde belirttiğimiz nickin takip klasöründeki txt dosyasını kanala sıralıcak.

yardımlarınızı bekleyeceğim arkadaşlar hepinize teşekkürler.

Regex 22 Nisan 2009 15:12
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
İstediğin kodu yazdım. Tam, yukarıda anlattığın gibi çalışır. Denemedim fakat sanırım, sorun olmaz. İşte kod:

Kod:
on !*:join:#X:$iif(!$isfile($+($mircdirtakip\,$nick,.txt)),write $+(takip\,$nick,.txt)) | write $+(takip\,$nick,.txt) $+([,$date,-,$time,]) #X kanalına girdi.
on !*:part:#X:$iif(!$isfile($+($mircdirtakip\,$nick,.txt)),write $+(takip\,$nick,.txt)) | write $+(takip\,$nick,.txt) $+([,$date,-,$time,]) #X kanalından çıktı.
on $*:text:/^!takip ?/i:#Y:{
  if (!$isfile($mircdirtakip\,$+($2,.txt))) .msg # Hata: $2 rumuzuna ait bir kayıt yok.
  else { .msg # $2 rumuzuna ait kayıtlar listeleniyor. | var %z = 1 | while ($read($+(takip\,$2,.txt),%z)) { .msg # $v1 | inc %z } }
}

Umarım işine yarar.

pent 22 Nisan 2009 17:46
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
üstad eline emeğine sağlık. şimdi burda halfop ve üzeri yetki ile giriş yapanları takip listesine eklicek değil mi her gireni çıkanı değil yani?

Regex 22 Nisan 2009 19:04
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
Evet, o dediğini eklememiştim. Aylardır IRCForumlari'nda bu biçimde -isteğe göre ve yardım amaçlı- kod yazmıyorum, yeniden ısınırken böyle ufak tefek gözden kaçırmalar olabiliyor.

Kod:
on !*:join:#X:.timer 1 2 $okya(#,$nick)
on !*:part:#X:if ($isfile($+($mircdirtakip\,$nick,.txt))) write $+(takip\,$nick,.txt) $+([,$date,-,$time,]) #X kanalından çıktı.
on $*:text:/^!takip ?/i:#Y:{
  if (!$isfile($mircdirtakip\,$+($2,.txt))) .msg # Hata: $2 rumuzuna ait bir kayıt yok.
  else { .msg # $2 rumuzuna ait kayıtlar listeleniyor. | var %z = 1 | while ($read($+(takip\,$2,.txt),%z)) { .msg # $v1 | inc %z } }
}
alias -l okya if ($regex($nick($1,$2).pnick,/^(%|@|&|~)/)) { $iif(!$isfile($+($mircdirtakip\,$2,.txt)),write $+(takip\,$2,.txt)) | write $+(takip\,$2,.txt) $+([,$date,-,$time(HH:nn),:,$calc($+($time(ss),-2)),]) #X kanalına girdi. }

Biraz kodu değiştirdim. Kanala yapılan girişten, iki saniye sonra prefix (+h, +o, +a veya +q) kontrolü yapıyor ve eğer kontrol olumluysa, saat kısmından iki saniye düşürerek bilgiyi kayıt ediyor. Aynı şekilde kanaldan çıkışlarda da bu kontrolü yapamayacağımız için -sonuçta kullanıcı kanaldan ayrılmış- eğer daha önce herhangi bir giriş yapıldıysa, çıkışları kayıt ediyor.

Umarım işine yarar.

pent 22 Nisan 2009 23:51
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
üstad başını çok ağrıttık ama son olarak bunları komple y kanalında !tsıfırla yaptığımızda bu takip kayıtlarını komple sıfırlanması ve !tsil nick yaptığımızda belirttiğimiz nick'in takip txt'sini silmek için kodu uyarlarsan minnettar kalırım emeğine sağlık çok tşkler.

pent 23 Nisan 2009 12:27
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
Regex bakcan mı üstad?

Regex 23 Nisan 2009 12:43
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
Yukarıda verdiğim, on TEXT eventını aşağıdakiyle değiştirdiğinde istediğin olacaktır. Diğer kodlarda herhangi bir değişiklik yapma. Sadece, bu eventı sil ve aşağıdakini ekle. İşte kod:

Kod:
on *:text:*:#Y:{
  if ($regex($1-,/^!takip ?/i)) {
    if (!$isfile($mircdirtakip\,$+($2,.txt))) .msg # Hata: $2 rumuzuna ait bir kayıt yok.
  else { .msg # $2 rumuzuna ait kayıtlar listeleniyor. | var %z = 1 | while ($read($+(takip\,$2,.txt),%z)) { .msg # $v1 | inc %z } }
  }
  if ($regex($1-,/!sıfırla$/Ai)) { .msg # $findfile($mircdirtakip,*.txt,0) adet dosya siliniyor. | var %* = 1 | while ($findfile($mircdirtakip,*.txt,%*)) { .remove $v1 | inc %* } | .msg # Dosyalar silindi. }
  if ($regex($1,/!tsil$/Ai) && $2) {
    if (!$isfile($+($mircdirtakip\,$2.txt))) .msg # Hata: Dosya bulunamadı.
    else { .remove $+($mircdirtakip\,$2,.txt) | .msg # $2 rumuzuna ait veriler silindi. }
}

Not: "Bakacak mısın? Yardım edecek misin? Nerede bu devlet?" gibi iletiler eklemen hoş değil. Sonuçta, burada kimseye yardım etmek zorunda değiliz. Başlığı yeni gördüm (bölüme yeni baktım); sen, bu iletiyi eklememiş olsaydın da yine yardımcı olacaktım. Ayrıca, flood yapmak zaten kurallar gereği de yasaktır.

Kolay gelsin.

pent 23 Nisan 2009 13:01
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
Üstad başlık aşşağıda kaldı diye yazdım yoksa tabikide bi zorunluluğun yok çok sayıda kullanıcı konu açtığı için konu baya bi aşağı sarktı o sebeple k.bakma saol tüm yardımların için.

pent 23 Nisan 2009 16:30
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
Regex üstad !tsil nick diyorum hiç bi tepki yok , !tsıfırla diyorum hiç bi tepki yok

Regex 23 Nisan 2009 17:18
Cevap: Operatorler hakkında giriş çıkış bilgisi
 
Düzelttim. Yukarıdan, kodu alabilirsin.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 01:37.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk