on *:TEXT:!setworld *:#:{
  if (($2 isnum) && ($nick isop $chan)) {
    set %world $$2
  }
}
on $*:TEXT:/^[!@.]World/Si:#:{
  notice $nick World is: %world
}