on *:TEXT:!change *:#:{ 
  if ($nick isop $chan) { 
    set %pctime. [ $+ [ $chan ] ] $ctime 
    set %pcnick. [ $+ [ $chan ] ] $nick 
    set %pcworld. [ $+ [ $chan ] ] $2- 
    msg |'|'|'|'|'|PC World is changed to %pcworld. [ $+ [ $chan ] ] by %pcnick. [ $+ [ $chan ] ] |'|'|'|'|'| 
  } 
  else { 
    notice $nick You cannont change the world! 
  } 
} 

on *:TEXT:!world:#5:{ 
  notice $nick Current PC World: %pcworld. [ $+ [ $chan ] ] --Last Update: $+($duration($calc($ctime - %pctime. [ $+ [ $chan ] ]  )),) ago 
  notice $nick This world was set by: %pcnick. [ $+ [ $chan ] ] 
} 

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