on @*:join:#a:if $read(voice.txt,w,$nick) { mode # +v $v1 }
on *:voice:#a:if $read(devoice.txt,w,$vnick) { mode # -v $v1 }
on @*:text:*:#b: {
  if ($1 == .otovoiceekle) && $2 && ($3- == $null) && $read(voice.txt,w,$2) { msg #b $nick $qt($2) nicki otovoice listesinde mevcut }
  if ($1 == .otovoiceekle) && $2 && ($3- == $null) && !$read(voice.txt,w,$2) { write voice.txt $2 | msg #b $nick $qt($2) nicki otovoice listesine basari ile eklendi }
  if ($1 == .otovoicesil) && $2 && ($3- == $null) && $read(voice.txt,w,$2) { write -dw $2 voice.txt | msg #b $nick $qt($2) nicki otovoice listesinden basari ile silindi }
  if ($1 == .otodevoiceekle) && $2 && ($3- == $null) && $read(devoice.txt,w,$2) { msg #b $nick $qt($2) nicki otodevoice listesinde mevcut }
  if ($1 == .otodevoiceekle) && $2 && ($3- == $null) && !$read(devoice.txt,w,$2) { write devoice.txt $2 | msg #b $nick $qt($2) nicki otodevoice listesine basari ile eklendi }
  if ($1 == .otodevoicesil) && $2 && ($3- == $null) && $read(devoice.txt,w,$2) { write -dw $2 devoice.txt | msg #b $nick $qt($2) nicki otodevoice listesinden basari ile silindi }
  if ($1 == .otovoicelist) && ($2- == $null) { .play #b voice.txt }
  if ($1 == .otodevoicelist) && ($2- == $null) { .play #b devoice.txt }
}