on *:text:*:#:{
  if $nick !isreg $chan {
   if $kmt(bak,$1) { if !$2 { msg $chan $nick Lütfen nick yazınız. | return } | msg $chan $+($2,$chr(44)) $kmt(bak,$1) }
  }
}
on *:start:if !$file(kmt.bastard) { write -c kmt.bastard } | hmake kmt | hload kmt kmt.bastard
alias kmt {
  if $1 == ekle { hadd -m kmt $2 $3- | hsave -i kmt kmt.bastard }
  if $1 == bak {  if $hget(kmt,$2) {  return $ifmatch } }
}

/kmt ekle !komut "uyarımesaji"
Örnek;
/kmt ekle !seviye Lütfen seviyeyi düşürmeyiniz.