on *:voice:#worldofpc:{
  write voices.txt $vnick $+ * $+ $address($vnick,2)
}
on *:join:#worldofpc:{
  if ($gettok($read(tqs.txt,w,$nick),1,42)) && ($gettok($read(tqs.txt,w,$address($nick,2)),2,42)) {
    mode $chan +v $nick
  }
  else {
    halt
} }