// Toutes les fonctions ATLAS

function trie() { 
gluten = 0;
ble = 0;
jauneoeuf = 0;
blancoeuf = 0;
arachide = 0;
lactose = 0;
lait = 0;
soja = 0;
total = 0;
if (document.formul.c1.checked == true) gluten = 1 ; 
if (document.formul.c1.checked == false) gluten = 0 ; 
if (document.formul.c2.checked == true) ble = 1 ; 
if (document.formul.c2.checked == false) ble = 0 ; 
if (document.formul.c3.checked == true) jauneoeuf = 1 ; 
if (document.formul.c3.checked == false) jauneoeuf = 0 ; 
if (document.formul.c4.checked == true) blancoeuf = 1 ; 
if (document.formul.c4.checked == false) blancoeuf = 0 ; 
if (document.formul.c5.checked == true) arachide = 1 ; 
if (document.formul.c5.checked == false) arachide = 0 ; 
if (document.formul.c6.checked == true) lactose = 1 ; 
if (document.formul.c6.checked == false) lactose = 0 ; 
if (document.formul.c7.checked == true) lait = 1 ; 
if (document.formul.c7.checked == false) lait = 0 ; 
if (document.formul.c8.checked == true) soja = 1 ; 
if (document.formul.c8.checked == false) soja = 0 ; 

total = (gluten+ble+jauneoeuf+blancoeuf+arachide+lactose+lait+soja)
listeexclur = " ";
if (gluten==1) listeexclur += "\n - de gluten ";
if (ble==1) listeexclur += "\n - de ble ";
if (jauneoeuf==1) listeexclur += "\n - de jaune d'oeuf ";
if (blancoeuf==1) listeexclur += "\n - de blanc d'oeuf ";
if (arachide==1) listeexclur += "\n - d'arachide ni de noix ";
if (lactose==1) listeexclur += "\n - de lactose ";
if (lait==1) listeexclur += "\n - de protéines laitières ";
if (soja==1) listeexclur += "\n - de soja ";
//type = document.formul.typealim.value ; 
if (document.formul.typealim.options[0].selected==true) {
ordrechoix= "hors d'oeuvre"};
if (document.formul.typealim.options[1].selected==true) {
ordrechoix= "plat principal"};
if (document.formul.typealim.options[2].selected==true) {
ordrechoix= "dessert"};
if (document.formul.typealim.options[3].selected==true) {
ordrechoix= "autres"};
ordrechoix= ordrechoix.toUpperCase();
 
if (total > 0 ) {alert('Vous recherchez des recettes de type ' + ordrechoix + ', ne contenant pas : ' + listeexclur)}
else {alert("Vous devez sélectionner au moins un ingrédient à exclure !")}; 



} 
 

function affichresult() {
var Extraitnomdef;
var Extraitaddef;


//" Recherche sur les hors d'oeuvres"
//*****************

if (ordrechoix=="HORS D'OEUVRE") {

//*********** Utilisation code binaire

// Tous les RechocodeC[n] doivent être égaux à 0 si recherche l'allergène demandé ;
// On dit au programme de rechercher l'index n que l'on met dans un tableau de valeurs des index
valindex= new Array();
fin=valindex.length;
if (document.formul.c1.checked == true) {valindex[fin]=0; fin=fin+1};
if (document.formul.c2.checked == true) {valindex[fin]=1; fin=fin+1};
if (document.formul.c3.checked == true) {valindex[fin]=2; fin=fin+1};
if (document.formul.c4.checked == true) {valindex[fin]=3; fin=fin+1};
if (document.formul.c5.checked == true) {valindex[fin]=4; fin=fin+1};
if (document.formul.c6.checked == true) {valindex[fin]=5; fin=fin+1};
if (document.formul.c7.checked == true) {valindex[fin]=6; fin=fin+1};
if (document.formul.c8.checked == true) {valindex[fin]=7; fin=fin+1};
	
// On passe en revue toutes les recettes du tableau et on examine les codes en fonction
// des index, si total =0, alors ok, sinon out.
	fin=valindex.length;
	Totalparrecette=0;
	Valeurrecettetotal=new Array();

// "On lance la recherche sur toutes les recettes du tableau"
	for (w=0;w<=RechocodeC.length-1;w++) {
	
	Chaineetudiee=RechocodeC[w];
		
// "On lance la recheche des valeurs index pour chaque recette"
//	alert('rappel du nbr dindex a etudier : '+fin);
	for (x=0;x<=fin-1;x++) {
	examine=valindex[x];
	Valuelitt=Chaineetudiee.charAt(examine);
	Valuenumeriq=parseInt(Valuelitt);
//	alert('convertit le signe : '+Valuelitt+' qui devient le chiffre :'+Valuenumeriq);
	Totalparrecette=Totalparrecette+Valuenumeriq;
};
			//"Pour chaque r	ecette, on fait le total, soit 1 total par recette"
			Valeurrecettetotal[w]=Totalparrecette;
	Totalparrecette=0;
		//	alert('Calcul en cours sur la recette '+w+' : '+Valeurrecettetotal[w]);
//"Fin de la boucle en w"
};

//Affichage des résultats
Extraitnomdef=new Array();
Extraitaddef=new Array();
	
for (w=0;w<=Valeurrecettetotal.length-1;w++) {
Longueurdef=Extraitnomdef.length;
if (Valeurrecettetotal[w]==0) {
	Extraitnomdef[Longueurdef]=Recho[w];
	Extraitaddef[Longueurdef]=Rechoad[w];
}};
if (Longueurdef>=1) {
document.write('<body background=curieux2.jpg TEXT=#AA0000 LINK=#006690 VLINK=#006690><UL>');
document.write('<strong><BR>Voici la liste des recettes correspondant à votre recherche :'+'<BR><BR><UL>');
for (i=0;i<=Extraitnomdef.length-1;i++) {
Adresse=new String(Extraitaddef[i]);
document.write('<A href='+Adresse+'>'+Extraitnomdef[i]+'</A><BR>')};
document.write('<BR></UL>La base de recettes va continuer à s\'étoffer aussi n\'hésitez pas à revenir régulièrement sur ces pages.<BR><BR>');
}
else {
document.write('<body background=curieux2.jpg><UL>');
document.write('Désolé, aucune recette ne correspond à votre recherche pour le moment.'+'<BR>');
document.write('La base de recettes va continuer à s\'étoffer aussi n\'hésitez pas à revenir régulièrement sur ces pages.<BR><BR>');
}
// fin hors d'oeuvre
}

//" Recherche sur les plats principaux"
//*****************

if (ordrechoix=="PLAT PRINCIPAL") {

//*********** Utilisation code binaire

// Tous les RecppcodeC[n] doivent être égaux à 0 si recherche l'allergène demandé ;
// On dit au programme de rechercher l'index n que l'on met dans un tableau de valeurs des index
valindex= new Array();
fin=valindex.length;
if (document.formul.c1.checked == true) {valindex[fin]=0; fin=fin+1};
if (document.formul.c2.checked == true) {valindex[fin]=1; fin=fin+1};
if (document.formul.c3.checked == true) {valindex[fin]=2; fin=fin+1};
if (document.formul.c4.checked == true) {valindex[fin]=3; fin=fin+1};
if (document.formul.c5.checked == true) {valindex[fin]=4; fin=fin+1};
if (document.formul.c6.checked == true) {valindex[fin]=5; fin=fin+1};
if (document.formul.c7.checked == true) {valindex[fin]=6; fin=fin+1};
if (document.formul.c8.checked == true) {valindex[fin]=7; fin=fin+1};
	
// On passe en revue toutes les recettes du tableau et on examine les codes en fonction
// des index, si total =0, alors ok, sinon out.
	fin=valindex.length;
	Totalparrecette=0;
	Valeurrecettetotal=new Array();

// "On lance la recherche sur toutes les recettes du tableau"
	for (w=0;w<=RecppcodeC.length-1;w++) {
	
	Chaineetudiee=RecppcodeC[w];
		
// "On lance la recheche des valeurs index pour chaque recette"
//	alert('rappel du nbr dindex a etudier : '+fin);
	for (x=0;x<=fin-1;x++) {
	examine=valindex[x];
	Valuelitt=Chaineetudiee.charAt(examine);
	Valuenumeriq=parseInt(Valuelitt);
//	alert('convertit le signe : '+Valuelitt+' qui devient le chiffre :'+Valuenumeriq);
	Totalparrecette=Totalparrecette+Valuenumeriq;
};
			//"Pour chaque r	ecette, on fait le total, soit 1 total par recette"
			Valeurrecettetotal[w]=Totalparrecette;
	Totalparrecette=0;
		//	alert('Calcul en cours sur la recette '+w+' : '+Valeurrecettetotal[w]);
//"Fin de la boucle en w"
};

//Affichage des résultats
Extraitnomdef=new Array();
Extraitaddef=new Array();
	
for (w=0;w<=Valeurrecettetotal.length-1;w++) {
Longueurdef=Extraitnomdef.length;
if (Valeurrecettetotal[w]==0) {
	Extraitnomdef[Longueurdef]=Recpp[w];
	Extraitaddef[Longueurdef]=Recppad[w];
}};
if (Longueurdef>=1) {
document.write('<body background=curieux2.jpg TEXT=#AA0000 LINK=#006690 VLINK=#006690><UL>');
document.write('<strong><BR>Voici la liste des recettes correspondant à votre recherche :'+'<BR><BR><UL>');
for (i=0;i<=Extraitnomdef.length-1;i++) {
Adresse=new String(Extraitaddef[i]);
document.write('<A href='+Adresse+'>'+Extraitnomdef[i]+'</A><BR>')};
document.write('<BR></UL>La base de recettes va continuer à s\'étoffer aussi n\'hésitez pas à revenir régulièrement sur ces pages.<BR><BR>');
}
else {
document.write('<body background=curieux2.jpg><UL>');
document.write('Désolé, aucune recette ne correspond à votre recherche pour le moment.'+'<BR>');
document.write('La base de recettes va continuer à s\'étoffer aussi n\'hésitez pas à revenir régulièrement sur ces pages.<BR><BR>');
}
// fin plat principal
}

//" Recherche sur les desserts"
//*****************

if (ordrechoix=="DESSERT") {

//*********** Utilisation code binaire

// Tous les RecdecodeC[n] doivent être égaux à 0 si recherche l'allergène demandé ;
// On dit au programme de rechercher l'index n que l'on met dans un tableau de valeurs des index
valindex= new Array();
fin=valindex.length;
if (document.formul.c1.checked == true) {valindex[fin]=0; fin=fin+1};
if (document.formul.c2.checked == true) {valindex[fin]=1; fin=fin+1};
if (document.formul.c3.checked == true) {valindex[fin]=2; fin=fin+1};
if (document.formul.c4.checked == true) {valindex[fin]=3; fin=fin+1};
if (document.formul.c5.checked == true) {valindex[fin]=4; fin=fin+1};
if (document.formul.c6.checked == true) {valindex[fin]=5; fin=fin+1};
if (document.formul.c7.checked == true) {valindex[fin]=6; fin=fin+1};
if (document.formul.c8.checked == true) {valindex[fin]=7; fin=fin+1};
	
// On passe en revue toutes les recettes du tableau et on examine les codes en fonction
// des index, si total =0, alors ok, sinon out.
	fin=valindex.length;
	Totalparrecette=0;
	Valeurrecettetotal=new Array();

// "On lance la recherche sur toutes les recettes du tableau"
	for (w=0;w<=RecdecodeC.length-1;w++) {
	
	Chaineetudiee=RecdecodeC[w];
		
// "On lance la recheche des valeurs index pour chaque recette"
//	alert('rappel du nbr dindex a etudier : '+fin);
	for (x=0;x<=fin-1;x++) {
	examine=valindex[x];
	Valuelitt=Chaineetudiee.charAt(examine);
	Valuenumeriq=parseInt(Valuelitt);
//	alert('convertit le signe : '+Valuelitt+' qui devient le chiffre :'+Valuenumeriq);
	Totalparrecette=Totalparrecette+Valuenumeriq;
};
			//"Pour chaque r	ecette, on fait le total, soit 1 total par recette"
			Valeurrecettetotal[w]=Totalparrecette;
	Totalparrecette=0;
		//	alert('Calcul en cours sur la recette '+w+' : '+Valeurrecettetotal[w]);
//"Fin de la boucle en w"
};

//Affichage des résultats
Extraitnomdef=new Array();
Extraitaddef=new Array();
	
for (w=0;w<=Valeurrecettetotal.length-1;w++) {
Longueurdef=Extraitnomdef.length;
if (Valeurrecettetotal[w]==0) {
	Extraitnomdef[Longueurdef]=Recde[w];
	Extraitaddef[Longueurdef]=Recdead[w];
}};
if (Longueurdef>=1) {
document.write('<body background=curieux2.jpg TEXT=#AA0000 LINK=#006690 VLINK=#006690><UL>');
document.write('<strong><BR>Voici la liste des recettes correspondant à votre recherche :'+'<BR><BR><UL>');
for (i=0;i<=Extraitnomdef.length-1;i++) {
Adresse=new String(Extraitaddef[i]);
document.write('<A href='+Adresse+'>'+Extraitnomdef[i]+'</A><BR>')};
document.write('<BR></UL>La base de recettes va continuer à s\'étoffer aussi n\'hésitez pas à revenir régulièrement sur ces pages.<BR><BR>');
}
else {
document.write('<body background=curieux2.jpg><UL>');
document.write('Désolé, aucune recette ne correspond à votre recherche pour le moment.'+'<BR>');
document.write('La base de recettes va continuer à s\'étoffer aussi n\'hésitez pas à revenir régulièrement sur ces pages.<BR><BR>');
}
// fin dessert
}


//" Recherche sur les autres"
//*****************

if (ordrechoix=="AUTRES") {

//*********** Utilisation code binaire

// Tous les RecaucodeC[n] doivent être égaux à 0 si recherche l'allergène demandé ;
// On dit au programme de rechercher l'index n que l'on met dans un tableau de valeurs des index
valindex= new Array();
fin=valindex.length;
if (document.formul.c1.checked == true) {valindex[fin]=0; fin=fin+1};
if (document.formul.c2.checked == true) {valindex[fin]=1; fin=fin+1};
if (document.formul.c3.checked == true) {valindex[fin]=2; fin=fin+1};
if (document.formul.c4.checked == true) {valindex[fin]=3; fin=fin+1};
if (document.formul.c5.checked == true) {valindex[fin]=4; fin=fin+1};
if (document.formul.c6.checked == true) {valindex[fin]=5; fin=fin+1};
if (document.formul.c7.checked == true) {valindex[fin]=6; fin=fin+1};
if (document.formul.c8.checked == true) {valindex[fin]=7; fin=fin+1};
	
// On passe en revue toutes les recettes du tableau et on examine les codes en fonction
// des index, si total =0, alors ok, sinon out.
	fin=valindex.length;
	Totalparrecette=0;
	Valeurrecettetotal=new Array();

// "On lance la recherche sur toutes les recettes du tableau"
	for (w=0;w<=RecaucodeC.length-1;w++) {
	
	Chaineetudiee=RecaucodeC[w];
		
// "On lance la recheche des valeurs index pour chaque recette"
//	alert('rappel du nbr dindex a etudier : '+fin);
	for (x=0;x<=fin-1;x++) {
	examine=valindex[x];
	Valuelitt=Chaineetudiee.charAt(examine);
	Valuenumeriq=parseInt(Valuelitt);
//	alert('convertit le signe : '+Valuelitt+' qui devient le chiffre :'+Valuenumeriq);
	Totalparrecette=Totalparrecette+Valuenumeriq;
};
			//"Pour chaque r	ecette, on fait le total, soit 1 total par recette"
			Valeurrecettetotal[w]=Totalparrecette;
	Totalparrecette=0;
	//		alert('Calcul en cours sur la recette '+w+' : '+Valeurrecettetotal[w]);
//"Fin de la boucle en w"
};

//Affichage des résultats
Extraitnomdef=new Array();
Extraitaddef=new Array();
	
for (w=0;w<=Valeurrecettetotal.length-1;w++) {
Longueurdef=Extraitnomdef.length;
if (Valeurrecettetotal[w]==0) {
	Extraitnomdef[Longueurdef]=Recau[w];
	Extraitaddef[Longueurdef]=Recauad[w];
}};
if (Longueurdef>=1) {
document.write('<body background=curieux2.jpg TEXT=#AA0000 LINK=#006690 VLINK=#006690><UL>');
document.write('<strong><BR>Voici la liste des recettes correspondant à votre recherche :'+'<BR><BR><UL>');
for (i=0;i<=Extraitnomdef.length-1;i++) {
Adresse=new String(Extraitaddef[i]);
document.write('<A href='+Adresse+'>'+Extraitnomdef[i]+'</A><BR>')};
document.write('<BR></UL>La base de recettes va continuer à s\'étoffer aussi n\'hésitez pas à revenir régulièrement sur ces pages.<BR><BR>');
}
else {
document.write('<body background=curieux2.jpg><UL>');
document.write('Désolé, aucune recette ne correspond à votre recherche pour le moment.'+'<BR>');
document.write('La base de recettes va continuer à s\'étoffer aussi n\'hésitez pas à revenir régulièrement sur ces pages.<BR><BR>');
}
// fin autres
}







//" fin de la fonction"
}

// en code L, MAJ=absent donc Ok, MIN=présent donc pasOk
//****************************************************************

Recho = new Array("Galette de poireaux et oignons au four","Gâteau pique-nique poireaux ou carottes","Autres recettes... disponibles prochainement");
Rechoad = new Array("galpoiro.htm","gatpoiro.htm","encours.htm");
Rechosp = new Array("GFAS","GFALP","GFJBALPS");
Rechoin = new Array("JBLP","JBS"," ");
RechocodeC = new Array("00110110","00110001","00000000");
RechocodeL = new Array("GFjbAlpS","GFjbALPs","GFJBALPS");

Recpp = new Array("Galette aux courgettes","Pâtes sans gluten","Crème de chou-fleur","Raviolis aux épinards et au saumon","Autres recettes... disponibles prochainement");
Recppad = new Array("galcourg.htm","patesglu.htm","cremchou.htm","raviolis.htm","encours.htm");
Recppsp = new Array("GFALPS","GFALPS","GFJBALPS","GFALPS","GFJBALPS");
Recppin = new Array("JB","JB"," ","JB"," ");
RecppcodeC = new Array("00110000","00110000","00000000","00110000","00000000");
RecppcodeL = new Array("GFjbALPS","GFjbALPS","GFJBALPS","GFjbALPS","GFJBALPS");

Recde = new Array("Crème délice au marron","Compote de poire au chocolat et poires Belle-Hélène","Crème à la poire","Gâteau au lait d'amande et à la pomme","Biscuits au chocolat","Croustade de pommes à la crème de riz","Prunes au tapioca","Gâteau au yaourt à la banane","Gâteau léger au chocolat","Entremets vanillé au tapioca","Sablés à la crème de riz","Mousse au chocolat","Mousse surprise au café","Tarte pommes châtaigne","Gâteaux secs à la châtaigne","Crème renversée","Gâteau de yaourt","Gâteau de perles du Japon à l'ananas","Galette de sarrasin à la pomme","Semoule de riz à la banane","Petits gâteaux au praliné");
Recdead = new Array("creme_au_marron_sans_gluten.htm","poirchoc.htm","crempoir.htm","gatopom.htm","biscuits.htm","tartpomm.htm","pruntapi.htm","gatoban.htm","gatochoc.htm","tapiovan.htm","sableriz.htm","mouschoc.htm","mouscafe.htm","tapomcha.htm","gatochat.htm","crenvers.htm","gatyaou.htm","perlanan.htm","galsarpo.htm","rizbanan.htm","ptigato.htm");
Recdesp = new Array("GFJBALPS","GFJBALPS", "GFJBALPS","FALPS","GFJBALPS","GFALPS","GFJBALPS","GFJBALPS","GFAS","GFJBALPS","GFJBALPS","GFJALPS","GFJALPS","GFALPS","GFJBALPS","GFALPS","GFAS","GFAS","GFALPS","GFJBALPS","GFLPS");
Recdein = new Array(" "," ", " ", "GJB"," ","JB"," ","LP","JBLP"," "," ","B","B","JB"," ","JB","JBLP","JBLP","JB"," ","JBA");
RecdecodeC = new Array("00000000","00000000","00000000", "10110000","00000000","00110000","00000000","00000110","00110110","00000000","00000000","00010000","00010000","00110000","00000000","00110000","00110110","00110110","00110000","00000000","00111000");
RecdecodeL = new Array("GFJBALPS","GFJBALPS","GFJBALPS","gFjbALPS","GFJBALPS","GFjbALPS","GFJBALPS","GFJBAlpS","GFjbAlpS","GFJBALPS","GFJBALPS","GFJbALPS","GFJbALPS","GFjbALPS","GFJBALPS","GFjbALPS","GFjbAlpS","GFjbAlpS","GFjbALPS","GFJBALPS","GFjbaLPS");

Recau = new Array("Pain sans gluten","Pâte à choux","Galette de polenta","Autres recettes... disponibles prochainement");
Recauad = new Array("painsans.htm","patachou.htm","polenta.htm","encours.htm");
Recausp = new Array("GFJBAS","GFALPS","GFJBALPS","GFJBALPS");
Recauin = new Array("LP","JB"," "," ");
RecaucodeC = new Array("00000110","00110000","00000000","00000000");
RecaucodeL = new Array("GFJBAlpS","GFjbALPS","GFJBALPS","GFJBALPS");