on *:TEXT:!natworld *:#doublenats: {
  if ($nick isop $chan || $nick ishop $chan) {
    set %world $2- 
    msg $chan 13 $nick Set a New World. Type !world to check. 
    halt
  }     
  if ($read(autovoice.txt,w,$nick)) { set %world $2- | set %nick $nick | msg $chan 13 $nick Set a New World. Type !world to check. (Authorized by Autovoice!) }
  else { msg $chan Insufficient Priveliges, $nick is not a Op or Halfop }
}

on *:TEXT:!world:#doublenats: {
  if ($nick isreg $chan) {
    notice $nick Sorry, You need to be voiced to do that! 
    halt 
  }
  if ($read(autovoice.txt,w,$nick) || $nick isop $chan || $nick ishop $chan)) { notice $nick The Set World for DoubleNats is :: $($+(%,world),2) Set by AUTOVOICED $($+(%,nick),2)
  }
}