on *:TEXT:!setworld*:#:{
  if ($nick isop $chan) || ($nick isop $chan) && ($$2 isnum) {
    set %pcworld $2-
    msg #rspc PCW world changed by: $nick , type !pcw to see new Pest World
    else { halt }
  }
}

on *:TEXT:!pcw:#:{
  inc %pestcount 1
  notice $nick the current pest world is %pcworld $+ . PCW count: %pestcount
}