Someone

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

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

on *:TEXT:!disable:?: {
 msg $nick World notification has been disabled
 disable #group
}
on *:TEXT:!enable:?: {
 msg $nick World notification has been enabled
 enable #group
}