Puan dosyasının yeri, oyun kanalı ve kullanacak nick kısımlarını kendinize göre editleyip kanalda !sifirla komutunu kullanınca ilk 3 ü Topic'e yazıp puanları sıfırlayacaktır.
NOT: Kullanmadan önce puan dosyanızın yedeğini alın..
Kod: Kodu kopyalamak için üzerine çift tıklayın!
##Puanların kayıtlı olduğu dosyanın yeri
set puanliste "scripts/puan.txt"
##Topic atılacak oyun kanalı
set oyunkanal "#oyun"
##!sifirla Komutunu kullanacak nick
set sahip "BuCaLI"
bind pub - !sifirla sifirla
proc sifirla { n u h c a } {
global puanliste oyunkanal sahip
if { $n != $sahip } { return 0 }
set kazananlar "\00304Gecen Ayin İlk 3'ü:"
set f [open $puanliste r]
for { set s 0 } { $s < 3 } { incr s } {
gets $f toplam
if {[lindex $toplam 1] > 0} {
append kazananlar "\00301 [expr $s +1] -\00302 [lindex $toplam 0] [lindex $toplam 1] "
} {
append kazananlar ""
}
}
putserv "cs set $oyunkanal topiclock off"
putserv "topic $oyunkanal . . $kazananlar"
putserv "cs set $oyunkanal topiclock on"
close $f
set f [open $puanliste w]
close $f
}