on $*:TEXT:/^[!@]world|pcw/Si:#: { 
  if ($nick isvoice #) || ($nick ishop #) || ($nick isop #) { 
    .notice $nick The current pc-world is: %world 
    .notice $nick Last update of the world: $duration($calc($ctime - %overtime)) ago
  }
}
on *:TEXT:!defineworld*:#: { 
  if ($nick ishop #) || ($nick isop #) { 
    if (!$2) .notice $nick You didn't supply a world
    else {
      /set %world $2 
      /set %overtime $ctime
      .msg # The Pc-World has changed! Type: !world to view it 
      .notice $nick You have just set the pc world to %world  
    }
  }
}