Konu: online takip
Tekil Mesaj gösterimi
Alt 27 Eylül 2013, 07:14   #9
Çevrimiçi
Feragat
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: online takip




Bilecikli Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bu konu da bana yardımcı olabilecek kimse yok sanırım

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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.

__________________
The Ghost of Christmas Past...

i'm here sometimes

Konu Feragat tarafından (27 Eylül 2013 Saat 07:53 ) değiştirilmiştir. Sebep: ekleme
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet