Someone

on $*:TEXt:/^[!](setworld|world)/Si:#:{ 
  if ($right($1,-1) == setworld) { set %world $$2 | notice $nick you have changed the pc world to $2 } the pc world to $2 }
  if ($right($1,-1) == world) { notice $nick the world is: %world }
}