JavaScript per navigatore con bottoni a tendina

<!--<HTML>
<script language="JavaScript">

<! -- Questa è la descrizione delle caratteristiche dello script, da non modificare -->

function InitArray(n) {
this.length=n;
for (var i=0;i<n;i++) this[i]=0;
}

ArrayNodi=new InitArray(50); // Max 50 nodi
NumNodi=0;

function Nodo(name,href,target,padre,img1,img0) { // Costruttore dell'oggetto Nodo
ArrayNodi[NumNodi]=this;
this.index=NumNodi++;
this.name=name;
this.href=href;
this.target=target;
this.expanded=false;
this.figli=new InitArray(0);
this.padre=padre;
if (padre!=null)
padre.figli[padre.figli.length++]=this;
this.img1=img1;
this.img0=img0;
this.CreaLink=CreaLink; // Metodo
}

function CreaLink() { // Metodo dell'oggetto Nodo
var s="";
if (this.figli.length>0) // this con figli
s="<LI><A HREF='"+
(this.href==""?"sinistra.htm":this.href)+"' TARGET='Pagina'"+
" OnClick=\"parent.Refresh("+this.index+");\">"+
"<IMG SRC='"+(this.expanded?this.img0:this.img1)+"' BORDER=0>"+
this.name+"</A>"
else // foglia
s="<LI><IMG SRC='"+this.img1+"'><A HREF='"+this.href+
"' TARGET='"+(this.target==""?"Pagina":this.target)+"'>"+
this.name+"</A>";
return s;
}

function Visita(nodo) {
if (nodo.padre!=null) self.Index.document.writeln(nodo.CreaLink());
if (nodo.expanded && nodo.figli.length>0) {
self.Index.document.writeln("<UL TYPE=circle>");
for (var i=0;i<nodo.figli.length;i++)
Visita(nodo.figli[i]);
self.Index.document.writeln("</UL>");
}
}

function CreaHtml() {
self.Index.document.open();
self.Index.document.writeln("<HTML><HEAD></HEAD>");
self.Index.document.writeln("<BODY bgcolor=gray LINK=#660000 VLINK=black ALINK=black><font face=Verdana>");
Visita(root); // Genera l'indice
self.Index.document.writeln("</font></BODY></HTML>");
self.Index.document.close();
}

function Refresh(i) {
ArrayNodi[i].expanded=!ArrayNodi[i].expanded;
setTimeout("CreaHtml()",100);
}

<! -- fine della descrizione -->
//////////////////////////////////////////////////////////////////////////////

<! -- Questa è la parte dello script su cui intervenire, cioè nella parte fra parentesi; le variabili da modificare sono: nome che compare nel menù, file che si apre al click del mouse, nome del "padre" da cui dipende ogni elemento "figlio", nomi delle immagini associate a ogni voce del menù -->

root=new Nodo("root","","",null,"","");
Figlio1=new Nodo("CANZONE","mandragola.htm#canzone","",root, "chiusa.jpg", "aperta.jpg");
Figlio2=new Nodo("PROLOGO","mandragola.htm#prologo","",root,"chiusa.jpg","aperta.jpg");
Figlio3=new Nodo("ATTO PRIMO","mandragola.htm#attoI","",root,"chiusa.jpg","aperta.jpg");
Figlio4=new Nodo("ATTO SECONDO","mandragola.htm#attoII","",root,"chiusa.jpg","aperta.jpg");
Figlio5=new Nodo("ATTO TERZO","mandragola.htm#attoIII","",root,"chiusa.jpg","aperta.jpg");
Figlio6=new Nodo("ATTO QUARTO","mandragola.htm#attoIV","",root,"chiusa.jpg","aperta.jpg");
Figlio7=new Nodo("ATTO QUINTO","mandragola.htm#attoV","",root,"chiusa.jpg","aperta.jpg");
Figlio8=new Nodo("Scena prima","mandragola.htm#IscenaI","",Figlio3,"true","chiusa.jpg","aperta.jpg");
Figlio9=new Nodo("Scena seconda","mandragola.htm#IscenaII","",Figlio3,"true","chiusa.jpg","aperta.jpg");
Figlio10=new Nodo("Scena terza","mandragola.htm#IscenaIII","",Figlio3,"true","chiusa.jpg","aperta.jpg");
Figlio11=new Nodo("CANZONE","mandragola.htm#canzoneI","",Figlio3,"true","chiusa.jpg","aperta.jpg");
Figlio12=new Nodo("Scena prima","mandragola.htm#IIscenaI","",Figlio4,"true","chiusa.jpg","aperta.jpg");
Figlio13=new Nodo("Scena seconda","mandragola.htm#IIscenaII","",Figlio4,"true","chiusa.jpg","aperta.jpg");
Figlio10=new Nodo("Scena terza","mandragola.htm#IIscenaIII","",Figlio4,"true","chiusa.jpg","aperta.jpg");
Figlio11=new Nodo("Scena quarta","mandragola.htm#IIscenaIV","",Figlio4,"true","chiusa.jpg","aperta.jpg");
Figlio12=new Nodo("Scena quinta","mandragola.htm#IIscenaV","",Figlio4,"true","chiusa.jpg","aperta.jpg");
Figlio13=new Nodo("Scena sesta","mandragola.htm#IIscenaVI","",Figlio4,"true","chiusa.jpg","aperta.jpg");
Figlio14=new Nodo("CANZONE","mandragola.htm#canzoneII","",Figlio4,"true","chiusa.jpg","aperta.jpg");
Figlio8=new Nodo("Scena prima","mandragola.htm#IIIscenaI","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio9=new Nodo("Scena seconda","mandragola.htm#IIIscenaII","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio10=new Nodo("Scena terza","mandragola.htm#IIIscenaIII","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio11=new Nodo("Scena quarta","mandragola.htm#IIIscenaIV","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio12=new Nodo("Scena quinta","mandragola.htm#IIIscenaV","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio13=new Nodo("Scena sesta","mandragola.htm#IIIscenaVI","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio10=new Nodo("Scena settima","mandragola.htm#IIIscenaVII","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio11=new Nodo("Scena ottava","mandragola.htm#IIIscenaVIII","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio12=new Nodo("Scena nona","mandragola.htm#IIIscenaIX","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio13=new Nodo("Scena decima","mandragola.htm#IIIscenaX","",Figlio5,"true", "chiusa.jpg","aperta.jpg");
Figlio10=new Nodo("Scena undicesima","mandragola.htm#IIIscenaXI","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio11=new Nodo("Scena dodicesima","mandragola.htm#IIIscenaXII","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio14=new Nodo("CANZONE","mandragola.htm#canzoneIII","",Figlio5,"true","chiusa.jpg","aperta.jpg");
Figlio8=new Nodo("Scena prima","mandragola.htm#IVscenaI","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio9=new Nodo("Scena seconda","mandragola.htm#IVscenaII","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio10=new Nodo("Scena terza","mandragola.htm#IVscenaIII","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio11=new Nodo("Scena quarta","mandragola.htm#IVscenaIV","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio12=new Nodo("Scena quinta","mandragola.htm#IVscenaV","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio13=new Nodo("Scena sesta","mandragola.htm#IVscenaVI","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio10=new Nodo("Scena settima","mandragola.htm#IVscenaVII","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio11=new Nodo("Scena ottava","mandragola.htm#IVscenaVIII","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio12=new Nodo("Scena nona","mandragola.htm#IVscenaIX","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio13=new Nodo("Scena decima","mandragola.htm#IVscenaX","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio14=new Nodo("CANZONE","mandragola.htm#canzoneIV","",Figlio6,"true","chiusa.jpg","aperta.jpg");
Figlio8=new Nodo("Scena prima","mandragola.htm#VscenaI","",Figlio7,"true","chiusa.jpg","aperta.jpg");
Figlio9=new Nodo("Scena seconda","mandragola.htm#VscenaII","",Figlio7,"true","chiusa.jpg","aperta.jpg");
Figlio10=new Nodo("Scena terza","mandragola.htm#VscenaIII","",Figlio7,"true","chiusa.jpg","aperta.jpg");
Figlio11=new Nodo("Scena quarta","mandragola.htm#VscenaIV","",Figlio7,"true","chiusa.jpg","aperta.jpg");
Figlio12=new Nodo("Scena quinta","mandragola.htm#VscenaV","",Figlio7,"true","chiusa.jpg","aperta.jpg");
Figlio13=new Nodo("Scena sesta","mandragola.htm#VscenaVI","",Figlio7,"true","chiusa.jpg","aperta.jpg");

<! -- Fine delle modifiche -->
</script>

<! -- Questo script funziona su una struttura a frameset. Segue quindi il codice del frame -->
<HEAD><TITLE>MANDRAGOLA</TITLE></HEAD>

</HTML>-->