Untitled

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.
      }
    }
  }
  elseif (set !isin $1) {
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.
    }
}
  }