Konu: online takip
Tekil Mesaj gösterimi
Alt 26 Aralık 2008, 16:44   #24
Çevrimdışı
Difuzyon
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: online takip




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#zurna@: { if ($1 == !onlines) { if (!$2) { return } if !$var($+(%,$replace($2,[,~,],~)),0) { msg # $2 'nin henüz online süresi yok. | return } if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg # $2 Listede ekli değil | return } kayit $replace($2,[,~,],~) msg # 4 $str(-,10) $2 nicki için takip listesi $str(-,10) .play $+(-t,$replace($2,[,~,],~)) # takip.ini 300 $+(.timerlist,$2) 1 3 msg # 4 $str(-,10) Listenin sonu $str(-,10) } if !$istok(sniper ahmet mehmet,$nick,32) { return } if ($1 == !ekle) { if (!$2) { return } if ($2 == $me) { msg # Beni takip listesine alamazsın $nick $+ :) | return } if ($ini(takip.ini,$replace($2,[,~,],~))) { msg #  $+ $2  nicki zaten listede ekli durumda. | return } else { writeini -n takip.ini $replace($2,[,~,],~) Pazartesi 0 writeini -n takip.ini $replace($2,[,~,],~) Salı 0 writeini -n takip.ini $replace($2,[,~,],~) Çarşamba 0 writeini -n takip.ini $replace($2,[,~,],~) Perşembe 0 writeini -n takip.ini $replace($2,[,~,],~) Cuma 0 writeini -n takip.ini $replace($2,[,~,],~) Cumartesi 0 writeini -n takip.ini $replace($2,[,~,],~) Pazar 0 .auser takip $2 msg #  $+ $2  nicki online listesine eklenmiştir. if ($2 ison #zurna) { $+(.timertakip,$2) 0 1 inc -e $+(%,$replace($2,[,~,],~)) } } } if ($1 == !sil) { if (!$2) { return } if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg # $2 Listede ekli değil | return } else { .remini takip.ini $replace($2,[,~,],~) | .ruser takip $2 | msg # $2 Listeden silindi. if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$replace($2,[,~,],~)) } } } if ($1 == !sıfırla) { var %\ = $ulist(*,takip,0) while %\ { $+(.timertakip,$ulist(*,takip,%\)) off set $+(%,$replace($ulist(*,takip,%\),[,~,],~)) 0 writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazartesi 0 writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Salı 0 writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Çarşamba 0 writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Perşembe 0 writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cuma 0 writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cumartesi 0 writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazar 0 if ($ulist(*,takip,%\) ison #zurna) { $+(.timertakip,$ulist(*,takip,%\)) 0 1 inc -e $+(%,$replace($ulist(*,takip,%\),[,~,],~)) } dec %\ } msg # Tüm online süreleri sıfırlanıp yeniden başlatılmıştır. } if ($1 == !temizle) { write -c takip.ini var %\ = $ulist(*,takip,0) while %\ { $+(.timertakip,$ulist(*,takip,%\)) off .timer 1 1 unset $+(%,$replace($ulist(*,takip,%\),[,~,],~)) .ruser takip $ulist(*,takip,%\) dec %\ } msg # Tüm online takip listesi içeriğiyle beraber tamamen temizlenmiştir. } } on takip:join:#zurna: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) } on takip:part:#zurna:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $replace($nick,[,~,],~) } } on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $replace($nick,[,~,],~) } } alias kayit { .remini takip.ini $1 $gün | writeini -n takip.ini $1 $gün $replace($duration($($+(%,$1),2)),mins,Dakika,hrs,Saat,secs,Saniye,min,Dakika,hr,Saat,sec,Saniye,day,Gün,days,Gün) } alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,sunday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday,Cumartesi,tuesday,Salı,thursday,Perşembe) }

#zurna@ kanalında bulunan herkes !onlines nick komutunu uygulayabilir.
Diğer komutları uygulamaya yetkili nickler belirtilmiştir.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet sohbet