on *:TEXT:!setpcw*:#:{ 
  if ($nick isop $chan || $nick ishop $chan || $nick isvoice $chan) && ($2 isnum 2-132) { 
      set %pcsettime. [ $+ [ $chan ] ] $ctime 
      set %nick. [ $+ [ $chan ] ] $nick 
      set %pcw. [ $+ [ $chan ] ] $2-    
      msg $chan ~~ PestControl World Updated to: $2 ~~ Type !world, !pcw or !pc !!!!! 
    } 
  } 
} 
on $*:TEXT:/^[!@.](pcw|world)/Si:#:{ 
  if (%master == off) || (%pest == off) { halt } 
  elseif (%pcw. [ $+ [ $chan ] ] != $null) && ($nick !isreg $chan) {
    notice $nick ¤ Current PC World  %pcw. [ $+ [ $chan ] ] ¤ Last Updated:  $duration($calc( $ctime - %pcsettime. [ $+ [ $chan ] ] )  by: %nick. [ $+ [ $chan ] ] ¤  
  } 
  else { notice $nick $chan has not set a PCW } 
}