on *:voice:#Help:{
  if $nick == $vnick || $nick == $me { halt }
  if !$readini(hvc.ini,VOICE,$nick) { writeini -n hvc.ini VOICE $nick 1 }
  else { writeini -n hvc.ini VOICE $nick $calc($readini(hvc.ini,VOICE,$nick) + 1) }
}
alias voicelist {
  if $1 {
    say $1 nickinin voice sayısı listeleniyor.. 
    say 2Nick1: $1 --- 4Voice Sayısı1: $readini(hvc.ini,VOICE,$1)
  }
  else { 
    say 4 $+ Tüm voice listeleri.
    var %cnk 1
    while %cnk <= $ini(hvc.ini,VOICE,0) {
      say 2Nick1: $ini(hvc.ini,VOICE,%cnk) --- 4Voice Sayısı1: $readini(hvc.ini,VOICE,$ini(hvc.ini,VOICE,%cnk))
      inc %cnk
    }
  }
}
alias voicesil {
  if $1 { 
    writeini hvc.ini VOICE $1 0  
    say 4 $1 2Nickinin voice sayısı sıfırlanmıştır. 
  }
  else {
    say 4Tüm voice kayıtları sıfırlanmıştır.
    var %e 1 
    while %e <= $ini(hvc.ini,VOICE,0) { 
      writeini hvc.ini VOICE $ini(hvc.ini,VOICE,%e) 0  
      inc %e 
    }
  }
}