on $*:text:/^[!]setpcw #aog*/Si:#: {
  if ($nick isop #) || ($nick ishop #) {
    set %pccaog $ctime
    set %pcaog $3-
    notice $nick The new pc-world for $chan has been set as %pcaog
    msg # [4Pc-World Update1] 12New world for $chan $+ : $3- 4( $+ $nick $+ )
  } 
}
on *:Text:!pcw #aog*:#: {
  if (!%pcaog) notice $nick The pc-world for $chan is not set
  notice $nick The current pc-world for $chan is: %pcaog - Last update: $duration($calc($ctime - %pccaog)) ago
}