if $2 = privmsg && *#sohbetli* iswm $3 {
  if $istok(irc.SohbetLi.Org  chanserv OperServ SohbetLi-DUYURU Eglence Nickserv SohbetLi Nomercy,$gettok($remove($1,:),1,33),32) { return }
  if !geveze* iswm $4- {  top10 | goto t0p10 }
    elseif !$read(puan/sohbet.txt,w,$+(*,$5,*)) { sockwrite -nt nomercy privmsg #SohbetLi $3 $5 puan listesinde yok }
  ;  elseif ($2 == $me) {  goto t0p10 }
    elseif ($5 == $gettok($remove($1,:),1,33) && $read(puan/sohbet.txt,w,$+(*,$5,*))) { sockwrite -nt nomercy privmsg #SohbetLi $3 $read(puan/sohbet.txt,$readn) puanı var | goto t0p10 }
  }

alias renkle { if $istok(1 2 3 ,$1,32) { sockwrite -nt nomercy privmsg #SohbetLi 4 $+ $1 $+ )4 $2 2---> Satır :4 $3 } | else { sockwrite -nt nomercy privmsg #SohbetLi $1 $+ )2 $2 ---> Satır :5 $3 } }
 alias top10 {
  var %cnk = @dify, %hit = 10, %e = puan/sohbet.txt, %top10 = 1
  window -hn %cnk
  filter -fwcteu 2 32 %e %cnk
  sockwrite -nt nomercy privmsg #SohbetLi 5 ***4 #SohbetLi 2Kanalı Günün Gevezeleri 5 ***
  sockwrite -nt nomercy privmsg #SohbetLi 3-
  sockwrite -nt nomercy privmsg #SohbetLi 5SohbetLi ORG 3[2NoMercy Puan Sistemi3] 
  while %top10 <= %hit { renkle %top10 $line(%cnk,%top10) | inc %top10 } 
  window -c %cnk
}