/*
 * import JSVM
 */

function Status_Marquee ( message , interval , pause_milliseconds )
{ this . message = message ;
  this . interval = interval ;
  this . pause_milliseconds = pause_milliseconds ;
  this . next_update = new Date ( ) . getTime ( ) ;
  this . current_index = 0 - this . interval ;
  this . update = Status_Marquee_update ;
  { JSVM . add_Updatable ( this ) ;
  }
}

function Status_Marquee_update ( )
{ if ( this . next_update > new Date ( ) . getTime ( ) )
  { return ;
  }
  this . current_index += this . interval ;
  if ( this . current_index >= this . message . length )
  { this . current_index = 0 ;
  }
  var status = this . message . substring ( this . current_index , this . message . length ) + this . message . substring ( 0 , this . current_index ) ;
  window . status = status ;
  this . next_update = new Date ( ) . getTime ( ) + this . pause_milliseconds ;
}
