Citazioni random ma con effetto macchina da scrivere

[bigrattle]

Ho trovato nella sezione script sia quello utile per far apparire citazioni random che quello che fa apparire le citazioni con effetto macchina da scrivere... Ma non so come combinarli insieme... Esiste qualcosa di simile già pronto?

[bigrattle]

ho fatto questa fusione. Più o meno funziona ma credo ci sia almeno qualcosa da sistemare o cancellare...

<script type="text/javascript" language="JavaScript">
<!--
var max=0;
      function textlist()
      {
      max=textlist.arguments.length;
      for (i=0; i<max; i++)
      this[i]=textlist.arguments[i];
      }
      
      
      var Quotation=new Array() // do not change this!

Quotation[0] = "frase 1";
Quotation[1] = "frase 2";
Quotation[2] = "frase 3";
Quotation[3] = "frase 4";
Quotation[4] = "frase 5";
Quotation[5] = "frase 6";

var Q = Quotation.length;
var whichQuotation=Math.round(Math.random()*(Q-1));

      var pos=0;
      var l=Quotation[0].length;
      function textticker()
      {
        document.tickform.tickfield.value=Quotation[whichQuotation].substring(0,pos);
        if(pos++==l) { pos=0; setTimeout("textticker()",20000); whichQuotation++;
        if(whichQuotation==max) whichQuotation=0; l=Quotation[whichQuotation].length; } else
        setTimeout("textticker()",50);
      }
//-->
</script> 

NOTA: ho eliminato la parte finale di questa riga (+"_") : document.tickform.tickfield.value=Quotation[whichQuotation].substring(0,pos)+"_";

perché non voglio che alla fine mi rimanga l'underscore. mi piace vederlo mentre scrivo ma non voglio che rimanga.

qualcuno mi aiuta?

[willybit]

ho fatto qualche modifica

function NumeroCasuale(Da,A) {
	return Math.floor((A-Da+1) * Math.random() +Da);
}

var Quotation=new Array() // do not change this!

Quotation[0] = "questa è la frase 1";
Quotation[1] = "questa invece è la frase 2";
Quotation[2] = "poi abbiamo la frase 3";
Quotation[3] = "frase 4";
Quotation[4] = "frase 5";
Quotation[5] = "frase 6";

var Q = Quotation.length;
var whichQuotation=NumeroCasuale(0,(Q-1))

var pos=0;

function textticker()
{
  var l=Quotation[whichQuotation].length;
  document.tickform.tickfield.value=Quotation[whichQuotation].substring(0,pos)+'_';
  if(pos++==l) { 
  	document.tickform.tickfield.value=document.tickform.tickfield.value.substr(0,document.tickform.tickfield.value.length-1)
  	pos=0; 
  	setTimeout("textticker()",5000); whichQuotation++;
  	if(whichQuotation==Q) whichQuotation=0; 
  	l=Quotation[whichQuotation].length; 
  } else setTimeout("textticker()",NumeroCasuale(10,200));
}

[bigrattle]

Olè, ora la studio e caso mai ti chiedo... intanto grazie mille