on $*:TEXT:/^[!@](set)?(pcw|world|pest)/Si:#: {
  if (set isin $1) {
    if ($nick isop $chan) {
      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.
      }
    }
  }
  else {
    if ($+(%,pcw.,$chan)) {
      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.
    }
  }
}