Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:*: {
if ($1 == !onlines) {
if (!$2) { return }
if !$var($+(%,$replace($2,[,~,],~)),0) { msg $nick $2 'nin henüz online süresi yok. | return }
if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg $nick $2 Listede ekli değil | return }
kayit $replace($2,[,~,],~)
msg $nick 4 $str(-,10) $2 nicki için takip listesi $str(-,10)
.play $+(-t,$replace($2,[,~,],~)) $nick takip.ini 300
$+(.timerlist,$2) 1 3 msg $nick 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 $nick Beni takip listesine alamazsın $nick $+ :) | return }
if ($ini(takip.ini,$replace($2,[,~,],~))) { msg $nick $+ $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 $nick $+ $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 $nick $2 Listede ekli değil | return }
else { .remini takip.ini $replace($2,[,~,],~) | .ruser takip $2 | msg $nick $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 $nick 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 $nick Tüm online takip listesi içeriğiyle beraber tamamen temizlenmiştir.
}
}
on takip:join:#: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) }
on takip:part:#:{ 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) }