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/)
-   -   online takip (https://www.ircforumlari.net/mirc-scripting-sorunlari/544460-online-takip.html)

Bilecikli 26 Ağustos 2013 21:04

online takip
 
Kod:

on *:start:{  .hmake Voice | .hload -o Voice Voice.mercy  .hmake DeVoice | .hload -o DeVoice DeVoice.mercy  .hmake Ban | .hload -o Ban Ban.mercy  .hmake UnBan | .hload -o UnBan UnBan.mercy  .hmake Kick | .hload -o Kick Kick.mercy  .hmake Onlines | .hload -o Onlines Onlines.mercy } alias on return $replace($duration($1-),secs,Saniye,mins,Dakika,hrs,Saat,day,Gün,wk,Hafta,min,Dakika,Hr,Saat,sec,Saniye) alias hekle { if !$hget($2) { .hmake $2 100 } | if !$hget(Nickler) { .hmake Nickler 100 } | .hinc -ms $2 $1 | .hsave -o $2 $+($2,.mercy) | .hinc -ms Nickler $1 | .hsave -o Nickler Nickler.mercy } on *:join:#OyunTeam:{ if $regex($site,/(root|admin|ircop|oper|techinal|system)/i) { return } | $+(.timeronline,$nick) 0 1 .hinc -ms Online $nick }  on *:part:#OyunTeam:{ if $regex($site,/(root|admin|ircop|oper|techinal|system)/i) { return } | $+(.timeronline,$nick) off | .hsave -o Online Online.mercy  } on *:quit:{ if !$hget(Online) { return } | $+(.timeronline,$nick) off | .hsave -o Online Online.mercy } on *:nick:{ if $hget(Online,$nick) { $+(.timeronline,$nick) off  | $+(.timeronline,$newnick) 0 1 .hinc -ms Online $newnick | .hsave -o Online Online.mercy } } on *:kick:#Oyun:{ if $nick isop # || $nick ishop # { .hekle $nick kick } } on *:text:*:#Oyun:{ if $nick isop # || $nick ishop # { if !$hget(Text) { .hmake Text 100 } | .hinc -ms Text $nick $len($remove($1-,$chr(32))) | .hsave -o Text Text.mercy } }  on *:rawmode:#Oyun:{  if $nick isop # || $nick ishop # {    if ($regex($1,\+(v))) { .hekle $nick voice }    if ($regex($1,\-(v))) { .hekle $nick devoice }    if ($regex($1,\+(b))) { .hekle $nick ban }    if ($regex($1,\-(b))) { .hekle $nick unban }  } } on *:input:#OyunTeam:{  if ($1 == !onlines) {    if !$2 { if ($hget(Online,0).data == 0) { msg # Takip listesinde kayıt bulunmamaktadır. | return } | var %:ons 1 | while %:ons <= $hget(Online,0).data { msg # [ $hget(Online,%:ons).item ] Onlinesi: $iif($hget(Online,%:ons).data,$on($hget(Online,%:ons).data),Yok) | inc %:ons } }    if $2 == sıfırla { if ($hget(Online,0).data == 0) { msg # Takip listesinde kayıt bulunmamaktadır. | return } | .hfree -sw Online | .hmake Online | .hload -o Online Online.mercy | msg # Takip listesi sıfırlandı. | .timeronline* off | return }    if $2 { if !$hget(Online,$2) { msg # [ $2 ] Takip listesinde bulunmamaktadır. | return } | msg # [ $2 ] Onlinesi: $iif($hget(Online,$2),$on($hget(Online,$2)),Yok) }  }  if ($1 == !sil) {    if (!$2) { echo -a Nick belirtiniz. | return }    if $hget(Online) { .hdel -ms Online $2 | .hsave -o Online Online.mercy }    if $hget(Voice) { .hdel -ms Voice $2 | .hsave -o Voice Voice.mercy }    if $hget(DeVoice) { .hdel -ms DeVoice $2 | .hsave -o DeVoice DeVoice.mercy }    if $hget(Ban) { .hdel -ms Ban $2 | .hsave -o Ban Ban.mercy }    if $hget(Unban) { .hdel -ms UnBan $2 | .hsave -o UnBan UnBan.mercy }      if $hget(Kick) { .hdel -ms Kick $2 | .hsave -o Kick Kick.mercy }    if $hget(Nickler) { .hdel -ms Nickler $2 | .hsave -o Nickler Nickler.mercy }    msg # [ $2 ] Ait istatikler silindi.. | $+(.timeronline,$2) off  }  if ($1 == !istatistik) {    if ($2 == sıfırla) {      if $hget(Online) { .hfree -sw Online | .hmake Online | .hsave -o Online Online.mercy }      if $hget(Voice) { .hfree -sw Voice | .hmake Voice | .hsave -o Voice Voice.mercy }      if $hget(Devoice) { .hfree -sw Devoice | hmake DeVoice | .hsave -o DeVoice DeVoice.mercy }      if $hget(Ban) { .hfree -sw Ban | hmake Ban | .hsave -o Ban Ban.mercy }      if $hget(Unban) { .hfree -sw UnBan | .hmake UnBan | .hsave -o UnBan UnBan.mercy }      if $hget(Kick) { .hfree -sw Kick | .hmake Kick | .hsave -o Kick Kick.mercy }      msg # İstatikler'ler sıfırlandı      return    }    if $2 { if !$hget(Nickler,$2) { msg # [ $2 ] Ait hiç bir bilgi bulunmamaktadır. | return } | msg # Voice: $iif($hget(Voice,$2),$hget(Voice,$2),Yok) Devoice: $iif($hget(Devoice,$2),$hget(Devoice,$2),Yok) Ban: $iif($hget(Ban,$2),$hget(Ban,$2),Yok) UnBan: $iif($hget(UnBan,$2),$hget(UnBan,$2),Yok) Kick: $iif($hget(Kick,$2),$hget(Kick,$2),Yok) }  }  if ($1 == !istatikler) {    if ($hget(Nickler,0).data == 0) { msg # İstatik listesinde kayıt bulunmamaktadır. | return }    msg # İstatikler.    msg #     var %:ist 1 | while %:ist <= $hget(Nickler,0).data {      msg # [ $hget(Nickler,%:ist).item ] Voice: $iif($hget(Voice,$hget(Nickler,%:ist).item),$hget(Voice,$hget(Nickler,%:ist).item),Yok) Devoice: $iif($hget(Devoice,$hget(Nickler,%:ist).item),$hget(Devoice,$hget(Nickler,%:ist).item),Yok) Ban: $iif($hget(Ban,$hget(Nickler,%:ist).item),$hget(Ban,$hget(Nickler,%:ist).item),Yok) UnBan: $iif($hget(UnBan,$hget(Nickler,%:ist).item),$hget(UnBan,$hget(Nickler,%:ist).item),Yok) Kick: $iif($hget(Kick,$hget(Nickler,%:ist).item),$hget(Kick,$hget(Nickler,%:ist).item),Yok)      inc %:ist    }    msg #     msg # The end.  } }
Selamun aleyküm arkadaşlar, elimde böyle bir kod var. Sizden ricam tabi uygunsa; online takip bölümünün mIRC`te kalıcı bir kayıt yapması ve #Oyunteam kanalına giriş yaptığımda o an kanalda bulunanların online bilgilerini de kayıt etmesidir. İstatistik bölümü mIRC kapanıp açılsa bile kayıt etmeye devam ediyor fakat, online bölümü kayıt etmiyor. Yardımlarınız için şimdiden teşekkür ederim.

NOT: Kod alıntıdır. Kod sahibi @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] .

Bilecikli 27 Ağustos 2013 13:09

Cevap: online takip
 
ALLAH rızası i&#231;in l&#252;tfen şu kodda yardımcı olacak kimse yokmu

Bilecikli 28 Ağustos 2013 17:53

Cevap: online takip
 
* /hload: A&#231;ılamıyor '\\Win7\c\mIRC Pro\Onlines.mercy' (Satır 7, istatistik.txt)
-

mIRC a&#231;ılırken her defasında bu hatayı veriyor. Bu kodu mIRC ana klas&#246;r&#252;ne istatistik.txt adı ile kayıt ettim. İstatistik kısmında mIRC`e kalıcı kayıt yapıyor fakat online kısmında mIRC kapatılıp a&#231;ılınca sıfırdan başlıyor bilgiler. Bir de, #Oyunteam kanalına girdiğimde kanalda bulunan op / sopların bilgilerini işlemiyor (online)

Bilecikli 28 Ağustos 2013 19:33

Cevap: online takip
 
Alıntı:

Toprak Nickli Üyeden Alıntı (Mesaj 1041332398)
1. mIRC klasörü içine Onlines.mercy dosyası açın hatayı almassınız.
2. O istediginiz kanala girişte bütün operatörlere whois çekip online zamanlarını ekliyeceksiniz ama oper/admin degilseniz boşuna eklemeyin düşersiniz..

Onlines.mercy dosyası zaten mevcut, fakat mIRC kapanıp açıldığında Onlines.mercy dosyasının içeriği sıfırlanıp tekrar baştan online bilgileri ekleniyor.
Oper/Admin değilim fakat zaten kanala girdiğimde toplam op/sop sayısı 3`ü geçmiyor. Yine de düşermiyim?

Bilecikli 28 Ağustos 2013 23:58

Cevap: online takip
 
peLinnn
5
Bilecikli
5
Okyanus
5


Her defasında sıfırlanıyor :S İstatistikte b&#246;yle bir sıkıntı yok ama

Bilecikli 29 Ağustos 2013 16:56

Cevap: online takip
 
Dediğin gibi whois &#231;ektim nicklere. D&#252;şme yaşamadım fakat online s&#252;releri eklenmedi.
#Oyunteam kanalında /hop uygulatırsam ekleniyor s&#252;reler. O şu aşama da benim i&#231;in pek &#246;nemli değil aslında. Asıl sorunum online bilgileri mIRC kapatılıp a&#231;ıldığında otomatik sıfırlanıyor. Bu sıkıntı yaratıyor. Nickim g&#252;n boyu olmasada , g&#252;n&#252;n &#37;80 i sunucu da kalıyor. Ama kalıcı kayıt yapmadığı i&#231;in kodu eklemiyorum. Bu sorunuma &#231;&#246;z&#252;m bulabilecek varsa yardım edebilir mi acaba?

Bilecikli 02 Eylül 2013 19:51

Cevap: online takip
 
Canınınız sağolsun arkadaşlar ne diyim. Vaktinizi aldım her zamanki gibi . İyi IF`ler.

Bilecikli 27 Eylül 2013 05:00

Cevap: online takip
 
Bu konu da bana yardımcı olabilecek kimse yok sanırım

Feragat 27 Eylül 2013 07:14

Cevap: online takip
 
Alıntı:

Bilecikli Nickli Üyeden Alıntı (Mesaj 1041346493)
Bu konu da bana yardımcı olabilecek kimse yok sanırım

Kod:

on *:start:{ 
  if ($isfile(Voice.mercy)) { .hmake Voice | .hload -o Voice Voice.mercy }
  if ($isfile(DeVoice.mercy)) { .hmake DeVoice | .hload -o DeVoice DeVoice.mercy }
  if ($isfile(Ban.mercy)) { .hmake Ban | .hload -o Ban Ban.mercy }
  if ($isfile(UnBan.mercy)) { .hmake UnBan | .hload -o UnBan UnBan.mercy }
  if ($isfile(Kick.mercy)) { .hmake Kick | .hload -o Kick Kick.mercy }
  if ($isfile(Online.mercy)) { .hmake Online | .hload -o Online Online.mercy }
}

on *:connect:.timerophashekle 1 30 ophash #OyunTeam
alias ophash {
  var %hs = 1
  while %hs <= $nick($1,0) {
    if !$istok(nick1 nick3 nick3 nick4,$nick($1,%hs),32) && $regex($nick($1,%hs).pnick,/^(@|&)/) {
      $+(.timeronline,$nick($1,%hs)) 0 1 .hinc -ms Online $nick($1,%hs)
    }
    inc %hs
  }
}

alias on return $replace($duration($1-),secs,Saniye,mins,Dakika,hrs,Saat,day,Gün,wk,Hafta,min,Dakika,Hr,Saat,sec,Saniye)
alias hekle { if !$hget($2) { .hmake $2 100 } | if !$hget(Nickler) { .hmake Nickler 100 } | .hinc -ms $2 $1 | .hsave -o $2 $+($2,.mercy) | .hinc -ms Nickler $1 | .hsave -o Nickler Nickler.mercy }
on *:join:#OyunTeam:{ if $regex($site,/(root|admin|ircop|oper|techinal|system)/i) { return } | $+(.timeronline,$nick) 0 1 .hinc -ms Online $nick } 
on *:part:#OyunTeam:{ if $regex($site,/(root|admin|ircop|oper|techinal|system)/i) { return } | $+(.timeronline,$nick) off | .hsave -o Online Online.mercy  }
on *:quit:{ if !$hget(Online) { return } | $+(.timeronline,$nick) off | .hsave -o Online Online.mercy }
on *:nick:{ if $hget(Online,$nick) { $+(.timeronline,$nick) off  | $+(.timeronline,$newnick) 0 1 .hinc -ms Online $newnick | .hsave -o Online Online.mercy } }
on *:kick:#Oyun:{ if $nick isop # || $nick ishop # { .hekle $nick kick } }
on *:text:*:#Oyun:{ if $nick isop # || $nick ishop # { if !$hget(Text) { .hmake Text 100 } | .hinc -ms Text $nick $len($remove($1-,$chr(32))) | .hsave -o Text Text.mercy } } 
on *:rawmode:#Oyun:{ 
  if $nick isop # || $nick ishop # {   
    if ($regex($1,\+(v))) { .hekle $nick voice }   
    if ($regex($1,\-(v))) { .hekle $nick devoice }   
    if ($regex($1,\+(b))) { .hekle $nick ban }   
    if ($regex($1,\-(b))) { .hekle $nick unban } 
  }
}
on *:input:#OyunTeam:{ 
  if ($1 == !onlines) {   
    if !$2 { if ($hget(Online,0).data == 0) { msg # Takip listesinde kayıt bulunmamaktadır. | return } | var %:ons 1 | while %:ons <= $hget(Online,0).data { msg # [ $hget(Online,%:ons).item ] Onlinesi: $iif($hget(Online,%:ons).data,$on($hget(Online,%:ons).data),Yok) | inc %:ons } }   
    if $2 == sıfırla { if ($hget(Online,0).data == 0) { msg # Takip listesinde kayıt bulunmamaktadır. | return } | .hfree -sw Online | .hmake Online | .hload -o Online Online.mercy | msg # Takip listesi sıfırlandı. | .timeronline* off | return }   
    if $2 { if !$hget(Online,$2) { msg # [ $2 ] Takip listesinde bulunmamaktadır. | return } | msg # [ $2 ] Onlinesi: $iif($hget(Online,$2),$on($hget(Online,$2)),Yok) } 
  } 
  if ($1 == !sil) {   
    if (!$2) { echo -a Nick belirtiniz. | return }   
    if $hget(Online) { .hdel -ms Online $2 | .hsave -o Online Online.mercy }   
    if $hget(Voice) { .hdel -ms Voice $2 | .hsave -o Voice Voice.mercy }   
    if $hget(DeVoice) { .hdel -ms DeVoice $2 | .hsave -o DeVoice DeVoice.mercy }   
    if $hget(Ban) { .hdel -ms Ban $2 | .hsave -o Ban Ban.mercy }   
    if $hget(Unban) { .hdel -ms UnBan $2 | .hsave -o UnBan UnBan.mercy }     
    if $hget(Kick) { .hdel -ms Kick $2 | .hsave -o Kick Kick.mercy }   
    if $hget(Nickler) { .hdel -ms Nickler $2 | .hsave -o Nickler Nickler.mercy }   
    msg # [ $2 ] Ait istatikler silindi.. | $+(.timeronline,$2) off 
  } 
  if ($1 == !istatistik) {   
    if ($2 == sıfırla) {     
      if $hget(Online) { .hfree -sw Online | .hmake Online | .hsave -o Online Online.mercy }     
      if $hget(Voice) { .hfree -sw Voice | .hmake Voice | .hsave -o Voice Voice.mercy }     
      if $hget(Devoice) { .hfree -sw Devoice | hmake DeVoice | .hsave -o DeVoice DeVoice.mercy }     
      if $hget(Ban) { .hfree -sw Ban | hmake Ban | .hsave -o Ban Ban.mercy }     
      if $hget(Unban) { .hfree -sw UnBan | .hmake UnBan | .hsave -o UnBan UnBan.mercy }     
      if $hget(Kick) { .hfree -sw Kick | .hmake Kick | .hsave -o Kick Kick.mercy }     
      msg # İstatikler'ler sıfırlandı     
      return   
    }   
    if $2 { if !$hget(Nickler,$2) { msg # [ $2 ] Ait hiç bir bilgi bulunmamaktadır. | return } | msg # Voice: $iif($hget(Voice,$2),$hget(Voice,$2),Yok) Devoice: $iif($hget(Devoice,$2),$hget(Devoice,$2),Yok) Ban: $iif($hget(Ban,$2),$hget(Ban,$2),Yok) UnBan: $iif($hget(UnBan,$2),$hget(UnBan,$2),Yok) Kick: $iif($hget(Kick,$2),$hget(Kick,$2),Yok) } 
  } 
  if ($1 == !istatikler) {   
    if ($hget(Nickler,0).data == 0) { msg # İstatik listesinde kayıt bulunmamaktadır. | return }   
    msg # İstatikler.
    msg # 
    var %:ist 1 | while %:ist <= $hget(Nickler,0).data {     
      msg # [ $hget(Nickler,%:ist).item ] Voice: $iif($hget(Voice,$hget(Nickler,%:ist).item),$hget(Voice,$hget(Nickler,%:ist).item),Yok) Devoice: $iif($hget(Devoice,$hget(Nickler,%:ist).item),$hget(Devoice,$hget(Nickler,%:ist).item),Yok) Ban: $iif($hget(Ban,$hget(Nickler,%:ist).item),$hget(Ban,$hget(Nickler,%:ist).item),Yok) UnBan: $iif($hget(UnBan,$hget(Nickler,%:ist).item),$hget(UnBan,$hget(Nickler,%:ist).item),Yok) Kick: $iif($hget(Kick,$hget(Nickler,%:ist).item),$hget(Kick,$hget(Nickler,%:ist).item),Yok)     
      inc %:ist   
    }   
    msg #
    msg # The end. 
  }
}

mIRC i kapatıp açtığında Online bilgilerini sıfırlamaz artık.
Sunucuya bağlandıktan 30 saniye sonra #OyunTeam kanalında online olan opları ve sopları da Listede yoklarsa Online listesine ekler..(Sen kanala yeni girdiğinde online olan Op ve sopları tabloya eklediğinde Online süresini sıfır(0) saniyeden başlatır, bilgine. /hop yaptırmaman için)(Renkli kısıma muaf nick ekleyebilirsin.). Süreyi kendine göre ayarlayıp değiştirebilirsin.
İyi forumlar.

Bilecikli 03 Kasım 2013 13:29

Cevap: online takip
 
online bilgilerini sıfırlamıyor ama bu defa da istatistik bilgileri sıfırlanıyor :S

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 13:29 -->-> Daha önceki mesaj 13:23 --

[13:29:01] «@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]» !istatikler
[13:29:01] <Bilecikli> İstatikler.
* /msg: Yetersiz veya eksik parametre (Satır 70, istatistik.txt)

Bunu veriyor her defasında


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

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net