on $*:text:/^[!@.]world/Si:#: {
  if ($nick isvoice #) || ($nick ishop #) || ($nick isop #) {
    var %send = $iif($left($1,1) == @,.msg $nick,.notice $nick)
    if (!%pc. [ $+ [ $chan ] ]) { notice $nick The pc-world is not set | halt }
    %send The current pc-world is: %pc - Last update: $duration($calc($ctime - %pcc. [ $+ [ $chan ] ] )) ago
  }
  else notice $nick You need voice or higher to see the pc world!
}

on $*:text:/^[!@.]Setworld */Si:#: {
  if ($nick isop #) || ($nick ishop #) || ($address($nick,2) == *!*@is.a.fraud.com) {
    set %pcc. [ $+ [ $chan ] ] $ctime
    set %pc. [ $+ [ $chan ] ] $2
    notice $nick The new pc-world has been set as %pc. [ $+ [ $chan ] ]
    .msg # The pc-world has changed! Type: !world to view it!
  }
}