bind pub n !puan0la S0f0rLa

proc S0f0rLa {nick uhost hand chan arg} {
    foreach puanlar [split [glob scripts/*.scores] { }] {
        if {[file exists $puanlar]} {
            close [open $puanlar w]
            puthelp "notice $nick :$puanlar dosyası sıfırlandı!"
        }
    }
    return 0
}