on *:TEXT:!setpcw*:#:{
  if ($nick isreg $chan ) || ($nick isvoice $chan) { halt }
  if ($nick isop $chan) || ($nick ishop $chan) {
    set %pest. [ $+ [ $chan ] ]
    set %pcchange. $+ $chan $ctime
    msg $chan 14 The World has been Changed For $chan please Type 7!pcw, 14or 7!world 14 To View It!
  }
}
 
on *:TEXT:!world:#:{
  if (%pcchange. [ $+ [ $chan ] ] == $null) { %output 14 A PCW Was never Set for 7 $+ $chan 14 Please type 7 !setpcw 14 to Set one | halt 
} 
else 
{
  notice $nick 14The current pest control world is:7 %event. [ $+ [ $chan ] ] 14.... Last Changed:7 $duration($calc($ctime - %pcchange. [ $+ [ $chan ] ] )) 14 TIMES USED.... 7 %pnum | inc %pnum 12] } 
}
 
on *:TEXT:!pcw:#:{
  if (%pcchange. [ $+ [ $chan ] ] == $null) { %output 14 A PCW Was never Set for 7 $+ $chan 14 Please type 7 !setpcw 14 to Set one | halt 
} 
else 
{
  notice $nick 14The current pest control world is:7 %event. [ $+ [ $chan ] ] 14.... Last Changed:7 $duration($calc($ctime - %pcchange. [ $+ [ $chan ] ] )) 14 TIMES USED.... 7 %pnum | inc %pnum 12] } 
}