On *:text:!Changeworld *:#integrity-pc: { 
  if (($nick isop $chan) && ($2 isnum 2-138)) { 
    set %world $2 
    msg $chan The world has been changed, type !world to view it 
  } 
}

On *:text:!world:#integrity-pc: { 
  notice $nick Current World: %world 
}