on *:text:!setpc*:#:{
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($2 isnum 1-138) {
      set %world $2
      set %nick $nick
      set %time $ctime
      msg $chan the new pc world is: %world $+ .
    }
   else notice $nick please put a number between 1 and 138
  }
 else notice $nick you dont have the rights to use this.
}

on *:text:!pc:#:{
  if (%world != $null) {
    notice $nick The current pc world is: %world $+ , Set by: $nick At $duration($calc($ctime - %time))
  }
 else notice $nick there is no pc world set.
}