<!--


function signo(hexagram,nombrech,nombrees,unicodeval) {
	this.hexagram=hexagram;
	this.nombrech=nombrech;
	this.nombrees=nombrees;
	this.unicodeval=unicodeval;
}
function signoconsulta(indice,nombrech,nombrees,unicodeval) {
	this.indice=indice;
	this.nombrech=nombrech;
	this.nombrees=nombrees;
	this.unicodeval=unicodeval;
}
signoAconsultadb = new Array;
signoBconsultadb = new Array;
signoAconsultadb[0]= new signoconsulta("0","","","0");
signoBconsultadb[0]= new signoconsulta("0","","","0");
numeroconsulta=1;
fin="no";

signodb = new Array;
signodb[0]= new signo("000000","","","0");
signodb[1]= new signo("333333","CHIEN","Lo Creativo","4E7E");
signodb[2]= new signo("222222","KUN","Lo Receptivo","5764");
signodb[3]= new signo("322232","CHUN","La Dificultad Inicial","5C6F");
signodb[4]= new signo("232223","MENG","La Inmadurez","8499");
signodb[5]= new signo("333232","XU","La Espera","9700");
signodb[6]= new signo("232333","SONG","El Conflicto","8A1F");
signodb[7]= new signo("232222","SHI","El Ejército","5E2B");
signodb[8]= new signo("222232","BI","La Solidaridad","6BD4");
signodb[9]= new signo("333233","XIAO CHU","La Fuerza Domesticadora de lo Pequeño","5C0F755C");
signodb[10]= new signo("332333","LU","El Porte","5C65");
signodb[11]= new signo("333222","TAI","La Paz","6CF0");
signodb[12]= new signo("222333","PI","El Estancamiento","5426");
signodb[13]= new signo("323333","TONG JEN","Comunidad con los Hombres","540C4EBA");
signodb[14]= new signo("333323","DA YOU","La Posesión de lo Grande","59276709");
signodb[15]= new signo("223222","QIAN","La Modestia","8B19");
signodb[16]= new signo("222322","YU","El Entusiasmo","8C6B");
signodb[17]= new signo("322332","SUI","El Seguimiento","96A8");
signodb[18]= new signo("233223","GU","El Trabajo en lo Echado a Perder","8831");
signodb[19]= new signo("332222","LIN","El Acercamiento","81E8");
signodb[20]= new signo("222233","GUAN","La Contemplación","89C0");
signodb[21]= new signo("322323","SHI HE","La Mordedura Tajante","566C55D1");
signodb[22]= new signo("323223","BI","La Gracia","8CC1");
signodb[23]= new signo("222223","BO","La Desintegración","525D");
signodb[24]= new signo("322222","FU","El Retorno","5FA9");
signodb[25]= new signo("322333","WU WANG","La Inocencia","65E0");
signodb[26]= new signo("333223","DA CHU","La Fuerza Domesticadora de lo Grande","5927755C");
signodb[27]= new signo("322223","YI","Las Comisuras de la boca","9824");
signodb[28]= new signo("233332","DA GUO","La Importancia de lo Grande","5927904E");
signodb[29]= new signo("232232","KAN","Lo Abismal","574E");
signodb[30]= new signo("323323","LI","Lo Adherente","96E2");
signodb[31]= new signo("223332","XIAN","El Influjo (El Cortejo)","54B8");
signodb[32]= new signo("233322","HENG","La Duración","6046");
signodb[33]= new signo("223333","DUN","La Retirada","906F");
signodb[34]= new signo("333322","DA ZHUANG","El Poder de lo Grande","592758EF");
signodb[35]= new signo("222323","JIN","El Progreso","6649");
signodb[36]= new signo("323222","MING I","El Oscurecimiento de la Luz","660E5937");
signodb[37]= new signo("323233","JIA JEN","La Familia","5BB64EBA");
signodb[38]= new signo("332323","KUI","El Antagonismo","668C");
signodb[39]= new signo("223232","JIAN","El Impedimento","8E47");
signodb[40]= new signo("232322","JIE","La Liberación","89E3");
signodb[41]= new signo("332223","SUN","La Disminución","640D");
signodb[42]= new signo("322233","I","El Aumento","76CA");
signodb[43]= new signo("333332","GUAI","El Desbordamiento","592C");
signodb[44]= new signo("233333","GOU","El Ir al Encuentro","59E4");
signodb[45]= new signo("222332","CUI","La Reunión","8403");
signodb[46]= new signo("233222","SHENG","El Ascenso","5347");
signodb[47]= new signo("232332","KUN","La Desazón","56F0");
signodb[48]= new signo("233232","JING","El Pozo","4E95");
signodb[49]= new signo("323332","GE","La Revolución","9769");
signodb[50]= new signo("233323","DING","El Caldero","9F0E");
signodb[51]= new signo("322322","ZHEN","La Conmoción","9707");
signodb[52]= new signo("223223","GEN","El Aquietamiento (La Montaña)","826E");
signodb[53]= new signo("223233","JIAN","La Evolución","6F38");
signodb[54]= new signo("332322","GUI MEI","La Joven Desposada","6B7859B9");
signodb[55]= new signo("323322","FENG","La Plenitud","8C50");
signodb[56]= new signo("223323","LU","El Viajero","65C5");
signodb[57]= new signo("233233","XUN","Lo Penetrante","5DFD");
signodb[58]= new signo("332332","DUI","Lo Sereno","514C");
signodb[59]= new signo("232233","HUAN","La Dispersión","6E19");
signodb[60]= new signo("332232","JIE","La Restricción","7BC0");
signodb[61]= new signo("332233","ZHONG FU","La Verdad Interior","4E2D5B5A");
signodb[62]= new signo("223322","XIAO GUO","La Importancia de lo Pequeño","5C0F904E");
signodb[63]= new signo("323232","JI JI","Después de la Consumación","65E26FDF");
signodb[64]= new signo("232323","WEI JI","Antes de la Consumación","672A6FDF");

RESULTADOSEL= new Array();
RESULTADOSEL[1]=-1; //Es el índice del signo seleccionado, por defecto selecciona el signo 1
RESULTADOSEL[2]=1; //Es el hexagrama 1 o el 2
ULTIMASELMEN=1; //Es el índice de la opción de menú seleccionada en último lugar, por defecto selecciona el menu 1

function buscasigno(signoobtenido) {
//window.alert("comienza la busqueda");
	var i=0;
	do
	{
	i=i+1;
	var j=0;
	signodbi=signodb[i].hexagram;
		do
		{
		j=j+1;
		}
		while (signodbi.substring(j-1,j)==signoobtenido[j]);
	}
	while (j!=7);
	return i;
}

function mrand(hoy) {
	//hoy=new Date();
	rand=hoy.getTime();
	picker=""+rand;
	pl=picker.length-1;
	picker=(picker.substring(pl-1,pl));
	picker=(picker+Math.round(Math.random()*100))%10;
	if (picker%2==0) {
		picker = 2
	}
	else picker = 3;
	//picker=((picker)%2)+2;
	grec=eval(picker);
	return grec;
}
function prueba2(hoy) {
	ran=hoy.getTime();
	pick=""+ran;
	pl2=pick.length-1;
	pick=Math.round(Math.random()*100)%10
//	pick=pick.substring(pl2-1,pl2+1);
	//pick=((pick)%2)+2;
	return pick;
}

hexagramunoA = new Array(); //guarda 2 y 3
hexagramunoA[0]=0; //contador
hexagramunoB = new Array(); //guarda 6,7,8,9
hexagramunoB[0]=0; //contador
hexagramdosB = new Array(); //guarda 6,7,8,9
hexagramdosA = new Array(); //guarda 2 y 3
hexagramdosA[0]=0; //contador
hexagramdosB[0]=0; //contador
hexagramdosB[7]=0; //hay líneas de cambio? el número

yingoyan = new Array();
yingoyan[numeroconsulta]="";
actual=0; //indice actual puede ser numero de consulta +/- un número
function alerta2() {
	for(var lapso=0;lapso<100001;lapso++);
	linea = new Array();
	var num=0;
	sumalinea=0;
	for (var i=0;i<3;i++) {
		num=((Math.round(Math.random()*100))%2)+1;
		linea[i]=mrand(new Date());
		yingoyan[numeroconsulta]=yingoyan[numeroconsulta] +""+ linea[i]; //es el histórico de resultados del tiro de la moneda

		if (linea[i]==2) {
			if (num==2) {
				document.images["moneda"+(1+i)].src="monedayingiroder.gif";
			}
			else{
				document.images["moneda"+(1+i)].src="monedayingiroizq.gif";
			}
		}
		else {
			if (num==2) {
				document.images["moneda"+(1+i)].src="monedayangiroder.gif";
			}
			else{
				document.images["moneda"+(1+i)].src="monedayangiroizq.gif";
			}
		}

		sumalinea=linea[i]+sumalinea;
	}
	linea[i]=sumalinea;	

	hexagramunoA[0]=hexagramunoA[0]+1;
	hexagramdosA[0]=hexagramdosA[0]+1;
	hexagramunoB[0]=hexagramunoB[0]+1;
	hexagramdosB[0]=hexagramdosB[0]+1;
	hexagramunoB[hexagramunoB[0]]=sumalinea;
	hexagramdosB[hexagramdosB[0]]=sumalinea;
	if (hexagramunoB[hexagramunoB[0]]==6) {
	 	hexagramdosB[hexagramdosB[0]]=9;
	 	hexagramdosB[7]=hexagramdosB[7]+1;
	}
	if (hexagramunoB[hexagramunoB[0]]==9) {
		hexagramdosB[hexagramdosB[0]]=6;
		hexagramdosB[7]=hexagramdosB[7]+1;
	}

	document.images["totallinea"+hexagramunoB[0]].src=hexagramunoB[hexagramunoB[0]]+".gif";
	if (sumalinea%2==0) {
		hexagramunoA[hexagramunoA[0]]=2;
		dibujarlinea(("LA"+hexagramunoA[0]),"yin.gif");
	}
	else {
		hexagramunoA[hexagramunoA[0]]=3;
		dibujarlinea(("LA"+hexagramunoA[0]),"yan.gif");
	}
			
	if (hexagramdosB[7]>0 && hexagramdosB[0]==6) {
		for (var i=1; i<7; i++) {
			if (hexagramdosB[i]%2==0) {
				hexagramdosA[i]=2;
				document.images["LB"+i].src="yin.gif";
			}
			else {
				hexagramdosA[i]=3;
				document.images["LB"+i].src="yan.gif";
			}
		}
	}
	if (hexagramunoA[0]==6) {
		fin="si";
		++numeroconsulta;
		actual=numeroconsulta;
		yingoyan[numeroconsulta]="";
		var iA=buscasigno(hexagramunoA);
		signoAconsultadb[numeroconsulta]= new signoconsulta(iA,signodb[iA].nombrech,signodb[iA].nombrees,signodb[iA].unicodeval);
			if (hexagramdosB[7]>0) {
				var iB=buscasigno(hexagramdosA);
				signoBconsultadb[numeroconsulta]= new signoconsulta(iB,signodb[iB].nombrech,signodb[iB].nombrees,signodb[iB].unicodeval);
			}
			else {
				signoBconsultadb[numeroconsulta]= new signoconsulta(0,"","","0");
			}
		if (LINEA=="SI") {
			menu3();
		}
		if (RESULTADOSEL[2]==1) {
			COLSELHEX=1;
			RESULTADOSEL[1]=iA;
		}
		else {
			if (hexagramdosB[7]>0) {
				COLSELHEX=2;
				RESULTADOSEL[1]=iB;
				for (var i=1;i<7;i++) {
					document.images["linmut"+i].src="linnomut.gif";
				}
			}
			else {
				COLSELHEX=1;
				RESULTADOSEL[1]=iA;
				for (var i=1;i<7;i++) {
					document.images["linmut"+i].src="linnomut.gif";
				}
			}
		}

//	cambiartabla();
	cambiartabla2(numeroconsulta);

	}
//	return linea;
}

function irares(valorerrir) {
	busca=valorerrir;
	sa=signoAconsultadb[busca].indice;
	sb=signoBconsultadb[busca].indice;
	if (RESULTADOSEL[2]==1) {
		RESULTADOSEL[1]=sa;
	}
	else {
		if (sb==0) {
			RESULTADOSEL[1]=sa;
		}
		else {
			RESULTADOSEL[1]=sb;
		}
	}


	for (var i=1;i<7;i++) {
		hexagramunoA[i]=(signodb[sa].hexagram).substring(i-1,i);
		hexagramdosA[i]=(signodb[sb].hexagram).substring(i-1,i);

	}


	dibuhexa(hexagramunoA,"A");
	dibuhexa(hexagramdosA,"B");
	cambiartabla2(busca);

	//Activa el cursor "mano" sobre los hexagramas

//	for (var i=1;i<3;i++) {
//window.alert("vale");
//		for (var j=1; j<8; j++) {
//			document.all["hx"+i+j].style.cursor="hand";
//		}
//	}


	//borra la mesa de mimbre y los asteriscos del menú de líneas y coloca los asteriscos correctos del signo
		if (LINEA=="SI") {
			if (RESULTADOSEL[2]==2) {
				for (var i=1;i<7;i++) {
					document.images("linmut"+i).src="linnomut.gif";
				} 
			}
			else {
				menu3();
			}
		}
		document.images("resul").src="vacio2.gif"; 
//		document.all["mesamim"].background="menumim.gif";
		document.all["bckgrmemim"].background="vacio2.gif";

//chgbkgr(RESULTADOSEL[2]);

		rtnbkgr(3);
		COLSELHEX=0;
		FIRSTTIME="SI";
	//borra la mesa de mimbre
//	menu(ULTIMASELMEN);
}
function dibuhexa(valhexa,colum) {
	if (valhexa[1]==0) {
		yindib="sinlinea2.gif";
		yandib=yindib;
		cl="NO";
	}
	else {
		yindib="yin.gif";
		yandib="yan.gif";
		var conssulin2;
		conssulin2=0;
		if (numeroconsulta+act==numeroconsulta) {
			conssulin2=numeroconsulta-1;
		}
		else {
			conssulin2=numeroconsulta+act-1;
		}
		var tmpi;
		k = new Array();
		k[0]=1;
		tmpi=0;
		var totlin;
		totline=0;
		var cl;
		cl="SI";
	}

	for (var i=1; i<7; i++) {
		if (colum=="A") {
			if (cl=="SI") {
				tmpi=i-1;
				k[tmpi+1]=k[tmpi]+3;
				linnea2=yingoyan[conssulin2].substring(k[tmpi]-1,k[tmpi]+2);
				for (var j=1;j<4;j++) {
					totline=linnea2.substring(0,1)*1+linnea2.substring(1,2)*1+linnea2.substring(2,3)*1;
					document.images["totallinea"+i].src=totline+".gif";
				}
			}
			else {
				document.images["totallinea"+i].src="nada_suma.gif";
			}
		}
		if (valhexa[i]%2==0) {
			document.images["L"+colum+i].src=yindib;
		}
		else {
			document.images["L"+colum+i].src=yandib;
		}
	}	
}

function dibujarlinea(linea,valor) {
		document.images[linea].src=valor;
}


function alerta() {
	mrand(new Date());
	window.alert( grec );
}
//if (document.images[5].src.indexOf("hdprodsm.gif")==-1) {
//	window.alert ( "ok");
//} //SI EXISTE EL DOCUMENTO HDPRODSM.GIF COMO IMAGEN #5


function prueba() {
	arrayfecha= new Array();
	fech= new Date();
//	arrayfecha[0]= fech.getDate();
//	arrayfecha[1]= fech.getDay();
//	arrayfecha[2]= fech.getHours();
//	arrayfecha[3]= fech.getMinutes();
//	arrayfecha[4]= fech.getMonth();
//	arrayfecha[5]= fech.getSeconds();
	arrayfecha[6]= fech.getTime();
//	arrayfecha[7]= fech.getTimezoneoffret(); EL METODO ES INCORRECTO SEGURAMENTE LA SINTAXIS
//	arrayfecha[8]= fech.getYear();
	return arrayfecha;
}


function popwindowil() {
	if (fin=="si") {
		var fichero_html="infolin/infol_"+RESULTADOSEL[1]+".htm";
		window.open(fichero_html,"fichero_html","width=550,height=500,scrollbars=yes,resizable=yes,toolbar=no,location=no,directories=no,status=no,menubar=no,copyhistory=no,screenX=0,left=0");
	}
}
function popwindowin() {
	window.open("instr.htm","instr","width=450,height=400,scrollbars=yes,resizable=yes,toolbar=no,location=no,directories=no,status=no,menubar=no,copyhistory=no,screenX=325,left=325");
}
function popwindowtr() {
	window.open("tabref.htm","tabref","width=540,height=550,scrollbars=yes,resizable=no,toolbar=no,location=no,directories=no,status=no,menubar=no,copyhistory=no,screenX=140,left=140");
	
}

function alerta3() {
//	textBox.value=alerta2();
	if (fin=="si") {
		//reseteo, pero no se pierde el registro de signos obtenidosdel array signoAconsultadb y signoBconsultadb
		actual=numeroconsulta;
		act=0;
		irares(0);
		fin="no";
		for (var i=1;i<7;i++) {
			document.images["lin"+i].src="linnomut.gif";
			document.images["linmut"+i].src="linnomut.gif";
		}
		hexagramunoA = new Array();
		hexagramunoA[0]=0;
		hexagramunoB = new Array();
		hexagramunoB[0]=0;
		hexagramdosB = new Array();
		hexagramdosA = new Array();
		hexagramdosA[0]=0;
		hexagramdosB[0]=0;
		hexagramdosB[7]=0;
	}
	alerta2();		
}

COLSELHEX=0; //variable global que guarda la memoria de la última posición de la selección de uno de los dos hexagramas [1] y la última selección de hexagrama [2]

function chgbkgr(ala) {
	if (fin=="si") {
		if (ala==1) {
			for (var i=1;i<8;i++) {
				document.all["hx1"+i].style.cursor="hand";
				document.all["hx1"+i].background="texturahexsel_"+i+".jpg";
			}
			rtnbkgr(2);
		}
		if (ala==2) {
			if (signoBconsultadb[numeroconsulta+act].indice!=0>0) {
				for (var i=1;i<8;i++) {
					document.all["hx2"+i].style.cursor="hand";
					document.all["hx2"+i].background="texturahexsel_"+i+".jpg";
				}
				rtnbkgr(1);
			}
		}	
	}
}
function rtnbkgr(ala) {
	if (fin=="si") {
		if (ala==1) {
			if (FIRSTTIME=="NO") {
				if (COLSELHEX==1) {
				}
				else {
					for (var i=1;i<8;i++) {
						document.all["hx1"+i].background="";
					}
				}
			}
			else {
				for (var i=1;i<8;i++) {
					document.all["hx1"+i].background="";
				}
			}
		}
		if (ala==2) {
			if (signoBconsultadb[numeroconsulta+act].indice!=0>0) {
				if (FIRSTTIME=="NO") {
					if (COLSELHEX==2) {
					}
					else {
						for (var i=1;i<8;i++) {
							document.all["hx2"+i].background="";
						}
					}
				}
				else {
					for (var i=1;i<8;i++) {
						document.all["hx2"+i].background="";
					}
				}
			}
		}
		if (ala==3) {
//		for (var i=1;i<3;i++) {
//			for (var j=1; j<8; j++) {
//				document.all["hx"+i+j].style.cursor="auto";
//			}
//		}
			for (var i=1;i<8;i++) {
				for (var j=1;j<3;j++) {
					document.all["hx"+j+i].style.cursor="auto";
				}
				document.all["hx1"+i].background="";
				document.all["hx2"+i].background="";
			}
		}
	}
}
//function cambiartabla() {
//	document.all["AIndice"].innerText=signoAconsultadb[numeroconsulta].indice;
//	document.all["BIndice"].innerText=signoBconsultadb[numeroconsulta].indice;
//  document.all["ANombrech"].innerText=signoAconsultadb[numeroconsulta].nombrech;
//  document.all["BNombrech"].innerText=signoBconsultadb[numeroconsulta].nombrech;
//  document.all["ANombrees"].innerText=signoAconsultadb[numeroconsulta].nombrees;
//  document.all["BNombrees"].innerText=signoBconsultadb[numeroconsulta].nombrees;
//} 
function cambiartabla2(numr) {
	document.images["H1"].src="libro/ts"+signoAconsultadb[numr].indice+".gif";
	document.images["H2"].src="libro/ts"+signoBconsultadb[numr].indice+".gif";
	document.images["hs1"].src=signoAconsultadb[numr].indice+"_1.gif";
	document.images["hs2"].src=signoBconsultadb[numr].indice+"_1.gif";
}


function volcarbasesignos() {
	for (var i=1;i<65;i++) {
		document.write(i);
		document.write('<p>');
		document.write(signodb[i].nombrech);
		document.write('<p>');
		document.write(signodb[i].nombrees);
		document.write('<p>');
		document.write('<p>');
	}		
}

function cambiarmenu(para) {
	document.images["menucen"].src="menu"+para+".png";
}
function cambiarmenu2(para) {
	document.images["titmen"].src="titmen"+para+".gif";
}
LINEA="NO";

FIRSTTIME="SI";

function menu3() {
		var k;
		var tmpi;
		tmpi=0;
		k=new Array();
		k[0]=1;
		if (numeroconsulta+act==numeroconsulta) {
			conssulin=numeroconsulta-1;
		}
		else {
			conssulin=numeroconsulta+act-1;
		}
		if (RESULTADOSEL[2]==2) {
				for (var i=1;i<7;i++) {
					document.images("linmut"+i).src="linnomut.gif";
					document.images("lin"+i).src="lin"+i+".gif";
				} 
		}
		else {
			for (var i=0;i<6;i++) {
				tmpi=i+1;
				k[i+1]=k[i]+3;
				linnea=yingoyan[conssulin].substring(k[i]-1,k[i]+2);
					if (linnea*1==222 || linnea*1==333) {
						document.images["linmut"+tmpi].src = "linmut.gif";
					}
					else {
						document.images["linmut"+tmpi].src = "linnomut.gif";
					}
				document.images["lin"+tmpi].src="lin"+tmpi+".gif";
			}	
		}
		LINEA="SI";
		document.images("resul").src="vacio2.gif"; 
		document.all["bckgrmemim"].background="vacio2.gif";			
}

function empiezalafuncion() {
		FIRSTTIME="NO";
		if (RESULTADOSEL[1]==signoBconsultadb[numeroconsulta+act].indice) {
			COLSELHEX=2;
		}
		else {
			COLSELHEX=1;
		}
		chgbkgr(COLSELHEX);
}
function menu(para) {

//viene de pulsar las opciones de menú y de la función menu()

	document.images["titmen2"].src="titmen0"+para+".gif";
	if (fin=="si") {
		empiezalafuncion();
		if (para==3) {
			menu3();
		}
		else {
			for (var i=1;i<7;i++) {
				document.images["lin"+i].src="linnomut.gif";
				document.images["linmut"+i].src="linnomut.gif";
			}	
			LINEA="NO";
			if (RESULTADOSEL[1]>0) {
				document.all["bckgrmemim"].background="papeldesenro15.gif";
				if (RESULTADOSEL[1]<10) {
					document.images["resul"].src="libro/resul_menu"+"0"+RESULTADOSEL[1]+para+".gif";
				}
				else {
					document.images["resul"].src="libro/resul_menu"+RESULTADOSEL[1]+para+".gif";
				}
			}
		}
	}
	else {
		document.all["bckgrmemim"].background="papeldesenro15.gif";
		document.images["resul"].src="libro/resul_menu000.gif";
	}
	ULTIMASELMEN=para;
}
function menulin(para2) {
//viene de pulsar las opciones de menú de líneas
//OJO HAY QUE MODIFICAR ESTA LÍNEA PARA QUE SIRVA	document.images["titmen2"].src="titmen0"+para+".gif";
	if (fin=="si") {
		if (LINEA=="SI") {
			empiezalafuncion();
			document.all["bckgrmemim"].background="papeldesenro15.gif";
			if (RESULTADOSEL[1]<10) {
				document.images["resul"].src="libro/resul_menu"+"0"+RESULTADOSEL[1]+3+para2+".gif";
			}
			else {
				document.images["resul"].src="libro/resul_menu"+RESULTADOSEL[1]+3+para2+".gif";
			}
		}
	}
}
function selresul(para) {
//viene de pulsar el signo luego de seleccionar las opciones de menú
	var i=1;
	if (fin=="si"){
		if ((signoBconsultadb[numeroconsulta+act].indice)!=0) {
			RESULTADOSEL[2]=para;
		}
		else {
			if (para==1) {
				RESULTADOSEL[2]=para;
			}
		}
		if (para==1) {
			FIRSTTIME="NO";
			RESULTADOSEL[1]=signoAconsultadb[numeroconsulta+act].indice;
			if (LINEA=="SI") {
				if (RESULTADOSEL[2]==2) {
					for (var i=1;i<7;i++) {
						document.images("linmut"+i).src="linnomut.gif";
					} 
				}
				else {
					menu3();
				}
			}
			COLSELHEX=1;	
			rtnbkgr(2);
		}
		else {
			if (signoBconsultadb[numeroconsulta+act].indice!=0>0) {
				FIRSTTIME="NO";
				RESULTADOSEL[1]=signoBconsultadb[numeroconsulta+act].indice;
				COLSELHEX=2;
				rtnbkgr(1);
			}
			else {
				RESULTADOSEL[1]=signoAconsultadb[numeroconsulta+act].indice;
				i=0;
				for (var j=1;j<7;j++) {
					document.images["linmut"+j].src="linnomut.gif";
				}
				//window.alert("vale");
				COLSELHEX=1;
				rtnbkgr(2);
			}
		}
		if (i==1) {
			if (ULTIMASELMEN!=0) {
				menu(ULTIMASELMEN);
			}
			else {
				menu(1);
			}
		}
	}
//window.alert(COLSELHEX);
//window.alert(RESULTADOSEL[2]);
//window.alert(signoBconsultadb[numeroconsulta+act].indice);
}
function borrarareadenotas() {
	document.forms['notas'].elements['notasarea'].value =''
}
function anotarresultado() {
	var k;
	k=new Array();
	k[0]=1;
	if (fin=="si") {
		if (numeroconsulta+act==numeroconsulta) {
			conssu=numeroconsulta-1;
			conssub=numeroconsulta;
			numconsl=numeroconsulta-1;
		}
		else {
			conssu=numeroconsulta+act-1;
			conssub=numeroconsulta+act;//npi
			numconsl=numeroconsulta+act-1;
		}
		document.forms['notas'].elements['notasarea'].value = '\n'+document.forms['notas'].elements['notasarea'].value;
		for (var i=0;i<6;i++) {
			k[i+1]=k[i]+3;
			linnea=yingoyan[conssu].substring(k[i]-1,k[i]+2);
			if (linnea*1==222 || linnea*1==333) {
				document.forms['notas'].elements['notasarea'].value = "Línea *"+(i+1)+": "+linnea+'\n'+document.forms['notas'].elements['notasarea'].value;
			}
			else {
				document.forms['notas'].elements['notasarea'].value = "Línea  "+(i+1)+": "+linnea+'\n'+document.forms['notas'].elements['notasarea'].value;
			}
		}
			document.forms['notas'].elements['notasarea'].value = '\n\n'+document.forms['notas'].elements['notasarea'].value;
			document.forms['notas'].elements['notasarea'].value = '\n\n'+"LINEAS:"+document.forms['notas'].elements['notasarea'].value;

			if (signoBconsultadb[conssub].indice!=0) {
				document.forms['notas'].elements['notasarea'].value = '\n'+signoBconsultadb[conssub].nombrees+document.forms['notas'].elements['notasarea'].value;
				document.forms['notas'].elements['notasarea'].value = '\n'+signoBconsultadb[conssub].nombrech+document.forms['notas'].elements['notasarea'].value;
				document.forms['notas'].elements['notasarea'].value = '\n'+"SIGNO: "+signoBconsultadb[conssub].indice+document.forms['notas'].elements['notasarea'].value;
				document.forms['notas'].elements['notasarea'].value = '\n\n'+"HAY UN SEGUNDO SIGNO:"+'\n'+document.forms['notas'].elements['notasarea'].value;
			}
			else {
				document.forms['notas'].elements['notasarea'].value = '\n\n'+"NO HAY UN SEGUNDO SIGNO"+document.forms['notas'].elements['notasarea'].value;
			}
			document.forms['notas'].elements['notasarea'].value = '\n'+signoAconsultadb[conssub].nombrees+document.forms['notas'].elements['notasarea'].value;
			document.forms['notas'].elements['notasarea'].value = '\n'+signoAconsultadb[conssub].nombrech+document.forms['notas'].elements['notasarea'].value;
			document.forms['notas'].elements['notasarea'].value = '\n'+"SIGNO: "+signoAconsultadb[conssub].indice+document.forms['notas'].elements['notasarea'].value;
			document.forms['notas'].elements['notasarea'].value = '\n'+"PRIMER SIGNO: "+'\n'+document.forms['notas'].elements['notasarea'].value;

			document.forms['notas'].elements['notasarea'].value = "CONSULTA: " + numconsl+'\n'+document.forms['notas'].elements['notasarea'].value;
	}
	else {
		window.alert("Debe generar un signo para realizar la anotación automática");
	}
}
function abririnstrucciones() {
	window.open("instrucciones.htm"); 
}
act=0;
function alerta5(sumar) {

	if (fin=="si") {
		var vale="si";
		if (sumar==1) {
			ac=-1;
		}
		if (sumar==2) {
			ac=1;
		}
		if (sumar==3) {
			ac=0;
			if (act==0) vale="no";
			else{
				act=0;
			}
		}
		if (sumar==4) {
			ac=0;
			if (act+numeroconsulta==2) vale="no";
			else{
				act=-numeroconsulta+2;
			}
		}

		if (numeroconsulta+act+ac<2) vale="no";
		if (numeroconsulta+act+ac>numeroconsulta) vale="no";
		if (vale=="si") {
			document.images["m1"].src="OK.gif";
			//reseteo, pero no se pierde el registro de signos obtenidosdel array signoAconsultadb y signoBconsultadb

			act=act+ac;
			irares(numeroconsulta+act);
			//fin="no";
			hexagramunoA = new Array();
			hexagramunoA[0]=0;
			hexagramunoB = new Array();
			hexagramunoB[0]=0;
			hexagramdosB = new Array();
			hexagramdosA = new Array();
			hexagramdosA[0]=0;
			hexagramdosB[0]=0;
			hexagramdosB[7]=0;
//			COLSELHEX=RESULTADOSEL[2];
		}
		else {
			document.images["m1"].src="STOP.gif";
		}
	}
}
function cambiarbot(fiche) {
	document.images[fiche].src=fiche+"2.gif";
}
function devolverbot(fiche) {
	document.images[fiche].src=fiche+"1.gif";
}
function pulsabot(fiche) {
	document.images[fiche].src=fiche+"3.gif";
}
function cambiarmenlin(fiche) {
	if (LINEA=="SI") {
		if (fin=="si") {
			document.images[fiche].src=fiche+"b.gif";
		}
	}
}
function devolvermenlin(fiche) {
	if (LINEA=="SI") {
		if (fin=="si") {
			document.images[fiche].src=fiche+".gif";
		}
	}
}
// -->