var opSelecc=0;
var cMas=0;
var cFem=0;
///////////////////////
function ocultar(){
document.getElementById('resultados').style.display='none';
document.getElementById('resultados').style.visibility='hidden';
document.getElementById('resultados0').style.display='block';
document.getElementById('resultados0').style.visibility='visible';

var cadUr='http://www.allatmedica.com/asesor.asp?cMas='+(cMas+1)+'&cFem='+(cFem+1)+'&opSelecc='+(opSelecc+1);
//alert(cadUr)
abrirVentanaNuevaPopUp(cadUr,'_blank',400,400);
}
////////////////////////////////////////////
function ocultar2(){
document.getElementById('resultados').style.display='none';
document.getElementById('resultados').style.visibility='hidden';
document.getElementById('resultados0').style.display='block';
document.getElementById('resultados0').style.visibility='visible';

}
////////////////////////////////////////////
function cambiaComboAbajo(seleccionado){
if (seleccionado==1){document.frmAsesor.cbEsperma.selectedIndex=document.frmAsesor.cbEsperma1.selectedIndex;};
if (seleccionado==2){document.frmAsesor.cbEsperma.selectedIndex=document.frmAsesor.cbEsperma2.selectedIndex;};
if (seleccionado==3){document.frmAsesor.cbEsperma.selectedIndex=document.frmAsesor.cbEsperma3.selectedIndex;};
if (seleccionado==4){document.frmAsesor.cbEsperma.selectedIndex=document.frmAsesor.cbEsperma4.selectedIndex;};
if (seleccionado==5){document.frmAsesor.cbEsperma.selectedIndex=document.frmAsesor.cbEsperma5.selectedIndex;};
if (seleccionado==6){document.frmAsesor.cbEsperma.selectedIndex=document.frmAsesor.cbEsperma6.selectedIndex;};
ocultar2();
selecciona();
}
////////////////////////////////////////////
function selecciona(){
//alert(document.frmAsesor.cbEsperma.options[document.frmAsesor.cbEsperma.selectedIndex].value);
/*
if(seleccionado==1)cambiaComboAbajo(1);
if(seleccionado==2)cambiaComboAbajo(2);
if(seleccionado==3)cambiaComboAbajo(3);
if(seleccionado==4)cambiaComboAbajo(4);
if(seleccionado==5)cambiaComboAbajo(5);
if(seleccionado==6)cambiaComboAbajo(6);
*/
cMas=0;
var espermas=document.frmAsesor.cbEsperma.options[document.frmAsesor.cbEsperma.selectedIndex].value;
if(parseInt(espermas)<0) espermas=0;
if(document.frmAsesor.cm[0].checked) cMas=0;
if(document.frmAsesor.cm[1].checked) cMas=1+parseInt(espermas);
if(document.frmAsesor.cm[2].checked) cMas=4+parseInt(espermas);
if(document.frmAsesor.cm[3].checked) cMas=7+parseInt(espermas);
if(document.frmAsesor.cm[4].checked) cMas=10+parseInt(espermas);
if(document.frmAsesor.cm[5].checked) cMas=13+parseInt(espermas);
if(document.frmAsesor.cm[6].checked) cMas=16+parseInt(espermas);
if(document.frmAsesor.cm[7].checked) cMas=19;//+parseInt(espermas);

cFem=0;
if(document.frmAsesor.cf[0].checked) cFem=0;
if(document.frmAsesor.cf[1].checked) cFem=1;
if(document.frmAsesor.cf[2].checked) cFem=2;
if(document.frmAsesor.cf[3].checked) cFem=3;
if(document.frmAsesor.cf[4].checked) cFem=4;
if(document.frmAsesor.cf[5].checked) cFem=5;
if(document.frmAsesor.cf[6].checked) cFem=6;
if(document.frmAsesor.cf[7].checked) cFem=7;
if(document.frmAsesor.cf[8].checked) cFem=8;
if(document.frmAsesor.cf[9].checked) cFem=9;
cadMas='';
if (cMas==0)cadMas='Ninguna';
if (cMas==1)cadMas='Oligospermia con R.E.M. mayor que 5 millones';
if (cMas==2)cadMas='Oligospermia con R.E.M. entre 1 y 5 millones';
if (cMas==3)cadMas='Oligospermia con R.E.M. menor que 1 millón';
if (cMas==4)cadMas='Astenospermia con R.E.M. mayor que 5 millones';
if (cMas==5)cadMas='Astenospermia con R.E.M. entre 1 y 5 millones';
if (cMas==6)cadMas='Astenospermia con R.E.M. menor que 1 millón';
if (cMas==7)cadMas='Terastospermia con R.E.M. mayor que 5 millones';
if (cMas==8)cadMas='Terastospermia con R.E.M. entre 1 y 5 millones';
if (cMas==9)cadMas='Terastospermia con R.E.M. menor que 1 millón';
if (cMas==10)cadMas='Oligoastenospermia con R.E.M. mayor que 5 millones';
if (cMas==11)cadMas='Oligoastenospermia con R.E.M. entre 1 y 5 millones';
if (cMas==12)cadMas='Oligoastenospermia con R.E.M. menor que 1 millón';
if (cMas==13)cadMas='Oligoastenoteratospermia con R.E.M. mayor que 5 millones';
if (cMas==14)cadMas='Oligoastenoteratospermia con R.E.M. entre 1 y 5 millones';
if (cMas==15)cadMas='Oligoastenoteratospermia con R.E.M. menor que 1 millón';
if (cMas==16)cadMas='Azoospermia Obstructiva con R.E.M. mayor que 5 millones';
if (cMas==17)cadMas='Azoospermia Obstructiva con R.E.M. entre 1 y 5 millones';
if (cMas==18)cadMas='Azoospermia Obstructiva con R.E.M. menor que 1 millón';
if (cMas==19)cadMas='Azoospermia No Obstructiva';

cadFem='';
if (cFem==0)cadFem='Ninguna';
if (cFem==1)cadFem='Factor tubárico';
if (cFem==2)cadFem='Síndrome adherencial';
if (cFem==3)cadFem='Endometriosis sin adherencias';
if (cFem==4)cadFem='Endometriosis con adherencias';
if (cFem==5)cadFem='Malformaciones Factor uterino';
if (cFem==6)cadFem='Miomas Factor uterino';
if (cFem==7)cadFem='Ateraciones de la ovulación';
if (cFem==8)cadFem='Baja reserva ovárica';
if (cFem==9)cadFem='Fracaso ovárico';


cadTrat='No es necesario tratamiento.';
var cTrataN= new Array(17);
cTrataN[0]="No es necesario tratamiento.";
cTrataN[1]="Corregir el factor uterino si está indicado. Luego, F.I.V.";
cTrataN[2]="Corregir el factor uterino si está indicado. Luego, I.C.S.I.";
cTrataN[3]="Corregir el factor uterino si está indicado. Si no, o no hay embarazo, I.A.H.";
cTrataN[4]="F.I.V.";
cTrataN[6]="F.I.V. con ovocitos de donante";
cTrataN[6]="F.I.V. si la reserva es baja pero aceptable. F.I.V. con ovocitos de donante si la reserva está muy alterada.";
cTrataN[7]="I.A.H.";
cTrataN[8]="I.A.H. Si la reserva es baja pero aceptable. F.I.V. si la reserva está muy alterada.";
cTrataN[9]="I.C.S.I.";
cTrataN[10]="I.C.S.I. con ovocitos de donante.";
cTrataN[11]="I.C.S.I. con recuperación de espermatozoides del testículo, pero en Allat Médica recomendamos I.A.D.";
cTrataN[12]="I.C.S.I. si la reserva es baja pero aceptable. I.C.S.I. con ovocitos de donante si la reserva está muy alterada.";
cTrataN[13]="Miomectomía si está indicada. Luego, F.I.V.";
cTrataN[14]="Miomectomía si está indicada. Luego, I.C.S.I.";
cTrataN[15]="Miomectomía si está indicada. Si no, o no hay embarazo, I.A.H.";
cTrataN[16]="Corregir la obstrucción y evaluar la Azoospermia no obstructiva.";
var cTrataHtml= new Array(17);
cTrataHtml[0]='No es necesario tratamiento.';
cTrataHtml[1]="Corregir el factor uterino si está indicado. Luego, <a class=linkAM  href=tratamiento3.html>F.I.V.</a>";
cTrataHtml[2]="Corregir el factor uterino si está indicado. Luego, <a class=linkAM  href=tratamiento4.html>I.C.S.I.</a>";
cTrataHtml[3]="Corregir el factor uterino si está indicado. Si no, o no hay embarazo, <a class=linkAM  href=tratamiento1.html>I.A.H.</a>";
cTrataHtml[4]="<a class=linkAM  href=tratamiento3.html>F.I.V.</a>";
cTrataHtml[5]="<a class=linkAM  href=tratamiento3.html>F.I.V.</a> con ovocitos de donante";
cTrataHtml[6]="<a class=linkAM  href=tratamiento3.html>F.I.V.</a> si la reserva es baja pero aceptable. <a class=linkAM  href=tratamiento3.html>F.I.V.</a> con ovocitos de donante si la reserva está muy alterada.";
cTrataHtml[7]="<a class=linkAM  href=tratamiento1.html>I.A.H.</a>";
cTrataHtml[8]="<a class=linkAM  href=tratamiento1.html>I.A.H.</a> Si la reserva es baja pero aceptable. <a class=linkAM  href=tratamiento3.html>F.I.V.</a> si la reserva está muy alterada.";
cTrataHtml[9]="<a class=linkAM  href=tratamiento4.html>I.C.S.I.</a>";
cTrataHtml[10]="<a class=linkAM  href=tratamiento4.html>I.C.S.I.</a> con ovocitos de donante.";
cTrataHtml[11]="<a class=linkAM  href=tratamiento4.html>I.C.S.I.</a> con recuperación de espermatozoides del testículo, pero en Allat Médica recomendamos <a class=linkAM  href=tratamiento2.html>I.A.D.</a>";
cTrataHtml[12]="<a class=linkAM  href=tratamiento4.html>I.C.S.I.</a> si la reserva es baja pero aceptable. <a class=linkAM  href=tratamiento4.html>I.C.S.I.</a> con ovocitos de donante si la reserva está muy alterada.";
cTrataHtml[13]="Miomectomía si está indicada. Luego, <a class=linkAM  href=tratamiento3.html>F.I.V.</a>";
cTrataHtml[14]="Miomectomía si está indicada. Luego, <a class=linkAM  href=tratamiento4.html>I.C.S.I.</a>";
cTrataHtml[15]="Miomectomía si está indicada. Si no, o no hay embarazo, <a class=linkAM  href=tratamiento1.html>I.A.H.</a>";
cTrataHtml[16]="Corregir la obstrucción y evaluar la Azoospermia no obstructiva.";


opSelecc=0;
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==0) {opSelecc=7;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==0) {opSelecc=4;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==0) {opSelecc=9;}
if (cMas==19 && cFem==0){opSelecc=11;}
if (cMas==0 && cFem==1) {opSelecc=4;}
if (cMas==0 && cFem==2) {opSelecc=4;}
if (cMas==0 && cFem==3) {opSelecc=7;}
if (cMas==0 && cFem==4) {opSelecc=4;}
if (cMas==0 && cFem==5) {opSelecc=7;}
if (cMas==0 && cFem==6) {opSelecc=7;}
if (cMas==0 && cFem==7) {opSelecc=7;}
if (cMas==0 && cFem==8) {opSelecc=7;}
if (cMas==0 && cFem==9) {opSelecc=5;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==1) {opSelecc=4;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==2) {opSelecc=4;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==3) {opSelecc=7;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==4) {opSelecc=4;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==5) {opSelecc=3;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==6) {opSelecc=15;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==7) {opSelecc=7;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==8) {opSelecc=8;}
if ((cMas==1||cMas==4||cMas==7||cMas==10||cMas==13||cMas==16) && cFem==9) {opSelecc=5;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==1) {opSelecc=4;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==2) {opSelecc=4;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==3) {opSelecc=4;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==4) {opSelecc=4;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==5) {opSelecc=1;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==6) {opSelecc=13;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==7) {opSelecc=4;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==8) {opSelecc=6;}
if ((cMas==2||cMas==5||cMas==8||cMas==11||cMas==14||cMas==17) && cFem==9) {opSelecc=5;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==1) {opSelecc=9;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==2) {opSelecc=9;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==3) {opSelecc=9;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==4) {opSelecc=9;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==5) {opSelecc=2;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==6) {opSelecc=14;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==7) {opSelecc=9;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==8) {opSelecc=12;}
if ((cMas==3||cMas==6||cMas==9||cMas==12||cMas==15||cMas==18) && cFem==9) {opSelecc=10;}
if (cMas==19 && cFem==1) {opSelecc=16;}
if (cMas==19 && cFem==2) {opSelecc=16;}
if (cMas==19 && cFem==3) {opSelecc=16;}
if (cMas==19 && cFem==4) {opSelecc=16;}
if (cMas==19 && cFem==5) {opSelecc=16;}
if (cMas==19 && cFem==6) {opSelecc=16;}
if (cMas==19 && cFem==7) {opSelecc=16;}
if (cMas==19 && cFem==8) {opSelecc=16;}
if (cMas==19 && cFem==9) {opSelecc=16;}

//top.location.href="#lbl0";
document.getElementById('caMa').innerHTML=cMas+' '+cadMas;
document.getElementById('caFe').innerHTML=cFem+' '+cadFem;
document.getElementById('caRes').innerHTML=opSelecc+' '+cTrataHtml[opSelecc];

//alert(cTrataHtml[opSelecc]);
//alert(cadMas+'\n'+cadFem+'\n'+cTrataN[opSelecc]);
//alert(cadMas+'\n'+cadFem+'\n'+cTrataN[opSelecc]);

var resDiv='<b>Causa masculina:</b><br>'+cadMas
	+'<br><br><b>Causa femenina:</b><br>'+cadFem
	+'<br><br><b>Tratamiento recomendado:</b><br>'+opSelecc+' '+cTrataHtml[opSelecc];
//document.getElementById('resultados').innerHTML=resDiv;
//top.location.href="http://home.cogeco.ca/~ve3ll/utility.htm";
}
////////////////////
function vamos(mOn,seleccionado){

	if(mOn=='hidden'){
		for(i=1;i<= 6; i++){
			document.getElementById('cantidadEsperma'+i).style.visibility='hidden';
			document.getElementById('cantidadEsperma'+i).style.display='none';
		}	
	}	
	if(mOn=='visible'){
if(seleccionado==1)cambiaComboAbajo(1);
if(seleccionado==2)cambiaComboAbajo(2);
if(seleccionado==3)cambiaComboAbajo(3);
if(seleccionado==4)cambiaComboAbajo(4);
if(seleccionado==5)cambiaComboAbajo(5);
if(seleccionado==6)cambiaComboAbajo(6);
		document.getElementById('cantidadEsperma'+seleccionado).style.visibility='visible';
		document.getElementById('cantidadEsperma'+seleccionado).style.display='block';
		//document.frmAsesor.cbEsperma.selectedIndex=0;
		for(i=1;i<= 6; i++){
			if (i!=seleccionado){
				document.getElementById('cantidadEsperma'+i).style.visibility='hidden';
				document.getElementById('cantidadEsperma'+i).style.display='none';
			}	
		}	
		//document.getElementById('cantidadEsperma'+i).style.visibility='visible';
	}
	//document.getElementById('botonera').style.visibility='visible';
	//document.frmAsesor.cbEsperma.selectedIndex=0;alert(document.frmAsesor.cbEsperma.options[document.frmAsesor.cbEsperma.selectedIndex].value);
ocultar2();
selecciona();
}