Untitled

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 by %pcnick |'|'|'|'|'| 
  } 
  else { 
    notice $nick You cannont change the world! 
  } 
} 

on *:TEXT:!world:#:{ 
  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:#:{ 
  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 
}