Oww My Nose

on $*:TEXT:/^[@!](pc)?world/Si:#pc:{
  if (%pcflood != 1) {
    .notice $nick The current pc world is %pcworld $+ . $chr(40) $+ set $duration($calc($ctime - %pctime)) ago $+ $chr(41) %logo
    set -u5 %pcflood 1
  }
}
on $*:TEXT:/^[@!]set ?(pc)? ?world/Si:#pc:{
  if ($nick isop $chan) || ($nick ishop $chan) {
    msg $chan The PC world has been changed to: $2
    set %pcworld $2-
    set %pctime $ctime
  }
}