function AraVob() {
}
var ScreenLine = new AraVob();
ScreenLine[1]  = "09/03/1910 Neix a West Chester (Pennsylvania, USA) Samuel Barber.";
ScreenLine[2]  = "\n\n";
var msgNum = 1;          // set to first message to display :era 1
var msgCnt = 2;         // número de líneas
var typeSpeed = 1000;      // the rate in milliseconds to scroll to top (higher number is slower): era 90
var lineDelay = 2500;     // the delay time at end of line. (unless the line is a single space): era 920
var pagLen = 3;          // number of lines per page (usually the number of rows in the TEXTAREA)   : era 11
var delay = typeSpeed;     
var timerPS = null;
var linPntr = 0;
var tally = 1;
var msg = " ";
var outMsg = "";
var i = 0;
var cr="\r"
if ("3" <=navigator.appVersion.charAt(0)) {
 var cr=""
}
else {
  ScreenLine[11]="    You will need to upgrade your browser."
}
if (32<=navigator.userAgent.length && navigator.userAgent.substring(25,32)=="Opera/3") {
  ScreenLine[10]="Your version of Opera show's a moving scroll bar button when you"
  ScreenLine[12]="  but the frame may not appear to be scrolling."+cr
}
// set up ScreenLines for display
for (x = msgCnt; 1 <= x; x--) {
  ScreenLine[x+pagLen] = ScreenLine[x] + cr;
}
for (x = 1; x <= (pagLen); x++) {
  ScreenLine[x] =  " " +cr;
}
 msgCnt +=  pagLen;
 msg = ScreenLine[1];
// end setup

function DisplayScroll() {
 if (msgNum < pagLen) {
  delay = typeSpeed;
 }
 else {
  delay = lineDelay;
 }
 ChangeMsg();
 outMsg += msg;
 self.document.forms[0].elements[0].value = outMsg;
  timerPS = setTimeout("DisplayScroll()",delay);
}

function ChangeMsg() {
 msgNum++;
 if (msgCnt < msgNum) {
   msgNum = 1;
 }
 if (pagLen <= tally) {
   chgPage();
 }
 tally++;
 msg = ScreenLine[msgNum];
}

function chgPage() {
 if (msgNum < pagLen) {
   linPntr = msgCnt - pagLen + msgNum + 1;
 }
 else {
   linPntr = msgNum - (pagLen - 1);
 }

 outMsg =   ScreenLine[linPntr];
 for (p = 1; p < (pagLen - 1); p++) {
   linPntr++;
   if (msgCnt < linPntr) {
     linPntr = 1;
   }
   outMsg += ScreenLine[linPntr];
 }
  
}

function quitDisplay() {
  self.document.forms[0].elements[0].value = "Scroll a Page for yourself today!";
}