var clave;var elegidas=new Array();var marcas=new Array();var Palabras=new Array();Palabras=SeisLetras;var tamano=Palabras[0].length,Ganadas=0,Perdidas=0;var error=new Image();var ok=new Image();var blanca=new Image();error.src="No.gif";ok.src="Si.gif";blanca.src="Blanco.gif";function Generar_Tabla(){var i,j;document.getElementById("Sele_Tamano").selectedIndex=tamano-6;var texto="<table class=tabla width='100%'><tr><td colspan='"+(tamano+2)+"' class='vacia'><p>&nbsp;</p></td></tr>";for(i=0;i<=tamano;i++){texto+="<tr><td class='letras'><div id='id"+i+"'></div></td>";for(j=0;j<tamano;j++)texto+="<td width='34'><input type='text' class='celda' maxlength='1' id='id"+i.toString()+j.toString()+"' tabindex='"+tamano*i+j+1+"' onkeyUp=' RecogerTecla(event,"+i+","+j+");'></td>";texto+="<td class='resul'><img src='Blanco.gif' width='32' height='32' id='idr"+i+"'></td></tr>"}texto+="<tr><td colspan='8' class='vacia'><p>&nbsp;</p></td></tr></table>";document.getElementById("tablero").innerHTML=texto;for(i=0;i<tamano;i++)document.getElementById("id"+tamano.toString()+i.toString()).style.background="#FFDDAA"}function Inicializar(){var i,j,tmp;tamano=Palabras[0].length;for(i=0;i<tamano;i++){document.getElementById("id"+tamano.toString()+i.toString()).value="";document.getElementById("id"+i.toString()).value="";document.getElementById("idr"+i.toString()).src=blanca.src;elegidas[i]='';for(j=0;j<tamano;j++){tmp="id"+i.toString()+j.toString();document.getElementById(tmp).style.background="white";document.getElementById(tmp).value=""}}}function Generar(V){var i,j,N;if(clave)Deshacer();clave=Palabras.splice(parseInt(Math.random()*Palabras.length),1)[0].split('');for(i=0;i<clave.length;i++){N=parseInt(Math.random()*Palabras.length);j=(N+1)%Palabras.length;while(N!=j){if(Palabras[j].indexOf(clave[i])>=0){marcas[i]=Palabras[j].indexOf(clave[i]);elegidas[i]=Palabras.splice(j,1)[0];break}else j=(j+1)%Palabras.length}if(j==Palabras.length)return Reintentar(V)}if(elegidas[tamano-1]=='')return Reintentar(V);else for(i=0;i<clave.length;i++){document.getElementById("id"+i.toString()).innerHTML=elegidas[i].split('').sort().join('').toUpperCase();document.getElementById("id"+i.toString()+marcas[i].toString()).style.background="#FFDDAA"}document.getElementById("BotC").disabled=false;document.getElementById("id00").focus()}function Deshacer(){var i;Palabras.push(clave.join(''));clave.splice(0,clave.length);for(i=tamano-1;i>=0;i--)if(elegidas[i]!=''){Palabras.push(elegidas[i]);elegidas[i]=''}Inicializar()}function Reintentar(v){if(v<=3){Deshacer();Generar(v+1)}else alert("Error generando el tablero. Intentalo de nuevo.");return v}function Cambia(obj){Palabras=eval(obj[obj.selectedIndex].value);tamano=Palabras[0].length;Generar_Tabla();Inicializar();Generar(1)}function Chequear(){var i,j;var lista,prueba,Resultado,Total=true;document.getElementById("BotC").disabled=true;for(i=0;i<tamano;i++){lista=elegidas[i].toUpperCase().split('');Resultado=ok;for(j=0;j<tamano;j++){prueba=document.getElementById("id"+i.toString()+j.toString()).value.toUpperCase();if(prueba!=lista[j]){Resultado=error;document.getElementById("id"+i.toString()+"0").focus();document.getElementById("id"+i.toString()+"0").select()}}document.getElementById("idr"+i.toString()).src=Resultado.src}for(i=0;i<tamano;i++){if(clave[i].toUpperCase()!=document.getElementById("id"+tamano.toString()+i.toString()).value)Total=false}if(Total)document.getElementById("Ganadas").innerHTML=++Ganadas;else document.getElementById("Perdidas").innerHTML=++Perdidas}function RecogerTecla(evt,x,y){var obj;var tabla=document.forms["palabras"].elements;var punto=tamano*x+y,TxT=tamano*tamano;switch(evt.keyCode){case 13:case 39:punto++;break;case 37:punto--;break;case 38:punto-=tamano;break;case 40:punto+=tamano;break;default:if((evt.keyCode>=65&&evt.keyCode<=90)||(evt.keyCode==192)){if(marcas[x]==y)document.getElementById("id"+tamano.toString()+x.toString()).value=String.fromCharCode((evt.keyCode==192?241:evt.keyCode)).toUpperCase();punto++}else return}obj=eval(tabla[(TxT+punto)%TxT]);obj.focus();obj.select()}
