on *:text:*:#kanal:{
  if $istok(NoMercy Nickserv Chanserv,$nick,32) { return }
  if $nick == $nick {
    if ($1 == !geveze) { top10 | goto t0p10 }
  }
  if !$read(geveze.txt,w,$+(*,$nick,*)) { write geveze.txt $nick 1 | halt }
  else {
    var %dify $readn
    var %yeah = $calc($token($read(geveze.txt,%dify),2,32) +1)
    write $+(-l,%dify) geveze.txt $nick %yeah
  }
  :t0p10
}
alias top10 {
  var %cnk = @dify, %hit = 10, %e = geveze.txt, %top10 = 1
  window -hn %cnk
  filter -fwcteu 2 32 %e %cnk
  msg $chan 2 #KANAL Kanalı Günün Gevezeleri
  msg $chan 
  while %top10 <= %hit { msg $chan 1 $(%top10)) 4 $gettok($line(%cnk,%top10),1,32) 1---> Satır : 2 $gettok($line(%cnk,%top10),2,32) | inc %top10 }
  window -c %cnk
  msg $chan 
  msg $chan  2#KANAL Kanalı Extra Puan Systemi 
}