// JavaScript Document

var nbMobile = 53
var nbMarque = 6
var marque = new Array(nbMarque)
var idMarque = new Array(nbMarque)
var mobile = new Array(nbMobile)
var marquemob = new Array(nbMobile)
var idMobile = new Array(nbMobile)
var nummobile = 0
var nomSelected = ""
var nomSelectedComp = ""
var txt = ''
var id = ''

marque[0]="Ensete"
idMarque[0]="Ensete"
marque[1]="Australimusa"
idMarque[1]="Australimusa"
marque[2]="Calimusa"
idMarque[2]="Calimusa"
marque[3]="Eumusa"
idMarque[3]="Eumusa"
marque[4]="Rhodochlamys"
idMarque[4]="Rhodochlamys"
marque[5]="Eumusa x Australimusa"
idMarque[5]="EumusaxAustralimusa"



ajout_specie("Ensete","homblei","homblei")
ajout_specie("Ensete","gilletii","gilletii")
ajout_specie("Ensete","glaucum","glaucum")
ajout_specie("Ensete","perrieri","perrieri")
ajout_specie("Ensete","superbum","superbum")
ajout_specie("Ensete","ventricosum","ventricosum")
ajout_specie("Australimusa","bukensis","bukensis")
ajout_specie("Australimusa","fe'i","fe'i")
ajout_specie("Australimusa","jackeyi","jackeyi")
ajout_specie("Australimusa","lolodensis","lolodensis")
ajout_specie("Australimusa","maclayi","maclayi")
ajout_specie("Australimusa","peekelii","peekelii")
ajout_specie("Australimusa","textilis","textilis")
ajout_specie("Calimusa","beccarii","beccarii")
ajout_specie("Calimusa","borneensis","borneensis")
ajout_specie("Calimusa","coccinea","coccinea")
ajout_specie("Calimusa","gracilis","gracilis")
ajout_specie("Calimusa","violascens","violascens")
ajout_specie("Rhodochlamys","laterita","laterita")
ajout_specie("Rhodochlamys","ornata","ornata")
ajout_specie("Rhodochlamys","sanguinea","sanguinea")
ajout_specie("Rhodochlamys","velutina","velutina")
ajout_specie("Eumusa x Australimusa","AAT","AAT")
ajout_specie("Eumusa x Australimusa","ABBT","ABBT")
ajout_specie("Eumusa x Australimusa","balbisiana x textilis","balbisiana x textilis")
ajout_specie("Eumusa","acuminata","acuminata")
ajout_specie("Eumusa","balbisiana","balbisiana")
ajout_specie("Eumusa","AA","AA")
ajout_specie("Eumusa","AB","AB")
ajout_specie("Eumusa","AAA","AAA")
ajout_specie("Eumusa","AAB","AAB")
ajout_specie("Eumusa","ABB","ABB")
ajout_specie("Eumusa","BBB","BBB")
ajout_specie("Eumusa","AS","AS")
ajout_specie("Eumusa","AAS","AAS")
ajout_specie("Eumusa","AAA-AAB","AAA-AAB")
ajout_specie("Eumusa","AAAA","AAAA")
ajout_specie("Eumusa","AAAB","AAAB")
ajout_specie("Eumusa","AABB","AABB")
ajout_specie("Eumusa","ABBB","ABBB")
ajout_specie("Eumusa","basjoo","basjoo")
ajout_specie("Eumusa","boman","boman")
ajout_specie("Eumusa","cheesmani","cheesmani")
ajout_specie("Eumusa","flaviflora","flaviflora")
ajout_specie("Eumusa","halabanensis","halabanensis")
ajout_specie("Eumusa","ingens","ingens")
ajout_specie("Eumusa","itinerans","itinerans")
ajout_specie("Eumusa","nagensium","nagensium")
ajout_specie("Eumusa","ochracea","ochracea")
ajout_specie("Eumusa","schizocarpa","schizocarpa")
ajout_specie("Eumusa","sikkimensis","sikkimensis")
ajout_specie("Eumusa","acuminata x balbisania","acuminataxbalbisania")
ajout_specie("Eumusa","acuminata x schizocarpa","acuminataxschizocarpa")




function ajout_specie(nom_marque,modele,id){
	for(i=0;i<nbMarque;i++){
		if(marque[i]==nom_marque){
			mobile[nummobile]=modele
			marquemob[nummobile]=i
			idMobile[nummobile]=id
			nummobile++
			i=nbMarque
}}}

function affichesection(id1,titre,titre2,txt1)
{
	id = id1
	txt=txt1
	if(id=='comp')
		nomSelectedComp = titre2
	else
		nomSelected = titre2
	if(txt!='')
		txt="class='"+txt+"'"
	liste="<select name=SECTION"+id+" onChange='choix(\""+id+"\")' "+txt+">"
	liste=liste+"<option value=\"\">"+titre
	for (i=0;i<marque.length;i++){
		liste=liste+"<option value='"+idMarque[i]+"'>"+marque[i]
	}
	liste=liste+"</select>"
	document.write(liste)	
}

function affichespecie()
{
	if(id=='comp')
		nomFinal = nomSelectedComp
	else
		nomFinal = nomSelected
	
	liste="<select name=SPECIE"+id+" "+txt+">"
	liste=liste+"<option value=\"\">"+nomFinal
	liste=liste+"</select>"
	document.write(liste)	
}

function choix(id){
	if(id=='comp')
		nomFinal = nomSelectedComp
	else
		nomFinal = nomSelected
	marque = eval('document.getElementById("form1").SECTION'+id)
	modele = eval('document.getElementById("form1").SPECIE'+id)
	if(marque.selectedIndex==0){
		nombre=modele.options.length
		for (j=nombre;j>=0;j--){
			modele.options[j]=null}
		modele.options[0]=new Option(nomFinal,-1)
		modele.selectedIndex=0
		return}
	var txt=new Array()
	var id=new Array()
	txt[0]=nomFinal
	id[0]=-1
	nb=1
	for(i=0;i<nummobile;i++){
		if(marquemob[i]==(marque.selectedIndex-1)){
			txt[nb]=mobile[i]
			id[nb]=idMobile[i]
			nb=nb+1}}
	nombre=modele.options.length
	for (j=nombre;j>=0;j--){
		modele.options[j]=null}
	modele.selectedIndex=0
	if(txt.length==1){
		modele.options[0]=null
		modele.options[0]=new Option("----------------------",-1)
	}else{
	for(i=0;i<txt.length;i++){
		modele.options[i]=new Option(txt[i],id[i])
}}
modele.selectedIndex=0
}

