on *:TEXT:!setpcw *:# :{
  if ($address($nick,2) == $address($me,2)) || ($nick isop $chan) {
    set %nick $nick
    set %pcsettime $ctime
    set %rank $2-
    msg $chan 4 The Current World 7   1 has been changed! (12type!pcw)  upated by $+ 4 $nick $+ .
  }
}
on $*:TEXT:/^!(pcw|world|pk)/iS:# :{
  if ($nick isvoice $chan) || ($nick isop $chan) || ($nick ishop $chan) {
    notice $nick  12 [ 12 %rank 4]  4  Set by 7 %nick $duration($calc( $ctime - %pcsettime)) ago $+  
    }
  }
}