tipo_de_macro=R2
Idioma=espa&ntilde;ol
id='pi' constante='s&iacute;' expresi&oacute;n='3.1416' evaluar='una-sola-vez'
id='a' constante='s&iacute;' expresi&oacute;n='200' evaluar='una-sola-vez'
id='b' constante='s&iacute;' expresi&oacute;n='200' evaluar='una-sola-vez'
id='T' constante='s&iacute;' expresi&oacute;n='1500' evaluar='una-sola-vez'
id='NT' constante='s&iacute;' expresi&oacute;n='2' evaluar='una-sola-vez'
id='vxA' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vyA' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='x0A' vector='s&iacute;' evaluar='una-sola-vez' tama&ntilde;o='NT'
id='y0A' vector='s&iacute;' evaluar='una-sola-vez' tama&ntilde;o='NT'
id='sxA' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='syA' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vx0A' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vy0A' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='xA' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='yA' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vxB' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vyB' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='x0B' vector='s&iacute;' evaluar='una-sola-vez' tama&ntilde;o='NT'
id='y0B' vector='s&iacute;' evaluar='una-sola-vez' tama&ntilde;o='NT'
id='sxB' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='syB' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vx0B' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vy0B' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='TA' constante='s&iacute;' expresi&oacute;n='20' evaluar='una-sola-vez'
id='TB' constante='s&iacute;' expresi&oacute;n='10' evaluar='una-sola-vez'
id='xB' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='yB' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='x0A2' vector='s&iacute;' evaluar='una-sola-vez' tama&ntilde;o='NT'
id='y0A2' vector='s&iacute;' evaluar='una-sola-vez' tama&ntilde;o='NT'
id='sxA2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='syA2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vx0A2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vy0A2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='xA2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='yA2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vxB2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vyB2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='x0B2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='y0B2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='sxB2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='syB2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vx0B2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vy0B2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vxA2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='vyA2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='xB2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='yB2' vector='s&iacute;' evaluar='siempre' tama&ntilde;o='NT'
id='c52' constante='s&iacute;' expresi&oacute;n='500*rnd' evaluar='una-sola-vez'
id='Pos_ini' algoritmo='s&iacute;' evaluar='una-sola-vez' inicio='i=0' hacer='x0A[i]=70;x0A2[i]=70;y0A[i]=-100*rnd*(-1)^i;y0A2[i]=y0A[i]+TA;x0B[i]=-80;x0B2[i]=-80;y0B[i]=y0A[i]+4;y0B2[i]=y0B[i]+TB;;;i=i+1' mientras='i&lt;NT'
id='vel_ini' algoritmo='s&iacute;' evaluar='una-sola-vez' inicio='i=0' hacer='sxA[i]=1;syA[i]=1;sxA2[i]=1;syA2[i]=1;;sxB[i]=1;syB[i]=1;sxB2[i]=1;syB2[i]=1;;vx0A[i]=-(0.3+rnd)*(30*T/273);vy0A[i]=0;vx0B[i]=(0.3+rnd)*(30*T/273);vy0B[i]=0;vx0A[i]=(vx0A[i]=0)?0.1:vx0A[i];vx0B[i]=(vx0B[i]=0)?0.1:vx0B[i];;vx0A2[i]=vx0A[i];vy0A2[i]=0;vx0B2[i]=vx0B[i];vy0B2[i]=0;vx0A2[i]=(vx0A2[i]=0)?0.1:vx0A2[i];vx0B2[i]=(vx0B2[i]=0)?0.1:vx0B2[i];;i=i+1' mientras='i&lt;NT'
id='pos_fin' algoritmo='s&iacute;' evaluar='siempre' inicio='i=0' hacer='sxA[i]=((xA[i]&lt;TA-a/2)|(xA[i]&gt;1.05*a/2-TA))?-sxA[i]:sxA[i];syA[i]=((yA[i]&lt;TA+b/2)|(yA[i]&gt;b/2-TA))?-syA[i]:syA[i];;sxB[i]=((xB[i]&lt;TB-a/2)|(xB[i]&gt;a/2-TB))?-sxB[i]:sxB[i];syB[i]=((yB[i]&lt;TB-b/2)|(yB[i]&gt;b/2-TB))?-syB[i]:syB[i];;sxA2[i]=((xA2[i]&lt;TA-a/2)|(xA2[i]&gt;1.05*a/2-TA))?-sxA2[i]:sxA2[i];syA2[i]=((yA2[i]&lt;TA+b/2)|(yA2[i]&gt;b/2-TA))?-syA2[i]:syA2[i];;sxB2[i]=((xB2[i]&lt;TB-a/2)|(xB2[i]&gt;a/2-TB))?-sxB2[i]:sxB2[i];syB2[i]=((yB2[i]&lt;TB-b/2)|(yB2[i]&gt;b/2-TB))?-syB2[i]:syB2[i];;vxA[i]=sxA[i]*vx0A[i];vyA[i]=syA[i]*vy0A[i];vxA2[i]=sxA2[i]*vx0A2[i];vyA2[i]=syA2[i]*vy0A2[i];;vxB[i]=sxB[i]*vx0B[i];vyB[i]=syB[i]*vy0B[i];vxB2[i]=sxB2[i]*vx0B2[i];vyB2[i]=syB2[i]*vy0B2[i];;;vxB[i]=(abs(xA[i]-xB[i])&lt;=(TA+TB)/2)?c52:vxB[i];vxA[i]=(abs(xA[i]-xB[i])&lt;=(TA+TB)/2)?c52:vxA[i];vyB[i]=(abs(xA[i]-xB[i])&lt;=(TA+TB)/2)?vxB[i]:vyB[i];vyA[i]=(abs(xA[i]-xB[i])&lt;=(TA+TB)/2)?vxB[i]:vyA[i];;vxB2[i]=(abs(xA[i]-xB[i])&lt;=(TA+TB)/2)?-c52:vxB2[i];vxA2[i]=(abs(xA[i]-xB[i])&lt;=(TA+TB)/2)?-c52:vxA2[i];vyB2[i]=(abs(xA[i]-xB[i])&lt;=(TA+TB)/2)?vxB2[i]:vyB2[i];vyA2[i]=(abs(xA[i]-xB[i])&lt;=(TA+TB)/2)?vxA2[i]:vyA2[i];;;xB[i]=(p=0)?x0B[i]:(xB[i]+vxB[i]*0.01);yB[i]=(p=0)?y0B[i]:(yB[i]+vyB[i]*0.01);xB2[i]=(p=0)?x0B2[i]:(xB2[i]+vxB2[i]*0.01);yB2[i]=(p=0)?y0B2[i]:(yB2[i]+vyB2[i]*0.01);;xA[i]=(p=0)?x0A[i]:(xA[i]+vxA[i]*0.01);yA[i]=(p=0)?y0A[i]:(yA[i]+vyA[i]*0.01);xA2[i]=(p=0)?x0A2[i]:(xA2[i]+vxA2[i]*0.01);yA2[i]=(p=0)?y0A2[i]:(yA2[i]+vyA2[i]*0.01);;;;i=i+1' mientras='i&lt;NT'
tipo='punto' expresi&oacute;n='(xA[s],yA[s])' familia='s' s.intervalo='[0,NT-1]' s.pasos='NT-1' fuente='Monospaced,PLAIN,12' fijo='no' tama&ntilde;o='TA' 
tipo='punto' expresi&oacute;n='(xA2[s],yA2[s])' familia='s' s.intervalo='[0,NT-1]' s.pasos='NT-1' fuente='Monospaced,PLAIN,12' fijo='no' tama&ntilde;o='TA' 
tipo='punto' color='rojo' expresi&oacute;n='(xB[s],yB[s])' familia='s' s.intervalo='[0,NT-1]' s.pasos='NT-1' fuente='Monospaced,PLAIN,12' fijo='no' tama&ntilde;o='TB' 
tipo='punto' color='rojo' expresi&oacute;n='(xB2[s],yB2[s])' familia='s' s.intervalo='[0,NT-1]' s.pasos='NT-1' fuente='Monospaced,PLAIN,12' fijo='no' tama&ntilde;o='TB' 
pausa='2' controles='no' auto='no' inicio='p=0;t=0; ' hacer=';p=p+1;t=t+0.01;' mientras='t&lt;100'

