function litCookie(Nom, Defaut) {
	var vdeb=new Number(-1);
	var vfin=new Number(-1);
	var vREP=new String("");

	if (arguments.length==0) { return "false"; }
	if (arguments.length>2) { return "false"; }
	if (arguments.length==1) { Defaut="false"; }

	if(document.cookie.length>0) {
	 vdeb = document.cookie.indexOf(Nom+"=");
	 if (vdeb != -1) {
	  vdeb+=Nom.length+1;
	  vfin = document.cookie.indexOf(";", vdeb);
	  if (vfin==-1) {
	   vfin=document.cookie.length;
	  }
     vREP = unescape(document.cookie.substring(vdeb, vfin))
    }
    else {
     vREP=Defaut;
    }
   }
   else {
    vREP=Defaut;
   }
return vREP;
}

function initTarif() {
	var vSEM=new String(litCookie("SEM","27"));
	var vOQP=new String(litCookie("OQP","6"));
	var vOCC=new String(litCookie("OCC","false"));
	var vDUR=new String(litCookie("DUR","2"));
	var j=new Number(0);

	for (i=0;i<23;i++) {
      if (vSEM==document.forms.formCAL.radSEM[i].value) {
		   document.forms.formCAL.radSEM[i].checked=true;
 		   break;
 		}
	}
	for (i=0;i<3;i++) {
      if (vOQP==document.forms.formCAL.radOQP[i].value) {
		   document.forms.formCAL.radOQP[i].checked=true;
 		   break;
 		}
	}
	for (i=0;i<2;i++) {
      if (vOCC==document.forms.formCAL.radOCC[i].value) {
		   document.forms.formCAL.radOCC[i].checked=true;
 		   break;
 		}
	}
	for (i=0;i<4;i++) {
      if (vDUR==document.forms.formCAL.radDUR[i].value) {
		   document.forms.formCAL.radDUR[i].checked=true;
 		   break;
 		}
	}
}

function tarif() {
	var vSAM=new Array(53);
	var vGRI=new Array(53);
	var vSEM=new Number(0);
	var vOQP=new Number(6);
	var vOCC=new Boolean(false);
	var vDUR=new Number(1);
	var vTAR=0;
	var vCOEF=1;
	var vREP=new String("");
	for (i=0; i<53; i++) {
		vSAM[i]=new String("");
		vGRI[i]=99999;
	}
	vSAM[18]="28 avril";
	vSAM[19]="5 mai";
	vSAM[20]="12 mai";
	vSAM[21]="19 mai";
	vSAM[22]="26 mai";
	vSAM[23]="2 juin";
	vSAM[24]="9 juin";
	vSAM[25]="16 juin";
	vSAM[26]="23 juin";
	vSAM[27]="30 juin";
	vSAM[28]="7 juillet";
	vSAM[29]="14 juillet";
	vSAM[30]="21 juillet";
	vSAM[31]="28 juillet"; 
	vSAM[32]="4 aout"; 
	vSAM[33]="11 aout";
	vSAM[34]="18 aout";
	vSAM[35]="25 aout"; 
	vSAM[36]="1 septembre";
	vSAM[37]="8 septembre"; 
	vSAM[38]="15 septembre";
	vSAM[39]="22 septembre";
	vSAM[40]="29 septembre";
	vSAM[41]="6 octobre";
	vSAM[42]="13 octobre";
	vSAM[43]="20 octobre";
	vSAM[44]="27 octobre";
	vSAM[45]="3 novembre";  
	vGRI[18]=700;
	vGRI[19]=700;
	vGRI[20]=700;
	vGRI[21]=700;
	vGRI[22]=700;
	vGRI[23]=90700;
	vGRI[24]=90700;
	vGRI[25]=90700;
	vGRI[26]=90700;
	vGRI[27]=91000;
	vGRI[28]=1000;
	vGRI[29]=1470;
	vGRI[30]=1470;
	vGRI[31]=1470;  
	vGRI[32]=91470;
	vGRI[33]=91470;
	vGRI[34]=91470;
	vGRI[35]=1000;
	vGRI[36]=700;
	vGRI[37]=700;
	vGRI[38]=700;
	vGRI[39]=700;
	vGRI[40]=700;
	vGRI[41]=700;
	vGRI[42]=700;
	vGRI[43]=700;
	vGRI[44]=700;
	for (i=0;i<24;i++)
	{
		if (document.forms.formCAL.radSEM[i].checked==true)
		{ 
			vSEM=Number(document.forms.formCAL.radSEM[i].value);
			break;
		}
	}
	for (i=0;i<3;i++)
	{
		if (document.forms.formCAL.radOQP[i].checked==true)
		{ 
			vOQP=Number(document.forms.formCAL.radOQP[i].value);
			break;
		}
	}
	if (document.forms.formCAL.radOCC[0].checked==true) { vOCC=true; }
	for (i=0;i<4;i++)
	{
		if (document.forms.formCAL.radDUR[i].checked==true)
		{ 
			vDUR=Number(document.forms.formCAL.radDUR[i].value);
			break;
		}

	}

	if (vOQP==4) { vCOEF=0.92; }
	if (vOQP==2) { vCOEF=0.85; }
	if (vOCC==true)
	{
		if (vOQP==6) { vREP="La capacite d'accueil n'est pas suffisante"; }
		else { vCOEF=1; }
	}
	if (vDUR==2) { vCOEF=vCOEF*0.85; }
	if (vDUR==3) { vCOEF=vCOEF*0.80; }
	if (vDUR>3) { vCOEF=vCOEF*0.775; }
	vFIN=vSEM;
	for (i=0;i<vDUR;i++) { vTAR=vTAR+vGRI[vFIN++]; }
	vTAR=Math.round(vTAR*vCOEF);
	if (vTAR==2499) { vTAR=2500; }
	if (vTAR>10000) { vREP="Voyez le calendrier : cette periode n'est pas disponible"; }
	if (vDUR==1) {
          if (vSEM>26) {
            if (vSEM<35) {
              vREP="En juillet et aout la duree minimale de sejour est de deux semaines";
            }
          }
        }
	if (vREP=="")
	{
		vREP="Le tarif pour "+
			vOQP+" personnes du samedi "+
			vSAM[vSEM]+" apres 16h au samedi "+
			vSAM[vFIN]+" avant 10h est de "+
			vTAR+" euros."
		if (vOCC==false) { vREP=vREP+" L'hebergement de visiteurs n'est pas autorise." }
		else { vREP=vREP+" L'hebergement occasionnel est autorise dans la limite de "+Number(6-vOQP)+" visiteurs." }
	}

	if (vOQP==6) { vOCC=false; }
	document.cookie = "SEM="+vSEM+"; expires=Mon, 30 Nov 2012 02:00:00 GMT; path=/";
	document.cookie = "OQP="+vOQP+"; expires=Mon, 30 Nov 2012 02:00:00 GMT; path=/";
	document.cookie = "OCC="+vOCC+"; expires=Mon, 30 Nov 2012 02:00:00 GMT; path=/";
	document.cookie = "DUR="+vDUR+"; expires=Mon, 30 Nov 2012 02:00:00 GMT; path=/";
	
	alert(vREP);
}