Something

on $*:TEXT:/^[!](change|setpcw|setworld) [0-9]+$/Si:#:{
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($2 isnum) {
      set %lastworld %world
      set %world $2 
      set %nic $nick
      set %suggest N/A
      set %pcsettime $ctime 
      msg #pest-time 4 %nic 10has updated the 4Pest-Control 10world. 
      msg #pest-time 10Type 4!pcw 10or 4!world 10to see the world.
      msg #pest-time.staff 7 -------------------------------------------------------------
      msg #pest-time.staff 4 %nic 10has updated the 4Pest-Control 10world. 
      msg #pest-time.staff 10Type 4!pcw 10or 4!world 10to see the world.
      msg #pest-time.staff 7 -------------------------------------------------------------
    }
    else { notice $nick 10That is not a valid world. 
      halt
    }
  }