Online takip

**RobinHo** · 05-02-11, 12:43

on *:text:*:#Opkanalı@: {
if ($1 == !online) {
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(OwnerNickyazın,$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 #TakibeaLıncakKAnal) { $+(.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 #Ankara) { $+(.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:#TakibeaLıncakKAnal: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) }
on takip:part:#TakibeaLıncakKAnal:{ 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,su nday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday ,Cumartesi,tuesday,Salı,thursday,Perşembe) }

KANALDAKİ BOTA BU CODEYİ EKLEMENİZ YETERLİDİR..

05-02-11, 12:43	#1
RobinHo Gençfenerbahçeliler Üyelik tarihi: Jan 2011 Yaş: 23 Mesajlar: 89 Konular: 60 Aldığı Teşekkür : 0 NF Puanı : 16 NF Seviyesi :	Online takip on :text::#Opkanalı@: { if ($1 == !online) { 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(OwnerNickyazın,$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 #TakibeaLıncakKAnal) { $+(.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 #Ankara) { $+(.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:#TakibeaLıncakKAnal: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) } on takip:part:#TakibeaLıncakKAnal:{ 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,su nday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday ,Cumartesi,tuesday,Salı,thursday,Perşembe) } KANALDAKİ BOTA BU CODEYİ EKLEMENİZ YETERLİDİR..* ________________ [Link Görmek ve Forumumuzdan Yararlanmak İçin Üye Olmasınız. ]

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Conquer Online 5173 indir online full indir download	Ezgi	Conquer Online	0	13-09-10 13:39
Cabal Online Nedir? Cabal Online Anlamı, Cabal Online Nasıl Oynanır, Cabal Online	Ezqi	Cabal Online	1	14-07-09 00:44
sarki da nle maceza k da nle yonca evcimik aayka m klibi online klip izle online ayar	NFCİNİ	Genel Konular	0	27-12-08 20:30
Nalçacıgil Online Kur döviz kuru takip programı	LideR	Genel Program Arşivi	0	05-09-08 02:36
IRC Services İçin Toplam Online Zamanı ( Total Online Time )	NF	IRC Services	2	02-09-07 21:39

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Input each user name separated by a comma, like so: User1,User2,User3.