Konu: online takip
Tekil Mesaj gösterimi
  #1  
Alt 29 Ağustos 2013, 18:57
Avatar Yok
biLecikLi biLecikLi isimli Üye şimdilik offline konumundadır

mS Puan: 1
mS Derece: biLecikLi Meraklı
 
Üyelik tarihi: 22 Haziran 2013
Mesajlar: 4
Konular: 2
Eklentiler: 0
Alınan Teşekkür: 0
Yapılan Teşekkür: 0
Mentioned: 0 Post(s)
Tagged: 0 Thread(s)
Standart 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 Onlines.mercy  }
on *:quit:{ if !$hget(Online) { return } | $+(.timeronline,$nick) off | .hsave -o Online Onlines.mercy }
on *:nick:{ if $hget(Online,$nick) { $+(.timeronline,$nick) off  | $+(.timeronline,$newnick) 0 1 .hinc -ms Online $newnick | .hsave -o Online Onlines.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 Onlines.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 Onlines.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 Onlines.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.
  }
}
Kolay gelsin, elimde böyle bir kod var. Sizden ricam tabi uygunsa, online bölümünün mIRC`ime kalıcı kayıt yapmasını sağlamak ve #oyunteam kanalına girdiğimde bulunan kullanıcı/opların online bilgilerini otomatik olarak mIRC`e kayıt etmesini sağlamak için düzeltmeleri yapmanız yönünde olucaktır. Lütfen çok lazım olmazsa inanın kimseyi uğraştırmam. Şimdiden teşekkürler...
Alıntı ile Cevapla
Sponsored Links
 
1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76