on *:text:!setpcw *:#:{ 
  if ($nick ishop $chan) || ($nick isop $chan) {  
    set %pcw $2 
    set %nick $nick
    set %time $asctime
  } 
  msg $chan <<< New PC WORLD >>>
}

on *:text:!pcw:#:{
  notice $nick 8,1 the current pcw is 0,1 %pcw 4,1 the pcw has been changed by %nick set for $duration($calc(($ctime - $ctime(%time))))
}