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]="1 mai";
	vSAM[19]="8 mai";
	vSAM[20]="15 mai";
	vSAM[21]="22 mai";
	vSAM[22]="29 mai";
	vSAM[23]="5 juin";
	vSAM[24]="12 juin";
	vSAM[25]="19 juin";
	vSAM[26]="26 juin";
	vSAM[27]="3 juillet";
	vSAM[28]="10 juillet";
	vSAM[29]="17 juillet";
	vSAM[30]="24 juillet";
	vSAM[31]="31 juillet"; 
	vSAM[32]="7 aout"; 
	vSAM[33]="14 aout";
	vSAM[34]="21 aout";
	vSAM[35]="28 aout"; 
	vSAM[36]="4 septembre";
	vSAM[37]="11 septembre"; 
	vSAM[38]="18 septembre";
	vSAM[39]="25 septembre";
	vSAM[40]="2 octobre";
	vSAM[41]="9 octobre";
	vSAM[42]="16 octobre";
	vSAM[43]="23 octobre";
	vSAM[44]="30 octobre";
	vSAM[45]="6 novembre";  
	vGRI[18]=550;
	vGRI[19]=550;
	vGRI[20]=550;
	vGRI[21]=550;
	vGRI[22]=9600;
	vGRI[23]=9650;
	vGRI[24]=9700;
	vGRI[25]=9750;
	vGRI[26]=900;
	vGRI[27]=1200;
	vGRI[28]=1400;
	vGRI[29]=1400;
	vGRI[30]=91400;
	vGRI[31]=91400;  
	vGRI[32]=91400;
	vGRI[33]=91400;
	vGRI[34]=91200;
	vGRI[35]=750;
	vGRI[36]=700;
	vGRI[37]=90650;
	vGRI[38]=90600;
	vGRI[39]=90550;
	vGRI[40]=90550;
	vGRI[41]=90550;
	vGRI[42]=90550;
	vGRI[43]=90550;
	vGRI[44]=90550;
	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>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 2010 02:00:00 GMT; path=/";
	document.cookie = "OQP="+vOQP+"; expires=Mon, 30 Nov 2010 02:00:00 GMT; path=/";
	document.cookie = "OCC="+vOCC+"; expires=Mon, 30 Nov 2010 02:00:00 GMT; path=/";
	document.cookie = "DUR="+vDUR+"; expires=Mon, 30 Nov 2010 02:00:00 GMT; path=/";
	
	alert(vREP);
}