on *:TEXT:!newworld *:#: {
  if ($chan == #heart ) {
    if ($nick !isreg $chan) {
      inc %meworld 
      set %hutime $ctime
      set %hunick $nick
    }
  }
}

on *:text:!time:#: {
  if ($chan == #heart ) {
    notice $nick the world was changed $duration($calc( $ctime - %hutime )) ago by %hunick $+ .
  }
}