if(self==top||!parent)location.replace('http://www.masmates.com');var exp,vv0,vvv,letra=new Object(),papel,fila,celda=null,late,nucel=0,raya,scuad,cedi,entrada,cambialetra=false,margen,interno,entexto,paso=-1,tapa,tg,lg,sl,cg,ng,ceg=[],retrocede,seleccion,maypulsada=false,panel,pasos,guardacopia=null,forpa,forpai,muevesele=false,paraeditar,muevepulsado=false,colerror=[false],letrasele,previo,bajaex,paginas,pagina,paginapie=[],forca=[],gut=0;var colores=[['#000000','Negro'],['#ffffff','Blanco'],['#008000','Verde oscuro'],['#800000','Rojo oscuro'],['#808000','Oliva'],['#000080','Azul marino'],['#800080','Púrpura'],['#808080','Gris'],['#ffff00','Amarillo'],['#00ff00','Verde'],['#00ffff','Aguamarina'],['#ff00ff','Fucsia'],['#c0c0c0','Plateado'],['#ff0000','Rojo'],['#0000ff','Azul'],['#008080','Verde azulado']];var atriplan=['000000000000000001200002201','000000000101000002200002201','','00000000000000000300000600000111000000-1','000000000000000000200000201','000000000000000000200000201','000000000000000000200000201','000000000000000002200002201','000000000000000000200000201','','','200000000000070000000000000001001001001100000020001000201ffffffffffff1100','201000000000000000000000000000000000000101000120000200201ffffffffffff1100','201000000000000000000000000000000000000101000120000200201ffffffffffff1100','201000000000000000000000000000000000000101000120000200201ffffffffffff1100','','','','','','','200000000000000000000000000000000000000101000120000200201ffffffffffff1100'];(document.all)?exp=true:exp=false; function miramuevedentro(x,y,celd,md){var i1,i2,i3,i4,i5,la,al,iz,cel,su,cel1,fil1;with(celd)for(i1=0;i130)&&cel.tipoc<4&&atri.charAt(6*cel.tipoc+7)=='0'||tipo>20&&tipo<32&&atri.charAt(44)=='1'||tipo==16&&tipog2==0&&cel.tipoc==4)with(cel){la=largo;al=con.offsetHeight;iz=con.offsetLeft;if(celd.tipo==13&&celd.tipoc==99)su=celd.tipog2[3][i1][i2][0].offsetTop;else su=con.offsetTop;if(celd.tipo==31){iz+=celd.con.childNodes[0].offsetLeft;su+=celd.con.childNodes[0].offsetTop;}if(izx||muevepulsado&&celd.tipo==13&&celd.tipoc==98)&&suy||pagina[0][6]>10&&(i1==0&&celd.atri.charAt(44)=='0'||i1==1)){if(celd.tipo==21&&i1==0||celd.tipo==13&&celd.tipoc==99){if(celd.tipo==21)pagina=celd.tipog1;else pagina=tipog1;muevecursor(x,y,1,celd);md[1]=-1;return;}for(i3=0;i3=0)i5=2*largo/3;else i5=0;if(i4+i5>=x||hijos.length>0&&i4<=x&&i4+largo>=x){md[1]=i3;if(hijos.length>0&&i4<=x&&i4+largo>=x&&(seleccion.tipo!=1||seleccion.celd!=cel)){x-=i4;y-=con.offsetTop+cel.con.offsetTop;miramuevedentro(x,y,cel1,md);if(md[1]<0)return;else if(md[0]){if(x>largo/2)md[1]=i3+1;md[2]=cel;md[0]=false;}}else{md[2]=cel;md[0]=false;}}}}if(md[0]){md[0]=false;md[2]=cel;md[1]=celdas.length;}}}}} function estaenseleccion(cel,fil,lu){var pr,ul,cel1,resp=false,reor=[0,0];if(hayseleccion())with(seleccion)if(pag==pagina){reordenaseleccion(reor);pr=reor[0];ul=reor[1];if(principal){cel1=cel;if(cel1.padre!=null){while(cel1.padre.padre!=null)cel1=cel1.padre;lu=cel1.nuce;}lu=buscalugartotal(lu,cel1);resp=(lu>=pr&&lu=pr&&lu3||pagina!=seleccion.pag||i2==3&&!estaenseleccion(celp,filp,lu)&&!muevesele){if(tipo>0){tipo=-1;dibujaseleccion();}tipo=0;}}with(seleccion)if(tipo<2){pag=pagina;principal=(celp.padre==null);if(principal)ultimo=buscalugartotal(lu,celp);else ultimo=lu;if(tipo==0){celd=celp;tipo=1;primero=ultimo;colocado[0]=primero;colocado[1]=ultimo;}}nucel=lu;celda=celp;fila=filp;if(colerror[0]&&celda.edi>=0)coloreacelda(-1);colocaraya();} function muevecursor(x,y,donde,celd){var i1,i2,i3,x1,cel,cel1,celp,b1=false,fil1,fil2,md=[],pag,lat;if(seleccion.tipo==1&&!seleccion.principal&&muevepulsado){if(donde==0){x+=vvv.document.body.scrollLeft;y+=vvv.document.body.scrollTop;}celp=celda;x1=0;while(celp!=null){x1+=celp.con.offsetLeft;celp=celp.padre;}x1+=buscaaltoposi(pagina,fila.pag,false,true);celp=celda;fil1=buscafila(celp);x-=x1;x1=0;if(x>=celp.largo)x1=celp.celdas.length;else with(celp)for(i1=0;i1y)if(donde==0)x1=i1;else if(pagina[i1][2].padre==celd&&pagina[i1][0].offsetLeft0)x1=i1;x-=pagina[x1][0].offsetLeft+parseInt(pagina[x1][1].style.left);y-=pagina[x1][0].offsetTop+parseInt(pagina[x1][1].style.top);i2=-1;i3=-1;for(i1=0;i1=x&&offsetTop<=y&&offsetTop+offsetHeight>=y&&style.zIndex>i2){i3=i1;i2=style.zIndex;}}if(i3>=0){late=pagina[0][4][i3];activalate(i3,pagina[0][4]);pagina=late.pag;if(vvv!=vv0&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10)){x-=5;y-=5;}muevecursor(x,y,1,late.celda);return;}fil1=null;for(i1=0;i10))fil1=pagina[0][3][i1];}if(fil1==null)return;x-=fil1.celda.con.offsetLeft;y-=fil1.sup;if(pagina==paginas&&vvv!=vv0&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10)){x-=5;y-=5;}x1=0;cel1=null;with(fil1.celda){for(i1=0;i1=0)i2-=cel.largo/3;if(i2<=x){cel1=cel;x1=i1;}}}if(fil1.celda.alto0){x-=cel1.con.offsetLeft;y-=cel1.con.offsetTop;if(cel1.tipo==13&&cel1.tipoc==98){pagina=cel1.tipog1;muevecursor(x,y,1,cel1);return;}else{md[0]=b1;md[1]=x1;md[2]=celp;miramuevedentro(x,y,cel1,md);if(md[1]<0)return;b1=md[0];x1=md[1];celp=md[2];}}}if(b1)celp=fil1.celda;}if(x1>0&&celp==fil1.celda&&x1==celp.celdas.length)x1=mirafinal(x1,celp,fil1);if(paso>=0&&pasos.length>0&&celp.edi==-2&&celp.padre!=null&&vv0.bloque[0]==9){x1=celp.padre.nuce+1;celp=celp.padre.padre;fil1=buscafila(celp);}terminamuevecursor(x1,celp,fil1);} function dobleclic(){var i1,i2,i3,l1,l2,cel,cel1,fil,lupar=[0,null],pag;if(vv0.tipve==0||parent.ocupado>0)return;with(celda)if(tipo>21||celdas.length==0)return;with(seleccion){if(hayseleccion()){tipo=-1;dibujaseleccion();}cel=celda;while(cel!=null){if(cel.tipo==31)return;cel=cel.padre;}if(tipo==-1){i3=nucel;primero=buscalugartotal(i3,celda);}pag=pagina;i3=primero;if(principal){lupar[0]=i3;buscalugarparcial(lupar);i3=lupar[0];fil=lupar[1];cel1=fil.celda;}else{cel1=celd;if(celd==null||celd.celdas.length==0)return;}i2=i3;with(cel1){while(i2>celdas.length-1)i2--;cel=celdas[i2];if(cel.tipo>9||cel.tipo==1||cel.tipo==0&&(cel.tipoc>47&&cel.tipoc<58||cel.tipoc>64&&cel.tipoc<91||cel.tipoc>96&&cel.tipoc<123||cel.tipoc>191)||cel.tipo==8&&i2==celdas.length-1){l1=0;for(i1=i2-1;i1>=0;i1--)if(l1==0){cel=celdas[i1];if(cel.tipo!=1&&cel.tipo<10&&(cel.tipoc>31&&cel.tipoc<48||cel.tipoc>57&&cel.tipoc<65||cel.tipoc>90&&cel.tipoc<97||cel.tipoc>122&&cel.tipoc<192))l1=i1+1;}}else l1=i2;}i2=i3;l2=i2;with(cel1){if(i29||cel.tipo==0&&(cel.tipoc<31||cel.tipoc>47&&cel.tipoc<58||cel.tipoc>64&&cel.tipoc<91||cel.tipoc>96&&cel.tipoc<123||cel.tipoc>191)){l2=celdas.length;cel=celdas[i2];if(cel.tipo==8)l2--;for(i1=i2+1;i131&&cel.tipoc<48||cel.tipoc>57&&cel.tipoc<65||cel.tipoc>90&&cel.tipoc<97||cel.tipoc>122&&cel.tipoc<192)&&cel.tipo!=8)l2=i1;}}}}cel=cel1.celdas[l1];if(vv0.bloque[0]!=1||cel.edi>=0)if(l2>l1+1||cel.tipo!=0||cel.tipoc!=32){if(principal){l1=buscalugartotal(l1,cel1);l2=buscalugartotal(l2,cel1);}primero=l1;ultimo=l2;colocado[0]=l1;colocado[1]=l1;tipo=1;dibujaseleccion();levantaelraton();colocaraya();}}} function mueveraton(x,y,bo){var i1;if(vv0.tipve==0||parent.ocupado>0||celda.edi<0&&vv0.ventanas[vv0.venta][9][4]>1||vvv&&vvv.moden&&vvv.modenm&&vvv.modenm[0]==1)return;if(bo==1&&(seleccion.tipo==1||seleccion.tipo==3)){muevepulsado=true;muevecursor(x,y,0);switch(seleccion.tipo){case 1:dibujaseleccion();break;case 3:muevesele=true;for(i1=0;i10)return;with(seleccion){if(entexto&&tipo>0)tipo++;if(tipo==4){b1=true;if(hayseleccion()&&muevesele)if(celda.tipo>20){tipo=2;b1=false;}else if(!estaenseleccion(celda,fila,nucel)&&vv0.bloque[0]==9&&vv0.bloque[1]==10){b1=false;celc=creacelda(null,0,1,0,0,0,0,false);reordenaseleccion(reor);pr=reor[0];ul=reor[1];tipo=-1;dibujaseleccion();if(principal){reor[1]=null;buscalugarparcial(reor);pr=reor[0];fil1=reor[1];rpr=pr;cel1=fil1.celda;reor[0]=ul;reor[1]=null;buscalugarparcial(reor);ul=reor[0];fil2=reor[1];f1=fil1.nufi;f2=fil2.nufi;for(i1=f1;i1<=f2;i1++){fi=pagina[0][3][i1];with(fi.celda)for(i2=0;i2f1&&i1=pr&&(i2=pr||f1101&&re[i1].modo<106)for(i3=0;i3=celdas.length)return;if(borra)borracelda(celdas[lu]);else cedi.appendChild(celdas[lu].con);for(i1=lu;i1cel.length)lu=cel.length;cel.length++;for(i1=cel.length-1;i1>lu;i1--){cel[i1]=cel[i1-1];cel[i1].nuce++;}if(lu<0)lu=0;cel[lu]=celd;celd.nuce=lu;} function preparacolorfondo(donde){var cop=vvv.document.createElement('span');donde.appendChild(cop);with(cop.style){id='fc';position='absolute';overflow='hidden';}} function creacelda(padre,tipo,tipoc,tipog1,tipog2,ive,iho,reduce,b31,b32){var i1,i2,ta,con,celd,ca1,ca2;con=vvv.document.createElement('span');celd=new Object();celd.con=con;celd.nuce=0;if(padre==null||interno&&ive+iho>0)celd.edi=paraeditar;else celd.edi=padre.edi;celd.vp=(celd.edi>=0);with(celd.con.style){position='absolute';left=0;top=0;fontFamily=letra.n;fontSize=letra.t+'pt';color=colores[letra.ct][0];fontWeight=letra.an;fontStyle=letra.ac;textDecoration=letra.as;zIndex=1;}if(tipo>9&&ive+iho>0){i1=tipo-10;celd.atri=atriplan[i1];}else celd.atri='';if(tipo>20&&ive+iho>0&&tipo<32)preparacolorfondo(celd.con);if(tipo==31&&ive+iho>0){ca1='3)&&vv0.ventanas[vv0.venta][7][5]!=910000000)ca1+='id="r'+vv0.venta+'" onmouseover="if (vv0) vv0.entraboton'+b31+'(this,true)" '+'onmousedown="if (vv0) vv0.pulsaboton'+b31+'(this,true)" '+'onmouseout="if (vv0) vv0.saleboton'+b31+'(this,true)" '+'onclick="if (vv0) accion(this,'+b32+',\''+tipog1+'\',\''+b31+'\');if (vv0) vv0.entraboton'+b31+'(this,true)"';ca1+='>';celd.con.childNodes[0].innerHTML=ca1;if(vv0&&b32&&(vv0.tipve==0||vv0.tipve>3)&&vv0.ventanas[vv0.venta][7][5]!=910000000)vvv.iniciaaccion(celd,b32,tipog1);}if(reduce&&(tipoc==2||tipoc==3)){ta=parseInt(padre.con.style.fontSize,10);if(tipo<21)i2=parseInt(padre.atri.charAt(6*tipoc+6),10)*10;else i2=parseInt(padre.atri.charAt(46),10)*10;i2=100-i2;ta=Math.round(ta*i2/100);if(ta<6)ta=6;celd.con.style.fontSize=ta+'pt';}celd.tipo=tipo;celd.tipog1=tipog1;celd.tipog2=tipog2;celd.tipoc=tipoc;celd.largo=0;celd.alto=0;celd.num=0;celd.den=0;celd.nuhi=0;celd.color=letra.ct;celd.padre=padre;celd.celdas=[];celd.hijos=[];celd.iho=iho;celd.ive=ive;if(iho>0&&ive>0){celd.hijos.length=ive;for(i1=0;i1nui)zIndex--;clat[lu].pag[0][0].style.zIndex=clat.length;} function suprimelate(lu,clat){var i1,lat,nui=clat[lu].pag[0][0].zIndex;cedi.appendChild(clat[lu].pag[0][0]);cedi.removeChild(clat[lu].pag[0][0]);clat.splice(lu,1);for(i1=0;i1nui)zIndex--;}} function suprimefila(lu,cfil){var i1;cedi.appendChild(cfil[lu].con);cedi.removeChild(cfil[lu].con);for(i1=lu;i1donde.length)lu=donde.length;donde.length++;for(i1=donde.length-1;i1>lu;i1--){donde[i1]=donde[i1-1];donde[i1].nufi++;}if(lu<0)lu=0;donde[lu]=fil;fil.nufi=lu;} function creapagina(){var i1,i2,i3,se=0,ca1,pag=paginas.length;paginas[pag]=[];paginas[pag][0]=vvv.document.createElement('div');papel.appendChild(paginas[pag][0]);vvv.preparapagina(pag);i1=vvv.forpa.charAt(18)*1;if(i1>0)if(i1==3)se=3;else se=1;if(vvv.forpa.charAt(0)=='0')i1=tapa[0];else{i1=vv0.ventanas[vv0.venta][0].offsetWidth-13;if(vvv.forpa.charAt(5)!='1')i1-=17;}if(vvv.forpa.charAt(5)=='0'&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10))i2=tapa[1];else if(vvv.forpa.charAt(5)=='2'||vv0.bloque[0]==9&&vv0.bloque[1]==10)i2=18+margen[2]+margen[3]+2*se;else{i2=vv0.ventanas[vv0.venta][0].offsetHeight-33;if(vvv.forpa.charAt(0)=='0'&&i1>vv0.ventanas[vv0.venta][0].offsetWidth-30)i2-=22;}with(paginas[pag][0].style){if(pag>0){width=paginas[0][0].style.width;height=paginas[0][0].style.height;}else if(exp){if(vv0.cuadac>=0)i3=2*vv0.cuadros[vv0.cuadac][19];else i3=10;width=i1+i3;height=i2+i3;}else{width=i1;height=i2;}position='relative';overflow='hidden';if(vv0.cuadac>=0)i3=vv0.cuadros[vv0.cuadac][19];else i3=5;padding=i3+'px';}paginas[pag][8]=vvv.document.createElement('div');paginas[pag][0].appendChild(paginas[pag][8]);with(paginas[pag][8].style){se=parseInt(vvv.forpa.substr(19,2),10);ca1=colores[se][0];se=0;switch(vvv.forpa.charAt(18)*1){case 1:border='1px solid '+ca1;se=1;break;case 2:border='1px dashed '+ca1;se=1;break;case 3:border='3px double '+ca1;se=3;break;}position='relative';overflow='hidden';if(pag>0){width=paginas[0][8].style.width;height=paginas[0][8].style.height;}else{if(!exp){i1-=2*se;i2-=2*se;}width=i1;height=i2;}cursor='pointer';if(vv0.ventanas[vv0.venta][9][4]<2||vv0.cuadac>=0)cursor='text';else cursor='default';}with(paginas[pag][8])coloreafondo(style,[0,0,offsetWidth,offsetHeight],vvv.forpa,48,true,0);paginas[pag][1]=vvv.document.createElement('span');paginas[pag][2]=null;paginas[pag][8].appendChild(paginas[pag][1]);with(paginas[pag][1].style){position='absolute';overflow='hidden';if(pag>0){width=paginas[0][1].style.width;height=paginas[0][1].style.height;}else{if(vvv.forpa.charAt(0)=='0')i1=tapa[0];else{i1=vv0.ventanas[vv0.venta][0].offsetWidth-13;if(vvv.forpa.charAt(5)!='1')i1-=17;}i1=i1-margen[0]-margen[1];if(exp)i1-=2*se;width=i1;if(vvv.forpa.charAt(5)=='0'&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10))i2=tapa[1];else if(vvv.forpa.charAt(5)=='2'||vv0.bloque[0]==9&&vv0.bloque[1]==10)i2=margen[2]+margen[3]+2*se;else{i2=vv0.ventanas[vv0.venta][0].offsetHeight-33;if(vvv.forpa.charAt(0)=='0'&&i1>vv0.ventanas[vv0.venta][0].offsetWidth-30)i2-=22;}i2=i2-margen[2]-margen[3];if(exp)i2-=2*se;height=i2;}left=margen[0];top=margen[2];cursor='pointer';if(vv0.ventanas[vv0.venta][9][4]<2||vv0.cuadac>=0)cursor='text';else cursor='default';}if(pag==0){paginas[0][3]=[];paginas[0][4]=[];paginas[0][5]=null;paginas[0][6]=0;paginas[0][7]=vvv.forpa;pagina=paginas;fila=creafila(0,pagina);insertafila(0,fila,pagina[0][3]);nucel=0;celda=fila.celda;}else paginas[pag][1].style.cursor=paginas[0][1].style.cursor;} function limpia(){var i1,ele;seleccion.tipo=-1;limpiaretrocede(0);with(papel)while(childNodes.length>0)removeChild(childNodes[0]);letra.n='Comic Sans MS';letra.t=10;letra.ct=0;letra.an='normal';letra.as='none';letra.ac='normal';paginas.length=0;creapagina();} function cogeletra(nu,celd){var cel;if(nu>=0&&nu1||celda.tipo>30)if(celda.celdas.length>0){i1=nucel;if(i1>=celda.celdas.length)i1=celda.celdas.length-1;if(i1<0)i1=0;celd=celda.celdas[i1];posi[0]=celd.con.offsetLeft;if(i10){posi[0]+=con.childNodes[0].offsetLeft;posi[1]+=con.childNodes[0].offsetTop;}}celd=celd.padre;}}return posi[0];} function buscaaltoposi(pag,nupa,alto,todo){var i1,i2,al=0,cel,cfil,pagi;if(pag[nupa][2]==null||pag[nupa][5]==null){if(alto)al=pag[nupa][0].offsetTop;else al=pag[nupa][0].offsetLeft;pagi=pag;while(pagi[0][5]!=null){pagi=pagi[0][5];if(alto)al+=pagi[0][0].offsetTop+parseInt(pagi[0][1].style.top);else al+=pagi[0][0].offsetLeft+parseInt(pagi[0][1].style.left);}al+=5;return al;}cel=pag[nupa][2].padre;pag=pag[0][5];cfil=pag[0][3];while(cel.padre.padre!=null){if(todo)if(alto)al+=cel.con.offsetTop;else al+=cel.con.offsetLeft;cel=cel.padre;}for(i1=0;i12||vv0.tipve<3)&&vv0.cuadac<0){vvv.actualizabotones();return;}se=parseInt(paginas[0][0].style.padding);if(vv0.bloque[0]==4){if(vv0.tipve>5&&vvv.ejeracti[0]>=0)return;if(vv0.cuadac<0)return;else if(paginas[0][3].length>1&&vv0.cuadros[vv0.cuadac][18]==1){cel=vv0.ayudalinea;vv0.ayudalinea=false;deshacer(null,0);vv0.ayudalinea=cel;return;}}i1=paginas[0][7].charAt(18)*1;if(exp&&i1>0)if(i1==3)se+=3;else se++;if(celda.edi>=0)entrada=celda.edi;else entrada=-1;vvv.entrada=entrada;if(!cambialetra)cogeletra(nucel-1,celda);cambialetra=false;vvv.actualizabotones();while(nucel>celda.celdas.length)nucel--;buscaposicion(posi);pagina[fila.pag][0].appendChild(raya);pagina[fila.pag][0].appendChild(scuad);with(raya.style){i1=posi[0];if(pagina==paginas)i1+=se;if(celda.tipo==16&&celda.tipoc==4)i1+=parseInt(celda.largo/2);i2=buscaaltoposi(pagina,fila.pag,false,true);if(celda.edi>=0&&vv0.cuadac<0)if(vv0.ventanas[vv0.venta][4]==7)vvv.ajustapaso((i1+i2),0);else{if(i1+i2+pagina[fila.pag][0].offsetLeft-vvv.document.body.scrollLeft>panel.offsetWidth-40)vvv.document.body.scrollLeft=i1+i2+pagina[fila.pag][0].offsetLeft-panel.offsetWidth+40;if(i1+i2+pagina[fila.pag][0].offsetLeft=pagina[fila.pag][0].offsetWidth)i3=pagina[fila.pag][0].offsetWidth-1;left=i3;i1=posi[1]+posi[2];if(pagina==paginas)i1+=se;i3=i1+pagina[fila.pag][0].offsetTop;if(pagina!=paginas)i3+=buscaaltoposi(pagina,fila.pag,true,true);if(celda.edi>=0&&vvv!=vv0)if(vv0.ventanas[vv0.venta][4]==7)vvv.ajustapaso(i3,1);else{if(i3+celda.alto-vvv.document.body.scrollTop>panel.offsetHeight-55)vvv.document.body.scrollTop=i3+celda.alto-panel.offsetHeight+55;if(i3=0&&(celda.tipo<21||celda.tipoc>1||celda.tipo>30))visibility='';else visibility='hidden';}with(scuad.style)if(celda.edi>=0&&celda.padre!=null&&celda.tipo>9){display='';al=nucel;nucel=0;buscaposicion(posi);i1=posi[0]+fila.celda.con.offsetLeft+parseInt(pagina[fila.pag][1].style.left);if(pagina==paginas)i1+=se;nucel=al;left=i1;top=raya.style.top;if(celda.hijos.length>0){left=parseInt(left)-1;top=parseInt(top)-1;}i1=celda.largo+1;if(i1>parseInt(pagina[0][1].style.width))i1=parseInt(pagina[0][1].style.width);if(!exp)i1-=2;width=i1;i1=celda.alto+1;if(i1>parseInt(pagina[0][1].style.height))i1=parseInt(pagina[0][1].style.height);if(!exp)i1-=2;height=i1;borderColor='#ff00ff';switch(celda.tipo){case 21:case 22:case 23:case 24:borderColor='#800080';break;}if(celda.hijos.length>0)height=parseInt(height)+2;}else if(pagina!=paginas&&celda.edi>=0){cel=pagina[fila.pag][2];i1=cel.largo;if(!exp)i1-=2;width=i1;i1=cel.alto;if(!exp)i1-=2;height=i1;left=0;top=0;switch(pagina[0][6]){case 1:borderColor='#000080';break;case 2:borderColor='#ff00ff';break;case 3:borderColor='#800080';break;}display='';}else display='none';} function reordenaseleccion(reor){with(seleccion){reor[0]=primero;if(reor[0]>ultimo){reor[0]=ultimo;reor[1]=primero;}else reor[1]=ultimo;}} function hayseleccion(){if(vv0.venta<2)return false;else with(seleccion)return(tipo>0&&primero!=ultimo&&pag);} function mirafuentecelda(celd,sec){var i1,i2,ve,ho;with(celd){if(letrasele.t==''){letrasele.n=con.style.fontFamily;letrasele.t=parseInt(con.style.fontSize);letrasele.ct=color;letrasele.an=con.style.fontWeight;letrasele.ac=con.style.fontStyle;letrasele.as=con.style.textDecoration;}if(tipo==0&&letrasele.n!=con.style.fontFamily)letrasele.n='';if(sec>0){if(parseInt(con.style.fontSize)!=sec)letrasele.t=0;}else if(parseInt(con.style.fontSize)!=letrasele.t)letrasele.t=0;if(letrasele.ct!=color)letrasele.ct=100;if(letrasele.an!=con.style.fontWeight)letrasele.an='normal';if(letrasele.ac!=con.style.fontStyle)letrasele.ac='normal';if(letrasele.as!=con.style.textDecoration)letrasele.as='none';if(hijos.length>0)if(tipo==13&&tipoc==98)for(ve=0;ve1){i1=parseInt(con.style.fontSize);if(tipo<21)i2=parseInt(atri.charAt(6*hijos[ve][ho].tipoc+6))*10;else i2=parseInt(atri.charAt(46))*10;i2=100-i2;i1=Math.round(i1*i2/100);if(i1<7)i1=7;}else i1=0;if(tipo==21&&ve==0)for(i1=0;i10){ca1=ca1.substr(i1+1,100);while(ca1!=''){i1=ca1.indexOf(',');if(i1>0){ca3=ca1.substr(0,i1);ca1=ca1.substr(i1+1,100);}else{ca3=ca1;ca1='';}i1=parseInt(ca3);if(isNaN(i1))vale=false;else{ca3=i1.toString(16);while(ca3.length<2)ca3='0'+ca3;ca2+=ca3;}}color='#'+ca2;}return color;} function inviertecolorgrafico(celd){var i1,i2,i3,i4,c1,c2=0;with(celd.con)for(i1=0;i1=0)style.backgroundColor=colores[c1][0];else style.backgroundColor='';for(i2=0;i20){for(ve=0;ve0)for(ho=0;holu){cel=fil.celda.celdas[lu];invierteseleccioncelda(cel);}} function dibujaseleccionprincipal(){var i1,pr,ul,reor=[0,0];reordenaseleccion(reor);pr=reor[0];ul=reor[1];with(seleccion)if(tipo<1)for(i1=pr;i1i3){lupar[1]=fil1;lupar[0]=i3-i2;}i2+=fil1.celda.celdas.length;}if(lupar[1]==null){lupar[1]=pagina[0][3][pagina[0][3].length-1];lupar[0]=lupar[1].celda.celdas.length;}} function buscalugartotal(lu,celd){var i1,i2=-1,i3=0,fil1;fil1=buscafila(celd);if(fil1!=null)i2=fil1.nufi-1;for(i1=0;i1<=i2;i1++){fil1=pagina[0][3][i1];i3=i3+fil1.celda.celdas.length;}return lu+i3;} function crearetro(cual){var ret=new Object();ret.modo=0;ret.lugar=[0,0];ret.prime=[0,0];ret.ulti=[0,0];ret.selec=[false,false];ret.princi=[false,false];ret.cuadr=[null,null];ret.cuadpadre=[null,null];ret.pag=pagina;ret.fuen=['',''];ret.nom='';ret.cuadre=[];ret.cuadre[0]=[];ret.cuadre[1]=[];retrocede.re[cual]=ret;} function cambios(mo,lugar1,lugar2,cuad1,cuad2,cuadp1,cuadp2,fuen1,fuen2,nombre){var i1,i2,i3,pr,ul,nu,pos,fi,totmueve,cel,cel1,fil,resp=-1,reor=[0,0],lupar=[0,null];with(retrocede){limpiaretrocede(inicio);if(inicio==100){for(i2=0;i2101&&re[1].modo<106)for(i3=0;i30&&mo<7){cel=cuadp1;if(hayseleccion()&&modo==1)modo=3;if(hayseleccion()&&modo==4)modo=5;if(modo==2||modo==3||modo==5||modo==6){if(hayseleccion())with(seleccion){reordenaseleccion(reor);pr=reor[0];ul=reor[1];nu=ul-pr;if(modo==6){lugar[1]=pr;if((cuadp1.padre==null&&cuadp2.padre==null||cuadp1==cuadp2)&&lugar[0]>pr)lugar[0]-=nu;}prime[1]=pr;selec[1]=true;if(principal){lupar[0]=pr;lupar[1]=null;buscalugarparcial(lupar);pr=lupar[0];fil=lupar[1];fil.escribir=true;cel=fil.celda;i2=fil.nufi;while(cel.celdas.length=0;i1--){cel1=fi.celda.celdas[0];suprimecelda(0,fi.celda,false);insertacelda(cel.celdas.length,cel1,cel);cel1.padre=cel;}fi.escribir=true;}}else{cel=celd;fil=buscafila(cel);}tipo=-1;dibujaseleccion();}else{pr=lugar1;nu=1;cel=cuadp1;fil=fila;}fil.escribir=true;resp=fil.nufi;cuadre[1].length=nu;with(cel)for(i1=0;i10)if(cel1.tipo==13&&cel1.tipoc==98||cel1.tipo==21)cel1.tipog1[0][5]=pagina;}midecelda(cel);}with(seleccion){principal=(cel.padre==null);tipo=2;if(principal)primero=buscalugartotal(lugar[0],cel);else primero=lugar[0];ultimo=primero+nu;celd=cel;colocado[0]=primero;colocado[1]=primero;prime[0]=primero;selec[0]=true;}}celda=cel;fila=buscafila(celda);}if(modo==7||modo==8)if(hayseleccion())with(seleccion){reordenaseleccion(reor);pr=reor[0];ul=reor[1];prime[1]=pr;ulti[1]=ul;selec[1]=true;princi[0]=principal;princi[1]=principal;}}}if(mo>99)vvv.cambios(lugar1,lugar2,fuen1,fuen2);return resp;} function mirafinal(lu,celd,fil){var cel,resp=lu;if(celd.tipo<21&&celd.celdas.length>0&&fil.nufi0){nu=cuadre[0].length;if(selec[0])pr=prime[0];else pr=lugar[0];if(princi[0]){lupar[0]=pr;buscalugarparcial(lupar);pr=lupar[0];fil=lupar[1];cel=fil.celda;i2=fil.nufi+1;with(cel)while(celdas.length0){cel1=fi.celda.celdas[0];suprimecelda(0,fi.celda,false);cel1.padre=cel;insertacelda(celdas.length,cel1,cel);}fi.escribir=true;}}else{cel=cuadpadre[0];fil=buscafila(cel);}for(i1=0;i10){nu=cuadre[1].length;if(selec[1])pr=prime[1];else pr=lugar[1];if(princi[1]){lupar[0]=pr;buscalugarparcial(lupar);pr=lupar[0];fil=lupar[1];cel=fil.celda;fil.escribir=true;}else{cel=cuadpadre[1];fil=buscafila(cel);}for(i1=0;i1-1&&(resp<0||i110&&tipo<21&&hijos.length>0)if(tipo==13)atri=atri.substr(0,29)+ca1+atri.substr(32,40);else atri=atri.substr(0,26)+ca1.substr(0,2)+atri.substr(28,40);fue[0]=fue[0].substr(4,fue[0].length);break;case 1:with(con.style)if(fue[0].charAt(0)=='1')fontStyle='italic';else fontStyle='normal';fue[0]=fue[0].substr(1,fue[0].length);break;case 2:with(con.style)if(fue[0].charAt(0)=='1')textDecoration='underline';else textDecoration='none';fue[0]=fue[0].substr(1,fue[0].length);break;case 4:if(tipo!=1){ca1=fue[0].substr(0,3);i3=parseInt(ca1,10);fue[0]=fue[0].substr(3,fue[0].length);if(isNaN(i3))i3=0;if(i3>0){ca1=fue[0].substr(0,i3);fue[1]=ca1;fue[0]=fue[0].substr(i3,fue[0].length);}con.style.fontFamily=fue[1];}break;case 5:ca1=fue[0].substr(0,2);fue[0]=fue[0].substr(2,fue[0].length);i3=parseInt(ca1,10);if(!isNaN(i3))con.style.fontSize=i3+'pt';break;case 6:ca1=fue[0].substr(0,2);fue[0]=fue[0].substr(2,fue[0].length);i3=parseInt(ca1,10);ca1=fue[0].substr(0,6);fue[0]=fue[0].substr(6,fue[0].length);if(!isNaN(i3)){con.style.color=colores[i3][0];color=i3;}if(tipo>10&&tipo<21&&hijos.length>0)if(tipo==13){atri=atri.substr(0,12)+ca1.substr(0,2)+atri.substr(14,40);atri=atri.substr(0,19)+ca1.substr(2,2)+atri.substr(21,40);atri=atri.substr(0,26)+ca1.substr(4,2)+atri.substr(28,40);}else atri=atri.substr(0,12)+ca1.substr(0,2)+atri.substr(14,40);break;}with(celd){if(padre!=null&&padre.padre==null&&tipo<10)dibujacaracter(celd);if(celdas.length>0){for(i1=0;i10){if(tipo==13&&tipoc==98)for(ve=0;ve=0;i1--)if(b1){fil2=pagina[0][3][i1];with(fil2.celda)cua=celdas[celdas.length-1];if(cua.tipo==8)b1=false;else resp=i1;}return resp;} function cogefilaultima(fil){var i1,i2,fil2,b1,cua,resp;i2=fil.nufi;resp=i2;b1=true;for(i1=i2;i10){cua=celdas[celdas.length-1];if(cua.tipo==8)b1=false;}resp=i1;}return resp;}lupar[0]=pr;buscalugarparcial(lupar);fil1=lupar[1];lupar[0]=ul-1;lupar[1]=null;buscalugarparcial(lupar);fil2=lupar[1];reor[0]=cogefilaprimera(fil1);reor[1]=cogefilaultima(fil2);} function cambiaalineacion(modo){var i1,pr,ul,fi1,fi2,fil1,fil2,cua,ca1,ant,des,reor=[0,0];vv0.cierramenus(true);ant='';des='';ca1='';switch(modo){case 0:ca1='izquierda';break;case 1:ca1='derecha';break;case 2:ca1='centrada';break;case 3:ca1='completa';}ca1='Justificación '+ca1;if(hayseleccion()&&seleccion.principal){ca1=ca1+' de la selección';reordenaseleccion(reor);pr=reor[0];ul=reor[1];buscafilasalineacion(pr,ul,reor);}else{ca1=ca1+' del párrafo';pr=buscalugartotal(nucel,celda);ul=pr+1;buscafilasalineacion(pr,ul,reor);}fi1=reor[0];fi2=reor[1];for(i1=fi1;i1<=fi2;i1++){fil1=pagina[0][3][i1];ant=ant+fil1.ali;des=des+modo;fil1.ali=modo;fil1.escribir=true;}fil1=pagina[0][3][fi1];cambios(7,nucel,nucel,null,null,celda,celda,ant,des,ca1);escribe(fil1.celda,fil1,pagina,true);colocaraya();} function deshaceya(num){var i1,i2,i3,i4,nu,mo,pr,ul,late1,lupar=[0,null],cel,cel1,cel2,b1,b2,resp,fue=['',''];var ret,ca1,let,fil,fil1,fil2;resp=-1;with(retrocede.re[num])if(modo>99)vvv.deshace(num);else switch(modo){case 7:buscafilasalineacion(lugar[0],lugar[1],lupar);pr=lupar[0];ul=lupar[1];for(i1=0;i1i3&&i1=pr&&(i2=pr||i30)deshacerahora(0,false);else while(retrocede.inicio'+i1+' cambios',400);setTimeout('deshacetodoya('+mod+')',1);} function deshacerahora(mod,solo){var i1,i2,i3,fipr1,fipr=-1,cel,celd,fil,fue,lupar=[0,null];if(hayseleccion()){seleccion.tipo=-1;dibujaseleccion();}with(retrocede){if(mod==1)inicio++;pagina=re[inicio].pag;fipr=deshaceya(inicio);with(re[inicio])if(modo<100)switch(modo){case 7:case 8:fil=pagina[0][3][fipr];escribe(fil.celda,fil,pagina,true);nucel=lugar[0];celda=cuadpadre[0];fila=buscafila(celda);break;case 9:vvv.cambiaatricua(lugar[0],lugar[1],cuadr[1],cuadr[0],cuadpadre[0]);cel=cuadr[1];cuadr[1]=cuadr[0];cuadr[0]=cel;break;default:if(modo>0&&modo<7){fipr=quita(inicio,fipr);i1=pone(inicio,fipr);if(i1=0&&fipr<0)fipr=fipr1;if(fipr>=0){if(fipr>0)fipr--;fil=pagina[0][3][fipr];fil.escribir=true;escribe(fil.celda,fil,pagina,true);}nucel=i1;if(modo==6){i1=lugar[0];lugar[0]=lugar[1];lugar[1]=i1;cel=cuadpadre[0];cuadpadre[0]=cuadpadre[1];cuadpadre[1]=cel;}if(celda.tipo==21&&celda.tipoc==1||celda.tipo==13&&celda.padre.tipoc==98){pagina=celda.padre.tipog1;fila=pagina[0][3][0];celda=fila.celda;}if(vv0.ventanas[vv0.venta][7][0]==2&&paso==0&&modo<5){i1=fuen[0];fuen[0]=fuen[1];fuen[1]=i1;vvv.pondifi(i1);}}if(hayseleccion()){seleccion.pag=pagina;dibujaseleccion();}colocaraya();if(mod==0)inicio--;}if(solo){vv0.ponocupado(0);vvv.actualizabotones();}if(vv0.bloque[0]==1)vvv.miraentra();} function deshacer(donde,mod){var i1,ca1;if(donde!=null){ca1=donde.style.color.substr(4,3);if(ca1==128)return;}vv0.cierramenus(true);with(retrocede)if(mod==0&&inicio<1||mod==1&&inicio>re.length-2)return false;if(colerror[0])coloreacelda(-1);cambialetra=false;if(mod==0)ca1='Deshaciendo';else ca1='Rehaciendo';ca1=ca1+' cambio: '+retrocede.re[retrocede.inicio+mod].nom;vv0.ponocupado(1,ca1,400);setTimeout('deshacerahora('+mod+',true)',1);} function buscahijoadelante(celd,nu){var i1,i2,i3,i4,pag,nup,cel,resp=false;with(celd)for(i3=0;i320&&atri.charAt(44)=='1'||tipo==16&&tipog2==0&&cel.tipoc==4)&&cel.nuhi>=nu)if(tipo==13&&tipoc==98||tipo==21&&i3==0){if(cel.con.childNodes.length==1&&cel.con.childNodes[0].childNodes.length>0){pag=celd.tipog1;nup=cel.tipog1;i4=-1;for(i1=0;i1=0){pagina=pag;fila=pagina[0][3][i4];celda=fila.celda;nucel=0;resp=true;}}}else if(tipo==13&&tipoc==99){pagina=cel.tipog1;fila=pagina[0][3][0];celda=fila.celda;nucel=0;resp=true;}else{if(cel.edi>=0){resp=true;celda=cel;}if(cel.edi<0&&cel.celdas.length>0)for(i1=0;i10)resp=buscahijoadelante(cel.celdas[i1],0);}}return resp;} function buscahijoatras(celd,nu){var i1,i2,i3,i4,pag,nup,cel,resp=false;with(celd)for(i3=ive-1;i3>=0;i3--)if(!resp)for(i2=iho-1;i2>=0;i2--)if(!resp){cel=hijos[i3][i2];if(cel.con.style.display=='')if((cel.tipoc==1||tipo<21&&cel.tipoc<4&&atri.charAt(6*cel.tipoc+7)=='0'||tipo>20&&atri.charAt(44)=='1'||tipo==16&&tipog2==0&&cel.tipoc==4)&&cel.nuhi<=nu)if(tipo==13&&tipoc==98||tipo==21&&i3==0){if(cel.con.childNodes.length==1&&cel.con.childNodes[0].childNodes.length>0){pag=celd.tipog1;nup=cel.tipog1;i4=-1;for(i1=0;i1=0){pagina=pag;fila=pagina[0][3][i4];celda=fila.celda;nucel=celda.celdas.length;resp=true;}}}else if(tipo==13&&tipoc==99){pagina=cel.tipog1;fila=pagina[0][3][pagina[0][3].length-1];celda=fila.celda;nucel=celda.celdas.length;resp=true;}else{if(cel.edi>=0){resp=true;celda=cel;}if(cel.edi<0&&cel.celdas.length>0)for(i1=cel.celdas.length-1;i1>=0;i1--)if(!resp&&cel.celdas[i1].hijos.length>0)resp=buscahijoadelante(cel.celdas[i1],0);}}return resp;} function presionatecla(te,may,cont,alt){var i1,i2,i3,i4,i5,i6,cel,cel1,cel2,celd,b1,fi,car,ca1,reor=[0,0],posi=[0,0,0,0,0,0],anucel=nucel,acel=celda;vv0.cierramenus(true);if(vv0.tipve==0&&(vv0.bloque[5]!=910000000||vv0.ventanas[0][8]!=13)){if(te==27)vv0.cierraventana(0);return false;}if(vv0.tipve<4&&(vv0.tipve!=2||vv0.cuadac<0))return true;if(colerror[0])coloreacelda(-1);if(cont&&!may){car=unescape('%'+te.toString(16));switch(car){case'Z':deshacer(null,0);return false;case'Y':deshacer(null,1);return false;case'X':if(celda.edi>=0)cortar(null,0);return false;case'C':cortar(null,1);return false;case'V':if(celda.edi>=0)pegar(null);return false;}}if((cont&&may||!exp&&cont)&&celda.edi>=0&&te!=32&&vv0.bloque[0]==9&&vv0.bloque[1]==10){if(te==56)te=80;if(te==55)te=70;car=unescape('%'+te.toString(16));if(vvv.letrarapidas.indexOf(car)>=0){plantillarapida(car);return false;}}if((may&&(vv0.bloque[0]>0&&vv0.bloque[0]<5||vv0.bloque[0]==9&&vv0.bloque[1]==3))&&celda.edi>=0&&te!=32){if(te==56)te=80;if(te==55)te=70;car=unescape('%'+te.toString(16));if(pasos[paso][2][celda.edi][4].indexOf(car)>=0){plantillarapida(car);return false;}}if(te>34&&te<41)if(may&&(celda.tipo<21||celda.tipo>30)){if(!maypulsada)with(seleccion){if(hayseleccion()){tipo=-1;dibujaseleccion();}pag=pagina;principal=(celda.padre==null);if(principal)primero=buscalugartotal(nucel,celda);else primero=nucel;celd=celda;tipo=1;colocado[0]=primero;colocado[1]=primero;}maypulsada=true;}else{maypulsada=false;if(hayseleccion()){seleccion.tipo=-1;dibujaseleccion();}}if(may&&te==57&&celda.tipo==14&&celda.padre.tipo==14&&celda.padre.tipog1==1){nucel=celda.celdas.length;te=39;}i1=0;switch(te){case 8:if(celda.edi>=0){if(hayseleccion())ca1='Selección';if(nucel>0||fila.nufi>0&&celda.padre==null||hayseleccion()){if(!hayseleccion()){if(nucel==0){fila=pagina[0][3][fila.nufi-1];celda=fila.celda;nucel=celda.celdas.length;}nucel--;i2=nucel;cel=celda.celdas[nucel];ca1=tipocaracter(cel);}else with(seleccion){reordenaseleccion(reor);i2=reor[0];if(principal){reor[1]=null;buscalugarparcial(reor);i2=reor[0];celda=reor[1].celda;}nucel=i2;}if(ca1!='')ca1='Retroceso ('+ca1+')';else ca1='Retroceso';cambios(2,i2,i2,cel,null,celda,celda,'','',ca1);fila.escribir=true;escribe(celda,fila,pagina,true);vvv.modif=true;colocaraya();}if(hayseleccion()){seleccion.tipo=-1;dibujaseleccion();}}return false;break;case 9:if(vv0.bloque[0]==9&&vv0.bloque[1]==10){if(celda.edi>=0){celd=creacelda(celda,9,0,0,0,0,0,false);colocacaracter(celd);vvv.modif=true;}}else if(paso>=0&&(pasos[paso][2].length>1||pasos[paso][2].length>0&&celda.edi<0)){if(hayseleccion()){seleccion.tipo=-1;dibujaseleccion();}if(may){entrada--;if(entrada<0)entrada=pasos[paso][2].length-1;}else{entrada++;if(entrada>=pasos[paso][2].length)entrada=0;}celda=pasos[paso][2][entrada][1];nucel=0;pagina=pasos[paso][2][entrada][2];fila=buscafila(celda);colocaraya();}return false;case 35:if(cont){fila=pagina[0][3][pagina[0][3].length-1];celda=fila.celda;}nucel=mirafinal(celda.celdas.length,celda,fila);colocaraya();break;case 36:if(cont){fila=pagina[0][3][0];celda=fila.celda;}nucel=0;colocaraya();break;case 37:i1=-1;break;case 38:celd=celda;if(vv0.ventanas[vv0.venta][9][4]==0||celda.edi>=0){b1=true;if(celda.tipo>9&&celda.tipo<20){cel=celda;i4=parseInt(raya.style.left);while(b1&&cel.padre!=null&&cel.padre.ive>0){with(cel.padre)for(i2=1;i2=0&&i5+cel1.con.offsetLeft+cel1.largo<=i4)nucel=i6+1;}if(vv0.ventanas[vv0.venta][9][4]==0||celda.edi>=0)colocaraya();}}if(b1){cel=cel.padre;if(cel.padre.ive==0)cel=cel.padre;}}if(b1&&vv0.ventanas[vv0.venta][9][4]==0)if(cel.padre==null&&fila==pagina[0][3][0])b1=false;else celda=cel;}if(b1&&celda==fila.celda&&fila.nufi>0){fila=pagina[0][3][fila.nufi-1];celda=fila.celda;nucel=0;i4=parseInt(raya.style.left);i5=buscaposicion(posi);i5+=fila.celda.con.offsetLeft+pagina[fila.pag][1].offsetLeft+5;with(celda)for(i6=0;i60&&pasos.length>0&&paso>=0&&pasos.length>paso&&pasos[paso].length>2&&pasos[paso][2].length>0)if(celda.celdas.length>0&&celda.celdas[0].tipo==13&&celda.celdas[0].tipoc==90&&celda.celdas[0].hijos[0][0].edi>=0){celda=celda.celdas[0].hijos[0][0];colocaraya();}else if(celd==celda&&celda.celdas.length>0&&celda.edi<0&&celda.celdas[0].hijos.length>0)i1=-1;else{if(celd==celda&&celda.padre.padre!=null&&celda.padre.padre.tipo==13&&celda.padre.padre.hijos.length==0){cel=celda.padre.padre;if(cel.nuhi>1){i5=cel.nuhi+cel.padre.iho*(cel.padre.ive-1);i5=i5-cel.nuhi;entrada+=i5;if(entrada>pasos[paso][2].length)entrada=pasos[paso][2].length-1;}}presionatecla(9,true,false,false);return false;}break;case 39:i1=1;break;case 40:celd=celda;if(vv0.ventanas[vv0.venta][9][4]==0||celda.edi>=0){b1=true;if(celda.tipo>9&&celda.tipo<20){cel=celda;i4=parseInt(raya.style.left);while(b1&&cel.padre!=null&&cel.padre.ive>0){with(cel.padre)for(i2=0;i2=0&&i5+cel1.con.offsetLeft+cel1.largo<=i4)nucel=i6+1;}if(vv0.ventanas[vv0.venta][9][4]==0||celda.edi>=0)colocaraya();}}if(b1){cel=cel.padre;if(cel.padre.ive==0)cel=cel.padre;}}if(b1&&vv0.ventanas[vv0.venta][9][4]==0)if(cel.padre==null&&fila==pagina[0][3][pagina[0][3].length-1])b1=false;else celda=cel;}if(b1&&celda==fila.celda&&fila.nufi0&&pasos.length>0&&paso>=0&&pasos.length>paso&&pasos[paso].length>2&&pasos[paso][2].length>0)if(celda.celdas.length>0&&celda.celdas[0].tipo==13&&celda.celdas[0].tipoc==90&&celda.celdas[0].hijos[0][0].edi>=0){celda=celda.celdas[0].hijos[0][0];colocaraya();}else if(celd==celda&&celda.celdas.length>0&&celda.edi<0&&celda.celdas[0].hijos.length>0)i1=1;else{if(celd==celda&&celda.padre.padre!=null&&celda.padre.padre.tipo==13&&celda.padre.padre.hijos.length==0){cel=celda.padre.padre;if(cel.nuhi=0&&nucel0)){if(nucel>0){b1=false;cel=celda.celdas[nucel-1];if(cel.edi<0&&cel.hijos.length==0||cel.hijos.length==0||maypulsada){if(i2==0)nucel--;}else{b1=(!buscahijoatras(cel,cel.iho*cel.ive));if(b1&&cel.edi<0){b1=false;nucel--;}else nucel=celda.celdas.length;}}if(b1&&celda.padre!=null&&celda.padre.hijos.length>0&&!maypulsada){if(celda.nuhi>1){b1=(!buscahijoatras(celda.padre,(celda.nuhi-1)));if(!b1)nucel=celda.celdas.length;}if(b1){cel=celda.padre;celda=cel.padre;nucel=cel.nuce;while(celda.edi<0&&celda.padre!=null&&celda.hijos.length==0){cel=celda.padre;celda=cel.padre;nucel=cel.nuce;}i2++;b1=false;if(celda.edi<0&&celda.padre!=null)b1=true;else if(celda.edi<0){entrada--;if(entrada<0)entrada=pasos[paso][2].length-1;celda=pasos[paso][2][entrada][1];if(pasos[paso][2].length>1)nucel=celda.celdas.length;else nucel=0;pagina=pasos[paso][2][entrada][2];fila=buscafila(celda);}}}else b1=false;}if(b1&&(vv0.ventanas[vv0.venta][9][4]==0||celda.edi>=0))if(fila.nufi>0&&(!maypulsada||celda.padre==null)){fila=pagina[0][3][fila.nufi-1];celda=fila.celda;nucel=mirafinal(celda.celdas.length,celda,fila);}else if(pagina!=paginas&&pagina[fila.pag][2]!=null&&pagina[0][5][0][6]<10){cel=pagina[fila.pag][2];if(cel.tipo==13&&cel.padre.tipoc==99){celda=cel;b1=(!buscahijoatras(celda.padre,(celda.nuhi-1)));}if(b1){celda=cel.padre.padre;pagina=pagina[0][5];fila=buscafila(celda);nucel=cel.padre.nuce;}}if((b1||celda.edi<0)&&vv0.ventanas[vv0.venta][9][4]>0){i2=entrada;presionatecla(9,true,false,false);if(entrada!=i2)nucel=celda.celdas.length;}colocaraya();}if(i1>0){b1=true;i2=0;while(b1&&i2==0){cel=celda.celdas[nucel];if(nucel==celda.celdas.length-1&&(cel.tipo==8||cel.tipo==0&&cel.tipoc==32&&fila.nufi=celda.celdas.length&&celda.padre==null)i2=1;if(i2==0){if(nucel0&&!maypulsada){if(celda.nuhi0){entrada++;if(entrada>=pasos[paso][2].length)entrada=0;celda=pasos[paso][2][entrada][1];if(pasos[paso][2].length>1)nucel=0;else nucel=celda.celdas.length;pagina=pasos[paso][2][entrada][2];fila=buscafila(celda);}}}else b1=false;}}if(b1&&pagina[0][6]==3){cel=pagina[fila.pag][2].padre;if(cel.atri.charAt(44)=='1')b1=(!buscahijoadelante(cel,1));if(!b1){pagina=pagina[0][5];fila=buscafila(celda);nucel=0;}}if(b1)if(fila.nufi0){i2=entrada;presionatecla(9,false,false,false);if(entrada!=i2)nucel=0;}colocaraya();}if(te>34&&te<41&&maypulsada){with(seleccion)if(principal)ultimo=buscalugartotal(nucel,celda);else ultimo=nucel;dibujaseleccion();}if(anucel!=nucel||acel!=celda)cambialetra=false;if(te>34&&te<41||cont&!alt||alt&!cont)return false;else return true;} function sueltatecla(may){if(maypulsada&&!may){with(seleccion)if(tipo==1)tipo=2;maypulsada=false;}} function midecelda(celd){var ho,ve,cel,dis;with(celd){with(con.style){dis=display;display='';width='';height='';}if(hijos.length>0){if(tipo!=13||tipoc<98)for(ve=0;ve1||cel.tipo>30)midecelda(cel);}plantillas(celd);}else if(celdas.length>0){for(ho=0;ho0)midecelda(cel);else if(cel.tipo<10)dibujacaracter(cel);}mideplantilla(celd);}else if(tipo<21||tipoc>1||tipo>30){if(tipo>2&&tipo<6){if(tipo==3||tipo==5)den=parseInt(alto*24/100);else den=parseInt(alto/2);num=alto-den;}else{with(document.getElementById('borrador')){innerHTML='2';with(style){fontFamily=con.style.fontFamily;fontSize=con.style.fontSize;}largo=offsetWidth;alto=offsetHeight;}den=parseInt(alto*24/100);num=alto-den;}}with(con.style){display=dis;width=largo;height=alto;}}} function dibujacaracter(celd){var dis;with(celd){with(con.style){width='';height='';}if(tipo==8||tipo==9||tipo>2&&tipo<6)con.innerHTML='a';if(tipo<3||tipo>5)largo=con.offsetWidth;if(tipo==1)largo++;if(tipo==4)den=parseInt(alto/2);else{if(tipo!=5)alto=con.offsetHeight;den=parseInt(alto*24/100);}if((con.innerHTML=='¿'||con.innerHTML=='¡')&&con.style.fontFamily.toUpperCase()=='COMIC SANS MS')alto-=den;num=alto-den;if(tipo==8){largo=0;con.innerHTML='';}if(tipo==9){largo=5*largo;con.innerHTML='';}if(tipo>2&&tipo<6)con.innerHTML='';with(con.style){width=largo;height=alto;}}} function colocacaracter(celd){var i1,i2,i3,ca1,cel,fi,edi=[0,''],reor=[0,0],lupar=[0,null];if(!interno){tipoedita(nucel,'',celd,celda,edi);if(hayseleccion())with(seleccion){reordenaseleccion(reor);i2=reor[0];i3=reor[1];if(principal){lupar[0]=i2;buscalugarparcial(lupar);i2=lupar[0];fi=lupar[1];celda=fi.celda;}nucel=i2;}else i2=nucel;cambios(edi[0],i2,i2+1,celd,null,celda,celda,'','',edi[1]);}insertacelda(nucel,celd,celda);nucel++;if(!interno){dibujacaracter(celd);if(hayseleccion()){seleccion.tipo=-1;dibujaseleccion();}fila.escribir=true;escribe(celda,fila,pagina,true);if(bajaex){nucel=celda.padre.nuce+1;celda=celda.padre.padre;}bajaex=false;colocaraya();cambialetra=false;}} function entratecla(te,vp){var i1,i2,celd;if(celda.tipo==16&&celda.tipoc==4)return;with(vv0)if(ventanas[venta][5]==2)maximiza(false);if(te==25||te==29||te==30){te+=79;creaelsimbolo(te,vp);return;}if(te>31&&te<127||te>159){celd=creacelda(celda,0,te,0,0,0,0,false);celd.vp=vp;with(celd.con)switch(te){case 32:innerHTML='  ';break;case 34:innerHTML='"';break;case 38:innerHTML='&';break;case 60:innerHTML='<';break;case 62:innerHTML='>';break;default:innerHTML=unescape('%'+te.toString(16));}vvv.modif=true;colocacaracter(celd);}else if(te==13&&celda.padre==null){celd=creacelda(celda,8,0,0,0,0,0,false);celd.tipog1=fila.ali;colocacaracter(celd);vvv.modif=true;}return false;} function cogesimbolfire(te){var ca1='';switch(te*1){case 43:ca1='+';break;case 165:ca1='%'+'u221e'.toString(16);break;case 34:ca1='V';break;case 172:ca1='%'+'u2190'.toString(16);break;case 220:break;case 204:break;case 163:ca1='%'+'u2264'.toString(16);break;case 197:break;case 45:ca1='-';break;case 186:ca1='%'+'u2261'.toString(16);break;case 206:ca1='%'+'u03f5'.toString(16);break;case 171:ca1='%'+'u2194'.toString(16);break;case 219:break;case 205:break;case 179:ca1='%'+'u2265'.toString(16);break;case 227:ca1='%'+'u00a9'.toString(16);break;case 177:ca1='%'+'u00b1'.toString(16);break;case 185:ca1='%'+'u2260'.toString(16);break;case 207:ca1='%'+'u00a2'.toString(16);break;case 174:ca1='%'+'u2192'.toString(16);break;case 222:break;case 201:break;case 217:ca1='%'+'u02c4'.toString(16);break;case 196:break;case 184:ca1='%'+'u00f7'.toString(16);break;case 126:break;case 194:ca1='R';break;case 240:ca1='%'+'u2191'.toString(16);break;case 221:break;case 202:break;case 218:ca1='%'+'u02c5'.toString(16);break;case 226:ca1='%'+'u00ae'.toString(16);break;case 229:ca1='%'+'u2211'.toString(16);break;case 187:ca1='%'+'u2248'.toString(16);break;case 36:break;case 175:ca1='%'+'u2193'.toString(16);break;case 223:break;case 203:break;case 199:ca1='%'+'u1d16'.toString(16);break;case 198:break;case 168:break;case 64:break;case 224:ca1='%'+'u25ca'.toString(16);break;case 94:ca1='%'+'u01c2'.toString(16);break;case 182:ca1='%'+'u2202'.toString(16);break;case 208:break;case 200:ca1='%'+'u1d17'.toString(16);break;case 97:ca1='%'+'u03b1'.toString(16);break;case 98:ca1='%'+'u03b2'.toString(16);break;case 99:break;case 100:ca1='%'+'u03b4'.toString(16);break;case 101:ca1='%'+'u03b5'.toString(16);break;case 102:ca1='%'+'u03d5'.toString(16);break;case 103:break;case 104:ca1='%'+'u03b7'.toString(16);break;case 106:ca1='%'+'u03c6'.toString(16);break;case 108:ca1='%'+'u03bb'.toString(16);break;case 109:ca1='%'+'u03bc'.toString(16);break;case 112:ca1='%'+'u03c0'.toString(16);break;case 113:ca1='%'+'u03b8'.toString(16);break;case 114:ca1='%'+'u03c1'.toString(16);break;case 115:ca1='%'+'u03c3'.toString(16);break;case 119:ca1='%'+'u03c9'.toString(16);break;case 121:ca1='%'+'u03c8'.toString(16);break;case 68:ca1='%'+'u0394'.toString(16);break;case 70:ca1='%'+'u03a6'.toString(16);break;case 80:ca1='%'+'u03a0'.toString(16);break;case 81:ca1='%'+'u0398'.toString(16);break;case 83:ca1='%'+'u03a3'.toString(16);break;case 87:ca1='%'+'u03a9'.toString(16);break;case 89:ca1='%'+'u03a8'.toString(16);break;}if(ca1!='')ca1=unescape(ca1);return ca1;} function creaelsimbolo(te,vp){var celd,ca1='';if(celda.tipo==16&&celda.tipoc==4)return;celd=creacelda(celda,1,te,0,0,0,0,false);celd.vp=vp;vvv.modif=true;if(!exp)ca1=cogesimbolfire(te);if(ca1==''){if(te==8364){ca1='€';celd.tipo=0;}else{te*=1;te=unescape('%'+te.toString(16));ca1=''+te+'';}}celd.con.innerHTML=ca1;colocacaracter(celd,true);} function creasimbolo(te){vv0.cierramenus(true);creaelsimbolo(te,false);} function tipocaracter(celd){var ca1='';switch(celd.tipo){case 0:ca1='caracter \''+unescape("%"+celd.tipoc.toString(16))+'\'';break;case 1:ca1='caracter especial';break;case 2:case 6:ca1='fuente especial';break;case 8:ca1='retorno de carro';break;case 9:ca1='tabulación';break;case 10:if(celd.tipog2==0)ca1='potencia';else if(celd.tipog1==0)ca1='subíndice';else ca1='super/subíndice';break;case 11:ca1='raíz';break;case 13:switch(celd.tipoc){case 98:ca1='Columnas';break;case 99:ca1='Tabla';break;case 97:ca1='fracción';break;default:ca1='matriz';break;}break;case 14:ca1='gráficos verticales';break;case 15:ca1='gráficos horizontales';break;case 16:if(celd.tipog2==4)ca1='fracción';else ca1='flechas';break;case 17:ca1='integral';break;case 18:ca1='sumatorio';break;case 21:ca1='cuadro de texto';break;case 22:ca1='imagen';break;case 33:ca1='Numeración de página';break;}return ca1;} function tipoedita(lu,text,celd,celp,edi){var cel;edi[0]=1;edi[1]='Sobreescribir';if(!hayseleccion()){if(lu=pa)if(aumenta)fil1.parr++;else if(fil1.parr>1)fil1.parr--;}for(i1=0;i1=pa)if(aumenta)parr++;else if(parr>1)parr--;} function cambianupa(aumenta,fil,cfil){var i1,np=fil.nupar,fil1;for(i1=fil.nufi+1;i10)lt-=parseInt(atri.substr(0,2),10);if(tipo!=4&&tipo!=10&&(tipo<21||tipo>40)||tipo==10&&potencia||tipo>20&&tipo<41&&atri.charAt(2)=='0'){if(alt[0]20&&tipo<32&&atri.charAt(2)>'0')switch(atri.charAt(2)){case'1':i2=alto-alt[2];i3=parseInt(i2/2);if(i3>ata)ata=i3;i2=i2-i3;if(i2>atb)atb=i2;break;case'2':i2=alto-alt[2];if(i2>atb)atb=i2;break;case'3':i2=alto-alt[2];if(i2>ata)ata=i2;break;}with(cel)if(tipo==4){i2=alto-alt[2]-ata-atb;if(i2>0){at1=parseInt(i2/2);at2=i2-at1;if(at30){largo=lt;num=alt[0]+at1;den=alt[1]+at2;alto=alt[2]+ata+atb+at3;}else if(hijos.length==0&&(tipo<20||tipoc>1||tipo>30)){with(document.getElementById('borrador')){innerHTML='2';with(style){fontFamily=con.style.fontFamily;fontSize=con.style.fontSize;}largo=offsetWidth;alto=offsetHeight;}den=parseInt(alto*24/100);num=alto-den;with(con.style){width=largo;height=alto;}}lt=0;for(i1=0;i120&&tipo<41)switch(atri.charAt(2)){case'1':i2=ata+parseInt((alt[2]-alto)/2);break;case'2':i2=0;break;case'3':i2=celd.alto-alto;break;}with(con.style){left=lt;top=i2;width=largo;height=alto;}lt+=largo;}}with(celd.con.style){width=celd.largo;height=celd.alto;display=dis;}} function cogebloquelargo(fil,celd,control,lt){var i1,i2,vale,cel;with(celd){control[0]=0;control[3]=0;control[2]=0;vale=true;while(vale&&control[1]0)i2-=parseInt(atri.substr(0,2),10);if(control[1]>0&&tipo!=8&&tipo!=9&&tipo!=32&&control[0]+i2>fil.largo&&(tipo!=0||tipoc!=32)){control[1]--;vale=false;}else{control[0]+=i2;if(tipo==8){control[2]=8;vale=false;}if(tipo==32){control[2]=10;vale=false;}if(tipo==0&&tipoc==32||tipo==9){control[2]=32;control[3]=i2;vale=false;}if(tipo==0&&(tipoc==43||tipoc==45)){control[2]=33;control[3]=i2;vale=false;}}}if(vale)control[1]++;}if(control[1]>celdas.length-1)control[1]=celdas.length-1;}} function quitacontenido(nucelda,celd,fil,pag){var i1,i2,nuc,ya,cel,fil1,cfil=pag[0][3],clat=pag[0][4];with(celd){nuc=celdas.length;if(nucelda<0)nucelda=0;ya=false;for(i2=nucelda;i2fil.nufi+1)cfil[fil.nufi+1].dibujar=true;insertafila(fil.nufi+1,fil1,cfil);fil1.parr=fil.parr;fil1.nupar=fil.nupar+1;if(ya){cel=celdas[nucelda];if(cel.tipo==8){fil1.nupar=1;cambiaparrafos(true,fil1,cfil,clat);}}cambianupa(true,fil1,cfil);}else{fil1=cfil[fil.nufi+1];}if(nucel>nucelda&&celd==celda){cel=celdas[nucelda+1];if(cel.tipo!=13||cel.tipoc<98){fila=fil1;celda=fil1.celda;nucel=nucel-nucelda-1;}else if(celdas.length==2&&celdas[0].tipo==8)nucel=0;}fil1.escribir=true;i1=0;nucelda++;for(i2=nucelda;i2'1'&&(pag[0][0].offsetTop<=fi.sup+fi.celda.alto&&pag[0][0].offsetTop+pag[0][0].offsetHeight>fi.sup||parr==0&&celda.atri.charAt(2)=='1'))switch(celda.atri.charAt(1)){case'2':if(izcua0){i1=fil.nufi-1;while(i1>=0){filant=cfil[i1];if(filant.celda.celdas.length>0){i1=-1;cel=filant.celda.celdas[filant.celda.celdas.length-1];if(cel.tipo==8||cel.tipo==32)filant=null;}else i1--;}}else filant=null;if(filant!=null){izdecua(filant);largoant=lar-izcua-decua-filant.mar[0]-filant.mar[1];if(filant.celda.celdas.length>0&&filant.celda.celdas[0].tipo<20)largoant-=10;}celd.con.style.left=0;izdecua(fil);lma=lar-izcua-decua-fil.mar[0]-fil.mar[1];if(fil.nupar==1)san=fil.san;lma-=san;fil.largo=lma;lt=0;nucelda=-1;with(celd){if(celdas.length>0){ya=true;antes=true;while(ya){control[1]=nucelda+1;cogebloquelargo(fil,celd,control,lt,false);if(antes&&filant!=null&&control[0]>0){if(filant.celda.largo+control[0]<=largoant||filant.celda.largo+control[0]-control[3]<=largoant&&(control[2]==32||control[2]==33)){if(pag==pagina)if(nucel>control[1])nucel=nucel-control[1]-1;else{if(celda.padre==null)celda=filant.celda;nucel=filant.celda.celdas.length+nucel;fila=filant;}for(i1=0;i1<=control[1];i1++){cel=celdas[0];suprimecelda(0,celd,false);cel.padre=filant.celda;insertacelda(cel.padre.celdas.length,cel,cel.padre);}filant.escribir=true;fil.escribir=true;return true;}antes=false;}if(control[1]>nucelda&&(nucelda==-1||control[1]==1&&(control[2]==8||control[2]==10)||lt+control[0]<=fil.largo||lt+control[0]-control[3]<=fil.largo&&control[2]==32)){lt+=control[0];nucelda=control[1];if(control[2]==0||control[2]==8||control[2]==10)ya=false;if((control[2]==8||control[2]==10)&&nucelda==celdas.length-1&&fil.nufi==cfil.length-1){fil1=creafila(fil.pag,pag);fil1.con.style.visibility=fil.con.style.visibility;fil1.largo=fil.largo;fil1.ali=fil.ali%10;insertafila(cfil.length,fil1,cfil);fil1.parr=fil.parr+1;fil1.nupar=1;if(celd==celda){fila=fil1;celda=fila.celda;nucel=0;}}}else ya=false;}}else nucelda=0;if(nucelda0)while(ya&<=0&&(lt+control[0]<=fil.largo||lt+control[0]-control[3]<=fil.largo&&control[2]==32)){lt+=control[0];i1=control[1];if(control[2]==0||control[2]==8||control[2]==10)ya=false;}else ya=false;}if(i1>cel.celdas.length-1)i1=cel.celdas.length-1;if(i1>=0){fil1.escribir=true;for(i2=0;i2<=i1;i2++){cel2=cel.celdas[0];cel2.padre=celd;suprimecelda(0,cel,false);insertacelda(celdas.length,cel2,celd);if(cel2.tipo==8)control[2]=8;}}if(fil1.celda.celdas.length>0)control[2]=8;}}largo=lt;ata=0;atb=0;if(celdas.length>0){antes=true;while(antes){calculaalto(false,celd,alt);ya=false;for(i1=0;i120&&tipo<40&&atri.charAt(2)>'0')switch(atri.charAt(2)){case'1':i2=alto-alt[2];i3=parseInt(i2/2);if(i3>ata)ata=i3;i2=i2-i3;if(i2>atb)atb=i2;break;case'2':i2=alto-alt[2];if(i2>atb)atb=i2;break;case'3':i2=alto-alt[2];if(i2>ata)ata=i2;break;}}num=alt[0];den=alt[1];alto=num+den+ata+atb;antes=false;izdecua(fil);lma=lar-izcua-decua-fil.mar[0]-fil.mar[1]-san;con.style.left=fil.mar[0]+izcua+san;fil.largo=lma;lt=largo;cel=celd.celdas[celd.celdas.length-1];i1=0;if(cel.tipo==0&&cel.tipoc==32||cel.tipo==9||cel.tipo==8){i1=1;lt-=cel.largo;}if(lt>lma&&(celdas.length>2||celdas.length>1&&i1==0)){if(i1==1)i2=celdas.length-2;else i2=celdas.length-1;for(i1=i2;i1>=0;i1--)if(!antes){cel=celdas[i1];if(cel.tipo==0&&cel.tipoc==32||cel.tipo==9){nucelda=i1;antes=true;}}if(!antes)nucelda=i2-1;quitacontenido(nucelda,celd,fil,pag);lt=0;for(i1=0;i19)fil.ali=(fil.ali%10);if(fil.ali>0){i2=0;antes=false;if(fil.nufi0)antes=true;}}switch(fil.ali){case 1:lt=fil.largo-largo+i2;break;case 2:lt=parseInt((fil.largo-largo+i2)/2);break;case 3:lt=0;esp=0;alt1=0;if(antes){alt[1]=0;for(i1=0;i10){alt[0]=fil.largo-largo+i2;esp=parseInt(alt[0]/alt[1]);alt1=alt[0]%alt[1];}}break;}}alt[0]=0;if(lt<0)lt=0;with(con.style){width=largo+lt+10;height=alto;}for(i1=0;i120&&tipo<40)switch(atri.charAt(2)){case'1':i2=ata+parseInt((alt[2]-alto)/2);break;case'2':i2=0;break;case'3':i2=celd.alto-alto;break;}with(con.style){left=lt;top=i2;}lt=lt+cara;alt[1]=0;if(fil.ali==3&&(esp>0||alt1>0)&&cel.tipo==0&&cel.tipoc==32){lt=lt+esp;alt[1]=esp;alt[0]++;if(alt1>0){lt++;alt1--;}}}}}return false;} function repintacuadros(rec1,rec2,pagi,parra,nup){var i1,i2,b1=false,fil,resp=-1;for(i1=0;i1<4;i1++)if(rec1[i1]!=rec2[i1])b1=true;for(i1=0;i10&&rec1[1]sup||rec2[1]sup||rec1[3]!=0&&(rec1[0]!=rec2[0]||rec1[2]!=rec2[2]))||nupar==1&&late&&parr==late.parr){if(resp<0)resp=i1;escribir=true;}return resp;} function escribelate(num,pag){var i1,i2,sep,lat,fil,resp=-1,cfil=pag[0][3],clat=pag[0][4],rec1=[],rec2=[]; function escribesup(){var x1=0;with(lat){switch(celda.atri.charAt(2)){case'0':x1=parseInt((parseInt(pag[0][5][0][1].style.width)-celda.largo)/2);break;case'2':x1=sep;break;case'3':x1=parseInt(pag[0][5][0][1].style.width)-celda.largo-sep;break;}pag[0][0].style.left=x1;}} function escribeizq(){var x1=0;with(lat){if(celda.atri.charAt(1)=='2')x1=sep;else x1=parseInt(pag[0][5][0][1].style.width)-celda.largo-sep;pag[0][0].style.left=x1;}if(lat.parr==0&&lat.celda.atri.charAt(1)>'1'&&lat.celda.atri.charAt(2)=='1')if(lat.pag[0][0].style.height!=pag[0][1].style.height){lat.pag[0][0].style.height=pag[0][1].style.height;lat.pag[0][1].style.height=pag[0][1].style.height;}}for(i1=0;i110&&parseInt(pag[y2][0].style.height)!=alto1)i3=1;}if(pag[0][6]>10&&pag[0][8]>21)ya=true;if(atras&&vv0.tipve>3&&(ya||i3==1||vale)){if(pag[i2][2]!=null){celm=pag[i2][2].padre;pagp=pagina;pagina=pag[0][5];fil1=buscafila(celm);pagina=pagp;if(fil1.nufi10&&pag[0][8]>21){pag[0][1].style.width=celm.largo;pag[0][0].style.width=celm.largo;}ya=true;}i2=i1;y1=0;alto1=0;}}if(atras&&vv0.tipve>3&&ya){fil1=pag[0][5][0][3][fie];escribe(celm,fil1,pag[0][5],atras);}} function dibujapies(){var i1;for(i1=pag[0][4].length-1;i1>=0;i1--)if(pag[0][4][i1].parr==0)if(pag[0][4][i1].nup>=nupat||pag[0][4][i1].celda.atri.charAt(1)=='1'){if(pag[0][4][i1].celda.atri.charAt(1)=='1')vv0.preparapie(pag[0][4][i1],pag[0][4][i1].nup+1,pag.length);escribelate(pag[0][4][i1].pag[0][9],pag);vv0.ponlates(pag[0][4][i1].pag);}} function visionapag(ver){var i1;for(i1=0;i10&&pag[nupa][2]!=null){cel=pag[nupa][2].padre;pagme=pag[0][5];}while(cel.padre!=null){if(cel.hijos.length>0)plantillas(cel);else mideplantilla(cel);cel=cel.padre;if(atras&&cel.padre==null&&pagme!=null&&pagme[0][6]>0&&pagme[0][2]!=null){cel=pagme[0][2].padre;pagme=pagme[0][5];}}i3=0;for(i1=0;i10){i2=paginapie[0][4][0].pag[0][0].offsetHeight;if(alto2iniy)iniy=pag[0][0].offsetTop+pag[0][0].offsetHeight;if(parr==fi.parr&&celda.atri.charAt(1)>'1'){ca1=celda.atri.charAt(1);for(i2=0;i20&&parriniy)iniy=pag[0][0].offsetTop+pag[0][0].offsetHeight;}}}iniy+=fi.mar[2];if(cel.celdas.length==0&&cfil.length>1){b1=true;if(ba==cfil.length-1){fil2=cfil[ba-1];cel1=fil2.celda.celdas[fil2.celda.celdas.length-1];if(cel1.tipo==8||cel1.tipo==32)b1=false;}}if(b1){if(fila==cfil[ba]){fil2=fila;if(ba1)fil1=cfil[ba-2];else fil1=null;nucel=fila.celda.celdas.length;}if(celda.padre==null)celda=fila.celda;if(fil2==fil)fil=fila;}if(fi.nupar>1)b1=false;else if(ba0)fil=cfil[ba-1];else fil=cfil[0];fil.escribir=true;escribe(fil.celda,fil,pag,atras);if(pag!=paginas){i2=-1;for(i1=0;i1'1')if(pag[0][0].offsetTopiniy||pag[0][0].offsetTopfi.sup)fi.escribir=true;i3=0;i4=0;if(fi.nupar==1){y1=0;for(i1=0;i1'1'&&i30&&cel.celdas[0].tipo==13&&cel.celdas[0].tipoc>97){y1=0;for(i1=0;i10||celda.atri.charAt(1)<'2'||celda.atri.charAt(2)!='1'))if(pag[0][0].offsetTop0&&(cel1.tipo==13&&(cel1.tipoc>97||cel1.atri.charAt(36)=='1')||cel1.tipo==21))plantillas(cel1);}if(dibuja(cel,fi,pag)){fi=cfil[ba-1];fi.escribir=true;fi=cfil[ba-1];cel=fi.celda;if(pag==paginas&&(pag.length!=nupat||pag.length==1&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10)&&vvv.forca[2][0]==2))dibujapies();escribe(cel,fi,pag,atras);visionapag(false);return;}}if(fi.escribir||fi.dibujar||pag!=paginas){for(i1=0;i10&&(cel1.tipo==13&&(cel1.tipoc>97||cel1.atri.charAt(36)=='1')||cel1.tipo==21))plantillas(cel1);}if(iniy+cel.alto+i4>alto2||i3+iniy>alto2){if(pag==paginas){if(pag[0][7].charAt(5)!='2'&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10)&&iniy>alto1+fi.mar[2]){iniy=alto1+fi.mar[2];nupa++;if(pag.length<=nupa){if(pag.length==1&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10)&&vvv.forca[2][0]==1)vv0.ponpie();i3=letra.t;creapagina();i2=clat.length;for(i1=0;i11&&(cfil.length>1&&parseInt(pagina[0][1].style.height)>10||fi.nufi>0))if(nupa'1')if(clat[i1].pag[0][0].offsetTop!=iniy)clat[i1].pag[0][0].style.top=iniy;}iniy+=cel.alto;with(fi.con.style){top=fi.sup;i1=cel.alto;height=i1;}if(cel.celdas.length>0||ba==cfil.length-1){if(cel.celdas.length>0)cel=cel.celdas[cel.celdas.length-1];if(ba==cfil.length-1||cel.tipo==8||cel.tipo==32){y1=0;for(i1=0;i1y1)y1=celda.alto;if(pag[0][0].offsetTop!=iniy)pag[0][0].style.top=iniy;}iniy+=y1;if(ba0||celda.atri.charAt(1)<'2'||celda.atri.charAt(2)!='1')){i3=pag[0][0].offsetTop+pag[0][0].offsetHeight;if(parr==0&&celda.atri.charAt(1)=='1')i3+=parseInt(celda.atri.substr(7,3),10);if(i2'0')if(pag[0][7].charAt(18)=='3')i1+=6;else i1+=2;pag[0][8].style.height=i1;if(exp)i1+=10;pag[0][0].style.height=i1;}for(i1=0;i1'1'&&clat[i1].celda.atri.charAt(2)=='1')if(parseInt(clat[i1].pag[0][1].style.height)!=parseInt(pag[0][1].style.height)){plantilla21(clat[i1].pag[0][3][0].celda.celdas[0]);with(clat[i1].pag[0][3][0].celda){alto=celdas[0].alto;con.style.height=alto;}clat[i1].pag[0][0].style.height=clat[i1].pag[0][3][0].celda.celdas[0].alto;clat[i1].pag[0][1].style.height=clat[i1].pag[0][3][0].celda.celdas[0].alto;if(parseInt(pag[0][1].style.height)fil.pag+1){i2=pag.length-1;for(i1=paginas[0][4].length-1;i1>=0;i1--)if(paginas[0][4][i1].nup==i2&&paginas[0][4][i1].parr==0)suprimelate(i1,paginas[0][4]);papel.removeChild(pag[i2][0]);pag.length--;}if(pag.length!=nupat||pag.length==1&&pag!=paginapie&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10)&&vvv.forca[2][0]==2)dibujapies();if(pag.length==1&&pag!=paginapie&&(vv0.bloque[0]!=9||vv0.bloque[1]!=10)&&vvv.forca[2][0]==1)for(i1=paginas[0][4].length-1;i1>=0;i1--)if(paginas[0][4][i1].nup==0&&paginas[0][4][i1].parr==0&&paginas[0][4][i1].celda.atri.charAt(1)=='1')suprimelate(i1,paginas[0][4]);}else dibujapadre(false);if(pag[0][6]>10)escribelate(pag[0][9],pag[0][5]);visionapag(false);} function nivelfraccion(){var nuf=0,cel=celda;if(cel.edi>=0)while(cel!=null&&cel.padre!=null){if(cel.tipo==16&&cel.tipog2==4&&cel.hijos.length>0)nuf++;cel=cel.padre;}return nuf;} function nivelraiz(){var nuf=0,cel=celda;if(cel.edi>=0)while(cel!=null&&cel.padre!=null){if(cel.tipo==11&&cel.hijos.length>0)nuf++;cel=cel.padre;}return nuf;} function plantillarapida(cual){var i1,i2,te,ca1,ca2,celd,cel,celpr,celp=[null,null];if((parent.ocupado>0||celda.edi<0||celda.tipoc==1&&celda.tipo>21&&celda.tipo<25)&&!interno)return;if(celda.tipo==16&&celda.tipoc==4)return;if(colerror[0])coloreacelda(-1);if(!interno){vv0.cierramenus(true);i1=vvv.letrarapidas.indexOf(cual);if(i1<0)return;cual=vvv.numerorapidas[i1];}cambialetra=true;switch(cual){case 0:creaplantilla('100100','Exponente');break;case 1:if(vvv.maxniv<0||nivelfraccion()7)atriplan[4]=ca1.substr(0,8)+'0101'+ca1.substr(12,40);if(cual<8)ca2='140110';else ca2='140404';creaplantillaya(ca2,celp,celda);celpr=celp[0];cel=celp[1];atriplan[4]=ca1;ca1=atriplan[3];atriplan[3]=ca1.substr(0,16)+'1'+ca1.substr(17,40);if(cual==6||cual==8)ca2='130202';else ca2='130303';creaplantillaya(ca2,celp,cel);insertacelda(0,celp[0],cel);atriplan[3]=ca1;celp[0]=celpr;switch(cual){case 6:ca2='Matriz 2x2';break;case 7:ca2='Matriz 3x3';break;case 8:ca2='Determinante 2x2';break;case 9:ca2='Determinante 3x3';break;}terminacreaplantilla(celp,ca2,0);break;case 10:case 11:ca1=atriplan[5];atriplan[5]=ca1.substr(0,22)+'-53'+ca1.substr(25,40);creaplantillaya('170050',celp,celda);for(i1=0;i1<3;i1++){switch(i1){case 0:te=108;break;case 1:te=105;break;case 2:te=109;}cel=creacelda(celp[1],0,te,0,0,0,0,false);cel.con.innerHTML=unescape('%'+te.toString(16));insertacelda(i1,cel,celp[1]);}celd=celp[0].hijos[2][0];for(i1=0;i1<3;i1++)if(i1<2||cual==11){switch(i1){case 0:te=120;break;case 1:te='®';if(!exp)ca2=cogesimbolfire(te.charCodeAt(0));break;case 2:te='¥';if(!exp)ca2=cogesimbolfire(te.charCodeAt(0));}if(i1==0)i2=0;else i2=1;cel=creacelda(celd,i2,te,0,0,0,0,false);if(i1==0)ca2=unescape('%'+te.toString(16));with(cel.con){if(i1>0&&(exp||ca2==''))innerHTML=''+te+'';else innerHTML=ca2;style.fontSize=celd.con.style.fontSize;}insertacelda(i1,cel,celd);}if(cual==10){celp[1]=celd;i1=2;}else{celp[1]=celda;i1=nucel+1;}if(cual==10)ca2='Límite finito';else ca2='Límite infinito';terminacreaplantilla(celp,ca2,i1);atriplan[5]=ca1;break;case 12:creaplantilla('190700','Integral indefinida');break;case 13:creaplantilla('190703','Integral definida');break;case 14:creaplantilla('139001','Bloque');break;case 15:ca1=atriplan[5];atriplan[5]=ca1.substr(0,4)+'-5'+ca1.substr(6,40);creaplantilla('161800','Vector');celda.con.style.fontWeight='bold';letra.an='bold';atriplan[5]=ca1;break;case 16:creaplantilla('182200','Implica');break;case 20:if(vvv.maxnivr<0||nivelraiz()1000)vvv.planrapida(cual);}} function plantilla10(celd){var i1,i2,i3,i4,si1,si2,sd1,sd2,x1,x2,ve,ho,modo,cel,ca1;with(celd){modo=0;i1=0;i3=0;sd1=0;sd2=0;si1=0;si2=0;for(ve=0;ve0)i1=i1+sd1;else{si1=-sd1;sd1=0;}modo=1;}else{i3=cel.largo;sd2=parseInt(atri.substr(6*ve+14,2),10);if(sd2>0)i3=i3+sd2;else{si2=-sd2;sd2=0;}modo+=2;}}else cel.con.style.display='none';}if(si10)cel=celd.padre.celdas[nuce-1];else cel=celd.padre;if(cel==null)return;i2=cel.num;i3=cel.den;num=i2;den=i3;if((modo&1)==1){i1=hijos[0][0].alto;num+=Math.round(i1*(parseInt(atri.substr(16,2),10)+1)/10);if(i1>num+parseInt(i3/2))num=i1-parseInt(i3/2);if((modo&2)==0){i1+=Math.round(i1*parseInt(atri.substr(16,2),10)/10);if(numden+parseInt(i2/2))den=i1-parseInt(i2/2);}largo=x1+x2;alto=num+den;ca1=''+x2;if(ca1.length==1)ca1='0'+ca1;atri=ca1+atri.substr(2,40);if((modo&1)==1){cel=hijos[0][0];i1=x2+sd1-si1;cel.con.style.top=0;cel.con.style.left=i1;}if((modo&2)==2){cel=hijos[1][0];i1=x2+sd2-si2;i2=alto-cel.alto;cel.con.style.top=i2;cel.con.style.left=i1;}with(con.style){width=celd.largo;height=celd.alto;}}} function cogeanchografico(tipo,gr){var lar;switch(tipo){case 0:case 50:lar=0;break;case 4:case 16:lar=1;if(gr==2)lar=2;break;case 5:case 17:lar=3;if(gr==2)lar=5;break;case 7:case 8:case 9:lar=3*tipo-14;if(gr==2)lar=4*tipo-18;break;case 18:case 26:case 27:lar=5;if(gr==2)lar=6;break;case 22:case 24:case 25:lar=7;if(gr==2)lar=11;break;case 6:lar=14;break;case 3:case 12:case 15:case 21:lar=5;if(gr==2)lar=8;break;default:lar=3;if(gr==2)lar=5;}return lar;} function dibujalinearecta(celd,x1,y1,x2,y2,nugr,col,raya){var i1,gra,rec=[x1,y1,x2,y2];gra=cogegra(celd,rec,nugr);if(raya){cogepun(0,0,0,x2,y2,col,gra);suprimepun(1,gra);}else{i1=cogerayas(0,0,0,x2,y2,col,gra);suprimepun(i1,gra);}return gra;} function dibujalineainclina(nupu,gra,x1,y1,x2,y2,gr,col,posi){var i1,i2,m,n,iny,al,max=Number.MAX_VALUE,i3=max;if(posi){x2+=x1;i1=y2;y2=y1;y1=y2+i1;}else{x2+=x1;y2+=y1;}m=(y2-y1)/(x2-x1);n=y1-m*x1;for(i1=x1;i1<=x2;i1++){i2=Math.round(m*i1+n);if(i3==max)i3=i2;if(i215)x2=15;x1+=x2+gr;y1+=gr;cel=hijos[0][0];izq=0;sup=0;if(atri.charAt(19)=='0'){cel.con.style.display='';i3=cel.largo+parseInt(atri.substr(14,2),10);if(i3>x2){izq=i3-x2;i3=0;}else i3=x2-i3;sup=Math.round(parseInt(atri.substr(16,2),10)*cel.alto/10);cel.con.style.left=i3+separa[0];cel.con.style.top=0;}else cel.con.style.display='none';cel=hijos[0][1];num=cel.num+sup+gr+separa[2];alto=cel.alto+sup+gr+separa[2]+separa[3];den=alto-num;if(atri.charAt(19)=='0'){i1=hijos[0][0].alto+sup-2;if(numori+17){ca1=atri.substr(ori+17,atri.length);if(vre.forca[1]!='')ca1=vre.forca[1]+'/'+ca1;ca1='url('+ca1+')';backgroundImage=ca1;if(atri.charAt(ori+14)=='1')backgroundRepeat='repeat';else{backgroundRepeat='no-repeat';ca1='';switch(atri.charAt(ori+15)){case'0':ca1='center';break;case'1':ca1='left';break;case'2':ca1='right';break;}switch(atri.charAt(ori+16)){case'0':ca1+=' center';break;case'1':ca1+=' top';break;case'2':ca1+=' bottom';break;}backgroundPosition=ca1;}}}}else if(!tab&&tipo!=31)display='none';}} function plantilla13(celd){var i1,i2,i3,i4,i5,i6,i7,i8,i9,x1,x2,y1,y2,laiz=[],numerador,maxco,maxfi,seiz,seco,sede,nugr=0,marm=[],pag,fil;var cel,cel1,b1,ca1,car,grg=[0,0,0],izqui=[],numedeno=[],larm=[],altm=[],altfi=[],larco=[],dimf=[],tafico=[];var visis=[];with(celd){for(i1=0;i197||atri.charAt(36)=='1'){x2=parseInt(atri.substr(22,2),10);if(atri.charAt(28)>'0'){x2+=grg[2]+parseInt(atri.substr(22,2),10);if(atri.charAt(28)>'2')x2+=grg[2]+1;}x2=x2*(iho-1);x2+=seiz+sede+parseInt(atri.substr(8,2),10)+parseInt(atri.substr(10,2),10);if(atri.charAt(14)>'0'){x2+=2*grg[0];if(atri.charAt(14)>'2'&&atri.charAt(14)<'5')x2+=2*grg[0]+2;}if(atri.charAt(36)=='1'){i1=0;if(tipoc>97||vv0.tipve>3||vv0.tipve==0){pag=pagina;if(tipoc>97)if(tipoc==98)pagina=tipog1[0][5];else pagina=hijos[0][0].tipog1[0][5];cel=padre;if(cel!=null){fil=buscafila(cel);if((vv0.tipve==0||vv0.tipve>3)&&fil!=null&&fil.largo>0)i1=fil.largo;else i1=parseInt(pagina[0][1].style.width);}pagina=pag;}if(i1==0)i1=parseInt(pagina[0][1].style.width);}else i1=parseInt(atri.substr(32,4),10);x2=i1-x2;i5=0;if(x2<10*iho)x2=10*iho;if(atri.charAt(37)=='1'){i2=0;for(i1=0;i1iho-1)i4=iho-1;if(hijos[0][i1].atri.charAt(34)=='1'&&i4!=i1){i5=0;for(i7=0;i7iho-1)i4=iho-1;while(i2!=x2){i3=larco[i4]+x2-i2;if(i3<10)i3=10;ca1=''+i3;while(ca1.length<3)ca1='0'+ca1;larco[i4]=i3;i2=0;for(i1=0;i10){i4=parseInt(cel.atri.charAt(24));if(isNaN(i4))i4=1;i3+=i4;if(i5>2&&i5<5)i3+=i4+1;}marm[i2][i1][0]=i3;i3=parseInt(cel.atri.substr(8,2),10);if(isNaN(i3))i3=0;i5=cel.atri.charAt(13)*1;if(i5>0){i4=parseInt(cel.atri.charAt(25));if(isNaN(i4))i4=1;i3+=i4;if(i5>2&&i5<5)i3+=i4+1;}marm[i2][i1][1]=i3;i3=parseInt(cel.atri.substr(2,2),10);if(isNaN(i3))i3=0;i5=cel.atri.charAt(10)*1;if(i5>0){i4=cel.atri.charAt(22)*1;if(isNaN(i4))i4=1;i3+=i4;if(i5>2&&i5<5)i3+=i4+1;}marm[i2][i1][2]=i3;i3=parseInt(cel.atri.substr(4,2),10);if(isNaN(i3))i3=0;i5=cel.atri.charAt(11)*1;if(i5>0){i4=cel.atri.charAt(23)*1;if(isNaN(i4))i4=1;i3+=i4;if(i5>2&&i5<5)i3+=i4+1;}marm[i2][i1][3]=i3;}}if(atri.charAt(24)>'2'){switch(atri.charAt(24)){case'3':car=46;break;case'4':car=44;break;case'5':car=61;break;case'6':car=39;break;}izqui.length=iho;for(i1=0;i10){izqui[i1][i2][0]=0;b1=true;for(i4=0;i4'0'){i6+=grg[2];i6+=parseInt(atri.substr(22,2),10);if(atri.charAt(28)>'2')i6+=grg[2]+1;}for(i1=0;i1'2'&&cel.atri.charAt(0)=='0'){if(laiz[i1]97||atri.charAt(36)=='1')i3=parseInt(celd.hijos[0][i1].atri.substr(31,3),10);else i3=cel.largo+marm[i2][i1][0]+marm[i2][i1][1];larm[i2][i1]=i3;if(x1'2')for(i2=0;i20&&x1>0)x2+=i6;if(atri.charAt(25)!='1')if(x10){x2+=maxco;larco[i1]=maxco;}}for(i1=0;i197||atri.charAt(36)=='1'){cel=hijos[i2][i1];i3=parseInt(cel.atri.substr(27,2),10);for(i4=0;i497)cel.largo=i5;cel.con.style.width=i5;if(tipoc==99){cel.tipog1[0][1].style.width=i5;for(i3=0;i30&&vv0.parent.ocupado!=1&&pagina!=cel.tipog1));}else if(tipoc==98){tipog1[i1][1].style.width=i5;i5=-1;for(i3=0;i3=0){tipog1[0][3][i5].escribir=true;escribe(tipog1[0][3][i5].celda,tipog1[0][3][i5],tipog1,false);}}}}}}y2=0;i6=parseInt(atri.substr(15,2),10);if(atri.charAt(21)>'0'){i6+=grg[1];i6+=parseInt(atri.substr(15,2),10);if(atri.charAt(21)>'2')i6+=grg[1]+1;}for(i2=0;i2=0)y1=hijos[i2][i4].alto;if(tipoc==98)y1=cel.con.childNodes[0].offsetHeight;altfi[i2]=y1;if(maxfi0&&y1>0)y2+=i6;if(atri.charAt(18)!='1')y2+=y1;}for(i1=0;i197){cel=hijos[i2][i1];i3=parseInt(cel.atri.substr(29,2),10);for(i4=0;i4i5){tafico[i2][i1][1]=cel.alto+marm[i2][i1][2]+marm[i2][i1][3];altfi[i2+i3]+=cel.alto-i5;y2+=cel.alto-i5;}}}if(atri.charAt(18)=='1')for(i1=0;i10){y2+=maxfi;altfi[i1]=maxfi;}}for(i1=0;i1'0'){x2+=2*grg[0];y2+=2*grg[0];if(atri.charAt(14)>'2'&&atri.charAt(14)<'5'){x2+=2*grg[0]+2;y2+=2*grg[0]+2;}}y2+=parseInt(atri.substr(4,2),10)+parseInt(atri.substr(6,2),10);x2+=parseInt(atri.substr(8,2),10)+parseInt(atri.substr(10,2),10);largo=x2+seiz+sede;alto=y2;with(document.getElementById('borrador')){innerHTML='2';with(style){fontFamily=con.style.fontFamily;fontSize=con.style.fontSize;}i1=parseInt(offsetHeight/2)-parseInt(offsetHeight*24/100)-1;}if(tipoc==97&&ive==2){i2=alto-hijos[0][0].alto-hijos[1][0].alto;num=hijos[0][0].alto+parseInt(i2/2);num=num+i1;den=y2-num;numerador=num;if(padre!=null&&(padre.tipo==11||padre.tipo==14||padre.tipo==17||padre.tipo==18)){if(num-2*i1>den)den=num-2*i1;if(num-2*i197){den=parseInt(alto*24/100);num=alto-den;numerador=num;for(i1=0;i1'0'){x1=x1+grg[0];if(atri.charAt(14)>'2'&&atri.charAt(14)<'5')x1=x1+grg[0]+1;}for(i1=0;i10){y1=num-numerador;y1+=parseInt(atri.substr(4,2),10);if(atri.charAt(14)>'0'){y1=y1+grg[0];if(atri.charAt(14)>'2'&&atri.charAt(14)<'5')y1=y1+grg[0]+1;}for(i2=0;i20){cel=hijos[i2][i1];if(visis[i2][i1]){i4=0;i5=0;if(cel.atri.charAt(0)!='0')i7=cel.atri.charAt(0)*1-1;else i7=atri.charAt(24)*1;switch(i7){case 0:i4=parseInt((tafico[i2][i1][0]-larm[i2][i1])/2);break;case 2:i4=larco[i1]-larm[i2][i1];break;}switch(atri.charAt(17)){case'0':i5=parseInt((tafico[i2][i1][1]-altm[i2][i1])/2);break;case'2':i5=tafico[i2][i1][1]-altm[i2][i1];break;case'3':i5=numedeno[i2][0]-cel.num+numedeno[i2][2]-marm[i2][i1][2];break;}dimf=[x1,y1,x1+tafico[i2][i1][0],y1+tafico[i2][i1][1]];x2=cel.atri.charAt(12)*1;if(x2>0&&cel.alto>0)for(i3=0;i3<2;i3++)if(i3==0||x2>2&&x2!=5){y2=parseInt(cel.atri.substr(18,2),10);i7=cel.atri.charAt(24)*1;if(i7<1)i7=1;i8=0;i9=0;if(cel.atri.charAt(12)=='5'&&(cel.atri.charAt(10)=='5'||cel.atri.charAt(11)=='5')){if(cel.atri.charAt(10)=='5'){i8=2;i9=2;}if(cel.atri.charAt(11)=='5')i9+=2;}else if(cel.atri.charAt(10)>'2'&&cel.atri.charAt(10)<'5'){i8=i3*(i7+1);i9=i8;}if(cel.atri.charAt(11)>'2'&&cel.atri.charAt(11)<'5')i9+=i3*(i7+1);if(cel.atri.charAt(26)=='0'){if(i3==0)i6=i4;else i6=i4+i7+1;dibujalinearecta(celd,x1+i6,y1+i5+i8,i7,altm[i2][i1]-i9,nugr,y2,true);nugr++;}else{if(i3==0)i6=0;else i6=i7+1;dibujalinearecta(celd,x1+i6,y1+i8,i7,tafico[i2][i1][1]-i9,nugr,y2,true);nugr++;}dimf[0]=x1+i6;}x2=cel.atri.charAt(13)*1;if(x2>0&&cel.alto>0)for(i3=0;i3<2;i3++)if(i3==0||x2>2&&x2!=5){y2=parseInt(cel.atri.substr(20,2),10);i7=cel.atri.charAt(25)*1;if(i7<1)i7=1;i8=0;i9=0;if(cel.atri.charAt(13)=='5'&&(cel.atri.charAt(10)=='5'||cel.atri.charAt(11)=='5')){if(cel.atri.charAt(10)=='5'){i8=2;i9=2;}if(cel.atri.charAt(11)=='5')i9+=2;}else if(cel.atri.charAt(10)>'2'&&cel.atri.charAt(10)<'5'){i8=i3*(i7+1);i9=i8;}if(cel.atri.charAt(11)>'2'&&cel.atri.charAt(11)<'5')i9+=i3*(i7+1);if(cel.atri.charAt(26)=='0'){if(i3==0)i6=i4+larm[i2][i1]-i7;else i6=i4+larm[i2][i1]-2*i7-1;dibujalinearecta(celd,x1+i6,y1+i5+i8,i7,altm[i2][i1]-i9,nugr,y2,true);nugr++;}else{if(i3==0)i6=tafico[i2][i1][0]-i7;else i6=tafico[i2][i1][0]-2*i7-1;dibujalinearecta(celd,x1+i6,y1+i8,i7,tafico[i2][i1][1]-i9,nugr,y2,true);nugr++;}dimf[2]=x1+i6+i7;}x2=cel.atri.charAt(10)*1;if(x2>0&&cel.alto>0)for(i3=0;i3<2;i3++)if(i3==0||x2>2&&x2<5){y2=parseInt(cel.atri.substr(14,2),10);i7=cel.atri.charAt(22)*1;if(i7<1)i7=1;i8=0;i9=0;if(cel.atri.charAt(10)=='5'&&(cel.atri.charAt(12)=='5'||cel.atri.charAt(13)=='5')){if(cel.atri.charAt(12)=='5'){i8=2;i9=2;}if(cel.atri.charAt(13)=='5')i9+=2;}else if(cel.atri.charAt(12)>'2'&&cel.atri.charAt(12)<'5'){i8=i3*(i7+1);i9=i8;}if(cel.atri.charAt(13)>'2'&&cel.atri.charAt(13)<'5')i9+=i3*(i7+1);if(cel.atri.charAt(26)=='0'){if(i3==0)i6=i5;else i6=i5+i7+1;dibujalinearecta(celd,x1+i4+i8,y1+i6,larm[i2][i1]-i9,i7,nugr,y2,true);nugr++;}else{if(i3==0)i6=0;else i6=i7+1;dibujalinearecta(celd,x1+i8,y1+i6,tafico[i2][i1][0]-i9,i7,nugr,y2,true);nugr++;if(cel.atri.charAt(10)=='5'){if(cel.atri.charAt(12)=='5'){dibujalinearecta(celd,x1+i8-1,y1+i6+1,1,1,nugr,y2,true);nugr++;}if(cel.atri.charAt(13)=='5'){dibujalinearecta(celd,x1+i8+tafico[i2][i1][0]-i9,y1+i6+1,1,1,nugr,y2,true);nugr++;}}}dimf[1]=y1+i6+i7;}x2=cel.atri.charAt(11)*1;if(x2>0&&cel.alto>0)for(i3=0;i3<2;i3++)if(i3==0||x2>2&&x2<5){y2=parseInt(cel.atri.substr(16,2),10);i7=cel.atri.charAt(23)*1;if(i7<1)i7=1;i8=0;i9=0;if(cel.atri.charAt(11)=='5'&&(cel.atri.charAt(12)=='5'||cel.atri.charAt(13)=='5')){if(cel.atri.charAt(12)=='5'){i8=2;i9=2;}if(cel.atri.charAt(13)=='5')i9+=2;}else if(cel.atri.charAt(12)>'2'&&cel.atri.charAt(12)<='5'){i8=i3*(i7+1);i9=i8;}if(cel.atri.charAt(13)>'2')i9+=i3*(i7+1);if(cel.atri.charAt(26)=='0'){if(i3==0)i6=i5+altm[i2][i1]-i7;else i6=i5+altm[i2][i1]-2*i7-1;dibujalinearecta(celd,x1+i4+i8,y1+i6,larm[i2][i1]-i9,i7,nugr,y2,true);nugr++;}else{if(i3==0)i6=tafico[i2][i1][1]-i7;else i6=tafico[i2][i1][1]-2*i7-1;dibujalinearecta(celd,x1+i8,y1+i6,tafico[i2][i1][0]-i9,i7,nugr,y2,true);nugr++;if(cel.atri.charAt(11)=='5'){if(cel.atri.charAt(12)=='5'){dibujalinearecta(celd,x1+i8-1,y1+i6-1,1,1,nugr,y2,true);nugr++;}if(cel.atri.charAt(13)=='5'){dibujalinearecta(celd,x1+i8+tafico[i2][i1][0]-i9,y1+i6-1,1,1,nugr,y2,true);nugr++;}}}dimf[3]=y1+i6;}if(cel.atri.charAt(0)!='0')i7=cel.atri.charAt(0)*1-1;else i7=atri.charAt(24)*1;switch(i7){case 0:i4=parseInt((tafico[i2][i1][0]-larm[i2][i1])/2);break;case 1:i4=0;break;case 2:i4=tafico[i2][i1][0]-larm[i2][i1];break;default:i4=laiz[i1]-izqui[i1][i2][0];break;}i5=0;switch(atri.charAt(17)){case'0':i5=parseInt((tafico[i2][i1][1]-altm[i2][i1])/2);break;case'2':i5=tafico[i2][i1][1]-altm[i2][i1];break;case'3':i5=numedeno[i2][0]-cel.num+numedeno[i2][2]-marm[i2][i1][2];break;}x2=marm[i2][i1][0];cel.con.style.left=x1+i4+x2;x2=marm[i2][i1][2];cel.con.style.top=y1+i5+x2;}if(tipoc>97&&visis[i2][i1])coloreafondo(tipog2[3][i2][i1][0].style,dimf,tipog2[3][i2][i1][1],0,true,13);y1+=altfi[i2]+parseInt(atri.substr(15,2),10);if(atri.charAt(21)>'0'){y1+=grg[1];if(atri.charAt(21)>'2')y1+=grg[1]+1;y1+=parseInt(atri.substr(15,2),10);}}x1+=larco[i1]+parseInt(atri.substr(22,2),10);if(atri.charAt(28)>'0'){x1+=grg[2];if(atri.charAt(28)>'2')x1=x1+grg[2]+1;x1+=parseInt(atri.substr(22,2),10);}}if(atri.charAt(21)>'0'||atri.charAt(28)>'0'){y1=0;if(atri.charAt(14)>'0'){y1=grg[0];if(atri.charAt(14)>'2'&&atri.charAt(14)<'5')y1+=grg[0]+1;}for(i1=0;i10){i5=0;for(i2=i1+1;i20&&i5==0)i5=i2;x1=seiz;if(atri.charAt(14)>'0'){x1+=grg[0];if(atri.charAt(14)>'2'&&atri.charAt(14)<'5')x1+=grg[0]+1;}y2=altfi[i1];if(ive>1){if(i1==0)y2+=parseInt(atri.substr(4,2),10);else y2+=parseInt(atri.substr(15,2),10);if(i1==ive-1)y2+=parseInt(atri.substr(6,2),10);else if(atri.charAt(21)>'0')y2+=parseInt(atri.substr(15,2),10);}for(i2=0;i20){i6=0;for(i3=i2+1;i30&&visis[i1][i3]&&i6==0)i6=i3;x2=larco[i2];if(iho>1){if(i2==0)x2+=parseInt(atri.substr(8,2),10);else x2+=parseInt(atri.substr(22,2),10);if(i2==iho-1)x2+=parseInt(atri.substr(10,2),10);else if(atri.charAt(28)>'0')x2+=parseInt(atri.substr(22,2),10);}if(atri.charAt(14)>'2'&&atri.charAt(14)<'5'&&atri.charAt(28)>'2'&&(i1==0||i1==ive-1)){i3=parseInt(atri.substr(12,2),10);if(atri.charAt(28)>'0')i4=grg[2];else i4=0;i7=0;if(parseInt(hijos[i1][i2].atri.substr(27,2),10)>0||hijos[i1][i2].atri.charAt(27)=='-'&&i2'0'&&i1'0')i4=grg[2];else i4=0;i7=0;if(parseInt(hijos[i1][i2].atri.substr(27,2),10)>0||hijos[i1][i2].atri.charAt(27)=='-'&&i20||hijos[i1+1][i2].atri.charAt(27)=='-'&&i2'2'&&atri.charAt(14)<'5'&&atri.charAt(21)>'2'&&i2==0)i8=grg[0];else i8=0;dibujalinearecta(celd,x1-i8,y1+y2,x2+i4+i7+i8,grg[1],nugr,i3,true);nugr++;if(atri.charAt(21)>'2'){i7=0;if(parseInt(hijos[i1+1][i2].atri.substr(27,2),10)>0||hijos[i1+1][i2].atri.charAt(27)=='-'&&i2'2'&&atri.charAt(14)<'5'&&atri.charAt(21)>'2'&&(i2==0||i2==iho-1)){i3=parseInt(atri.substr(12,2),10);if(atri.charAt(28)>'0')i4=grg[2];else i4=0;i7=0;if(parseInt(hijos[i1][i2].atri.substr(29,2),10)>0||hijos[i1][i2].atri.charAt(29)=='-'&&i1'0'&&i2'0')i4=grg[1];else i4=0;i7=0;if(parseInt(hijos[i1][i2].atri.substr(29,2),10)>0||hijos[i1][i2].atri.charAt(29)=='-'&&i10||hijos[i1][i2+1].atri.charAt(29)=='-'&&i1'2'&&atri.charAt(14)<'5'&&atri.charAt(28)>'2'&&i1==0)i8=grg[0];else i8=0;if(i1>0)i8++;dibujalinearecta(celd,x1+x2,y1-i8,grg[2],y2+i4+i7+i8,nugr,i3,true);nugr++;if(atri.charAt(28)>'2'){i7=0;if(parseInt(hijos[i1][i2+1].atri.substr(29,2),10)>0||hijos[i1][i2+1].atri.charAt(29)=='-'&&i1'0'){x1+=grg[2];if(atri.charAt(28)>'2')x1+=grg[2]+1;}}}y1+=y2;if(atri.charAt(21)>'0'){y1+=grg[1];if(atri.charAt(21)>'2')y1+=grg[1]+1;}}}if(atri.charAt(14)>'0')for(i1=0;i1<2;i1++){if(i1==0)y1=0;else y1=grg[0]+1;i2=parseInt(atri.substr(12,2),10);if(i1==0||atri.charAt(14)>'2'&&atri.charAt(14)<'5'&&atri.charAt(28)<'3'){i5=y1+seiz;i6=largo-sede-seiz-(i1+1)*y1;if(atri.charAt(14)=='5'){i5+=2;i6-=4;}dibujalinearecta(celd,i5,y1,i6,grg[0],nugr,i2,true);nugr++;dibujalinearecta(celd,i5,alto-y1-grg[0],i6,grg[0],nugr,i2,true);nugr++;if(atri.charAt(14)=='5'){dibujalinearecta(celd,i5-1,y1+1,1,1,nugr,i2,true);nugr++;dibujalinearecta(celd,i5+i6,y1+1,1,1,nugr,i2,true);nugr++;dibujalinearecta(celd,i5-1,alto-y1-grg[0]-1,1,grg[0],nugr,i2,true);nugr++;dibujalinearecta(celd,i5+i6,alto-y1-grg[0]-1,1,grg[0],nugr,i2,true);nugr++;}}if(i1==0||atri.charAt(14)>'2'&&atri.charAt(14)<'5'&&atri.charAt(21)<'3'){i5=y1;i6=alto-(i1+1)*y1;if(atri.charAt(14)=='5'){i5+=2;i6-=4;}dibujalinearecta(celd,largo-sede-y1-grg[0],i5,grg[0],i6,nugr,i2,true);nugr++;dibujalinearecta(celd,y1+seiz,i5,grg[0],i6,nugr,i2,true);nugr++;}}if(tipoc>97){i5=0;if(atri.charAt(14)>'0'){i5=grg[0];if(atri.charAt(14)>'2'&&atri.charAt(14)<'5')i5+=grg[0]+1;}dimf[0]=seiz+i5;dimf[1]=i5;dimf[2]=largo-sede-i5;dimf[3]=alto-i5;coloreafondo(tipog2[0][0].style,dimf,tipog2[0][1],0,false,13);y1=i5+parseInt(atri.substr(4,2),10);x1=seiz+i5+parseInt(atri.substr(8,2),10);for(i1=0;i1'0'&&i1>0)i2+=parseInt(atri.substr(15,2),10);dimf[3]=y1+altfi[i1]+i2;coloreafondo(tipog2[1][i1][0].style,dimf,tipog2[1][i1][1],0,false,13);y1+=altfi[i1]+parseInt(atri.substr(15,2),10);if(atri.charAt(21)>'0'){y1+=grg[1];if(atri.charAt(21)>'2')y1+=grg[1]+1;if(i1>0)y1+=parseInt(atri.substr(15,2),10);}}x1=seiz+i5+parseInt(atri.substr(8,2),10);y1=i5+parseInt(atri.substr(4,2),10);for(i1=0;i1'0'&&i1>0)i2+=parseInt(atri.substr(22,2),10);dimf[2]=x1+larco[i1]+i2;dimf[3]=alto-i5-parseInt(atri.substr(6,2),10);coloreafondo(tipog2[2][i1][0].style,dimf,tipog2[2][i1][1],0,false,13);x1+=larco[i1]+parseInt(atri.substr(22,2),10);if(atri.charAt(28)>'0'){x1+=grg[2];if(atri.charAt(28)>'2')x1+=grg[2]+1;if(i1>0)x1+=parseInt(atri.substr(22,2),10);}}}if(tipoc<90&&atri.charAt(25)=='2'){for(i1=0;i11)with(cel.con.style)if(atri.charAt(6*cel.tipoc+7)=='0')display='';else display='none';if(cel.tipoc==1||atri.charAt(6*cel.tipoc+7)=='0'){x1=cel.largo;if(cel.tipoc==1)x1+=separa[2];else x1+=parseInt(atri.substr(6*cel.tipoc+2,2),10);if(cel.tipoc==1){x1+=separa[3];num=cel.num;}x3+=x1;al[i5]=cel.alto;switch(cel.tipoc){case 1:al[i5]=al[i5]+separa[0]+separa[1];break;case 2:i1=x1;break;case 3:i2=x1;break;}}}seiz=parseInt(atri.substr(0,2),10);if(isNaN(seiz))seiz=0;sede=parseInt(atri.substr(2,2),10);if(isNaN(sede))sede=0;alto=0;largo=x3+seiz+sede;for(i5=0;i5<3;i5++)if(alto1)switch(parseInt(atri.substr(6*cel.tipoc+4,2),10)){case 0:i4=parseInt((alto-cel.alto)/2);break;case 2:i4=alto-cel.alto;break;default:i4=0;}else i4=x3;switch(cel.tipoc){case 1:i3=i1+x1+separa[2];break;case 2:i3=0;break;case 3:i3=largo-cel.largo-sede-seiz;}cel.con.style.left=i3+seiz;cel.con.style.top=i4;}}i5=parseInt(atri.substr(12,2),10);i3=0;if(x1>0){separa[0]=seiz+i1;separa[1]=sepanega[0];separa[2]=x1;separa[3]=alto-sepanega[1]-sepanega[0];dibujagrafico(celd,i5,grg[0],tipog1,separa,i3);i3++;}if(x2>0){separa[0]=largo-i2-x2-sede;separa[1]=sepanega[0];separa[2]=x2;separa[3]=alto-sepanega[1]-sepanega[0];dibujagrafico(celd,i5,grg[1],tipog2,separa,i3);i3++;}with(con.style){width=largo;height=alto;}}suprimegra(i3,celd);} function plantilla15(celd){var i1,i2,i3,i4,i5,x1,x2,x3,y1,y2,numerador,seiz,sede,cel;var al=[0,0,0],separa=[0,0,0,0],sepanega=[0,0,0,0],grg=[0,0];with(celd){for(i1=0;i1<4;i1++){separa[i1]=parseInt(atri.substr(2*i1+4,2),10);if(isNaN(separa[i1]))separa[i1]=0;if(i1==2||i1==3)if(separa[i1]<0){sepanega[i1]=-separa[i1];separa[i1]=0;}else sepanega[i1]=0;}for(i1=0;i1<2;i1++){grg[i1]=atri.charAt(26)*1;if(grg[i1]<1)grg[i1]=1;}for(i1=0;i1<3;i1++)al[i1]=0;x3=0;i1=0;i2=0;for(i5=0;i51)with(cel.con.style)if(atri.charAt(6*cel.tipoc+7)=='0')display='';else display='none';if(cel.tipoc==1||atri.charAt(6*cel.tipoc+7)=='0'){x1=cel.alto;if(cel.tipoc==1){x1+=separa[0]+separa[1];numerador=cel.num+separa[0];}else x1+=parseInt(atri.substr(6*cel.tipoc+4,2),10);x3+=x1;al[i5]=cel.largo;switch(cel.tipoc){case 1:al[i5]+=separa[2]+separa[3];break;case 2:i1=x1;break;case 3:i2=x1;}}}seiz=parseInt(atri.substr(0,2),10);if(isNaN(seiz))seiz=0;sede=parseInt(atri.substr(2,2),10);if(isNaN(sede))sede=0;x1=cogeanchografico(tipog1,grg[0]);x2=cogeanchografico(tipog2,grg[1]);largo=0;for(i5=0;i5<3;i5++)if(largo1)switch(parseInt(atri.substr(6*cel.tipoc+2,2),10)){case 0:i3=parseInt((largo-seiz-sede-cel.largo)/2);break;case 2:i3=largo-seiz-sede-cel.largo;break;default:i3=0;}else i3=x3;switch(cel.tipoc){case 1:i4=i1+x1+separa[0];break;case 2:i4=0;break;case 3:i4=alto-cel.alto;break;}cel.con.style.left=i3+seiz;cel.con.style.top=i4;}}i5=parseInt(atri.substr(12,2),10);i3=0;if(x1>0){separa[0]=seiz+sepanega[2];separa[1]=i1;separa[2]=largo-seiz-sede-sepanega[3]-sepanega[2];separa[3]=x1;dibujagrafico(celd,i5,grg[0],tipog1,separa,i3);i3++;}if(x2>0){separa[0]=seiz+sepanega[2];separa[1]=alto-i2-x2;separa[2]=largo-seiz-sede-sepanega[3]-sepanega[2];separa[3]=x2;dibujagrafico(celd,i5,grg[1],tipog2,separa,i3);i3++;}with(con.style){width=largo;height=alto;}}suprimegra(i3,celd);} function plantilla16(celd){var i1,i2,i3,i4=0,i5,i6,x1,x2,x3,y1,y2,seiz,gr,sede,lar1,ca1,cel,varios=0,separa=[0,0,0,0],al=[0,0];with(celd){seiz=parseInt(atri.substr(0,2),10);if(isNaN(seiz))seiz=0;sede=parseInt(atri.substr(2,2),10);if(isNaN(sede))sede=0;for(i1=0;i1<2;i1++)separa[i1]=parseInt(atri.substr(2*i1+8,2),10);for(i1=0;i1<2;i1++)al[i1]=0;x3=0;i1=0;i2=0;for(i5=0;i5<2;i5++){cel=hijos[i5][0];if(atri.charAt(6*cel.tipoc+7)=='0'){cel.con.style.display='';varios++;x1=cel.alto;if(cel.tipoc==1)x1+=parseInt(atri.substr(6,2),10);else x1+=parseInt(atri.substr(6*cel.tipoc+4,2),10);x3+=x1;al[i5]=cel.largo;if(cel.tipoc==2)i1=x1;if(cel.tipoc==3)i2=x1;i4=i4|(i5+1);}else cel.con.style.display='none';}if(tipog2<4)tipog2=i4;lar1=0;for(i5=0;i5<2;i5++)if(lar1den)den=num-2*i6;if(num-2*i60){separa[0]=seiz;separa[1]=i1;separa[2]=lar1;separa[3]=x1;dibujagrafico(celd,i5,gr,tipog1,separa,0);}with(con.style){width=largo;height=alto;}}suprimegra(1,celd);} function plantilla17(celd){var i1,i2,i3,i4,i5,x1,x2,y1,y2,gr,numerador,psu,pin,seiz,sede,algr,supe,infe;var cel,separa=[0,0,0,0],sepanega=[0,0,0,0],la=[0,0,0];with(celd){for(i1=0;i1<4;i1++){separa[i1]=parseInt(atri.substr(2*i1+4,2),10);if(isNaN(separa[i1]))separa[i1]=0;if(i1<2)if(separa[i1]<0){sepanega[i1]=-separa[i1];separa[i1]=0;}else sepanega[i1]=0;}seiz=parseInt(atri.substr(0,2),10);if(isNaN(seiz))seiz=0;sede=parseInt(atri.substr(2,2),10);if(isNaN(sede))sede=0;gr=atri.charAt(26)*1;if(gr<1)gr=1;i1=0;i2=0;i3=0;i5=0;x2=0;psu=0;pin=0;for(x1=0;x1<3;x1++)la[x1]=0;for(x1=0;x10)alto+=psu;if(pin>0)alto+=pin;num=numerador+i4+separa[0]+psu;i5=algr;if(sepanega[1]>0&&pin<0)if(Math.abs(pin)>sepanega[1])infe=sepanega[1];else infe=Math.abs(pin);if(sepanega[0]>0&&psu<0)if(Math.abs(psu)>sepanega[0])supe=sepanega[0];else supe=Math.abs(psu);alto=alto-supe-infe;num=num-supe;}else{alto=i1+i2+i3+separa[0]+separa[1];i5=i2+separa[0]+separa[1];num=numerador+i1;}x1=cogeanchografico(tipog1,gr);if(tipo==18){if(x10)y2=y2+psu;}else y2=i1+separa[0];break;case 2:y2=0;if(tipo==17){x2=x1+parseInt(atri.substr(14,2),10);if(psu<0)y2=-psu;}else{switch(parseInt(atri.substr(14,2),10)){case 0:x2=parseInt((x1-cel.largo)/2);break;case 2:x2=x1-cel.largo;break;default:x2=0;}if(x2<0)x2=0;}break;case 3:y2=alto+supe+infe-i3;if(tipo==17){switch(tipog1){case 7:x2=Math.round(x1/2)+gr+parseInt(atri.substr(20,2),10);break;case 8:x2=Math.round(2*x1/3)+gr+parseInt(atri.substr(20,2),10);break;case 9:x2=Math.round(3*x1/4)+gr+parseInt(atri.substr(20,2),10);break;default:x2=x1+parseInt(atri.substr(20,2),10);}if(pin<0)y2=y2+pin;}else{y2+=parseInt(atri.substr(22,2),10);switch(parseInt(atri.substr(20,2),10)){case 0:x2=parseInt((x1-cel.largo)/2);break;case 2:x2=x1-cel.largo;break;default:x2=0;}if(x2<0)x2=0;}break;}x2+=seiz;cel.con.style.left=x2;cel.con.style.top=y2;}}algr=alto-sepanega[0]-sepanega[1];if(tipo==17){separa[0]=seiz;separa[1]=sepanega[0]-supe;separa[2]=x1;separa[3]=algr;if(psu>0){separa[1]+=psu;separa[3]-=psu;}if(pin>0){separa[3]-=pin;}}else{separa[0]=seiz;separa[1]=i1+sepanega[0];separa[2]=x1;separa[3]=alto-i3-i1-sepanega[0]-sepanega[1];}i5=parseInt(atri.substr(12,2),10);dibujagrafico(celd,i5,gr,tipog1,separa,0);with(con.style){width=largo;height=alto;}}suprimegra(1,celd);} function plantilla21(celd){var i1,i2,i3,i4,nu,lat,alt,lad,ald,la,al,gr,x1,y1,sept,nugr=0,b1,mar=[],ca1,cel,cel1,pag;var rec=[0,0,0,0],recdi=[0,0,0,0],recti=[0,0,0,0],recre=[0,0,0,0];var larc=[0,0],altc=[0,0],aumen=[0,0,0,0];mar.length=4;for(i1=0;i1<4;i1++)mar[i1]=[0,0];with(celd){for(i1=0;i1<4;i1++)for(i2=0;i2<2;i2++){nu=parseInt(atri.substr(12*i2+3*i1+15,3),10);if(isNaN(nu))nu=0;mar[i1][i2]=nu;}lat=0;alt=0;cel=hijos[1][0];if(celd.atri.charAt(44)=='1'&&(atri.charAt(0)>'0'||atri.charAt(1)<'2'||atri.charAt(2)!='1')){cel.con.style.display='';lat=cel.largo;alt=cel.alto;}else cel.con.style.display='none';if(atri.charAt(13)>'0'){gr=0;switch(atri.charAt(14)){case'0':case'4':case'5':gr=1;break;case'1':case'6':gr=2;break;case'2':gr=3;break;case'3':gr=5;break;}i1=parseInt(atri.charAt(13));if(i1==1||i1==5||i1==7)aumen[2]=gr;if(i1==2||i1==5||i1==7)aumen[3]=gr;if(i1==3||i1==6||i1==7)aumen[0]=gr;if(i1==4||i1==6||i1==7)aumen[1]=gr;if(i1==7&&atri.charAt(14)=='5'){aumen[1]+=3;aumen[3]+=3;}}cel=hijos[0][0];switch(tipo){case 21:i1=parseInt(atri.substr(50,3),10);if(isNaN(i1))i1=100;if(atri.charAt(41)=='1'||atri.charAt(0)<'2'&&atri.charAt(1)<'2'&&atri.charAt(2)=='1')if(atri.charAt(0)<'2'&&(vv0.tipve==0||vv0.tipve>3||vv0.tipve==2&&vv0.bloque[0]==4))i1=parseInt(tipog1[0][5][0][5][0][1].style.width);else{i1=parseInt(tipog1[0][5][0][1].style.width);if(atri.charAt(0)=='2'&&(vv0.tipve==0||vv0.tipve>3)){cel1=padre;pag=pagina;pagina=tipog1[0][5];cel1=buscafila(cel1);if(cel1!=null&&cel1.largo>0)i1=cel1.largo;pagina=pag;}}if(atri.charAt(45)=='1'){i1=0;i4=0;for(i2=0;i20&&vv0.parent.ocupado==0&&celd.atri.charAt(45)=='1'){pag=celd.tipog1[0][5];for(i2=0;i2999)i1=999;ca1=''+i1;while(ca1.length<3)ca1='0'+ca1;atri=atri.substr(0,50)+ca1+atri.substr(53,atri.length);}if(tipo!=22||atri.charAt(10)=='0'&&atri.charAt(45)=='1'||atri.charAt(10)=='1'&&atri.charAt(41)=='1'){i2=tipog2;i2+=mar[0][0]+aumen[0]+mar[0][1]+mar[1][1]+aumen[1]+mar[1][0];if(i2>999)i2=999;ca1=''+i2;while(ca1.length<3)ca1='0'+ca1;atri=atri.substr(0,53)+ca1+atri.substr(56,atri.length);}}lad=i1-mar[2][0]-aumen[2]-mar[2][1]-mar[3][1]-aumen[3]-mar[3][0];ald=i2-mar[0][0]-aumen[0]-mar[0][1]-mar[1][1]-aumen[1]-mar[1][0];with(cel){largo=lad;alto=ald;with(con.style){width=lad;height=ald;}if(con.childNodes.length==1)with(con.childNodes[0].style){width=lad;height=ald;}}break;case 31:lad=cel.largo;ald=cel.alto;hijos[0][0].con.style.position='relative';with(con.childNodes[0].childNodes[0].childNodes[0].childNodes[0].childNodes[0].childNodes[0])switch(atri.charAt(10)*1){case 0:className='';style.padding='2px';lad+=4;ald+=4;break;case 1:className='boton';style.padding='';lad+=2;ald+=2;break;default:className='';style.padding='';style.backgroundColor='';break;}with(con.childNodes[0].style){left=mar[2][0]+aumen[2];top=mar[0][0]+aumen[0];width=lad+mar[2][1]+mar[3][1];height=ald+mar[0][1]+mar[1][1];}break;}with(document.getElementById('borrador')){innerHTML='2';with(style){fontFamily=con.style.fontFamily;fontSize=con.style.fontSize;}i1=parseInt(offsetHeight/2)-parseInt(offsetHeight*24/100)-1;}if(tipo==21&&tipog1[0][3].length==1){cel.num=tipog1[0][3][0].celda.num;cel.den=ald-cel.num;}else if(tipo==31){cel.num=cel.num+(ald-cel.alto)/2+mar[0][0]+aumen[0];}else{cel.num=parseInt(ald/2)+i1;cel.den=ald-cel.num;}nu=cel.num;la=mar[2][0]+aumen[2]+mar[2][1]+lad+mar[3][1]+aumen[3]+mar[3][0];al=mar[0][0]+aumen[0]+mar[0][1]+ald+mar[1][1]+aumen[1]+mar[1][0];if(tipo==21&&(vv0.tipve>3||vv0.tipve==0)&&tipog1[0][5]!=null&&atri.charAt(0)=='0'&&atri.charAt(1)>'1'&&atri.charAt(2)=='1')if(ali1)la=la+lat-i1;}else{la=la+lat+sept;i1=ald+mar[0][1]+mar[1][1]+aumen[0]+aumen[1];if(alt>i1)al=al+alt-i1;}if(atri.charAt(39)<'2'){if(atri.charAt(39)=='0'){recre[1]=recre[1]+alt+sept;recre[3]=recre[3]+alt+sept;}i1=aumen[0]+aumen[1];if(lad+mar[2][1]+mar[3][1]+i1'1'&&atri.charAt(2)=='1'){i1=lat-lad-mar[2][1]-mar[3][1];switch(atri.charAt(40)){case'0':larc[0]+=parseInt(i1/2);break;case'2':larc[0]+=i1;}}}else{if(atri.charAt(39)=='2')larc[1]=mar[2][0];else larc[1]=recre[2]+sept;altc[1]=mar[0][0];i1=al-mar[0][0]-mar[1][0]-alt;switch(atri.charAt(40)){case'0':altc[1]+=parseInt(i1/2);break;case'2':altc[1]+=i1;}if(ald+mar[0][1]+mar[1][1]'1'&&atri.charAt(2)=='1'){i1=recre[3]-recre[1]-ald-mar[0][1]-mar[1][1]-aumen[0]-1;switch(atri.charAt(3)){case'0':altc[0]+=parseInt(i1/2);break;case'2':altc[0]+=i1;}}}alto=al;largo=la;num=nu+altc[0];if(atri.charAt(13)=='7'&&atri.charAt(14)=='5'){recre[2]-=3;recre[3]-=3;}hijos[0][0].con.style.left=larc[0];hijos[0][0].con.style.top=altc[0];hijos[1][0].con.style.left=larc[1];hijos[1][0].con.style.top=altc[1];i1=parseInt(atri.charAt(13));i2=parseInt(atri.charAt(14));i3=parseInt(atri.substr(11,2),10);y2=atri.charAt(10);if(i1==1||i1==5||i1==7){if(i2==1||i2==3)gr=2;else gr=1;if(i2==6)i4=12;else i4=i3;x1=recre[0];y1=recre[1];x2=recre[3]-recre[1];dibujalinearecta(celd,x1,y1,gr,x2,nugr,i4,(i2!=4));nugr++;if(i2==2||i2==3){if(i1==7)nu=gr+1;else nu=0;dibujalinearecta(celd,x1+gr+1,y1+nu,gr,x2-2*nu,nugr,i4,true);nugr++;}if(i2==6){if(y2==0||y2==3)nu=1;else nu=12;dibujalinearecta(celd,x1+1,y1+1,gr,x2-2,nugr,nu,true);nugr++;}if(i2==5&&y2==2){dibujalinearecta(celd,x1-3,y1-3,3,x2,nugr,12,true);nugr++;}if(i2==5&&y2==1){dibujalinearecta(celd,x1-3,y1+3,3,x2,nugr,12,true);nugr++;}}if(i1==2||i1==5||i1==7){if(i2==1||i2==3)gr=2;else gr=1;if(i2==6)i4=12;else i4=i3;x1=recre[2]-gr;y1=recre[1];x2=recre[3]-recre[1];dibujalinearecta(celd,x1,y1,gr,x2,nugr,i4,(i2!=4));nugr++;if(i2==2||i2==3){if(i1==7)nu=gr+1;else nu=0;dibujalinearecta(celd,x1-gr-1,y1+nu,gr,x2-2*nu,nugr,i4,true);nugr++;}if(i2==6){if(y2==0||y2==3)nu=12;else nu=1;dibujalinearecta(celd,x1-1,y1+1,gr,x2-2,nugr,nu,true);nugr++;}if(i2==5&&y2==0){dibujalinearecta(celd,x1+1,y1+3,3,x2,nugr,12,true);nugr++;}if(i2==5&&y2==3){dibujalinearecta(celd,x1+1,y1-3,3,x2,nugr,12,true);nugr++;}}if(i1==3||i1==6||i1==7){if(i2==1||i2==3)gr=2;else gr=1;if(i2==6)i4=12;else i4=i3;x1=recre[0];y1=recre[1];x2=recre[2]-recre[0];dibujalinearecta(celd,x1,y1,x2,gr,nugr,i4,(i2!=4));nugr++;if(i2==2||i2==3){if(i1==7)nu=gr+1;else nu=0;dibujalinearecta(celd,x1+nu,y1+gr+1,x2-2*nu,gr,nugr,i4,true);nugr++;}if(i2==6){if(y2==0||y2==1)nu=1;else nu=12;dibujalinearecta(celd,x1+1,y1+1,x2-2,gr,nugr,nu,true);nugr++;}if(i2==5&&y2==2){dibujalinearecta(celd,x1-3,y1-3,x2,3,nugr,12,true);nugr++;}if(i2==5&&y2==3){dibujalinearecta(celd,x1+3,y1-3,x2,3,nugr,12,true);nugr++;}}if(i1==4||i1==6||i1==7){if(i2==1||i2==3)gr=2;else gr=1;if(i2==6)i4=12;else i4=i3;x1=recre[0];y1=recre[3]-gr;x2=recre[2]-recre[0];dibujalinearecta(celd,x1,y1,x2,gr,nugr,i4,(i2!=4));nugr++;if(i2==2||i2==3){if(i1==7)nu=gr+1;else nu=0;dibujalinearecta(celd,x1+nu,y1-gr-1,x2-2*nu,gr,nugr,i4,true);nugr++;}if(i2==6){if(y2==0||y2==1)nu=12;else nu=1;dibujalinearecta(celd,x1+1,y1-1,x2-2,gr,nugr,nu,true);nugr++;}if(i2==5&&y2==0){dibujalinearecta(celd,x1+3,y1+1,x2,3,nugr,12,true);nugr++;}if(i2==5&&y2==1){dibujalinearecta(celd,x1-3,y1+1,x2,3,nugr,12,true);nugr++;}}suprimegra(nugr,celd);if(tipo!=31)coloreafondo(con.childNodes[0].style,recre,atri,56,false,tipo);else coloreafondo(con.childNodes[0].childNodes[0].style,recre,atri,56,false,tipo);with(con.style){width=largo;height=alto;}den=alto-num;if(tipo==21&&tipog1[0][5]!=null&&tipog1[0][5][0][6]>10)tipog1[0][5][0][1].style.width=largo;}} function suprimepun(num,gra){var i1;with(gra)for(i1=childNodes.length-1;i1>=num;i1--)removeChild(childNodes[i1]);} function suprimegra(num,celd){var i1;with(celd.con)for(i1=childNodes.length-1;i1>=0;i1--)if(childNodes[i1].id.charAt(0)=='g'&&childNodes[i1].id.substr(1,5)*1>=num){suprimepun(0,childNodes[i1]);removeChild(childNodes[i1]);}} function cogepun(nupu,grl,grt,grw,grh,col,gra){var pun;if(nupu>-1&&gra.childNodes.length>nupu)pun=gra.childNodes[nupu];else{pun=vvv.document.createElement('span');gra.appendChild(pun);}pun.id=col;if(grw<0)grw=0;if(grh<0)grh=0;if(isNaN(grl)||isNaN(grt)||isNaN(grw)||isNaN(grh)){grl=0;grt=0;grw=0;grh=0;}with(pun.style){position='absolute';overflow='hidden';left=grl;top=grt;borderLeft=grw+'px solid '+colores[col][0];borderTop=grh+'px solid '+colores[col][0];if(exp){width=grw;height=grh;}else{width=0;height=0;}}return pun;} function cogegra(celd,rec,nugr){var i1,gra=null;if(nugr<10)nugr='0'+nugr;nugr='g'+nugr;with(celd.con)for(i1=0;i1grg+1){if(tipo==1)grl=i1-grg-1;else grl=2*grg+2-i1;grt=rec[3]+i1-3*grg-2;grw=grg;grh=grg;}else{if(tipo==1)grl=0;else grl=rec[2]-grg;grt=grg+1;grw=grg;grh=rec[3]-2*grg-2;}pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}break;case 2:case 11:for(i1=0;i1<3;i1++){if(i1==0){grl=0;grt=0;grw=rec[2];grh=grg;}else if(i1==2){grl=0;grt=rec[3]-grg;grw=rec[2];grh=grg;}else{if(tipo==2)grl=0;else grl=rec[2]-grg;grt=grg;grw=grg;grh=rec[3]-2*grg;}pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}break;case 3:case 12:aba=3*grg+4;aba=rec[3]-aba;arr=parseInt(aba/2);aba=aba-arr;for(i1=0;i1<4*grg+5;i1++){if(i13*grg+3){if(tipo==3)grl=rec[2]+i1-5*grg-4;else grl=4*grg+4-i1;grt=rec[3]+i1-5*grg-4;grw=grg;grh=grg;}else if(i1==grg+1||i1==3*grg+3){grl=grg+1;if(i1==grg+1){grt=grg+1;grh=arr;}else{grt=rec[3]-aba-grg-1;grh=aba;}grw=grg;}else if(i1>grg+1&&i1<2*grg+3){if(tipo==3)grl=2*grg+2-i1;else grl=i1;grt=arr+i1-grg;grw=grg;grh=grg;}else{if(tipo==3)grl=i1-2*grg-2;else grl=rec[2]+grg+2-i1;grt=arr+i1-grg;grw=grg;grh=grg;}pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}break;case 4:grl=0;grt=0;grw=grg;grh=rec[3];pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;break;case 5:grl=0;grt=0;grw=grg;grh=rec[3];pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;grl=grg+1;grt=0;grw=grg;grh=rec[3];pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;break;case 6:grl=0;grt=0;grw=rec[2];grh=grg;cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;i1=9;i2=parseInt(rec[3]/2);grl=0;grt=0;grw=i1;grh=i2;nupu=dibujalineainclina(nupu,gra,grl,grt,grw,grh,grg,col,false);grl=0;grt=i2;grw=i1;grh=rec[3]-i2;nupu=dibujalineainclina(nupu,gra,grl,grt,grw,grh,grg,col,true);grl=0;grt=rec[3]-grg;grw=rec[2];grh=grg;cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;grl=rec[2]-grg;grt=0;grw=grg;grh=grg+2;cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;grl=rec[2]-grg;grt=rec[3]-grg-2;grw=grg;grh=grg+2;cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;break;case 7:case 8:case 9:for(i2=7;i2<10;i2++)if(i2<=tipo){if(grg==1)i3=3*i2-21;else i3=4*i2-28;for(i1=0;i1<5;i1++){switch(i1){case 0:grl=i3;grt=rec[3]-2*grg-3;grw=grg;grh=2*grg+2;break;case 1:grl=i3+1;grt=rec[3]-grg;grw=2*grg;grh=grg;break;case 2:grl=i3+grg+2;grt=1;grw=grg;grh=rec[3]-2;break;case 3:grl=i3+grg+3;grt=0;grw=2*grg;grh=grg;break;case 4:grl=i3+2*grg+4;grt=1;grw=grg;grh=2*grg+2;break;}pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}}break;case 13:case 19:for(i1=0;i1<2*grg+3;i1++){if(i1grg+1){grl=rec[2]+i1-3*grg-2;if(tipo==13)grt=i1-grg-1;else grt=2*grg+2-i1;grw=grg;grh=grg;}else{grl=i1;if(tipo==13)grt=0;else grt=rec[3]-grg;grw=rec[2]-2*grg-2;grh=grg;}pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}break;case 14:case 20:for(i1=0;i1<3;i1++){if(i1==0){grl=0;grt=0;grw=grg;grh=rec[2];}else if(i1==2){grl=rec[2]-grg;grt=0;grw=grg;grh=rec[2];}else{grl=grg;if(tipo==14)grt=0;else grt=rec[3]-grg;grw=rec[2]-2*grg;grh=grg;}pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}break;case 15:case 21:aba=3*grg+4;aba=rec[2]-aba;arr=parseInt(aba/2);aba=aba-arr;for(i1=0;i1<4*grg+5;i1++){if(i13*grg+3){grl=rec[2]+i1-5*grg-4;if(tipo==15)grt=rec[3]+i1-5*grg-4;else grt=4*grg+4-i1;grw=grg;grh=grg;}else if(i1==grg+1||i1==3*grg+3){grt=grg+1;if(i1==grg+1){grl=grg+1;grw=arr;}else{grl=rec[2]-aba-grg-1;grw=aba;}grh=grg;if(grw<0)grw=0;}else if(i1>grg+1&&i1<2*grg+3){grl=arr+i1-grg;if(tipo==15)grt=2*grg+2-i1;else grt=i1;grw=grg;grh=grg;}else{grl=arr+i1-grg;if(tipo==15)grt=i1-2*grg-2;else grt=rec[3]+grg+2-i1;grw=grg;grh=grg;}pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}break;case 16:grl=0;grt=0;grw=rec[2];grh=grg;pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;break;case 17:grl=0;grt=0;grh=grg;grw=rec[2];pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;grt=grg+1;grl=0;grh=grg;grw=rec[2];pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;break;case 18:case 26:case 27:for(i1=0;i1<5;i1++){grw=0;grh=0;switch(i1){case 0:grl=0;grt=2;grw=rec[2];grh=grg;break;case 1:if(tipo>18){grl=1;grt=1;grw=grg;grh=grg+2;}break;case 2:if(tipo>18){grl=2;grt=0;grw=grg;grh=grg+4;}break;case 3:if(tipo!=26){grl=rec[2]-grg-1;grt=1;grw=grg;grh=grg+2;}break;case 4:if(tipo!=26){grl=rec[2]-grg-2;grt=0;grw=grg;grh=grg+4;}}if(grw>=0&&grh>=0)pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}break;case 22:case 24:case 25:for(i1=0;i1<14;i1++){if(i1<2){if(tipo==22)grl=0;else grl=2*grg+2;grt=(grg+1)*(i1+1);if(tipo==25)grw=rec[2]-4*grg-4;else grw=rec[2]-2*grg-2;grh=grg;}else if(i1<6&&tipo!=24){grl=rec[2]+i1-6;grt=i1+2*grg-4;grw=1;grh=11-2*i1;}if(i1>9&&tipo!=22){grl=13-i1;grt=i1+2*grg-12;grw=1;grh=27-2*i1;}if(grg==2){if((i1==6||i1==7)&&tipo!=24){grl=rec[2]+i1-12;grt=i1-6;grw=1;grh=23-2*i1;}if((i1==8||i1==9)&&tipo!=22){grl=13-i1;grt=i1-8;grw=1;grh=27-2*i1;}}if(grw>=0&&grh>=0)pun=cogepun(nupu,grl,grt,grw,grh,col,gra);nupu++;}break;}suprimepun(nupu,gra);} function plantilla25(celd){var i1,i2,i3,i4,ve,ac,lar,alt,an=0,al=0,ca1,ca2,vale,cel,cel1,cel2,cel3,cel4,celv,celp=[null,null],anb=0,alb=0,nuin;with(celd){lar=hijos[0][0].celdas[0].largo;alt=hijos[0][0].celdas[0].alto;vale=(hijos[0][0].celdas[0].hijos[0][0].tipog2[2].charAt(32)=='1');if(vale&&hijos[1][0].celdas.length==0){nuin=vvv.grafin.length;vvv.grafin[nuin]=[];vvv.grafin[nuin][0]=hijos[0][0].celdas[0].hijos[0][0];vvv.grafin[nuin][1]=[];vvv.grafin[nuin][1][0]=[];vvv.grafin[nuin][1][0][0]=vvv.grafin[nuin][0].tipog2[8][0];vvv.grafin[nuin][1][0][1]=vvv.grafin[nuin][0].tipog2[0].slice(0);vvv.grafin[nuin][1][0][2]=vvv.grafin[nuin][0].tipog2[1].slice(0);vvv.grafin[nuin][2]=0;vvv.grafin[nuin][3]=[];vvv.grafin[nuin][4]=[];vvv.grafin[nuin][5]=[];vvv.grafin[nuin][5][0]=vvv.grafin[nuin][0].tipog2[0].slice(0);vvv.grafin[nuin][5][1]=vvv.grafin[nuin][0].tipog2[1].slice(0);creaplantillaya('130105',celp,hijos[1][0]);celv=celp[0];celv.atri=celv.atri.substr(0,23)+'1'+celv.atri.substr(24,celv.atri.length);insertacelda(0,celv,hijos[1][0]);ac=0;for(ve=0;ve<5;ve++){celp=[null,null];switch(ve){case 0:i4=4;break;case 1:case 3:i4=2;break;case 2:i4=5;break;case 4:i4=1;}creaplantillaya('13010'+i4,celp,hijos[1][0]);cel=celp[0];cel.atri=cel.atri.substr(0,12)+'071'+cel.atri.substr(15,cel.atri.length);cel.atri=cel.atri.substr(0,26)+'121'+cel.atri.substr(29,cel.atri.length);cel.atri=cel.atri.substr(0,23)+'0'+cel.atri.substr(24,cel.atri.length);cel.con.style.backgroundColor='#f0f0f0';insertacelda(0,cel,celv.hijos[0][ve]);for(i1=0;i1';vvv.grafin[nuin][4][ac]=cel4;vvv.grafin[nuin][3][ac]=cel1.con.childNodes[0].childNodes[0].childNodes[0].childNodes[0].childNodes[0];if(ac>10)vvv.grafin[nuin][3][ac].style.color='rgb(128,128,128)';}cel4.nuhi=i3+1;cel3.hijos[i3][0]=cel4;if(i3==1)cel4.con.style.display='none';}insertacelda(0,cel3,cel2);}}insertacelda(0,cel1,cel.hijos[0][i1]);ac++;}}midecelda(celv);if(hijos[0][0].celdas[0].hijos[1][0].celdas.length>0&&hijos[0][0].celdas[0].atri.charAt(39)=='1'){suprimecelda(0,hijos[1][0],false);for(i1=hijos[0][0].celdas[0].hijos[1][0].celdas.length-1;i1>=0;i1--){cel1=hijos[0][0].celdas[0].hijos[1][0].celdas[i1];suprimecelda(i1,hijos[0][0].celdas[0].hijos[1][0],false);insertacelda(0,cel1,hijos[1][0]);}insertacelda(0,celv,hijos[0][0].celdas[0].hijos[1][0]);ca1=hijos[0][0].celdas[0].atri;ca1=ca1.substr(0,42)+'01'+ca1.substr(44,ca1.length);hijos[0][0].celdas[0].atri=ca1;midecelda(hijos[0][0].celdas[0]);midecelda(hijos[1][0]);anb=hijos[1][0].largo;alb=hijos[1][0].alto;lar=hijos[0][0].celdas[0].largo;alt=hijos[0][0].celdas[0].alto;}else{anb=celv.largo;alb=celv.alto;hijos[1][0].largo=anb;hijos[1][0].alto=alb;}}else{anb=hijos[1][0].largo;alb=hijos[1][0].alto;}with(hijos[1][0])with(con.style){top=alt+1;left=parseInt((celd.hijos[0][0].celdas[0].hijos[0][0].con.offsetWidth-anb)/2)+celd.hijos[0][0].celdas[0].hijos[0][0].con.offsetLeft;width=anb;height=alb;}largo=lar;alto=alt+alb+1;num=parseInt(alto/2);den=alto-num;with(con.style){width=largo;height=alto;}}} function plantillas(celd){with(celd)if(tipo>20&&tipo<32&&tipo!=25)plantilla21(celd);else switch(tipo){case 10:plantilla10(celd);break;case 11:plantilla11(celd);break;case 12:plantilla12(celd);break;case 13:plantilla13(celd);break;case 14:plantilla14(celd);break;case 15:plantilla15(celd);break;case 16:plantilla16(celd);break;case 17:case 18:plantilla17(celd);break;case 25:plantilla25(celd);break;}} function creahijomatriz(celd,atri,clase,largo,nupa,pag){var cel,fil;cel=creacelda(celd,13,1,0,0,0,0,false);celd.con.appendChild(cel.con);cel.atri=atri;switch(clase){case 98:cel.edi=-1;cel.largo=largo;cel.con.style.width=largo;cel.tipog1=nupa;pag[nupa]=[];pag[nupa][0]=cel.con;pag[nupa][1]=vvv.document.createElement('span');pag[nupa][1].id=nupa;pag[nupa][0].appendChild(pag[nupa][1]);pag[nupa][2]=cel;pag[0][0].style.overflow='hidden';with(pag[nupa][1].style){position='absolute';overflow='hidden';width=largo;height=10;left=0;top=0;if(nupa==0){pag[0][3]=[];pag[0][4]=[];pag[0][5]=pagina;pag[0][6]=1;pag[0][7]=vvv.forpai;pag[0][8]=0;fil=creafila(0,pag);insertafila(0,fil,pag[0][3]);}}break;case 99:cel.edi=-1;cel.tipog1=[];pag=cel.tipog1;pag[0]=[];pag[0][0]=cel.con;pag[0][1]=vvv.document.createElement('span');pag[0][0].appendChild(pag[0][1]);pag[0][2]=cel;pag[0][3]=[];pag[0][4]=[];pag[0][5]=pagina;pag[0][6]=2;pag[0][7]=vvv.forpai;pag[0][8]=0;fil=creafila(0,pag);insertafila(0,fil,pag[0][3]);pag[0][0].style.overflow='hidden';with(pag[0][1].style){position='absolute';overflow='hidden';width=0;height=10;left=0;top=0;}break;}return cel;} function creaplantillaya(cual,celp,donde,nuco){var i1,i2,i3,i4,i5,i6,num1,num2,num3,celd,cel,cel1,fil,pag,vale,ca1,ca2;num2=cual%10000;num1=parseInt(cual/10000);num3=num2%100;num2=parseInt(num2/100);switch(num1){case 10:celd=creacelda(donde,10,0,num2,num3,2,1,false);cedi.appendChild(celd.con);for(i1=0;i1<2;i1++){cel=creacelda(celd,10,(i1+2),0,0,0,0,true);celd.con.appendChild(cel.con);celd.hijos[i1][0]=cel;cel.nuhi=i1+1;if(i1==0&&num2==0||i1==1&&num3==0){i2=6*(i1+2)+7;celd.atri=celd.atri.substr(0,i2)+'1'+celd.atri.substr(i2+1,40);cel.con.style.display='none';}}if(celd.atri.charAt(19)=='0')cel=celd.hijos[0][0];else cel=celd.hijos[1][0];break;case 11:celd=creacelda(donde,11,0,0,0,1,2,false);cedi.appendChild(celd.con);for(i1=0;i1<2;i1++){cel=creacelda(celd,11,2-i1,0,0,0,0,(i1==0));celd.con.appendChild(cel.con);ca1=''+letra.ct;if(ca1.length<2)ca1='0'+ca1;celd.atri=celd.atri.substr(0,12)+ca1+celd.atri.substr(14,40);celd.hijos[0][i1]=cel;cel.nuhi=i1+1;if(i1==0&&num3==0){celd.atri=celd.atri.substr(0,19)+'1'+celd.atri.substr(20,40);cel.con.style.display='none';}}if(celd.atri.charAt(19)=='0')cel=celd.hijos[0][0];else cel=celd.hijos[0][1];break;case 13:i4=1;switch(num2){case 90:num2=1;i4=90;break;case 98:num2=1;i4=98;break;case 99:num2=3;i4=99;break;}celd=creacelda(donde,13,i4,1,1,num2,num3,false);cedi.appendChild(celd.con);if(i4>97)copiafondostab(celd,null);ca1='00000000000000000000001111000000000';with(celd){switch(i4){case 98:atri=atri.substr(0,36)+'1'+atri.substr(37,99);atri=atri.substr(0,17)+'1'+atri.substr(18,99);atri=atri.substr(0,22)+'301'+atri.substr(25,99);if(nuco==0){i5=parseInt((parseInt(pagina[0][1].style.width)-30*(num3-1))/num3);celd.tipog1=[];pag=celd.tipog1;}else{pag=pagina;i5=pag[0][2].largo;}break;case 99:atri=atri.substr(0,36)+'1'+atri.substr(37,99);atri=atri.substr(0,14)+'1'+atri.substr(15,99);atri=atri.substr(0,15)+'001'+atri.substr(18,99);atri=atri.substr(0,21)+'1001'+atri.substr(25,99);atri=atri.substr(0,28)+'1'+atri.substr(29,99);i5=parseInt(pagina[0][1].style.width);ca1='00000000000000000000001111100000000';tipog1=0;break;}ca2=''+parseInt(pagina[0][1].style.width);while(ca2.length<4)ca2='0'+ca2;atri=atri.substr(0,32)+ca2+atri.substr(36,99);}i1=0;for(i2=0;i213&&vv0.bloque[0]==1)celd.atri=celd.atri.substr(0,26)+'22'+celd.atri.substr(28,40);for(i3=0;i3<3;i3++){switch(i3){case 0:i5=2;break;case 1:i5=1;break;case 2:i5=3;break;}cel=creacelda(celd,14,i5,i1,i2,0,0,(i5!=1));celd.con.appendChild(cel.con);celd.hijos[0][i3]=cel;cel.nuhi=i3+1;if((num1==14||num2==0)&&i3==0||(num1==14||num3==0)&&i3==2){celd.atri=celd.atri.substr(0,6*i5+7)+'1'+celd.atri.substr(6*i5+8,40);cel.con.style.display='none';}}if(celd.atri.charAt(19)=='0')cel=celd.hijos[0][0];else cel=celd.hijos[0][1];break;case 16:case 17:if(num2==50)i1=0;else i1=num2;if(num3==50)i2=0;else i2=num3;celd=creacelda(donde,15,1,i1,i2,3,1,false);cedi.appendChild(celd.con);for(i3=0;i3<3;i3++){switch(i3){case 0:i5=2;break;case 1:i5=1;break;case 2:i5=3;break;}cel=creacelda(celd,15,i5,i1,i2,0,0,(i3!=1));celd.con.appendChild(cel.con);ca1=''+letra.ct;if(ca1.length<2)ca1='0'+ca1;celd.atri=celd.atri.substr(0,12)+ca1+celd.atri.substr(14,40);if(letra.an=='bold')celd.atri=celd.atri.substr(0,26)+'22'+celd.atri.substr(28,40);celd.hijos[i3][0]=cel;cel.nuhi=i3+1;if((num1==16||num2==0)&&i3==0||(num1==16||num3==0)&&i3==2){celd.atri=celd.atri.substr(0,6*i5+7)+'1'+celd.atri.substr(6*i5+8,40);cel.con.style.display='none';}}if(celd.atri.charAt(19)=='0')cel=celd.hijos[0][0];else cel=celd.hijos[1][0];break;case 18:celd=creacelda(donde,16,1,num2,num3,3,1,false);cedi.appendChild(celd.con);if(num3==0)celd.atri='000000000606'+celd.atri.substr(12,50);for(i3=0;i3<3;i3++){switch(i3){case 0:i5=2;break;case 1:i5=3;break;case 2:i5=1;break;}cel=creacelda(celd,16,i5,num2,num3,0,0,(num3<4));celd.con.appendChild(cel.con);celd.hijos[i3][0]=cel;cel.nuhi=i3+1;ca1=''+letra.ct;if(ca1.length<2)ca1='0'+ca1;celd.atri=celd.atri.substr(0,12)+ca1+celd.atri.substr(14,40);if(letra.an=='bold')celd.atri=celd.atri.substr(0,26)+'22'+celd.atri.substr(28,40);if(num3==0||i3==0&&num3==2||i3==1&&num3<2){celd.atri=celd.atri.substr(0,6*i3+19)+'1'+celd.atri.substr(6*i3+20,40);cel.con.style.display='none';}}if(num3==0)cel=celd.hijos[2][0];else if(num3==2)cel=celd.hijos[1][0];else cel=celd.hijos[0][0];break;case 19:case 20:celd=creacelda(donde,num1-2,1,num2,num3,3,1,false);cedi.appendChild(celd.con);for(i3=0;i3<3;i3++){switch(i3){case 0:i5=2;break;case 1:i5=1;break;case 2:i5=3;break;}cel=creacelda(celd,num1-2,i5,num2,num3,0,0,(i3!=1));celd.con.appendChild(cel.con);celd.hijos[i3][0]=cel;cel.nuhi=i3+1;ca1=''+letra.ct;if(ca1.length<2)ca1='0'+ca1;celd.atri=celd.atri.substr(0,12)+ca1+celd.atri.substr(14,40);if(letra.an=='bold')celd.atri=celd.atri.substr(0,26)+'22'+celd.atri.substr(28,40);if(i3==0&&(num3%2)==0||i3==2&&num3<2){i2=6*i5+7;celd.atri=celd.atri.substr(0,i2)+'1'+celd.atri.substr(i2+1,40);cel.con.style.display='none';}}if(celd.atri.charAt(19)=='0')cel=celd.hijos[0][0];else cel=celd.hijos[1][0];break;case 21:celd=creacelda(donde,21,1,0,0,2,1,false);cedi.appendChild(celd.con);for(i3=0;i3<2;i3++){cel=creacelda(celd,21,(i3+1),0,0,0,0,(i3!=0));celd.con.appendChild(cel.con);celd.hijos[i3][0]=cel;cel.nuhi=i3+1;if(i3==0){celd.tipog1=[];pag=celd.tipog1;pag[0]=[];pag[0][0]=cel.con;pag[0][1]=vvv.document.createElement('div');pag[0][1].id=0;pag[0][0].appendChild(pag[0][1]);pag[0][2]=cel;i5=parseInt(celd.atri.substr(50,3),10);if(isNaN(i5))i5=100;cel.largo=i5;with(pag[0][1].style){position='absolute';overflow='hidden';width=10;height=10;left=0;top=0;}pag[0][3]=[];pag[0][4]=[];pag[0][5]=pagina;pag[0][6]=3;pag[0][7]=vvv.forpai;pag[0][8]=21;fil=creafila(0,pag);insertafila(0,fil,pag[0][3]);}if(i3==1&&celd.atri.charAt(44)=='0')cel.con.style.display='none';}cel=celd.hijos[0][0];break;case 22:case 23:case 24:case 31:celd=creacelda(donde,num1,1,0,0,2,1,false);cedi.appendChild(celd.con);if(num1==31)celd.tipog1='';for(i3=0;i3<2;i3++){cel=creacelda(celd,num1,(i3+1),0,0,0,0,(i3!=0));if(num1==31)celd.con.childNodes[0].childNodes[0].childNodes[0].childNodes[i3].childNodes[0].appendChild(cel.con);else celd.con.appendChild(cel.con);celd.hijos[i3][0]=cel;cel.nuhi=i3+1;if(i3==1&&celd.atri.charAt(44)=='0')cel.con.style.display='none';}cel=celd.hijos[0][0];break;case 25:celd=creacelda(donde,25,0,0,0,2,1,false);cedi.appendChild(celd.con);for(i1=0;i1<2;i1++){cel=creacelda(celd,12,0,0,0,0,0,(i1!=0));celd.con.appendChild(cel.con);celd.hijos[i1][0]=cel;cel.nuhi=i1+1;}cel=celd.hijos[1][1];break;}celp[0]=celd;celp[1]=cel;celp[2]=num1;if(donde!=null)vvv.modif=true;} function terminacreaplantilla(celp,rapida,nu){var i2,edi=[0,''],reor=[0,0];if(!interno){tipoedita(nucel,rapida,celp[0],celda,edi);if(hayseleccion())with(seleccion){reordenaseleccion(reor);i2=reor[0];if(principal){reor[1]=null;buscalugarparcial(reor);i2=reor[0];celda=reor[1];}nucel=i2;}i2=nucel;cambios(edi[0],i2,0,celp[0],null,celda,celp[1],'','',edi[1]);}insertacelda(nucel,celp[0],celda);if(interno)nucel++;else{if(celp[2]==13&&celp[0].tipoc==98||celp[2]==21){pagina=celp[0].tipog1;fila=pagina[0][3][0];celda=fila.celda;nu=0;celp[0]=celda;celp[1]=celda;}if(celp[2]==13&&celp[0].tipoc==99){plantilla13(celp[0]);pagina=celp[1].tipog1;pagina[0][1].style.height=2;fila=pagina[0][3][0];celda=fila.celda;nu=0;celp[0]=celda;celp[1]=celda;}midecelda(celp[0]);celda=celp[1];nucel=nu;fila.escribir=true;escribe(celda,fila,pagina,true);cambialetra=false;colocaraya();}} function crealaplantilla(cual,rapida){var celp=[null,null];cambialetra=true;creaplantillaya(cual,celp,celda,0,pagina);terminacreaplantilla(celp,rapida,0);return false;} function creaplantilla(cual,rapida){vv0.cierramenus(true);if(vv0.tipve==0||celda.edi<0||parent.ocupado>0)return;with(vv0)if(ventanas[venta][5]==2)maximiza(false);crealaplantilla(cual,rapida);} function cambiafuentecelda(modo,cam,letn,tama,celd){var i1,i2,ho,ve,tama1,cel,ca1,tip;with(celd){switch(modo){case 0:with(con.style){if(fontWeight=='bold')cam[0]=cam[0]+'1';else cam[0]=cam[0]+'0';ca1='000';if(tipo>10&&tipo<21&&hijos.length>0)if(tipo==13)ca1=atri.substr(29,3);else ca1=atri.substr(26,2)+'0';cam[0]=cam[0]+ca1;if(letrasele.an=='bold'){con.style.fontWeight='bold';cam[1]=cam[1]+'1222';ca1='2';}else{con.style.fontWeight='normal';cam[1]=cam[1]+'0111';ca1='1';}}if(tipo>10&&tipo<21&&hijos.length>0)if(tipo==13)atri=atri.substr(0,29)+ca1+ca1+ca1+atri.substr(32,40);else celd.atri=celd.atri.substr(0,26)+ca1+ca1+celd.atri.substr(28,40);break;case 1:if(con.style.fontStyle=='italic')cam[0]=cam[0]+'1';else cam[0]=cam[0]+'0';if(letrasele.ac=='italic'){con.style.fontStyle='italic';cam[1]=cam[1]+'1';}else{con.style.fontStyle='normal';cam[1]=cam[1]+'0';}break;case 2:if(con.style.textDecoration=='underline')cam[0]=cam[0]+'1';else cam[0]=cam[0]+'0';if(letrasele.as=='underline'){con.style.textDecoration='underline';cam[1]=cam[1]+'1';}else{con.style.textDecoration='none';cam[1]=cam[1]+'0';}break;case 4:if(tipo!=1){if(letn[0]!=letrasele.n){letn[0]=con.style.fontFamily;ca1=''+letn[0].length;while(ca1.length<3)ca1='0'+ca1;cam[0]=cam[0]+ca1+letn[0];}else cam[0]=cam[0]+'000';con.style.fontFamily=letrasele.n;if(letn[1]!=con.style.fontFamily){letn[1]=con.style.fontFamily;ca1=''+letn[1].length;while(ca1.length<3)ca1='0'+ca1;cam[1]=cam[1]+ca1+letn[1];}else cam[1]=cam[1]+'000';}break;case 5:ca1=''+parseInt(con.style.fontSize);while(ca1.length<2)ca1='0'+ca1;cam[0]=cam[0]+ca1;con.style.fontSize=tama+'pt';ca1=''+tama;while(ca1.length<2)ca1='0'+ca1;cam[1]=cam[1]+ca1;break;case 6:ca1=''+color;while(ca1.length<2)ca1='0'+ca1;cam[0]=cam[0]+ca1;if(tipo>10&&tipo<21&&hijos.length>0)if(tipo==13)cam[0]=cam[0]+atri.substr(12,2)+atri.substr(19,2)+atri.substr(26,2);else cam[0]=cam[0]+atri.substr(12,2)+'0000';else cam[0]=cam[0]+'000000';con.style.color=colores[letrasele.ct][0];color=letrasele.ct;ca1=''+color;while(ca1.length<2)ca1='0'+ca1;cam[1]=cam[1]+ca1+ca1+ca1+ca1;if(tipo>10&&tipo<21&&hijos.length>0)if(tipo==13){atri=atri.substr(0,12)+ca1+atri.substr(14,40);atri=atri.substr(0,19)+ca1+atri.substr(21,40);atri=atri.substr(0,26)+ca1+atri.substr(28,40);}else atri=atri.substr(0,12)+ca1+atri.substr(14,40);break;}if(padre!=null&&padre.padre==null&&tipo<10)dibujacaracter(celd);if(celdas.length>0){for(i1=0;i10){if(tipo==13&&tipoc==98){for(ve=0;ve1&&cel.tipoc<4&&(tipo!=16||tipog2<4)){if(tipo<21)i2=parseInt(atri.charAt(6*cel.tipoc+6),10)*10;else i2=parseInt(atri.charAt(46),10)*10;i2=100-i2;tama1=Math.round(tama1*i2/100);if(tama1<6)tama1=6;}cambiafuentecelda(modo,cam,letn,tama1,cel);}midecelda(celd);}}} function cambiafuenteseleccion(modo,cam){var i1,i2,pr,ul,f1,f2,tam,cel,ca1,nfi=0,fi,fil1,fil2,reor=[],letn=[];tam=letrasele.t;with(seleccion){letn[0]='';letn[1]='';reordenaseleccion(reor);pr=reor[0];ul=reor[1];if(principal){reor[1]=null;buscalugarparcial(reor);pr=reor[0];fil1=reor[1];reor[0]=ul;reor[1]=null;buscalugarparcial(reor);ul=reor[0];fil2=reor[1];f1=fil1.nufi;f2=fil2.nufi;nfi=f1;for(i1=f1;i1<=f2;i1++){fi=pagina[0][3][i1];fi.escribir=true;with(fi.celda)for(i2=0;i2f1&&i1=pr&&(i2=pr||f11)ca1='Cambiar fuente';ca1=ca1+' en selección';cambios(8,nucel,nucel,null,null,celda,celda,cam[0],cam[1],ca1);fil=pagina[0][3][fipr];escribe(fil.celda,fil,pagina,true);colocaraya();}with(seleccion){colocado[0]=primero;colocado[1]=primero;tipo=2;}dibujaseleccion();vv0.ponocupado(0);} function cambiafuente(donde,cual){var ca1,opc;vv0.cierramenus(true);cambialetra=true;if(vvv!=null&&hayseleccion()){switch(cual){case 1:ca1='Cambiando tipo de fuente';break;case 2:ca1='Cambiando tamaño de fuente';break;case 8:ca1='Cambiando atributo negrita';break;case 16:ca1='Cambiando estilo cursiva';break;case 32:ca1='Cambiando atributo subrayado';break;}vv0.ponocupado(1,ca1,400);setTimeout('cambiafuenteahora('+donde+','+cual+')',1);}else{if((cual&1)==1){opc=vv0.document.getElementById('top5p'+donde);letra.n=opc.innerHTML;}if((cual&2)==2){opc=vv0.document.getElementById('top6p'+donde);letra.t=opc.innerHTML;}if((cual&4)==4&&donde!=letra.ct)letra.ct=donde;if((cual&8)==8){opc=vv0.document.getElementById('iop11005p0');if(opc.style.visibility=='')letra.an='normal';else letra.an='bold';}if((cual&16)==16){opc=vv0.document.getElementById('iop11005p1');if(opc.style.visibility=='')letra.ac='normal';else letra.ac='italic';}if((cual&32)==32){opc=vv0.document.getElementById('iop11005p2');if(opc.style.visibility=='')letra.as='none';else letra.as='underline';}}} function colorperso(tipo,modo){var col,modo;vv0.cierramenus(true);switch(tipo){case 0:cambiafuente(16,4);break;case 1:cambiafondo(16,4);break;case 2:cambiacgraf(16,4);break;case 4:if(modo==4)col='#'+vvv.celedi.atri.substr(57,6);else col='#'+vvv.celedi.atri.substr(63,6);break;case 5:if(modo==20)col='#'+vv0.forpat.substr(49,6);else col='#'+vv0.forpat.substr(55,6);break;case 9:with(vvv)switch(modo){case 50:col='#'+celedi.tipog2[0][1].substr(1,6);break;case 51:col='#'+celedi.tipog2[1][ficoe[0]][1].substr(1,6);break;case 52:col='#'+celedi.tipog2[2][ficoe[1]][1].substr(1,6);break;case 53:col='#'+celedi.tipog2[3][ficoe[0]][ficoe[1]][1].substr(1,6);break;case 54:col='#'+celedi.tipog2[0][1].substr(7,6);break;case 55:col='#'+celedi.tipog2[1][ficoe[0]][1].substr(7,6);break;case 56:col='#'+celedi.tipog2[2][ficoe[1]][1].substr(7,6);break;case 57:col='#'+celedi.tipog2[3][ficoe[0]][ficoe[1]][1].substr(7,6);break;}case 10:if(modo==4)col='#'+vvv.editat[0].substr(57,6);else col='#'+vvv.editat[0].substr(63,6);break;}col=vv0.fuentes.ChooseColorDlg(col);col=col.toString(16);while(col.length<6)col='0'+col;col='#'+col;switch(tipo){case 0:cambiafuente(16,4);break;case 1:cambiafondo(16,4);break;case 2:cambiacgraf(16,4);break;case 4:vvv.cambiaconficua(col,modo);break;case 5:vv0.cambiaforpag(col,modo);break;case 8:vvv.cambiaplan(col,modo);break;case 9:vvv.cambiamat(col,modo);break;case 10:vvv.cambiaformacab(col,modo);break;}} function opcionescolor(tipo,modo,men,nume){var i1,i2,tot='',ca1,ca2,bor;switch(tipo){case 0:ca2='vv2.cambiafuente';break;case 4:ca2='vvv.cambiaconficua';break;case 5:ca2='cambiaforpag';break;case 6:ca2='vvv.cambiafunc';break;case 7:ca2='vvv.cambiamedidas';break;case 8:ca2='vvv.cambiaplan';break;case 9:ca2='vvv.cambiamat';break;case 10:ca2='vvv.cambiaformacab';break;}if(exp)i2=colores.length+1;else i2=colores.length;for(i1=0;i1';if(i1'+'

'+'	'+colores[i1][1]+'

';else tot+='Personalizado...';tot+='  ';}return tot;} function copiagrafica(dest,orig){var i1,fil;with(dest){con.innerHTML=orig.con.innerHTML;largo=orig.largo;alto=orig.alto;with(con.style){left=0;top=0;width=largo;height=alto;}with(con.childNodes[0].childNodes[3])while(childNodes.length>0)removeChild(childNodes[0]);tipog2=[];tipog2[0]=orig.tipog2[0].slice(0);tipog2[1]=orig.tipog2[1].slice(0);for(i1=2;i1<6;i1++)tipog2[i1]=orig.tipog2[i1];tipog2[6]=[];for(i1=0;i10){hi=1;if(tipo==13&&tipoc>97)copiafondostab(celc,celd);celc.hijos.length=hijos.length;for(ve=0;ve0)for(i1=0;i1'+con.childNodes[0].innerHTML+'';else celc.con.innerHTML=con.innerHTML;else if(tipoc==1)switch(tipo){case 22:celc=copiaimagen(celc,celd);break;case 23:celc=copiagrafica(celc,celd);break;}}return celc;} function quitalateral(lat,atri,cfil){var i1,fi,fil1,resp=-1;if(atri.charAt(0)=='2'){fila.escribir=true;return fila.nufi;}with(lat){if(atri.charAt(1)<'2')if(atri.charAt(0)=='0'){if(atri.charAt(1)=='0')resp=0;else resp=cfil.length-1;}else{for(i1=0;i1fil1.sup){if(fi==null)fi=fil1;fil1.escribir=true;}}resp=fi.nufi;}}return resp;} function cortaahora(modo){var i1,i2,pr,ul,f1,f2,cel,cel1,vre,ca1,reor=[0,0];var fi,fil1,fil2,cad;vre=vvv;vvv=window;if(guardacopia==null){guardacopia=creacelda(null,0,1,0,0,0,0,false);document.getElementById('vcedi').appendChild(guardacopia.con);}else{guardacopia.con.innerHTML='';guardacopia.celdas.length=0;}if(celda.tipo>20){cedi=document.getElementById('vcedi');cel=copiaceldas(celda,null);vvv=vre;cedi=vvv.document.getElementById('vcedi');insertacelda(0,cel,guardacopia);if(modo==0){switch(celda.tipo){case 21:ca1='cuadro de texto';break;case 22:ca1='imagen';break;case 23:ca1='gráfica';break;case 24:ca1='figura geométrica';break;}ca1='Cortar '+ca1;if(entexto){cel1=celda;celda=cel1.padre;nucel=cel1.nuce;cambios(2,nucel,nucel,cel1,null,celda,celda,'','',ca1);fila.escribir=true;escribe(celda,fila,pagina,true);}else{i1=late.nufi;suprimelate(i1);i1=quitalateral(late,late.celda.Atri,filas);if(i1>-1){fil1=pagina[0][3][i1];escribe(fil1.celda,fil1,pagina,true);}with(late){cambios(17,numlate,parr,0,0,celda,celda,null,null,null,null,'','',ca1);cuadrolate=null;borralates;}with(previot){celda=celd;nucel=lugar;fila=fil;entex=true;lat=null;}entexto=true;}colocaraya();}}else with(seleccion){reordenaseleccion(reor);pr=reor[0];ul=reor[1];primero=pr;ultimo=ul;tipo=-1;dibujaseleccion();cedi=document.getElementById('vcedi');if(principal){reor[1]=null;buscalugarparcial(reor);pr=reor[0];fil1=reor[1];reor[0]=ul;reor[1]=null;buscalugarparcial(reor);ul=reor[0];fil2=reor[1];f1=fil1.nufi;f2=fil2.nufi;for(i1=f1;i1<=f2;i1++){fi=pagina[0][3][i1];with(fi.celda)for(i2=0;i2f1&&i1=pr&&(i2=pr||f1=0&&pasos[paso][2][entrada]){if(en>=0){ca1=pasos[paso][2][en][3];celd.edi=en;}else{ca1=pasos[paso][2][entrada][3];celd.edi=entrada;}for(i1=0;i10&&(celdas[i1].tipo==10&&celdas[i1].atri.charAt(19)==1||(celdas[i1].tipo!=16||celdas[i1].tipog2!=4)&&(celdas[i1].tipo>14||celdas[i1].tipo==14&&(celdas[i1].tipog1==0||celdas[i1].tipog2==0))))suprimecelda(i1,celd,true);else if(celdas[i1].tipo==13&&celdas[i1].hijos.length==1){cel=celdas[i1];suprimecelda(i1,celd,false);with(cel.hijos[0][0])for(i2=celdas.length-1;i2>=0;i2--)insertacelda(i1,celdas[i2],celd);borracelda(cel);seleccionacopia(celd,en);}else{with(celdas[i1]){color=14;con.style.color=colores[14][0];if(hijos.length>0){for(i2=0;i21||(tipoc<48||tipoc>57)&&ca1.indexOf(con.innerHTML)<0){suprimecelda(i1,celd,true);i1--;}}i1++;}}}if(celd.celdas.length==0)return false;return true;} function pegaahora(){var i1,i2,celc,cel,fi,edi=[0,''],reor=[0,0],lupar=[0,null];if(colerror[0]&&celda.edi>=0)coloreacelda(-1);celc=copiaceldas(guardacopia,pagina);if((vv0.bloque[0]==1||vv0.bloque[0]==2||vv0.bloque[0]==9&&vv0.bloque[1]==3)&&!seleccionacopia(celc,-1)){colocaraya();borracelda(celc);vv0.ponocupado(0);return;}if(hayseleccion())with(seleccion){reordenaseleccion(reor);i2=reor[0];if(principal){lupar[0]=i2;buscalugarparcial(lupar);i2=lupar[0];fi=lupar[1];celda=fi.celda;}nucel=i2;}tipoedita(nucel,'texto copiado',celc,celda,edi);i2=celc.celdas.length;cambios(4,nucel,nucel+i2,celc,null,celda,celda,'','',edi[1]);for(i1=0;i10)if(cel.tipo==13&&cel.tipoc==98||cel.tipo==21)cel.tipog1[0][5]=pagina;}midecelda(celda);nucel+=i2;fila.escribir=true;escribe(celda,fila,pagina,true);colocaraya();borracelda(celc);if(vv0.bloque[0]==1)vvv.miraentra();vv0.ponocupado(0);vvv.actualizabotones();} function pegar(donde){var ca1;if(donde!=null){ca1=donde.style.color.substr(4,3);if(ca1==128)return;}vv0.cierramenus(true);if(guardacopia==null)return;cambialetra=false;if(vv0.bloque[0]==2&&vv0.bloque[1]==1&&vv0.bloque[2]==5||vv0.bloque[5]==903060000||vv0.bloque[5]==903020000)if(vvv.tienematriz()){vvv.pegamatriz(donde);return;}if(vv0.bloque[0]==1&&!vvv.puedepega())return;vv0.ponocupado(1,'Pegando selección guardada',400);setTimeout('pegaahora()',1);} function seleccionaahora(modo){var ca,i1,ba,pr,ul,b1,ya,hay,cel,fi;vv0.cierramenus(true);if(hayseleccion()){seleccion.tipo=-1;dibujaseleccion();}with(seleccion){principal=true;switch(modo){case 0:case 1:if(vv0.bloque[0]!=9||vv0.bloque[1]!=10){celda=pasos[paso][2][entrada][1];fila=buscafila(celda);nucel=0;primero=0;ultimo=celda.celdas.length;principal=false;celd=celda;}else{if(modo==0)ca=46;else ca=0;ba=fila.nufi;fi=fila;if(fi.celda==celda)i1=nucel;else while(celda!=fi.celda){celda=celda.padre;i1=celda.nuce;}ya=true;hay=false;while(ya){if(i1==0){b1=true;if(ba==0){ya=false;b1=false;}while(b1){ba--;fi=pagina[0][3][ba];if(fi.celda.celdas.length>0)b1=false;else if(ba>0)ba--;else{ya=false;b1=false;}i1=fi.celda.celdas.length;}}if(ya){i1--;cel=fi.celda.celdas[i1];if(cel.tipo==8||cel.tipo==0&&cel.tipoc==ca){ya=false;hay=true;}}}if(hay)i1++;if(i1==fi.celda.celdas.length&&bafi.celda.celdas.length-1){b1=true;if(ba==pagina[0][3].length-1){ya=false;b1=false;}while(b1){ba++;fi=pagina[0][3][ba];if(fi.celda.celdas.length>0)b1=false;else if(bagrh){i1=grl;while(i1=0)pun++;}i1+=4;si=(!si);}}else{i1=grt;while(i1=0)pun++;}i1+=4;si=(!si);}}return pun;} function preparafunc(celd){var i1,i2,i3,i4,i5,ca1,fun,fun1,fi,er=0,variable,let,mira,letmira,busp=''; function terminafuncion(func,final){var i1,i2,i3,i4,i5,i6,fu,ca1,ca2,ca3,b1,car,le,bus;b1=true;while(b1){i1=func.indexOf('E');if(i1>=0)if(func.lenght=0){i2=i1+bus.length;if(func.length<=i2)er=7;else{if(fu>12){if(func.charAt(i2)=='N')if(fu==15)er=8;else{ca2=func.substr(i2+1,func.length);func=func.substr(0,i1)+'D';i5=0;i4=0;for(i3=0;i3=0)i5=i3;if(ca2.charAt(i3)=='(')i4++;if(ca2.charAt(i3)==')')i4--;if(i4<0&&i3>0)i5=i3;}if(i5<0)i5=ca2.length;ca1=ca2.substr(0,i5);ca2=ca2.substr(i5,ca2.length);if(ca1==''||ca1.charAt(0)==')'||ca1=='()'||ca1.length==1&&ca1=='(')er=7;else{ca1=terminafuncion(ca1,final);if(ca1.length>0&&ca1.charAt(0)=='A'){i4=1;i5=-1;ca3='';for(i3=2;i30){ca1='('+ca1.substr(i5+1,ca1.length)+')'+ca1.substr(0,i5+1);}}else ca1='('+ca1+')';func=func+ca1+ca2;}}}else b1=false;}}if(er==0)for(fu=1;fu<3;fu++){if(fu==1){ca1='p';car='T';}else{ca1='e';car='U';}b1=true;while(b1){i1=func.indexOf(ca1);if(i1>=0)func=func.substr(0,i1)+car+func.substr(i1+1,func.length);else b1=false;}}if(er==0){let='xyABDFGHIJKLMNOPQTU0123456789+-/·*:(),.';le='+-/·*:';if(final)let+=variable;else let+='=xy';for(i1=0;i1=0){if(i1>0&&le.indexOf(func.charAt(i1-1))>=0)er=2;if(i1=0)er=2;if(i1==func.length-1)if(i1==0)er=1;else er=3;}}if(er==0&&func=='')er=13;return func;} function ponfuncionya(cuad){var co,i1,cua,ca1,func='';with(cuad)for(co=0;co64&&i1<91&&i1!=69)i1+=32;if(i1!=32)func+=unescape('%'+i1.toString(16));}break;case 10:if(atri.charAt(19)=='0')func+='A('+terminafuncion(ponfuncionya(hijos[0][0]),false)+')';if(atri.charAt(25)=='0')if(func.length==0||func.charAt(func.length-1)!='g')er=11;else func+='N('+terminafuncion(ponfuncionya(hijos[1][0]),false)+')';break;case 11:if(atri.charAt(19)=='0')ca1=terminafuncion(ponfuncionya(hijos[0][0]),false);else ca1='2';func+='B('+ca1+')('+terminafuncion(ponfuncionya(hijos[0][1]),false)+')';break;case 16:if(hijos[0][0].celdas.length==0)er=16;else if(hijos[1][0].celdas.length==0)er=17;else if(hijos[1][0].celdas.length==1)with(hijos[1][0].celdas[0])if(tipo==0&&tipoc==48)er=18;if(er==0)func+='(('+terminafuncion(ponfuncionya(hijos[0][0]),false)+')/('+terminafuncion(ponfuncionya(hijos[1][0]),false)+'))';break;case 14:if(tipog1==4&&tipog2==4)func=func+'L';func+='('+terminafuncion(ponfuncionya(hijos[0][1]),false)+')';break;default:er=1;}}return func;}fun=ponfuncionya(celd);ca1=fun;fun='';i2=0;for(i1=0;i11||i2==1&&fun.charAt(1)!='=')er=9;variable='';if(er==0)if(fun.charAt(1)=='=')switch(fun.charAt(0)){case'x':variable='y';break;case'y':variable='x';break;default:er=10;}else variable='xy';if(er==0){if(fun.charAt(1)=='='){fun1=fun.substr(0,2);fun=fun.substr(2,fun.length);}else fun1='';mira=false;letmira='';fun=fun1+terminafuncion(fun,true);}if(er==0){switch(variable){case'y':if(fun.substr(2,fun.length).indexOf('x')>=0)er=20;break;case'x':if(fun.substr(2,fun.length).indexOf('y')>=0)er=21;break;default:i1=fun.indexOf('x');i2=fun.indexOf('y');if(i1>=0&&i2>=0)er=21;break;}}if(er==0){i4=0;for(i3=0;i3'9'||fun.charAt(i3+1)<'0'||fun.charAt(i3+1)>'9')er=19;}}}if(er==0&&i4!=0)er=14;if(er>0){i1=255;if(er<10)er='0'+er;fun=unescape('%'+i1.toString(16))+er+busp;}return fun;} function dibujaabierto(dex,dey,col,gra,tipo,norm){var i1,i2,hue=[];if(!norm){i1=dex;dex=dey;dey=i1;}if(tipo==11)i2=1;else i2=3;hue=[[dex-1,dey-1,1,2],[dex+1,dey-1,1,2],[dex,dey-2,1,i2],[dex,dey+1,1,1]];for(i1=0;i10&&va<0||vaan[nuvaan]<0&&va>0){hay=false;vaan[nuvaan]=0;}else vaan[nuvaan]=va;}else{hay=false;vaan[nuvaan]=0;}nuvaan++;break;default:bien=false;}ope2=' ';}} function sumaresta(){switch(ope1){case'+':va1=va1+va2;break;case'-':va1=va1-va2;break;default:bien=false;}va2=0;ope2=' ';} function termina(){var ca2='+-/:·*A';if(inivaan&&(ope2=='/'||ope2==':'))vaan[nuvaan]=0;if(cad!=''&&ca2.indexOf(cad.charAt(0))<0)cad='*'+cad;if(cad==''||cad.charAt(0)!='A')opera();} function cogeca1(de){var i1,sign,indi;i2=1;i3=0;for(i1=de;i1=maxint)&&va<0||va==0&&indi<=0)hay=false;else va=Math.pow(va,va3)*sign;termina();break;case'D':cogeca1(2);ca1=cad.substr(2,i3-2);cad=cad.substr(i3+1,cad.length);va3=calcula(ca1);if(hay)if(va3<=0)hay=false;else{cogeca1(1);ca1=cad.substr(1,i3-1);cad=cad.substr(i3+1,cad.length);va=calcula(ca1);if(hay)if(va<=0)hay=false;else if(va3!=1)va=Math.log(va)/Math.log(va3);termina();}break;case'F':case'G':case'H':case'I':case'J':case'K':case'L':case'M':case'O':case'P':case'Q':a1=cad.charAt(0);cogeca1(2);ca1=cad.substr(2,i3-2);cad=cad.substr(i3+1,cad.length);va=calcula(ca1);if(hay)switch(a1){case'F':va=Math.sin(va);break;case'G':va=Math.cos(va);break;case'H':va=Math.tan(va);break;case'I':if(Math.sin(va)!=0)va=1/Math.sin(va);else hay=false;break;case'J':if(Math.cos(va)!=0)va=1/Math.cos(va);else hay=false;break;case'K':if(Math.sin(va)!=0)va=Math.cos(va)/Math.sin(va);else hay=false;break;case'L':va=Math.abs(va);break;case'M':va=Math.floor(va);entera=true;break;case'O':va=Math.asin(va);break;case'P':va=Math.acos(va);break;case'Q':va=Math.atan(va);break;}termina();break;case'T':va=Math.PI;cad=cad.substr(1,cad.length);termina();break;case'U':va=Math.E;cad=cad.substr(1,cad.length);termina();break;case'0':case'1':case'2':case'3':case'4':case'5':case'6':case'7':case'8':case'9':ca1='';while(cad!=''&&(cad.charAt(0)>='0'&&cad.charAt(0)<='9'||cad.charAt(0)=='.')){ca1=ca1+cad.charAt(0);cad=cad.substr(1,cad.length);}va=parseFloat(ca1);if(isNaN(va))bien=false;termina();break;default:bien=false;}if(ope2!=' ')termina();sumaresta();return va1;} function dibujatrozo(vaxx){var i2,des,has,vale;if(variables[0]==1){if(desde[0]>0||entera){desde[0]=0;desde[1]=gra[1][variables[0]]-vay;}}else if(desde[0]>0||entera){desde[0]=0;desde[1]=gra[1][variables[0]]+vay;}if(variables[0]==1)xx2=gra[1][variables[1]]+vaxx;else xx2=gra[1][variables[1]]-vaxx;yy1=desde[1];if(variables[0]==1)yy2=gra[1][variables[0]]-vay;else yy2=gra[1][variables[0]]+vay;if(yy2>gra[0][variables[0]]+10000)yy2=gra[0][variables[0]]+10000;if(yy2<-10000)yy2=-10000;if(entera)xx2++;pr=Math.round(de1/2);if(yy1gra[0][variables[0]]/2)pr=0;if(variables[0]==1){if(hayinter[1][1])des=inter[1][1];else des=-maxint;if(hayinter[1][0])has=inter[1][0];else has=maxint;}else{if(hayinter[0][0])des=inter[0][0];else des=-maxint;if(hayinter[0][1])has=inter[0][1];else has=maxint;}if(ul>has||ul+prhas)pr=has-ul;}if(ul<-10000)ul=-10000;if(ul+pr>gra[0][variables[0]]+10000)pr=gra[0][variables[0]]+10000-ul;if(pr10){i2=ul;if(yy10)cogepun(-1,i1,i2,de1,pr,de2,donde);dibujaabierto(i1,ul,de2,donde,huecos[0],true);}else{cogepun(-1,i1,ul,de1,pr,de2,donde);if(i1>=0&&ul>=0)if(huecos[0]&&de1==1&&i1==huecos[1]+2&&Math.abs(ul-huecos[2])<3)dibujahueco(huecos[1],huecos[2],i1,ul,de2,donde,true);}huecos[1]=i1;huecos[2]=ul;}else{if(huecos[0]>10){cogepun(-1,i1,i2,de1,pr,de2,donde);dibujaabierto(i1,ul,de2,donde,huecos[0],false);}else{cogepun(-1,ul,i1,pr,de1,de2,donde);if(i1>=0&&ul>=0)if(huecos[0]&&de1==1&&i1==huecos[2]-2&&Math.abs(ul-huecos[1])<3)dibujahueco(huecos[1],huecos[2],ul,i1,de2,donde,false);}huecos[1]=ul;huecos[2]=i1;}}for(i1=0;i1<2;i1++){hayinter[i1]=[false,false];inter[i1]=[0,0];extremos[i1]=[0,0];}desde[0]=1;fun=ca1.substr(4,10);inter[0][0]=parseFloat(fun);hayinter[0][0]=(!isNaN(inter[0][0]));fun=ca1.substr(14,10);inter[0][1]=parseFloat(fun);hayinter[0][1]=(!isNaN(inter[0][1]));fun=ca1.substr(24,10);inter[1][0]=parseFloat(fun);hayinter[1][0]=(!isNaN(inter[1][0]));fun=ca1.substr(34,10);inter[1][1]=parseFloat(fun);hayinter[1][1]=(!isNaN(inter[1][1]));fun=ca1.substr(44,ca1.length);if(fun.charAt(1)=='='){entera=fun.charAt(0);fun=fun.substr(2,fun.length);}else if(fun.indexOf('y')>=0)entera='x';else entera='y';if(entera=='x'){variables[0]=0;variables[1]=1;}else{variables[0]=1;variables[1]=0;}extremos[0][0]=-gra[1][0];extremos[0][1]=gra[0][0]+extremos[0][0];extremos[1][0]=gra[1][1]-gra[0][1];extremos[1][1]=gra[1][1];for(i1=0;i1<2;i1++)if(hayinter[variables[0]][i1]){i2=inter[variables[0]][i1]/gra[1][3];i2*=gra[1][2];i2=Math.round(i2);if(variables[0]==1)i2=gra[1][variables[0]]-i2;else i2=gra[1][variables[0]]+i2;inter[variables[0]][i1]=i2;}entera=false;bien=true;vax=extremos[variables[1]][0]-1;vaxa=false;disc=0;de1=ca1.charAt(2)*1+1;de2=parseInt(ca1.substr(0,2),10);if(isNaN(de2))de2=0;inivaan=true;if(de1==1&&(hayinter[variables[1]][0]||hayinter[variables[1]][1]))switch(ca1.charAt(3)){case'2':case'5':if(hayinter[variables[1]][0])abierto=1;break;case'3':case'6':if(hayinter[variables[1]][1])abierto=2;break;case'4':case'7':abierto=3;break;}while(bien&&vax<=extremos[variables[1]][1]+1){valor=vax/gra[1][2]*gra[1][3];valor=Math.round(valor*10000000000)/10000000000;if((abierto&2)==2){i1=(vax+1)/gra[1][2]*gra[1][3];i1=Math.round(i1*10000000000)/10000000000;abrefin=(i1>inter[variables[1]][1]);}if((!hayinter[variables[1]][0]||valor>=inter[variables[1]][0])&&(!hayinter[variables[1]][1]||valor<=inter[variables[1]][1])){nuvaan=0;hay=true;total=calcula(fun);if(isNaN(total))hay=false;total=total/gra[1][3];if(hay&&bien){total=total*gra[1][2];if(Math.abs(total)-1>maxint)hay=false;}else if(!hay)huecos[0]=true;if(hay&&bien){vay=Math.round(total);if(desde.length>3&&desde[0]==1){i1=desde[3];i2=valor;i3=valor;xx2=nuvaan;yy1=vaan[nuvaan];for(pr=0;pr<10;pr++){valor=(32*i1+i2)/33;valor=Math.round(valor*1000000)/1000000;nuvaan=xx2;vaan[nuvaan]=yy1;hay=true;ul=calcula(fun);if(isNaN(ul))hay=false;if(hay){ul=ul/gra[1][3]*gra[1][2];if(Math.abs(ul)-1>maxint)hay=false;}if(hay){ul=Math.round(ul);if(ul/Math.abs(ul)==vay/Math.abs(vay)){if(variables[0]==1)ul=gra[1][variables[0]]-ul;else ul=gra[1][variables[0]]+ul;if(ul>gra[0][variables[0]]+10000)ul=gra[0][variables[0]]+10000;if(ul<-10000)ul=-10000;desde[1]=ul;desde[0]=0;i2=valor;}else i1=valor;}else i1=valor;}nuvaan=xx2;valor=i3;vaan[nuvaan]=yy1;}if(vaxa){yy1=desde[1];if(variables[0]==1)yy2=gra[1][variables[0]]-vay;else yy2=gra[1][variables[0]]+vay;if(desde[0]==0&&Math.abs(yy2-yy1)>gra[0][variables[0]]-5&&yy2*yy1<0)desde[0]=1;}if(vax>=extremos[variables[1]][0]){if((abierto&1)==1||abrefin&&(abierto&2)==2){if(ca1.charAt(3)>'4')huecos[0]=12;else huecos[0]=11;abierto--;}dibujatrozo(vax);}desde[1]=yy2;desde[2]=vay;desde[4]=vax;huecos[0]=false;vaxa=true;}else{if(!hay&&desde.length>4&&desde[0]==0){i1=desde[3];i2=valor;i3=valor;vay=maxint;xx2=nuvaan;yy1=vaan[nuvaan];for(pr=0;pr<15;pr++){valor=(32*i2+i1)/33;valor=Math.round(valor*1000000)/1000000;nuvaan=xx2;vaan[nuvaan]=yy1;hay=true;ul=calcula(fun);if(isNaN(ul))hay=false;if(hay){ul=ul/gra[1][3]*gra[1][2];if(Math.abs(ul)-1>maxint)hay=false;}if(hay){ul=Math.round(ul);if(ul/Math.abs(ul)==desde[2]/Math.abs(desde[2])){vay=ul;i1=valor;}else i2=valor;}else i2=valor;}valor=i3;nuvaan=xx2;vaan[nuvaan]=yy1;if(vay!=maxint)dibujatrozo(desde[4]);}vaan[nuvaan]=0;if(nuvaan>0)vaan[nuvaan-1]=0;desde[0]=1;vaxa=false;}desde[3]=valor;}disc++;vax++;if(ca1.charAt(3)=='1'&&disc==5){vax+=5;disc=0;desde[0]=5;}inivaan=false;}} function pongraficaya(modo,vale,tipo){var i1,i2,i3,i4,de1,de2,pr,ul,paso2,paso1,gr,x1,y1,let,largo,alto,alto,ca1,ca2,spa,fu,gra; function dibujapunto(){i3=parseFloat(ca1.substr(0,10));i1=i3*gra[1][2]/gra[1][3];i3=parseFloat(ca1.substr(10,10),10);i2=i3*gra[1][2]/gra[1][3];i1+=gra[1][0];i2=gra[1][1]-i2;i3=parseInt(ca1.substr(20,2),10);gr=ca1.charAt(22)*1+1;pr=Math.round(gr/2);if(i20)cedi.appendChild(gra[8][0]);spa=vvv.document.createElement('div');if(vale&&tipo==0)pagina.appendChild(spa);else cedi.appendChild(spa);with(spa.style){position='absolute';overflow='hidden';left=2;top=2;i1=largo;if(exp)i1+=2;width=i1;i1=alto;if(exp)i1+=2;height=i1;overflow='hidden';border='1px dashed rgb(210,200,190)';}gra[8][0]=spa;for(i1=1;i1<5;i1++){spa=vvv.document.createElement('div');gra[8][0].appendChild(spa);gra[8][i1]=spa;if(i1==1||i1==3)spa.id='g'+i1;with(spa.style){position='absolute';overflow='hidden';left=0;top=0;width=largo;height=alto;}}if(vale&&tipo==0){for(i1=0;i10)cambiaposicua(gra);gra[8][0].appendChild(scuad);}paso2=gra[1][2];paso1=parseFloat(gra[2].substr(22,10),10);if(isNaN(paso1))paso1=1;paso1=paso2*paso1;if(paso1>0){pr=gra[1][0];while(pr-paso1>=0)pr-=paso1;ul=gra[1][0];while(ul+paso10){pr=gra[1][1];while(pr-paso1>=0)pr=pr-paso1;ul=gra[1][1];while(ul+paso10){letra.n=gra[3][2];i1=parseInt(gra[2].substr(39,2),10);if(isNaN(i1))i1=0;letra.ct=i1;letra.t=parseInt(gra[2].substr(41,2),10);i1=parseInt(gra[2].charAt(43));if((i1&1)==1)letra.an='bold';else letra.an='normal';if((i1&2)==2)letra.ac='italic';else letra.ac='normal';letra.as='none';i2=parseFloat(gra[2].substr(22,10),10);if(isNaN(i2))i2=1;paso1=gra[1][0];pr=paso2*i2+paso1;ul=0;while(pr=0&&pr+i1-i30){ul-=i2;i3=ul*gra[1][3];i3=Math.round(i3*100)/100;ca1=''+i3;let=insertaletrag(gra[8][2]);with(let){i3=2;innerHTML=ca1;i1=clientWidth;de1=clientHeight;if(pr-i1+i3>=0&&pr+i1-i3pr+i3){with(style){left=pr-i1+i3;top=de2;}paso1=pr-i1+i3-3;if(y1==-1){y1=clientHeight+de2;x1=pr+i3+3;}}else innerHTML='';}pr=pr-paso2*i2;}}}if(gra[2].charAt(55)=='1'){i1=parseInt(gra[2].charAt(16));if(i1==0)i1=1;de1=gra[1][0]-Math.round(i1/2)-2;de2=de1+i1+4;paso1=parseFloat(gra[2].substr(44,10),10);if(isNaN(paso1))paso1=1;paso1=paso2*paso1;if(paso1>0){letra.n=gra[3][3];i1=parseInt(gra[2].substr(61,2),10);if(isNaN(i1))i1=0;letra.ct=i1;letra.t=parseInt(gra[2].substr(63,2),10);i1=parseInt(gra[2].charAt(65));if(i1==1||i1==3)letra.an='bold';else letra.an='normal';if(i1==2||i1==3)letra.ac='italic';else letra.ac='normal';i2=parseFloat(gra[2].substr(44,10),10);if(isNaN(i2))i2=1;paso1=gra[1][1];pr=paso1-paso2*i2;ul=0;while(pr>0){ul+=i2;i3=ul*gra[1][3];i3=Math.round(i3*100)/100;ca1=''+i3;let=insertaletrag(gra[8][2]);with(let){innerHTML=ca1;i3=parseInt(clientHeight/2);i1=clientWidth;if(pr-i3>=0&&pr+i3-1=0&&paso1>pr+i3){with(style){left=de1-i1;top=pr-i3-1;}paso1=pr-i3-1;}else innerHTML='';}pr=pr-paso2*i2;}paso1=gra[1][1];pr=paso1+paso2*i2;ul=0;while(pr=0&&pr+i3-1=0&&paso1y1||de1-i1>x1)){with(style){left=de1-i1;top=pr-i3-1;}paso1=pr+i3-1;}else innerHTML='';}pr=pr+paso2*i2;}}}if(gra[2].charAt(0)=='1'){de1=0;de2=largo;i1=gra[2].charAt(4)*1+1;if(isNaN(i1))i1=1;pr=gra[1][1]-Math.round(i1/2);i2=parseInt(gra[2].substr(2,2),10);if(isNaN(i2))i2=0;if(gra[2].charAt(5)=='0')cogepun(-1,de1,pr,de2-de1,i1,i2,gra[8][1]);else cogerayas(-1,de1,pr,de2-de1,i1,i2,gra[8][1]);if(gra[2].charAt(1)=='1'){letra.n=gra[3][0];i1=parseInt(gra[2].substr(6,2),10);if(isNaN(i1))i1=0;letra.ct=i1;letra.t=parseInt(gra[2].substr(8,2),10);i1=parseInt(gra[2].charAt(10));if(i1==1||i1==3)letra.an='bold';else letra.an='normal';if(i1==2||i1==3)letra.ac='italic';else letra.ac='normal';let=insertaletrag(gra[8][2]);with(let){innerHTML='X';i1=clientWidth;i2=clientHeight;if(gra[1][1]>3*i2&&gra[1][0]3*i2&&gra[1][0]0)de2='+'+de2;ca1=ca1+de1+'x'+de2;dibujagrafica(gra,gra[8][1],ca1,vale);ca2=ca2.substr(49,ca2.length);}for(fu=0;fugra[0][0]-2||y+alto>gra[0][1]-2){if(x+largo>gra[0][0]-2)x=gra[0][0]-largo-2;if(y+alto>gra[0][1]-2)y=gra[0][1]-alto-2;if(x<0)x=0;if(y<0)y=0;cambiac=true;}con.style.left=x;con.style.top=y;}if(gra[7][i1].length<6)gra[7][i1][5]=[];gra[7][i1][5][0]=x+8;gra[7][i1][5][1]=y+8;if(cambiac)coordenadascuadro(i1,gra);}} function pongrafica(modo,vale,tipo){var i1;vv0.ponocupado(1,'Dibujando gráfica',400);if(tipo==0)scuad.style.display='none';setTimeout('pongraficaya('+modo+','+vale+','+tipo+')',1);} function reponeblancos(cad){var i1=0;while(i1>=0){i1=cad.indexOf(unescape('%17'.toString(16)));if(i1>=0)cad=cad.substr(0,i1)+' '+cad.substr(i1+1,cad.length)}return cad;} function abrehijos1(){var i1,i2,i3,np,nc,ve,ho,cel,tic,celh,cela,pag,nup,nuc,ca1,ca2,ele;if(ng>0||tg.charAt(0)!=unescape('%16'.toString(16))){if(ng==0)ng=1;abrefilas2();return;}tg=tg.substr(1,tg.length);np=ceg.length-1,nc=ceg[np][3].length-1;cel=ceg[np][3][nc][0];ve=ceg[np][3][nc][2];ho=ceg[np][3][nc][3];tic=parseInt(tg.substr(0,2),10);tg=tg.substr(2,tg.length);nuc=parseInt(tg.substr(0,4),10);tg=tg.substr(4,tg.length);celh=creacelda(cel,cel.tipo,tic,cel.tipog1,cel.tipog2,0,0,(tic!=1));asignaletra(celh);if(cel.tipo==31)celh.con.style.color='';celh.nuhi=ve*cel.iho+ho+1;cel.hijos[ve][ho]=celh;if(cel.tipo==31)with(cel.con.childNodes[0]){style.cursor='pointer';style.cursor='hand';childNodes[0].childNodes[0].childNodes[ve].childNodes[0].appendChild(celh.con);}else cel.con.appendChild(celh.con);if(cel.tipo>21&&cel.tipo<25&&ve+ho==0){cel.tipog1=parseInt(tg.substr(0,3),10);tg=tg.substr(3,tg.length);cel.tipog2=parseInt(tg.substr(0,3),10);tg=tg.substr(3,tg.length);if(cel.tipo==22){i1=tg.indexOf(cg);ca1=tg.substr(0,i1);tg=tg.substr(i1+1,tg.length);celh.atri=reponeblancos(ca1);if(ca1!=''){if(vvv.forca[1]!='')ca1=vvv.forca[1]+'/'+ca1;celh.con.innerHTML='';}}if(cel.tipo==23){i1=tg.indexOf(cg);ca1=tg.substr(0,i1);tg=tg.substr(i1+1,tg.length);ca1=reponeblancos(ca1);if(ca1.length>70){ca2=ca1.substr(ca1.length-66,66);ca1=ca1.substr(0,ca1.length-66);}else ca2='';celh.tipog2=[];celh.tipog2[0]=[];for(i1=0;i1<2;i1++){celh.tipog2[0][i1]=parseInt(ca1.substr(0,3),10);ca1=ca1.substr(3,ca1.length);}celh.tipog2[1]=[];for(i1=0;i1<4;i1++){if(ca1==''||ca1==' ')celh.tipog2[1][i1]=1;else celh.tipog2[1][i1]=parseInt(ca1.substr(0,4),10);ca1=ca1.substr(4,ca1.length);}if(ca2==''){ca1='';for(i2=0;i2<2;i2++)ca1+='11000000060';for(i2=0;i2<2;i2++)ca1+='0000000001010000000070';}else ca1=ca2;celh.tipog2[2]=ca1;celh.tipog2[3]=[];for(i2=0;i2<4;i2++){i1=tg.indexOf(cg);celh.tipog2[3][i2]=tg.substr(0,i1);tg=tg.substr(i1+1,tg.length);}for(i2=4;i2<6;i2++){celh.tipog2[i2]='';i1=tg.indexOf(cg);if(i1>0){ca1=tg.substr(0,i1);ca1=reponeblancos(ca1);celh.tipog2[i2]=ca1;}tg=tg.substr(i1+1,tg.length);}i2=parseInt(tg.substr(0,2),10);tg=tg.substr(2,tg.length);celh.tipog2[6]=[];celh.tipog2[6].length=i2;for(i1=0;i10)celh.atri=reponeblancos(tg.substr(0,i1));else celh.atri=cogeatri(cel,true);tg=tg.substr(i1+1,tg.length);}if(cel.tipo==13&&cel.tipoc>97||cel.tipo==21&&ve+ho==0){if(cel.tipoc==99){celh.tipog1=[];pag=celh.tipog1;pag[0]=[];pag[0][0]=celh.con;pag[0][1]=vvv.document.createElement('span');pag[0][0].appendChild(pag[0][1]);pag[0][2]=celh;pag[0][3]=[];pag[0][4]=[];pag[0][5]=ceg[np][0];pag[0][6]=2;pag[0][7]=vvv.forpai;pag[0][8]=0;pag[0][0].style.overflow='hidden';with(pag[0][1].style){position='absolute';overflow='hidden';width=0;height=10;left=0;top=0;}i2=parseInt(tg.substr(0,4),10);tg=tg.substr(4,tg.length);for(i3=0;i30){nc++;ceg[np][3][nc]=[celh,0,0,0,nuc,0];abreceldas1();}else abrehijos2();} function abrehijos2(){var np,nc,i1,ve,ho,cel;np=ceg.length-1,nc=ceg[np][3].length-1;cel=ceg[np][3][nc][0];ve=ceg[np][3][nc][2];ho=ceg[np][3][nc][3];ho++;if(ho>=cel.iho){ve++;ho=0;if(ve>=cel.ive){ceg[np][3].length--;abreceldas2();return;}}ceg[np][3][nc][2]=ve;ceg[np][3][nc][3]=ho;abrehijos1();} function cogeatri(cel,hijo){var i1,atri;if(hijo)atri='00000000000000000000001111100000000';else atri=atriplan[cel.tipo-10];switch(cel.tipo){case 13:switch(cel.tipoc){case 98:ca1=ca1.substr(0,17)+'1'+ca1.substr(18,99);ca1=ca1.substr(0,22)+'301'+ca1.substr(25,99);ca1=ca1.substr(0,36)+'1'+ca1.substr(37,99);break;case 99:ca1=ca1.substr(0,14)+'1'+ca1.substr(15,99);ca1=ca1.substr(0,15)+'001'+ca1.substr(18,99);ca1=ca1.substr(0,21)+'1001'+ca1.substr(25,99);ca1=ca1.substr(0,28)+'1'+ca1.substr(29,99);ca1=ca1.substr(0,36)+'1'+ca1.substr(37,99);break;}break;case 16:if(cel.tipog2==4){atri='020200000101'+atri.substr(12,50);atri=atri.substr(0,18)+'0'+atri.substr(19,50);atri=atri.substr(0,24)+'0'+atri.substr(25,50);}}return atri;} function alisatexto(texto){var i2,ca1,ca2,i1=0;for(i2=0;i2<5;i2++){switch(i2){case 0:ca1='  ';break;case 1:ca1='"';break;case 2:ca1='&';break;case 3:ca1='<';break;case 4:ca1='>';break;}i1=12+i2;ca2=''+i1;ca2=unescape('%'+ca2.toString(16));i1=0;while(i1>=0){i1=texto.indexOf(ca1);if(i1>=0)texto=texto.substr(0,i1)+ca2+texto.substr(i1+ca1.length,texto.length);}}return texto;} function abreceldas1(){var i1,i2,i3,np,nc,celd,nuce,cel,celd,tip,tic,atri,tig1=0,tig2=0,ve=0,ho=0,texto,ca1,ele,cep=[null,null]; function cogemas(){var i1,i2=0,ca1=''; function pontexto(ca1){var i1,ti1,ti2,ca2;if(ca1=='  '){ti1=0;ti2=32;}else if(ca1=='-'){ti1=0;ti2=45;}else{ti1=tip;if(ca1.length==1)ti2=ca1.charCodeAt(0);else ti2=65;}if(i2>0){nuce++;cel=creacelda(celd,ti1,ti2,0,0,0,0,false);asignaletra(cel);insertacelda(nuce,cel,celd);cel.nuce=nuce;}else cel.tipoc=ti2;if(cel.tipo==1)if(exp)ca1=''+ca1+'';else{ca2=ca1;ca1='';for(i1=0;i1';}cel.con.innerHTML=ca1;i2++;}for(i1=0;i10||tg.charAt(0)!=unescape('%15'.toString(16))){if(ng==0)ng=1;abrefilas2();return;}tg=tg.substr(1,tg.length);np=ceg.length-1,nc=ceg[np][3].length-1;celd=ceg[np][3][nc][0];nuce=ceg[np][3][nc][1];tip=parseInt(tg.substr(0,2),10);tg=tg.substr(2,tg.length);cogeletraar();if(tip>9){tig1=parseInt(tg.substr(0,2),10);if(tip==13){tic=tig1;tig1=0;}else tic=0;tig2=parseInt(tg.substr(2,2),10);ve=parseInt(tg.substr(4,2),10);ho=parseInt(tg.substr(6,2),10);tg=tg.substr(8,tg.length);i1=tg.indexOf(cg);if(i1>0)atri=reponeblancos(tg.substr(0,i1));else atri='';tg=tg.substr(i1+1,tg.length);}texto='1';ca1='';if(tip==31){i1=tg.indexOf(cg);tig1=reponeblancos(tg.substr(0,i1));tg=tg.substr(i1+1,tg.length);if(atri!=''){ca1=atri.charAt(10);if(ca1=='0')ca1='';texto=atri.charAt(41);}}cel=creacelda(celd,tip,tic,tig1,tig2,ve,ho,false,ca1,texto);asignaletra(cel);if(tip>9){if(atri=='')atri=cogeatri(cel,false);cel.atri=atri;if(tip==13&&tic>97){copiafondostab(cel,null);with(cel){i1=tg.indexOf(cg);if(i1>0)tipog2[0][1]=tg.substr(0,i1);tg=tg.substr(i1+1,tg.length);for(i1=0;i10)tipog2[1][i1][1]=tg.substr(0,i3);tg=tg.substr(i3+1,tg.length);}for(i1=0;i10)tipog2[2][i1][1]=tg.substr(0,i3);tg=tg.substr(i3+1,tg.length);}for(i1=0;i10)tipog2[3][i1][i2][1]=tg.substr(0,i3);tg=tg.substr(i3+1,tg.length);}}}}if(tip==23){creaplantillaya('250000',cep,celd);ele=cep[0];ele.atri=cel.atri;insertacelda(nuce,ele,celd);insertacelda(0,cel,ele.hijos[0][0]);}else insertacelda(nuce,cel,celd);if(tip<2){i1=tg.indexOf(unescape('%19'.toString(16)));texto=tg.substr(0,i1);tg=tg.substr(i1+1,tg.length);texto=alisatexto(texto);ceg[np][3][nc][5]+=texto.length-1;cogemas(texto);ceg[np][3][nc][1]=nuce;}if(cel.tipo<10)abreceldas2();else{nc++;ceg[np][3][nc]=[cel,nuce,0,0];abrehijos1();}} function abreceldas2(){var np,nc;np=ceg.length-1;nc=ceg[np][3].length-1;ceg[np][3][nc][1]++;ceg[np][3][nc][5]++;if(ceg[np][3][nc][5]1)abrehijos2();else if(ceg[np][4]==0)abrefilas2();}} function cogeletraar(){var i1,ca1;i1=tg.indexOf(unescape('%19'.toString(16)));ca1=tg.substr(0,i1);tg=tg.substr(i1+1,tg.length);if(ca1!='')sl=ca1;i1=tg.indexOf(unescape('%19'.toString(16)));ca1=tg.substr(0,i1);tg=tg.substr(i1+1,tg.length);if(ca1!=''&&ca1!='Symbol')lg=ca1;} function asignaletra(celd){var i1=parseInt(sl.substr(0,2),10);with(celd){color=i1;with(con.style){fontFamily=lg;if(celd.tipo==31||celd.padre!=null&&celd.padre.tipo==31)color='';else color=colores[i1][0];fontSize=parseInt(sl.substr(2,2),10)+'pt';if(sl.charAt(4)=='0')fontWeight='normal';else fontWeight='bold';if(sl.charAt(5)=='0')fontStyle='normal';else fontStyle='italic';if(sl.charAt(6)=='0')textDecoration='none';else textDecoration='underline';}}} function abrefilas1(){var i1,nc,np,pag,nufi,fil,ca1;np=ceg.length-1;pag=ceg[np][0];nufi=ceg[np][2];if(ng>0||tg.charAt(0)!=unescape('%14'.toString(16))){if(ng==0)ng=1;abrefilas2();return;}tg=tg.substr(1,tg.length);if(pag[0][3].length<=nufi){fil=creafila(0,pag);insertafila(nufi,fil,pag[0][3]);}else fil=pag[0][3][nufi];if(np==0)fil.con.style.visibility='hidden';ca1=tg.substr(0,18);tg=tg.substr(18,tg.length);ca1=reponeblancos(ca1);with(fil){for(i1=0;i1<3;i1++)mar[i1]=parseInt(ca1.substr(2*i1,2),10);parr=parseInt(ca1.substr(6,3),10);nupar=parseInt(ca1.substr(9,3),10);ali=ca1.charAt(12)*1;san=parseInt(ca1.substr(13,3),10);tab=parseInt(ca1.substr(16,2),10);}i1=parseInt(tg.substr(0,4),10);tg=tg.substr(4,tg.length);cogeletraar();asignaletra(fil.celda);nc=ceg[np][3].length;ceg[np][3][nc]=[fil.celda,0,0,0,i1,0];if(i1>0)abreceldas1();else abreceldas2();} function abrefilas2(){var i1,np,pag,nufi,fil,aux=false;np=ceg.length-1;pag=ceg[np][0];nufi=ceg[np][2];if(ng>0){vvv.terminaabre();return;}with(vvv)if(gut>0){gu++;ponporcentaje();}fil=pag[0][3][nufi];midecelda(fil.celda);pag[0][3].length=nufi+1;fil.escribir=true;nufi++;if(nufimaxminpa[0][0]&&i1maxminpa[1][0]&&i2maxminpa[i1][1])maxminpa[i1][i2]=i4;}if(forpa!=''&&(i3maxminpa[i1][1])){if(i3maxminpa[i1][1])i3=maxminpa[i1][1];ca1=''+i3;while(ca1.length<4)ca1='0'+ca1;forpa=forpa.substr(0,5*i1+1)+ca1+forpa.substr(5*i1+5,forpa.length);}}if(forpa=='')forpa=ca1.substr(0,65);else forpa=forpa.substr(0,65);forca[2][2]=ca1.substr(65,ca1.length);if(forca[2][1]==1)forpa+=forca[2][2];miracukis();}else if(forpa=='')forpa=ca1.substr(0,65);limpia();lg='Comic Sans MS';sl='0010000';i2=parseInt(tg.substr(0,4),10);tg=tg.substr(4,tg.length);ceg=[];ceg[0]=[paginas,0,0,[],0];paginas[0][7]=vvv.forpa;if(vvv.tg[0]==1){ca1=vvv.tema;if(vvv.forca[0]!='')if(ca1!='')ca1+=' ['+vvv.forca[0]+']';else ca1=vvv.forca[0];vv0.ventanas[vvv.nuven][2]=ca1;if(vv0.document.getElementById('t'+vvv.nuven))vv0.document.getElementById('t'+vvv.nuven).innerHTML=ca1;vv0.cambiamenven();}for(i3=0;i39&&(tipo<20||tipo==21)&&hijos.length>0){for(ve=0;veceld.celdas.length&&celd.padre==null){fil=buscafila(celd);if(fil!=null&&pagina[0][3].length>fil.nufi+1){desde=0;hasta=hasta-celd.celdas.length;celd=pagina[0][3][fil.nufi+1].celda;colorealacelda(celd,desde,hasta,colorea,fija);}}}} function coloreacelda(colorea){colorealacelda(colerror[1],colerror[2],colerror[3],colorea,false);colerror[0]=(colorea!=14);} function colocatexto(cual,vp){var i1,fil,te,celd;if(cual)for(i1=0;i1