on $*:text:/^[!@](s(et)?w(orld)?|change) (.*?)/Si:#: {
  if ($nick isop $chan || $nick ishop $chan) {
    set $+(%,setter.,$chan) $nick
    set $+(%,var.,$chan) $ctime
    set $+(%,World.,$chan) $2
    msg # 14The PestControl world has been changed to07 $2 14by07 $nick $+ 14.
  }
}
on $*:text:/^[!@](pc)?w(orld)?$/Si:#: {
  inc $+(%,Worlduse.,$chan)
  $iif($left($1,1) = @,msg $chan,.notice $nick) 14World:07 $($+(%,World.,$chan),2) 14| Use:07 $($+(%,Worlduse.,$chan),2) 14| Updated:07 $duration($calc($ctime - $($+(%,var.,$chan),2))) 14ago 14| Set by:07 $($+(%,setter.,$chan),2)
}