Mine

on *:TEXT:!change *:#thepc,#thepc.staff,#[-pcb-]:{
  if ($address($nick,2) == $address($me,2)) || ($nick isop $chan) {
    set %nick $nick
    set %pcsettime $ctime
    set %rank $2-
    msg $chan 12 The current world has been updated.  Type !pcw or !world set by:  $+ 4 $nick $+ .
  }
}
on $*:TEXT:/^!(pcw|world)/iS:#thepc,#thepc.staff,#[-pcb-]:{
  if ($nick isvoice $chan) || ($nick isop $chan) || ($nick ishop $chan) {
    if (%pcsw == on) {
      notice $nick 12[  Pest-Control World  ]4 %rank [Set by %nick $duration($calc( $ctime - %pcsettime)) ago $+ ]
    }
  }
}