on $*:TEXT:/^[!@]set?(pcw|world|pest)/Si:#: {
  if (set isin $1) {
    if ($2 isnum 1-140) {
      set $+(%,pcw.,$chan) $2
      set $+(%,settime.,$chan) $ctime
      set $+(%,nick.,$chan) $nick
      msg $chan 10The Pest Control world has been updated. Please type 4!pcw 10or 4!world 10to view it.
    }
  }
elseif (set !isin $1) {
  if (%pcw == $null) { notice $nick A Pest Control world has not been set! Contact an operator to have one set. }
  else {
    notice $nick The pest control world is for $chan is $($+(%,pcw.,$chan),2) set by $($+(%,nick.,$chan),2) $duration($calc($ctime - $($+(%,settime.,$chan),2))) ago.
  }
}
}