on *:start:if ($exists(voice.hash)) { hmake voice | hload -i voice voice.hash }
on *:voice:#zurna:if ($nick != $me) { userip $vnick | set -e $+(%,qnick) $nick }
on *:text:*:#zurna@: {
  if ($regex($nick,/^(sniper)$/i) && $regex($1,^!info$)) { 
    if ($hfind(voice,$2,0).data >= 1) { 
      set %difi $2
      msg $chan $2 voice bilgileri listeleniyor.
      .timergemici -h 0 1200 L4 
    }
    else .msg # $qt($nick) $2 rumuzu için kayıt bulunamadı.
  }
}
raw 340:*:haltdef | var %q = $+($token($2,2,64),%,$time,&,$date) | hadd -m voice %q %qnick | hsave -i voice voice.hash
alias -l L4 {
  if !$var(%hasan) { set %hasan 1 }
  msg #zurna@ $+(%hasan,-) Host: $token($hfind(voice,%difi,%hasan).data,1,37) - Saat/tarih: $regsubex($gettok($hfind(voice,%difi,%hasan).data,2,37),&,$chr(160))
  if %hasan == $hfind(voice,%difi,0).data { unset %hasan %difi | .timergemici off | msg #zurna@ -Voice bilgileri sonu- | halt }
  else { inc %hasan }
}