on *:text:*:#eglence:{
  if $1 == `puan && $2 { .msg # $iif($hget(puan,$+(#,$2)),$2 nickinin konuşma puanı: $hget(puan,$+(#,$nick)),$2 nickinin konuşma puanı yok.) }
  hinc -m puan $+(#,$nick)
  if $istok(10 25 50,$hget(puan,$+(#,$nick)),32) { .msg # $+($nick) # kanalı için konuşma puanın $qt($hget(puan,$+(#,$nick))) oldu! }
  elseif $hget(puan,$+(#,$nick)) == 100 { .msg # $+($nick) # kanalı için konuşma puanın "100" oldu! | .notice $nick Tebrikler $+($nick,!) 200 puandan sonra, ödülünüzü (+v) alacaksınız. }
  elseif $hget(puan,$+(#,$nick)) == 200 { .msg # $nick , Tebrikler, "200" puan topladın ve # kanalında voice (+v) ödülüne hak kazandın! | mode # +v $nick | hdel puan $+(#,$nick) }
}