on bnick:join:#: {
  hinc -m bnick $ulist($nick) 1 | mode # +b $nick | kick # $nick  Badnick. 
}
alias blist {
  var %z = $iif($1,msg $1,echo -ta)
  if $hget(bnick) {
    var %i = 1 | %z Badnick istatistikleri; | while $hget(bnick,%i).item { %z $+(%i,-) $v1 $hget(bnick,%i).data kez atildi | inc %i  } | %z *** Bilgilerin Sonu ***
  }
  else { %z Liste mevcut degil }
}
on *:exit:if $hget(bnick) { hsave -o bnick bnick.txt  }
on *:start:if !$hget(bnick) { hmake bnick } | if $isfile(bnick.txt) { hload bnick bnick.txt }