if ( $nick isvoice # ) notice $nick You cannot change the world! 
  if ( $nick isreg # ) notice $nick You cannot change the world! 
  if ( $nick ishop # ) notice $nick You cannot change the world! 
  if ( $nick isop # ) set %pctime $ctime 
  if ( $nick isop # ) set %pcnick $nick 
  if ( $nick isop # ) set %pcworld $2- 
  if ( $nick isop # ) amsg |'|'|'|'|'|PC World is changed to %pcworld by %pcnick |'|'|'|'|'| 
} 

on *:TEXT:!world:#:{ 
  notice $nick Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago 
  notice $nick This world was set by: %pcnick 
} 
on *:TEXT:!pcw:#:{ 
  notice $nick Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago 
  notice $nick This world was set by: %pcnick 
} 
on *:TEXT:@world:#:{ 
  if ( $nick isop # ) msg $chan Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago 
  if ( $nick isop # ) msg $chan This world was set by: %pcnick 
}