on *:TEXT:!change *:#:{ 
  if ($nick isvoice #) notice $nick You cannot change the world! 
  if ($nick isreg #) notice $nick You cannot change the world!  
  if  ($nick isop # || $nick ishop #) && ($2 isnum 2-138) set %pctime $ctime 
  if  ($nick isop # || $nick ishop #) && ($2 isnum 2-138) set %pcnick $nick 
  if  ($nick isop # || $nick ishop #) && ($2 isnum 2-138) set %pcworld $2 
  if  ($nick isop # || $nick ishop #) && ($2 isnum 2-138) msg $chan 9,2//////PCW World has been changed by %pcnick \\\\\\type !world or !pcw to view it 
  if  ($nick isop # || $nick ishop #) && ($2 > 139) notice $nick Error! The PC World must be lower than 139! 
} 

on *:TEXT:!world:#:{ 
  notice $nick 8,2Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago 
  notice $nick This world was set by: %pcnick 
} 
on *:TEXT:!pcw:#:{ 
  notice $nick 8,2Current 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 8,2Current PC World: %pcworld --Last Update: $+($duration($calc($ctime - %pctime)),) ago 
  if ( $nick isop # ) msg $chan 4,2This world was set by: %pcnick 
}