// JavaScript Document for pr1/orto.htm and adjet2.htm

function HaceCajas(){//para respuestas de completacion en columna
	if (document.getElementsByTagName && document.createElement){with (document){
		var dot = '<img src="imag/dot1.gif" alt=" " id="dot" style="height:28px; width:1px" />';
		var flash1='<object type="application/x-shockwave-flash" data="acen/';
		var flash2='.swf" width="22" height="15"><param name="movie" value="acen/';
		var flash3='.swf" /><param name="quality" value="high"/></object>';
		var lnum=getElementById('lalista'); //lnum.onclick=function(){confirm(this.innerHTML)}
		var k=0; 
		for (var i=0;i<(RES.length/cols); i++){
			var eltr=createElement("TR"); lnum.appendChild(eltr);
			for(j=0;j<cols;j++){nu=k+j;
				var tdfl=createElement("TD"); tdfl.style.paddingLeft='17px'; eltr.appendChild(tdfl);
				tdfl.innerHTML=flash1+RES[nu][0]+flash2+RES[nu][0]+flash3;
				var eltd=createElement("TD"); eltd.style.width='250px'; eltd.style.paddingLeft='10px';
				var elboton='<input id="'+nu+'" onfocus="EsteCajon=this"'+
				'" ondblclick="verificar(this)" onkeydown="Tecla(event, this)" type="text" size="13" class="blank" />';
				eltd.innerHTML=(nu+1)+'. '+RES[nu][0]+
				'<img src="imag/flder.gif" style="padding:0 4px; vertical-align:middle" alt="&rarr;"/>'+elboton;
				eltr.appendChild(eltd);
				}//for j
			k=k+cols;
		 }// for i
getElementById('punhdn').value = 0;
}}
else{alert(sorry);}
}
function verificar(orto){verifOrto(orto);}
var contestadas=0;
function verifOrto(caj){
var num = caj.id;
var entrada = caj.value.toLowerCase(); var Rcorr= RES[num][1].toLowerCase();
if (entrada!=''){
document.getElementById('lasins').style.visibility='hidden';
var celda=caj.parentNode;
if (entrada != Rcorr){
	var revisar ='Revisa tu respuesta';
	var Incorrecto = tmen1+triste+tmen2+revisar+tmen3;
	MensBasic(Incorrecto,'comentano'); 
	Puntos(0,((100/RES.length)/5));
	BComienzo=BFinal=ParteMal=cortado=faltante=resultado='';
	var LetrasBien=b=0;
	//mientras cada letra al comienzo sea igual a la respuesta:
	while((entrada.charAt(b) == Rcorr.charAt(b))&&(b<entrada.length)){b++;LetrasBien++;}
	BComienzo=entrada.substring(0,b); //parte buena desde el comienzo hasta la letra mala
	if (b<entrada.length){//si después de una letra mala la respuesta tiene más letras
		var c= entrada.length-1; //letras de cero al largo total de la palabra
		var d= Rcorr.length-1;
		while((c>=b)&&(Rcorr.charAt(d)==entrada.charAt(c))){c--; d--; LetrasBien++;}
		BFinal=entrada.substring(c+1, entrada.length); //parte buena desde la letra mala hasta el final
		ParteMal=entrada.substring(b,c+1);
		for(m=0;m<ParteMal.length;m++){cortado+='_';}//reemplaza las letras mal por _
		}//if b<entrada
	//si la entrada y la respuesta tienen el mismo largo:
	if (Rcorr.length==entrada.length){resultado=BComienzo+cortado+BFinal;}
	//else: hay letras en la respuesta que sobran o faltan en la entrada :
	else if (Rcorr.length<entrada.length){resultado=BComienzo.substring(0,((BComienzo.length)-(entrada.length-Rcorr.length)))+'_'+BFinal;}
	else {bache= Rcorr.length - (BComienzo.length+BFinal.length);
		for(n=0;n<bache;n++){faltante+='_';}
		resultado=BComienzo+faltante+BFinal;
		}//else*/
	caj.value=resultado; caj.style.fontWeight='bold';  caj.focus();//caj.select();
	}//if entrada!=Rcorr
if (entrada == Rcorr){
	Puntos(1,(100/RES.length));
	var larres=document.createElement("B"); larres.innerHTML=RES[num][1];
	larres.className='naranroj'; larres.style.paddingLeft='4px';// larres.style.fontSize='14px';
	celda.insertBefore(larres,caj); 
	celda.removeChild(caj); celda.id=num;
	celda.innerHTML+='<img src="imag/checkmk.jpg" width="12" height="12" style="padding-left:2px; vertical-align:middle" alt="ok" />';	
	senmarca();
	var elfinal='<b>&quot;<i>'+RES[num][1]+'</i>&quot;</b>';
	var Correcto = tmen1+feliz+tmen2+asies+elfinal+tmen3; MensBasic(Correcto,'comentasi'); senfoca(); //IE6 needs senfoca here
	contestadas++;
	(contestadas==RES.length) ? setTimeout('FinGenerico()', 1000) : senfoca();
	}
}//if entrada !0
}

function respCols(event){
with (document){
var columna = getElementById('column');
var restabla=createElement("TABLE"); with(restabla){id="tablres"; width=reswidth; style.fontSize="11px";}
var respue = getElementById('res'); respue.style.width=reswidth+'px'; respue.style.height=resheight+'px';
var k=0;
for (i=0;i<RES.length/cols;i++){
	var eltr=createElement("TR"); restabla.appendChild(eltr);
	for(j=0;j<cols;j++){
		var eltd=createElement("TD"); eltd.style.width=(100/cols)+'%'; eltd.innerHTML=(k+j+1)+'. '+RES[k+j][1]; eltr.appendChild(eltd);
		}//for j
	k=k+cols;}//for i
respue.appendChild(restabla); 
}//with document
vr(event);
}
