on *:TEXT:!change*:#:{
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvo $chan) {
    if ($2- isnum 2-132) {
      set $+(%,pcw.,$chan) $2- | set $+(%,pcw.,$chan,.nick) $nick | set $+(%,pcw.,$chan,.time) $ctime |
      /msg $chan New Pest-Control World Set by $eval($+(%,pcw.,$chan,.nick),2) $+ ! 
    }
  }
}
on *:text:!pcw:#:{
  inc %pcount 1
/notice $nick The Current Pest-Control World is: $eval($+(%,pcw.,$chan),2) $+  Set By: $($+(%,pcw.,$chan,.nick), 2) $+ . Last Updated $duration($calc($ctime - $($+(%,pcw.,$chan,.time)))) ago. Counter: %pcount   }

on *:TEXT:@pcw:#: { if ($nick isop $chan) || ($nick ishop $chan) || ($nick isvo $chan) { /msg $chan The Current Pest-Control World is: $eval($+(%,pcw.,$chan),2) $+  Set By: $($+(%,pcw.,$chan,.nick), 2) $+ . Last Updated $duration($calc($ctime - $($+(%,pcw.,$chan,.time)))) ago. Counter: %pcount   } }