Someone

on *:TEXT:!setpcw *:*:{ 
  if ( $nick isop $chan) || ( $nick ishop $chan) {
    if ($2- isnum 2-138) {
      set $+(%,pcw.,$chan) $2- | set $+(%,pcw.,$chan,.nick) $nick | set $+(%,pcw.,$chan,.time) $ctime |
      .notice $nick New PCW! The New PCW was Set by $eval($+(%,pcw.,$chan,.nick),2) $+ ! Type !pcw To View the Updated World.
    }
  }
}
on *:text:!pcw:*:{ if ($chan == #RSPC) { HALT }
  else {
    .notice $nick 2 The 4 PCW 2 For $chan is Currently: 4 $eval($+(%,pcw.,$chan),2) $+ . 2 And Was Last Set $duration($calc($ctime - $($+(%,pcw.,$chan,.time),2))) ago by 4 $($+(%,pcw.,$chan,.nick),2) $+ .
  }
} }
on *:text:!suggest *:#: omsg $chan World $2 has been suggested by $nick $+ for $chan!