Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias yuzde3 { return $+($chr(40),%,$left($calc($hget($1,$2) * 100 / $hget($3,v)),4),$chr(41)) }
alias kapsa { return $+($chr(2),$1-,$chr(2)) }
alias pp { var %& = $numtok($findfile($mircdir,*.db,1),92) | var %j = 1, %k = $findfile($mircdir,*.db,0) | while %j <= %k { if $gettok($findfile($mircdir,*.db,%j),%&,92) != nickler.db { echo -a $gettok($findfile($mircdir,*.db,%j),%&,92) } | inc %j } | hfree -w * | unset %trh | voicesıfırla }
alias gun { return $replace($1,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar) }
alias helperler { if $1 { var %1 = 1,%2 = $nick($1,0),%3 | while %1 <= %2 { if $nick($1,%1) != $me { %3 = $addtok(%3,$nick($1,%1),32) } | inc %1 } } msg $2 %3 }
alias helpersil {
hdec voiceler v $hget(vc,$1)
hdel nickler $1 | hsave -i nickler nickler.db | hdel vc $1 | hsave -i vc vc.db
}
on *:start: {
if !%trh { set %trh $date }
if $isfile(nickler.db) { hmake nickler 100 | hload -i nickler nickler.db } | else { hmake nickler 100 | hsave -i nickler nickler.db }
if $isfile(voiceler.db) { hmake voiceler 100 | hload -i voiceler voiceler.db } | else { hmake voiceler 100 | hsave -i voiceler voiceler.db }
if $isfile(vc.db) { hmake vc 100 | hload -i vc vc.db } | else { hmake vc 100 | hsave -i vc vc.db }
}
on *:voice:#HELP: { if $hmatch(nickler,$nick) { hinc -m voiceler v 1 | hsave -i voiceler voiceler.db | hinc -m vc $nick 1 | hsave -i vc vc.db } }
on 999:text:*:#Helps: {
if $1 == !Tlist {
if $hget(nickler,0).item < 1 { msg # Takip listesinde kayıtlı helper yok. | halt }
else { msg # Takip listesine kayıtlı olan toplam; 1[ $kapsa($hget(nickler,0).item) 1] adet helper sıralanıyor; | var %& = 1,%&& = $hget(nickler,0).item | while %& <= %&& { msg # $+(%&,$chr(45)) $kapsa($hget(nickler,%&).item) | inc %& }
}
msg # 1Takip listesindeki helper kayıtları sıralandı.
}
if $1 == !Tekle {
if !$2 { msg # [1 Hata 1]; Kullanım şekli: $kapsa(!Tekle yeni-helper-nick) | halt }
if $hmatch(nickler,$2) { msg # $kapsa($2) 1helper takip listesinde zaten mevcut. | halt }
else { hadd -m nickler $2 | hsave -i nickler nickler.db | msg # $kapsa($2) helper takip listesine eklendi. }
}
if $1 == !Tsil {
if !$2 { msg # [1 Hata 1]; Kullanım şekli: $kapsa(!Tsil helper-nick) | halt }
if !$hmatch(nickler,$2) { msg # $kapsa($2) 1helper takip listesinde zaten mevcut değil. | halt }
else { helpersil $2 | msg # $kapsa($2) 1nickli helper takip listesinden tüm kayıtları ile beraber silindi. }
}
}
Takip listesini script'i kapatıp acıyorum sıfırlıyor bunun nedeni ne acaba.
Bide arasında şu kısım gereksiz dediğiniz yer var mı? Yani hiçbir işlevi yok bu kısmın dediğiniz.
İyi forumlar...