on *:text:*:#kanal: { if ($1 == !ekle) { if (!$2) { return } | if ($2 == $me) { .msg # Beni takip listesine alamazsın $nick $+ :) | return } | if ($ini(takip.ini,$2)) { .msg # $2 zaten listede ekli. | return }
else { 
writeini -n takip.ini $2 Pazartesi 0
writeini -n takip.ini $2 Salı 0 
writeini -n takip.ini $2 Çarşamba 0 
writeini -n takip.ini $2 Perşembe 0
writeini -n takip.ini $2 Cuma 0
writeini -n takip.ini $2 Cumartesi 0
writeini -n takip.ini $2 Pazar 0
.auser takip $2 
.msg # $2 nicki takip listesine eklenmiştir. } }
if ($1 == !sil) { if (!$2) { return } | if (!$ini(takip.ini,$2)) { .msg # $2 Listede ekli değil | return } | else { .remini takip.ini $2 | .ruser takip $2 | .msg # $2 Listeden silindi. }
}
if ($1 == !takip) { if (!$2) { return } | if (!$ini(takip.ini,$2)) { .msg # $2 Listede ekli değil | return } | kayit $2 | msg # 4 $str(-,10) $2 nicki için takip listesi $str(-,10) | .play $+(-t,$2) # takip.ini 100 | $+(.timerlist,$2) 1 1 .msg # 4 $str(-,10) Listenin sonu $str(-,10) } }
on takip:join:#tkanal: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$nick) }
on *:part:#tkanal:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $nick } }
on *:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $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)
}
alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,sunday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday,Cumartesi,tuesday,Salı,thursday,Perşembe) }