var message = " Michael Largo - The author of Final Exits and Portable Obituary"
var character = 0;
var to_print = "";
var ypos = 200;
var next = 0 ;
var fade = 100 ;
var next_message = new Array() ;
next_message[0] = "Prominent architect Frank Lloyd Wright attributed his success to a particular condiment."
next_message[1] = "Milton Berle had a secret, and a statue to prove it, that added to his longevity."
next_message[2] = "Johannes Guttenberg is credited with inventing the printing press, but few know why he died hungry."
next_message[3] = "Marilyn Monroe’s last movie Something’s Got to Give turned out to be her epitaph."
next_message[4] = "Adolf Hitler took his time eating his last meal, but lost patience when it came to his own death."
next_message[5] = "Which U.S. President sipped his own brew of poison tea, and which one never knew he was served it along with his last meal?"
next_message[6] = "Elvis Presley never knew his motto “Taking Care of Business in a Flash” would be the death of him."
next_message[7] = "The inventors of Bubble-Gum, Popsicles and Band-Aids all had one thing in common when they died"
next_message[8] = "The childhood years of Judy Garland and Richard Burton similarly affected their final days."
next_message[9] = "The fate of Lassie, Flipper, Mister Ed had nothing to due with their ratings."
next_message[10] = "Which football coach died after being doused with Gatorade after winning a game?"


function doTextMain(text) {
 if (document.all) {
   if (character <= text.length - 1) {
     to_print += text.charAt(character); 
     teletextmain.innerHTML = to_print;
     character++;
   }
   else
    scrollIt();
 }

 setTimeout("doTextMain(message)", 50);
}

function scrollIt() {
  if (ypos >= 40) {
    ypos -= 1;
    fade -= 4;
    if (ypos < 45) {
      teletextmain.innerHTML = "" ;
    }
  }
  else {
    ypos = 200;
    character = 0;
    to_print = "";
    nextMessage();
    fade = 100;
  }
  teletextmain.style.top = ypos;
  teletextmain.filters.alpha.opacity = fade;
}

function nextMessage() {
  message = next_message[next]
  if (next == (next_message.length - 1)) {
    next = 0;
  }
  else
    next++;
}
