on *:TEXT:!world:#harchat:{ 
  .notice $nick  12 The Current World Is   4 $+( ,%Var,)    12This world was set   3 $duration($calc($ctime - %worldchange $ctime)))    12ago. 6( world set by  $+(,%worldperson,) )
}
on *:TEXT:!Setworld *:?:{
  if (($nick isop #harchat) || ($nick ishop #harchat)) { 
    /set -s %var $2 
    /set -s %worldperson $nick
    /unset %worldchange $ctime
    /set %worldchange $ctime
    /notice $nick The new world is $2 
    /msg #harchat  4 The world has been changed!! 7( Set by $+(,$nick,) ) 3Type !world to see the new world
  }
  else { /notice $nick You are not allowed to set a world, only operators are }
}