tipo_de_macro=R2
Idioma=espa&ntilde;ol
id='__CONST__'
id='INTER_OBJ' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='MODIF_OBJ' constante='s&iacute;' expresi&oacute;n='1' evaluar='una-sola-vez'
id='__VARS_MODIF__'
id='debug' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='enabled' constante='s&iacute;' expresi&oacute;n='1' evaluar='una-sola-vez'
id='verFondos' constante='s&iacute;' expresi&oacute;n='1' evaluar='una-sola-vez'
id='verTextos' constante='s&iacute;' expresi&oacute;n='1' evaluar='una-sola-vez'
id='edicion' constante='s&iacute;' expresi&oacute;n='INTER_OBJ' evaluar='una-sola-vez'
id='__MATRIZ__'
id='n_ctr' constante='s&iacute;' expresi&oacute;n='100' evaluar='una-sola-vez'
id='ctrProp' vector='s&iacute;' matriz='s&iacute;' evaluar='una-sola-vez' filas='100' columnas='100'
id='n_gols' constante='s&iacute;' expresi&oacute;n='100' evaluar='una-sola-vez'
id='golsProp' vector='s&iacute;' matriz='s&iacute;' evaluar='una-sola-vez' filas='100' columnas='100'
id='golsRel' vector='s&iacute;' matriz='s&iacute;' evaluar='una-sola-vez' filas='100' columnas='100'
id='__CONST_PROP__'
id='X' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='Y' constante='s&iacute;' expresi&oacute;n='1' evaluar='una-sola-vez'
id='W' constante='s&iacute;' expresi&oacute;n='2' evaluar='una-sola-vez'
id='H' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='TXT_Dx' constante='s&iacute;' expresi&oacute;n='4' evaluar='una-sola-vez'
id='TXT_Dy' constante='s&iacute;' expresi&oacute;n='5' evaluar='una-sola-vez'
id='TXT' constante='s&iacute;' expresi&oacute;n='6' evaluar='una-sola-vez'
id='TXT.A' constante='s&iacute;' expresi&oacute;n='26' evaluar='una-sola-vez'
id='TXT.R' constante='s&iacute;' expresi&oacute;n='27' evaluar='una-sola-vez'
id='TXT.G' constante='s&iacute;' expresi&oacute;n='28' evaluar='una-sola-vez'
id='TXT.B' constante='s&iacute;' expresi&oacute;n='29' evaluar='una-sola-vez'
id='A' constante='s&iacute;' expresi&oacute;n='7' evaluar='una-sola-vez'
id='R' constante='s&iacute;' expresi&oacute;n='8' evaluar='una-sola-vez'
id='G' constante='s&iacute;' expresi&oacute;n='9' evaluar='una-sola-vez'
id='B' constante='s&iacute;' expresi&oacute;n='10' evaluar='una-sola-vez'
id='borde.A' constante='s&iacute;' expresi&oacute;n='11' evaluar='una-sola-vez'
id='borde.R' constante='s&iacute;' expresi&oacute;n='12' evaluar='una-sola-vez'
id='borde.G' constante='s&iacute;' expresi&oacute;n='13' evaluar='una-sola-vez'
id='borde.B' constante='s&iacute;' expresi&oacute;n='14' evaluar='una-sola-vez'
id='borde.W' constante='s&iacute;' expresi&oacute;n='15' evaluar='una-sola-vez'
id='initX' constante='s&iacute;' expresi&oacute;n='16' evaluar='una-sola-vez'
id='initY' constante='s&iacute;' expresi&oacute;n='17' evaluar='una-sola-vez'
id='enGol' constante='s&iacute;' expresi&oacute;n='18' evaluar='una-sola-vez'
id='nextY' constante='s&iacute;' expresi&oacute;n='17' evaluar='una-sola-vez'
id='margenX' constante='s&iacute;' expresi&oacute;n='18' evaluar='una-sola-vez'
id='margenY' constante='s&iacute;' expresi&oacute;n='19' evaluar='una-sola-vez'
id='maxH' constante='s&iacute;' expresi&oacute;n='20' evaluar='una-sola-vez'
id='n_relaciones' constante='s&iacute;' expresi&oacute;n='21' evaluar='una-sola-vez'
id='IMG' constante='s&iacute;' expresi&oacute;n='22' evaluar='una-sola-vez'
id='IMG_Dx' constante='s&iacute;' expresi&oacute;n='23' evaluar='una-sola-vez'
id='IMG_Dy' constante='s&iacute;' expresi&oacute;n='24' evaluar='una-sola-vez'
id='IMG_Rot' constante='s&iacute;' expresi&oacute;n='25' evaluar='una-sola-vez'
id='__VAR_ESP__'
id='Esp.mouse_x' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='Esp.mouse_y' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='Esp.mousePressed' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='Esp.Ox' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='Esp.Oy' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='Esp.escala' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='Esp.w' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='Esp.h' constante='s&iacute;' expresi&oacute;n='3' evaluar='una-sola-vez'
id='__VAR_INTERNAS____'
id='_mousePixX' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_mousePixY' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_mousePixXAnt' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_mousePixYAnt' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_deltaMPixX' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_deltaMPixY' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_mousePressed' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_resienPress' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_soltado' constante='s&iacute;' expresi&oacute;n='0' evaluar='una-sola-vez'
id='_wResize' constante='s&iacute;' expresi&oacute;n='7' evaluar='una-sola-vez'
id='entroFun' constante='s&iacute;' expresi&oacute;n='7' evaluar='una-sola-vez'
id='activo' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='activoResize' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='activoCtrDxy' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='activoTxtDxy' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='activoGol' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='activoGolResize' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='activoGolDxy' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='activoGolDxy' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='color.a' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='color.r' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='color.g' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='color.b' constante='s&iacute;' expresi&oacute;n='-1' evaluar='una-sola-vez'
id='__FUNCT_GENERAL_'
id='doLayoutGol(_iGol2)' algoritmo='s&iacute;' algoritmo='s&iacute;' inicio='_indexLY=0;_gol.x=golsProp[_iGol2,X];_gol.y=golsProp[_iGol2,Y];_gol.w=golsProp[_iGol2,W];_gol.h=golsProp[_iGol2,H];_posOrigX=_gol.x+golsProp[_iGol2,margenX];_posY=_gol.y+golsProp[_iGol2,margenY];_posX=_posOrigX;_maxH=0;_gap=2' hacer='_iCtr2=golsRel[_iGol2,_indexLY];_continuarIter=(_iCtr&gt;=0);;_ctr.x=(_iCtr2&gt;=0)?ctrProp[_iCtr2,X]:0;_ctr.y=(_iCtr2&gt;=0)?ctrProp[_iCtr2,Y]:0;_ctr.w=(_iCtr2&gt;=0)?ctrProp[_iCtr2,W]:0;_ctr.h=(_iCtr2&gt;=0)?ctrProp[_iCtr2,H]:0;;_tmpX=_posX+_ctr.w+_gap;_cambiarFila=(_posX&gt;_posOrigX)&amp;(_tmpX&gt;=(_gol.x+_gol.w));;_posX=(_cambiarFila)?_posOrigX:_posX;_posY=(_cambiarFila)?(_posY+_maxH+_gap):_posY;;_maxH=(_cambiarFila)?_ctr.h:max(_ctr.h,_maxH);;_iCtr3=max(_iCtr2,0);ctrProp[_iCtr3,X]=(_iCtr2&gt;=0)?_posX:ctrProp[_iCtr3,X];ctrProp[_iCtr3,Y]=(_iCtr2&gt;=0)?_posY:ctrProp[_iCtr3,Y];;;_posX=_posX+_ctr.w+_gap;;_indexLY=_indexLY+1' mientras='(_continuarIter)&amp;(_indexLY&lt;n_ctr)'
id='borraDeGol(_iGol3,_iL3)' algoritmo='s&iacute;' expresi&oacute;n='x' algoritmo='s&iacute;' inicio='_indexLY=0;_borrando=0;' hacer='_iCtr3=golsRel[_iGol3,_indexLY];_borrando=_borrando|(_iCtr3==_iL3);_nRel=golsProp[_iGol3,n_relaciones];;golsProp[_iGol3,n_relaciones]=_nRel-((_iCtr3==_iL3)?1:0);_sigILY=_indexLY+1;;_newICtr=(_sigILY&lt;n_ctr)?(golsRel[_iGol3,_sigILY]):-1;_actICtr=golsRel[_iGol3,_indexLY];;golsRel[_iGol3,_indexLY]=(_borrando)?_newICtr:_actICtr;;_indexLY=_indexLY+1' mientras='(_indexLY&lt;n_ctr)'
id='regresaAInitPos(_iL)' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='ctrProp[_iL,X]=ctrProp[_iL,initX];ctrProp[_iL,Y]=ctrProp[_iL,initY];_iGolTmpA1=ctrProp[_iL,enGol];;tt=(_iGolTmpA1&gt;-1)?borraDeGol(_iGolTmpA1,_iL):0;tt=(_iGolTmpA1&gt;-1)?doLayoutGol(_iGolTmpA1):0;ctrProp[_iL,enGol]=(_iGolTmpA1&gt;-1)?-1:ctrProp[_iL,enGol];;;'
id='limpiaRelAux()' algoritmo='s&iacute;' algoritmo='s&iacute;' inicio='_index=0;_limIter2=(n_ctr*n_gols)' hacer='_ilabel=_index%n_ctr;_iGol=ent(_index/n_ctr);;golsProp[_iGol,n_relaciones]=0;golsRel[_iGol,_ilabel]=-1;;_index=_index+1' mientras='_index&lt;_limIter2'
id='limpiaRel()' algoritmo='s&iacute;' algoritmo='s&iacute;' inicio='limpiaRelAux();_index=0;_limIter=max(n_ctr,n_gols);' hacer='_ilabel=min(_index,n_ctr+1);_iGol=min(_index,n_gols+1);;golsProp[_iGol,n_relaciones]=0;;golsRel[_iGol,_ilabel]=-1;regresaAInitPos(_ilabel);;_index=_index+1;;_tmpCont1=(_index&lt;_limIter);tt=(_tmpCont1)?0:limpiaRelAux()' mientras='_tmpCont1'
id='pegaAGol(_iLabel,_iGolP)' algoritmo='s&iacute;' expresi&oacute;n='x' algoritmo='s&iacute;' hacer='_gols.x=golsProp[_iGolP,X];_gols.y=golsProp[_iGolP,Y];_gols.w=golsProp[_iGolP,W];_gols.h=golsProp[_iGolP,H];;_gols.margen=golsProp[_iGolP,margen];_gols.nextX=golsProp[_iGolP,n_relaciones];_gols.maxH=golsProp[_iGolP,maxH];;ctrProp[_iLabel,enGol]=_iGolP;golsRel[_iGolP,_gols.nextX]=_iLabel;golsProp[_iGolP,n_relaciones]=_gols.nextX+1;doLayoutGol(_iGolP)'
id='puedeSoltarEn(_iLSol,_iGEn)' algoritmo='s&iacute;' expresi&oacute;n='1' algoritmo='s&iacute;'
id='sobreCualSoltado(_x,_y,_w,_h)' algoritmo='s&iacute;' expresi&oacute;n='_res' algoritmo='s&iacute;' inicio='_indexD=n_gols-1;_res=-1;' hacer='_tmpA.x=golsProp[_indexD,X];_tmpA.y=golsProp[_indexD,Y];_tmpA.w=golsProp[_indexD,W];_tmpA.h=golsProp[_indexD,H];;_cond1=_tmpA.x&lt;(_x+_w);_cond2=_x&lt;(_tmpA.x+_tmpA.w);_cond3=_tmpA.y&lt;(_y+_h);_cond4=_y&lt;(_tmpA.y+_tmpA.h);;;_colision=(_cond1)&amp;(_cond2)&amp;(_cond3)&amp;(_cond4);_colision=(_colision);;_res=(_colision)?_indexD:_res;entroFun=entroFun+_indexD+&squot;_&squot;+_res+&squot;_&squot;+_colision+&squot;,&squot;;;_indexD=_indexD-1;' mientras='(_indexD&gt;=0)&amp;(!_colision)'
id='ctrSoltado(_iCtr)' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='_ctrS.x=ctrProp[_iCtr,X];_ctrS.y=ctrProp[_iCtr,Y];_ctrS.w=ctrProp[_iCtr,W];_ctrS.h=ctrProp[_iCtr,H];;;_iGoalSobre=sobreCualSoltado(_mousePixX,_mousePixY,1,1);_iGoalSobre=(_iGoalSobre&lt;0)?sobreCualSoltado(_ctrS.x,_ctrS.y,_ctrS.w,_ctrS.h):_iGoalSobre;_puede=(_iGoalSobre&gt;=0)?puedeSoltarEn(_iCtr,_iGoalSobre):0;;_puede=(_iGoalSobre&gt;=0)&amp;(_puede);tt=(_puede)?pegaAGol(_iCtr,_iGoalSobre):regresaAInitPos(_iCtr)'
id='__FUNCT_CTR_'
id='sobreCual(_mX,_mY)' algoritmo='s&iacute;' expresi&oacute;n='_res' algoritmo='s&iacute;' inicio='_index=0;_res=-1;' hacer='_pos.x=ctrProp[_index,X];_pos.y=ctrProp[_index,Y];;_pos.x2=_pos.x+ctrProp[_index,W];_pos.y2=_pos.y+ctrProp[_index,H];;_estaSobre=(_pos.x&lt;=_mX)&amp;(_pos.x2&gt;=_mX);_estaSobre=_estaSobre&amp;(_pos.y&lt;=_mY)&amp;(_pos.y2&gt;=_mY);;_res=(_estaSobre)?_index:_res;;_index=_index+1' mientras='(_index&lt;n_ctr)&amp;(!_estaSobre)'
id='sobreCualParaTxtDxy(mX,mY)' algoritmo='s&iacute;' expresi&oacute;n='_res' algoritmo='s&iacute;' inicio='index=0;_res=-1;' hacer='_pos.x=ctrProp[index,X]+ctrProp[index,TXT_Dx]-_wResize/2;_pos.y=ctrProp[index,Y]+ctrProp[index,TXT_Dy]-_wResize/2;;;_pos.x2=_pos.x+_wResize;_pos.y2=_pos.y+_wResize;;_estaSobre=(_pos.x&lt;=mX)&amp;(_pos.x2&gt;=mX);_estaSobre=_estaSobre&amp;(_pos.y&lt;=mY)&amp;(_pos.y2&gt;=mY);;_res=(_estaSobre)?index:_res;;index=index+1' mientras='(index&lt;n_ctr)&amp;(!_estaSobre)'
id='sobreCualParaSize(_mX,_mY)' algoritmo='s&iacute;' expresi&oacute;n='_res' algoritmo='s&iacute;' inicio='_index=0;_res=-1;entroFun=entroFun+&squot;ENTRO 3 &squot;' hacer='_posSCS.x=ctrProp[_index,X]+ctrProp[_index,W]-_wResize;_posSCS.y=ctrProp[_index,Y]+ctrProp[_index,H]-_wResize;;_posSCS.x2=_posSCS.x+_wResize;_posSCS.y2=_posSCS.y+_wResize;;_estaSobreX=(_posSCS.x&lt;=_mX)&amp;(_posSCS.x2&gt;=_mX);_estaSobreY=(_posSCS.y&lt;=_mY)&amp;(_posSCS.y2&gt;=_mY);_estaSobre=(_estaSobreX)&amp;(_estaSobreY);;_res=(_estaSobre)?_index:_res;;_index=_index+1' mientras='(_index&lt;n_ctr)&amp;(!_estaSobre)'
id='puedeTomar(_iCtr)' expresi&oacute;n='1'
id='moveLabelFor(iL1,onPX,onPY)' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='_posT.x=ctrProp[iL1,X]+onPX;_posT.y=ctrProp[iL1,Y]+onPY;;;ctrProp[iL1,X]=_posT.x;ctrProp[iL1,Y]=_posT.y;;;_iGolTmpA1=ctrProp[iL1,enGol];_borrarT=_iGolTmpA1&gt;-1;;tt=(_borrarT)?borraDeGol(_iGolTmpA1,iL1):0;ctrProp[iL1,enGol]=-1;;tt=(_borrarT)?doLayoutGol(_iGolTmpA1):0;;'
id='moveTxtDxyObj(iL1,onPX,onPY)' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='_posT.x=ctrProp[iL1,TXT_Dx]+onPX;_posT.y=ctrProp[iL1,TXT_Dy]+onPY;;_tmpW=ctrProp[iL1,W]-_wResize;_tmpH=ctrProp[iL1,H]-_wResize;;ctrProp[iL1,TXT_Dx]=min(max(_posT.x,0),_tmpW);ctrProp[iL1,TXT_Dy]=min(max(_posT.y,0),_tmpH);;;'
id='resizeObj(iL1,toPX,toPY)' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='_posT.x=ctrProp[iL1,X];_posT.y=ctrProp[iL1,Y];;;_tmpW=(toPX+_wResize/2-_posT.x);_tmpH=(toPY+_wResize/2-_posT.y);;ctrProp[iL1,W]=max(_tmpW,_wResize);ctrProp[iL1,H]=max(_tmpH,_wResize);;;'
id='calcPoligFondo(_iOpc)' algoritmo='s&iacute;' expresi&oacute;n='verFondos|(edicion==MODIF_OBJ)' algoritmo='s&iacute;' hacer='_ctrPol.Borde.W=ctrProp[_iOpc,borde.W];;_ctrPol.x1=ctrProp[_iOpc,X];_ctrPol.y1=ctrProp[_iOpc,Y];_ctrPol.x2=_ctrPol.x1+ctrProp[_iOpc,W];_ctrPol.y2=_ctrPol.y1+ctrProp[_iOpc,H];;_ctrPol.Borde.A=ctrProp[_iOpc,borde.A];_ctrPol.Borde.R=ctrProp[_iOpc,borde.R];_ctrPol.Borde.G=ctrProp[_iOpc,borde.G];_ctrPol.Borde.B=ctrProp[_iOpc,borde.B];;;_ctrPol.A=ctrProp[_iOpc,A];_ctrPol.R=ctrProp[_iOpc,R];_ctrPol.G=ctrProp[_iOpc,G];_ctrPol.B=ctrProp[_iOpc,B];;_imgCtr.x=_ctrPol.x1+ctrProp[_iOpc,IMG_Dx];_imgCtr.y=_ctrPol.y1+ctrProp[_iOpc,IMG_Dy];_imgCtr.src=ctrProp[_iOpc,IMG];'
id='calRecResize(_iObj)' algoritmo='s&iacute;' expresi&oacute;n='(edicion==MODIF_OBJ)' algoritmo='s&iacute;' hacer='_cuadroR.x1=ctrProp[_iObj,X]+ctrProp[_iObj,W]-_wResize;_cuadroR.y1=ctrProp[_iObj,Y]+ctrProp[_iObj,H]-_wResize;;_cuadroR.x2=_cuadroR.x1+_wResize;_cuadroR.y2=_cuadroR.y1+_wResize;;;'
id='calRecTxtDxy(_iObj)' algoritmo='s&iacute;' expresi&oacute;n='(edicion==MODIF_OBJ)' algoritmo='s&iacute;' hacer='_cuadroR.x1=ctrProp[_iObj,X]+ctrProp[_iObj,TXT_Dx]-_wResize/2;_cuadroR.y1=ctrProp[_iObj,Y]+ctrProp[_iObj,TXT_Dy]-_wResize/2;;_cuadroR.x2=_cuadroR.x1+_wResize;_cuadroR.y2=_cuadroR.y1+_wResize;;;'
id='getColorCtr(idxCtr)' algoritmo='s&iacute;' expresi&oacute;n='color.r' algoritmo='s&iacute;' hacer='idxCtr=max(0,idxCtr);color.a=ctrProp[idxCtr,TXT.A];color.r=ctrProp[idxCtr,TXT.R];color.g=ctrProp[idxCtr,TXT.G];color.b=ctrProp[idxCtr,TXT.B];'
id='getColorGol(idxCtr)' algoritmo='s&iacute;' expresi&oacute;n='color.r' algoritmo='s&iacute;' hacer='idxCtr=max(0,idxCtr);color.a=golsProp[idxCtr,TXT.A];color.r=golsProp[idxCtr,TXT.R];color.g=golsProp[idxCtr,TXT.G];color.b=golsProp[idxCtr,TXT.B];'
id='__FUNCT_GOLS_'
id='sobreCualGol(_mX,_mY)' algoritmo='s&iacute;' expresi&oacute;n='_res' algoritmo='s&iacute;' inicio='_index=n_gols-1;_res=-1;' hacer='_pos.x=golsProp[_index,X];_pos.y=golsProp[_index,Y];;_pos.x2=_pos.x+golsProp[_index,W];_pos.y2=_pos.y+golsProp[_index,H];;_estaSobre=(_pos.x&lt;=_mX)&amp;(_pos.x2&gt;=_mX);_estaSobre=_estaSobre&amp;(_pos.y&lt;=_mY)&amp;(_pos.y2&gt;=_mY);;_res=(_estaSobre)?_index:_res;;_index=_index-1' mientras='(_index&gt;=0)&amp;(!_estaSobre)'
id='sobreCualGolParaTxtDxy(mX,mY)' algoritmo='s&iacute;' expresi&oacute;n='_res' algoritmo='s&iacute;' inicio='index=0;_res=-1;' hacer='_pos.x=golsProp[index,X]+golsProp[index,TXT_Dx]-_wResize/2;_pos.y=golsProp[index,Y]+golsProp[index,TXT_Dy]-_wResize/2;;;_pos.x2=_pos.x+_wResize;_pos.y2=_pos.y+_wResize;;_estaSobre=(_pos.x&lt;=mX)&amp;(_pos.x2&gt;=mX);_estaSobre=_estaSobre&amp;(_pos.y&lt;=mY)&amp;(_pos.y2&gt;=mY);;_res=(_estaSobre)?index:_res;;index=index+1' mientras='(index&lt;n_gols)&amp;(!_estaSobre)'
id='sobreCualGolParaSize(_mX,_mY)' algoritmo='s&iacute;' expresi&oacute;n='_res' algoritmo='s&iacute;' inicio='_index=0;_res=-1;entroFun=entroFun+&squot;ENTRO 3 &squot;' hacer='_posSCS.x=golsProp[_index,X]+golsProp[_index,W]-_wResize;_posSCS.y=golsProp[_index,Y]+golsProp[_index,H]-_wResize;;_posSCS.x2=_posSCS.x+_wResize;_posSCS.y2=_posSCS.y+_wResize;;_estaSobreX=(_posSCS.x&lt;=_mX)&amp;(_posSCS.x2&gt;=_mX);_estaSobreY=(_posSCS.y&lt;=_mY)&amp;(_posSCS.y2&gt;=_mY);_estaSobre=(_estaSobreX)&amp;(_estaSobreY);;_res=(_estaSobre)?_index:_res;;_index=_index+1' mientras='(_index&lt;n_gols)&amp;(!_estaSobre)'
id='moveLabelGolFor(iL1,onPX,onPY)' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='_posT.x=golsProp[iL1,X]+onPX;_posT.y=golsProp[iL1,Y]+onPY;;;golsProp[iL1,X]=_posT.x;golsProp[iL1,Y]=_posT.y;;doLayoutGol(iL1);'
id='moveTxtGolDxyObj(iL1,onPX,onPY)' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='_posT.x=golsProp[iL1,TXT_Dx]+onPX;_posT.y=golsProp[iL1,TXT_Dy]+onPY;;_tmpW=golsProp[iL1,W]-_wResize;_tmpH=golsProp[iL1,H]-_wResize;;golsProp[iL1,TXT_Dx]=min(max(_posT.x,0),_tmpW);golsProp[iL1,TXT_Dy]=min(max(_posT.y,0),_tmpH);;;'
id='resizeObjGol(iL1,toPX,toPY)' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='_posT.x=golsProp[iL1,X];_posT.y=golsProp[iL1,Y];;;_tmpW=(toPX+_wResize/2-_posT.x);_tmpH=(toPY+_wResize/2-_posT.y);;golsProp[iL1,W]=max(_tmpW,_wResize);golsProp[iL1,H]=max(_tmpH,_wResize);;doLayoutGol(iL1);'
id='calcPoligGolFondo(_iOpc)' algoritmo='s&iacute;' expresi&oacute;n='verFondos|(edicion==MODIF_OBJ)' algoritmo='s&iacute;' hacer='_ctrPol.Borde.W=golsProp[_iOpc,borde.W];;_ctrPol.x1=golsProp[_iOpc,X];_ctrPol.y1=golsProp[_iOpc,Y];_ctrPol.x2=_ctrPol.x1+golsProp[_iOpc,W];_ctrPol.y2=_ctrPol.y1+golsProp[_iOpc,H];;_ctrPol.Borde.A=golsProp[_iOpc,borde.A];_ctrPol.Borde.R=golsProp[_iOpc,borde.R];_ctrPol.Borde.G=golsProp[_iOpc,borde.G];_ctrPol.Borde.B=golsProp[_iOpc,borde.B];;;_ctrPol.A=golsProp[_iOpc,A];_ctrPol.R=golsProp[_iOpc,R];_ctrPol.G=golsProp[_iOpc,G];_ctrPol.B=golsProp[_iOpc,B];;_imgGol.x=_ctrPol.x1+golsProp[_iOpc,IMG_Dx];_imgGol.y=_ctrPol.y1+golsProp[_iOpc,IMG_Dy];_imgGol.src=golsProp[_iOpc,IMG];'
id='calRecGolResize(_iObj)' algoritmo='s&iacute;' expresi&oacute;n='(edicion==MODIF_OBJ)' algoritmo='s&iacute;' hacer='_cuadroR.x1=golsProp[_iObj,X]+golsProp[_iObj,W]-_wResize;_cuadroR.y1=golsProp[_iObj,Y]+golsProp[_iObj,H]-_wResize;;_cuadroR.x2=_cuadroR.x1+_wResize;_cuadroR.y2=_cuadroR.y1+_wResize;;;'
id='calRecGolTxtDxy(_iObj)' algoritmo='s&iacute;' expresi&oacute;n='(edicion==MODIF_OBJ)' algoritmo='s&iacute;' hacer='_cuadroR.x1=golsProp[_iObj,X]+golsProp[_iObj,TXT_Dx]-_wResize/2;_cuadroR.y1=golsProp[_iObj,Y]+golsProp[_iObj,TXT_Dy]-_wResize/2;;_cuadroR.x2=_cuadroR.x1+_wResize;_cuadroR.y2=_cuadroR.y1+_wResize;;;'
id='_FUN_GEN2__'
id='calcModifObj()' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='activo=(_resienPress)?sobreCual(_mousePixX,_mousePixY):activo;;activoResize=((_resienPress)&amp;(activo&gt;-1))?sobreCualParaSize(_mousePixX,_mousePixY):activoResize;activoTxtDxy=((_resienPress)&amp;(activo&gt;-1))?sobreCualParaTxtDxy(_mousePixX,_mousePixY):activoTxtDxy;;activo=(_mousePressed)?activo:-1;activoResize=(_mousePressed)?activoResize:-1;activoTxtDxy=(_mousePressed)?activoTxtDxy:-1;;_tmpBResize=(activo&gt;-1)&amp;(activoResize&gt;-1)&amp;(activoResize==activo);_tmpBTDxy=(activo&gt;-1)&amp;(!_tmpBResize)&amp;(activoTxtDxy&gt;-1)&amp;(activoTxtDxy==activo);_tmpBArras=(activo&gt;-1)&amp;(!_tmpBResize)&amp;(!_tmpBTDxy);;_activoTmp=max(activo,0);tt=(_tmpBArras)?moveLabelFor(activo,_deltaMPixX,_deltaMPixY):0;ctrProp[_activoTmp,initX]=(_tmpBArras)?ctrProp[_activoTmp,X]:ctrProp[_activoTmp,initX];ctrProp[_activoTmp,initY]=(_tmpBArras)?ctrProp[_activoTmp,Y]:ctrProp[_activoTmp,initY];;tt=(_tmpBTDxy)?moveTxtDxyObj(activo,_deltaMPixX,_deltaMPixY):0;tt=(_tmpBResize)?resizeObj(activo,_mousePixX,_mousePixY):0;;;;;;_PuedeSerGol=(_resienPress)&amp;(activo&lt;0);;activoGol=(_PuedeSerGol)?sobreCualGol(_mousePixX,_mousePixY):activoGol;;activoGolResize=((_PuedeSerGol)&amp;(activoGol&gt;-1))?sobreCualGolParaSize(_mousePixX,_mousePixY):activoGolResize;activoGolTxtDxy=((_PuedeSerGol)&amp;(activoGol&gt;-1))?sobreCualGolParaTxtDxy(_mousePixX,_mousePixY):activoGolTxtDxy;;activoGol=(_mousePressed)?activoGol:-1;activoGolResize=(_mousePressed)?activoGolResize:-1;activoGolTxtDxy=(_mousePressed)?activoGolTxtDxy:-1;;_tmpBResize=(activoGol&gt;-1)&amp;(activoGolResize&gt;-1)&amp;(activoGolResize==activoGol);_tmpBTDxy=(activoGol&gt;-1)&amp;(!_tmpBResize)&amp;(activoGolTxtDxy&gt;-1)&amp;(activoGolTxtDxy==activoGol);_tmpBArras=(activoGol&gt;-1)&amp;(!_tmpBResize)&amp;(!_tmpBTDxy);;tt=(_tmpBArras)?moveLabelGolFor(activoGol,_deltaMPixX,_deltaMPixY):0;tt=(_tmpBTDxy)?moveTxtGolDxyObj(activoGol,_deltaMPixX,_deltaMPixY):0;tt=(_tmpBResize)?resizeObjGol(activoGol,_mousePixX,_mousePixY):0'
id='interactuaObj()' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='activo=(_resienPress)?sobreCual(_mousePixX,_mousePixY):activo;_doMv=((_resienPress)&amp;(activo&gt;-1))?puedeTomar(activo):(!_resienPress);activo=(_doMv)?activo:-1;;;_tmpBArras=(activo&gt;-1);;tt=(_tmpBArras)?moveLabelFor(activo,_deltaMPixX,_deltaMPixY):0;tt=((_soltado)&amp;(activo&gt;-1))?ctrSoltado(activo):0;activo=(_mousePressed)?activo:-1;;'
id='update()' algoritmo='s&iacute;' algoritmo='s&iacute;' hacer='_mousePressed=Esp.mousePressed ;_resienPress=(!_mousePressed_ANT)&amp;(_mousePressed);_soltado=(_mousePressed_ANT)&amp;(!_mousePressed);;_mousePixX=(Esp.mouse_x*Esp.escala)+Esp.w/2+Esp.Ox;_mousePixY=-(Esp.mouse_y*Esp.escala)+Esp.h/2+Esp.Oy;_mousePixX=min(max(_mousePixX,0),Esp.w);_mousePixY=min(max(_mousePixY,0),Esp.h);;_mousePixXAnt=(_resienPress)?_mousePixX:_mousePixXAnt;_mousePixYAnt=(_resienPress)?_mousePixY:_mousePixYAnt;;_deltaMPixX=(_mousePixX-_mousePixXAnt);_deltaMPixY=(_mousePixY-_mousePixYAnt);;tt=(edicion==MODIF_OBJ)?calcModifObj():0;tt=(edicion==INTER_OBJ)?interactuaObj():0;;_mousePressed_ANT=_mousePressed;;_mousePixXAnt=_mousePixX;_mousePixYAnt=_mousePixY'
id='__CALC__'
id='initAux()' algoritmo='s&iacute;' algoritmo='s&iacute;' inicio='_index=0' hacer='ctrProp[_index,W]=80;ctrProp[_index,H]=30;;;ctrProp[_index,initX]=10+155*_index;ctrProp[_index,initY]=10;;ctrProp[_index,TXT]=&squot;Texto_&squot;+_index;;ctrProp[_index,TXT_Dx]=2;ctrProp[_index,TXT_Dy]=3;;ctrProp[_index,A]=0;ctrProp[_index,R]=rnd;ctrProp[_index,G]=rnd;ctrProp[_index,B]=rnd;ctrProp[_index,enGol]=-1;;ctrProp[_index,borde.W]=1;;ctrProp[_index,IMG]=&squot;../images/palabras/buscar&squot;+_index+&squot;.png&squot;;ctrProp[_index,IMG]=&squot;&squot;;ctrProp[_index,IMG_Dx]=-2;ctrProp[_index,IMG_Dy]=-2;_index=_index+1' mientras='_index&lt;n_ctr'
id='initAuxGol()' algoritmo='s&iacute;' algoritmo='s&iacute;' inicio='_index=0;_gap=10;' hacer='_tmpW=200;golsProp[_index,W]=_tmpW;golsProp[_index,H]=150;golsProp[_index,X]=10+(_tmpW+_gap)*_index;golsProp[_index,Y]=120;golsProp[_index,TXT]=&squot;GOL_&squot;+_index;;golsProp[_index,TXT_Dx]=2;golsProp[_index,TXT_Dy]=3;;golsProp[_index,A]=0;golsProp[_index,R]=1;golsProp[_index,G]=1;golsProp[_index,B]=0.5;golsProp[_index,borde.W]=1;golsProp[_index,n_relaciones]=0;;golsRel[_index,0]=-1;golsRel[_index,1]=-1;golsRel[_index,2]=-1;;golsProp[_index,margenX]=2;golsProp[_index,margenY]=2;_indexIMG=ent(rnd*3+1);golsProp[_index,IMG]=&squot;../images/gols/gol&squot;+_indexIMG+&squot;.png&squot;;golsProp[_index,IMG_Dx]=5;golsProp[_index,IMG_Dy]=5;;;;;_index=_index+1' mientras='_index&lt;n_gols'
id='INIT' algoritmo='s&iacute;' evaluar='una-sola-vez' hacer='color.a=0;color.r=0;color.g=0;color.b=0;getColorCtr(0);getColorGol(0);initAux();initAuxGol();limpiaRel();;'
tipo='texto' fondo='s&iacute;' dibujar-si='0' expresi&oacute;n='[__GOLS___,0]' fuente='Monospaced,PLAIN,12' fijo='s&iacute;' 
tipo='pol&iacute;gono' color='(_ctrPol.Borde.R,_ctrPol.Borde.G,_ctrPol.Borde.B,_ctrPol.Borde.A)' dibujar-si='calcPoligGolFondo(s)' coord_abs='s&iacute;' expresi&oacute;n='(_ctrPol.x1,_ctrPol.y1)(_ctrPol.x2,_ctrPol.y1)(_ctrPol.x2,_ctrPol.y2)(_ctrPol.x1,_ctrPol.y2)(_ctrPol.x1,_ctrPol.y1)' familia='s' s.intervalo='[0,n_gols-1]' s.pasos='n_gols-1' relleno='(_ctrPol.R,_ctrPol.G,_ctrPol.B,_ctrPol.A)' ancho='golsProp[s,borde.W]' 
tipo='imagen' dibujar-si='calcPoligGolFondo(s)' coord_abs='s&iacute;' expresi&oacute;n='(_imgGol.x,_imgGol.y)' familia='s' s.intervalo='[0,n_gols-1]' s.pasos='n_gols-1' archivo='[_imgGol.src]' rotini='golsProp[s,IMG_Rot]' 
tipo='texto' color='(getColorGol(s),color.g,color.b,color.a)' dibujar-si='verTextos' expresi&oacute;n='[golsProp[s,X]+golsProp[s,TXT_Dx],golsProp[s,Y]+golsProp[s,TXT_Dy]]' familia='s' s.intervalo='[0,n_gols-1]' s.pasos='n_gols-1' texto='[golsProp[s,TXT]]' fuente='SansSerif,BOLD,30' ancho='2' fijo='s&iacute;' 
tipo='pol&iacute;gono' color='690000' dibujar-si='calRecGolResize(s)' coord_abs='s&iacute;' expresi&oacute;n='(_cuadroR.x1,_cuadroR.y1)(_cuadroR.x2,_cuadroR.y1)(_cuadroR.x2,_cuadroR.y2)(_cuadroR.x1,_cuadroR.y2)(_cuadroR.x1,_cuadroR.y1)' familia='s' s.intervalo='[0,n_gols-1]' s.pasos='n_gols-1' relleno='bdff0000' 
tipo='pol&iacute;gono' color='006900' dibujar-si='calRecGolTxtDxy(s)' coord_abs='s&iacute;' expresi&oacute;n='(_cuadroR.x1,_cuadroR.y1)(_cuadroR.x2,_cuadroR.y1)(_cuadroR.x2,_cuadroR.y2)(_cuadroR.x1,_cuadroR.y2)(_cuadroR.x1,_cuadroR.y1)' familia='s' s.intervalo='[0,n_gols-1]' s.pasos='n_gols-1' relleno='b400ff00' 
tipo='texto' color='34495e' fondo='s&iacute;' dibujar-si='0' expresi&oacute;n='[__CTR___,0]' fijo='s&iacute;' 
tipo='pol&iacute;gono' color='(_ctrPol.Borde.R,_ctrPol.Borde.G,_ctrPol.Borde.B,_ctrPol.Borde.A)' dibujar-si='calcPoligFondo(s)' coord_abs='s&iacute;' expresi&oacute;n='(_ctrPol.x1,_ctrPol.y1)(_ctrPol.x2,_ctrPol.y1)(_ctrPol.x2,_ctrPol.y2)(_ctrPol.x1,_ctrPol.y2)(_ctrPol.x1,_ctrPol.y1)' familia='s' s.intervalo='[0,n_ctr-1]' s.pasos='n_ctr-1' relleno='(_ctrPol.R,_ctrPol.G,_ctrPol.B,_ctrPol.A)' ancho='ctrProp[s,borde.W]' 
tipo='imagen' dibujar-si='calcPoligFondo(s)' coord_abs='s&iacute;' expresi&oacute;n='(_imgCtr.x,_imgCtr.y)' familia='s' s.intervalo='[0,n_ctr-1]' s.pasos='n_ctr-1' archivo='[_imgCtr.src]' rotini='ctrProp[s,IMG_Rot]' 
tipo='texto' color='(getColorCtr(s),color.g,color.b,color.a)' dibujar-si='verTextos' expresi&oacute;n='[ctrProp[s,X]+ctrProp[s,TXT_Dx],ctrProp[s,Y]+ctrProp[s,TXT_Dy]]' familia='s' s.intervalo='[0,n_ctr-1]' s.pasos='n_ctr-1' texto='[ctrProp[s,TXT]]' fuente='SansSerif,BOLD,30' fijo='no' ancho='2' decimales='6'
tipo='pol&iacute;gono' color='690000' dibujar-si='calRecResize(s)' coord_abs='s&iacute;' expresi&oacute;n='(_cuadroR.x1,_cuadroR.y1)(_cuadroR.x2,_cuadroR.y1)(_cuadroR.x2,_cuadroR.y2)(_cuadroR.x1,_cuadroR.y2)(_cuadroR.x1,_cuadroR.y1)' familia='s' s.intervalo='[0,n_ctr-1]' s.pasos='n_ctr-1' relleno='bdff0000' 
tipo='pol&iacute;gono' color='006900' dibujar-si='calRecTxtDxy(s)' coord_abs='s&iacute;' expresi&oacute;n='(_cuadroR.x1,_cuadroR.y1)(_cuadroR.x2,_cuadroR.y1)(_cuadroR.x2,_cuadroR.y2)(_cuadroR.x1,_cuadroR.y2)(_cuadroR.x1,_cuadroR.y1)' familia='s' s.intervalo='[0,n_ctr-1]' s.pasos='n_ctr-1' relleno='b400ff00' 
tipo='texto' color='34495e' fondo='s&iacute;' dibujar-si='0' expresi&oacute;n='[__CTR_ACTIVO__,0]' fijo='s&iacute;' decimales='6'
tipo='pol&iacute;gono' color='(_ctrPol.Borde.R,_ctrPol.Borde.G,_ctrPol.Borde.B,_ctrPol.Borde.A)' dibujar-si='(activo>-1)&(calcPoligFondo(activo))&(edicion!=MODIF_OBJ)' coord_abs='s&iacute;' expresi&oacute;n='(_ctrPol.x1,_ctrPol.y1)(_ctrPol.x2,_ctrPol.y1)(_ctrPol.x2,_ctrPol.y2)(_ctrPol.x1,_ctrPol.y2)(_ctrPol.x1,_ctrPol.y1)' relleno='(_ctrPol.R,_ctrPol.G,_ctrPol.B,_ctrPol.A)' ancho='ctrProp[s,borde.W]' 
tipo='imagen' dibujar-si='(activo>-1)&(calcPoligFondo(activo))&(edicion!=MODIF_OBJ)' coord_abs='s&iacute;' expresi&oacute;n='(_imgCtr.x,_imgCtr.y)' archivo='[_imgCtr.src]' rotini='ctrProp[activo,IMG_Rot]' 
tipo='texto' color='(getColorCtr(activo),color.g,color.b,color.a)' dibujar-si='(activo>-1)&(verTextos)&(edicion!=MODIF_OBJ)' expresi&oacute;n='[ctrProp[activo,X]+ctrProp[activo,TXT_Dx],ctrProp[activo,Y]+ctrProp[activo,TXT_Dy]]' texto='[ctrProp[activo,TXT]]' fuente='SansSerif,BOLD,30' fijo='no' ancho='2' decimales='6'
tipo='texto' color='34495e' fondo='s&iacute;' dibujar-si='0' expresi&oacute;n='[__DEBUG___,0]' fijo='s&iacute;' 
tipo='texto' dibujar-si='debug==1' expresi&oacute;n='[20,20]' texto='entroFun=\n[entroFun]' fijo='no' 
tipo='texto' dibujar-si='debug==2' expresi&oacute;n='[20,20]' texto='activo=[activo]\nactivoResize=[activoResize]\nactivoCtrDxy=[activoCtrDxy]\nposDetect=[_pos.x],[_pos.y],[_pos.x2],[_pos.y2]' fijo='no' 
tipo='texto' dibujar-si='debug==3' expresi&oacute;n='[20,20]' texto='Esp.pos = {[Esp.Ox],[Esp.Oy],[Esp.escala],[Esp.w],[Esp.h],[Esp.mousePressed],[Esp.mouse_x],[Esp.mouse_y]}\nPIX =([_mousePixX],[_mousePixY])' fijo='no' 
tipo='texto' dibujar-si='debug==4' expresi&oacute;n='[20+(s%n_ctr)*30,220+ent(s/n_ctr)*10]' familia='s' s.intervalo='[0,(n_gols*n_ctr)-1]' s.pasos='(n_gols*n_ctr)-1' texto='[golsRel[ent(s/n_ctr),s%n_ctr]]' fuente='Monospaced,PLAIN,12' fijo='no' 
