tipo_de_macro=R2 Idioma=español id='pi' constante='sí' expresión='3.1416' evaluar='una-sola-vez' id='a' constante='sí' expresión='200' evaluar='una-sola-vez' id='b' constante='sí' expresión='200' evaluar='una-sola-vez' id='TA' constante='sí' expresión='20' evaluar='una-sola-vez' id='TB' constante='sí' expresión='10' evaluar='una-sola-vez' id='T'constante='sí' expresión='11500' evaluar='una-sola-vez' id='NT' constante='sí' expresión='2' evaluar='una-sola-vez' id='vxA' vector='sí' evaluar='siempre' tamaño='NT' id='vyA' vector='sí' evaluar='siempre' tamaño='NT' id='x0A' vector='sí' evaluar='una-sola-vez' tamaño='NT' id='y0A' vector='sí' evaluar='una-sola-vez' tamaño='NT' id='sxA' vector='sí' evaluar='siempre' tamaño='NT' id='syA' vector='sí' evaluar='siempre' tamaño='NT' id='vx0A' vector='sí' evaluar='siempre' tamaño='NT' id='vy0A' vector='sí' evaluar='siempre' tamaño='NT' id='xA' vector='sí' evaluar='siempre' tamaño='NT' id='yA' vector='sí' evaluar='siempre' tamaño='NT' id='vxB' vector='sí' evaluar='siempre' tamaño='NT' id='vyB' vector='sí' evaluar='siempre' tamaño='NT' id='x0B' vector='sí' evaluar='una-sola-vez' tamaño='NT' id='y0B' vector='sí' evaluar='una-sola-vez' tamaño='NT' id='sxB' vector='sí' evaluar='siempre' tamaño='NT' id='syB' vector='sí' evaluar='siempre' tamaño='NT' id='vx0B' vector='sí' evaluar='siempre' tamaño='NT' id='vy0B' vector='sí' evaluar='siempre' tamaño='NT' id='xB' vector='sí' evaluar='siempre' tamaño='NT' id='yB' vector='sí' evaluar='siempre' tamaño='NT' id='Pos_ini_n2' algoritmo='sí' evaluar='una-sola-vez' inicio='i=0' hacer='x0A[i]=80*rnd+10;y0A[i]=-50*(-1)^i;x0B[i]=-X=A[i];y0B[i]=-50*(-1)^i;;i=i+1' mientras='i<NT' id='vel_ini' algoritmo='sí' evaluar='una-sola-vez' inicio='i=0' hacer='sxA[i]=1;syA[i]=1;;;sxB[i]=1;syB[i]=1;;;vx0A[i]=(-0.5+rnd)*(15*T/273);vy0A[i]=0;vx0B[i]=(-0.5+rnd)*(15*T/273);vy0B[i]=0;vx0A[i]=(vx0A[i]=0)?0.1:vx0A[i];vx0B[i]=(vx0B[i]=0)?0.1:vx0B[i];;;;i=i+1' mientras='i<NT' id='pos_fin_n2' algoritmo='sí' evaluar='siempre' inicio='i=0' hacer='sxA[i]=((xA[i]<TA-0.95*a/2)|(xA[i]>TA+0.95*a/2))?-sxA[i]:sxA[i];syA[i]=((yA[i]<TB-0.95*b/2)|(yA[i]>TB+0.95*b/2))?-syA[i]:syA[i];;sxB[i]=((xB[i]<TA-a/2)|(xB[i]>TA+a/2))?-sxB[i]:sxB[i];syB[i]=((yB[i]<TB-b/2)|(yB[i]>TB+b/2))?-syB[i]:syB[i];;vxA[i]=sxA[i]*vx0A[i]*0.01;vyA[i]=syA[i]*vy0A[i]*0.01;;;vxB[i]=sxB[i]*vx0B[i]*0.01;vyB[i]=syB[i]*vy0B[i]*0.01;;xB[i]=(p=0)?x0B[i]:xB[i]+vxB[i];yB[i]=(p=0)?y0B[i]:yB[i]+vyB[i];;xA[i]=(p=0)?x0A[i]:xA[i]+vxA[i];yA[i]=(p=0)?y0A[i]:yA[i]+vyA[i];;;;sxA[i]=(abs(xA[i]-xB[i])< (TA+TB)/2)?-sxA[i]:sxA[i];sxB[i]=(abs(xA[i]-xB[i])< (TA+TB)/2)?-sxB[i]:sxB[i];;i=i+1' mientras='i<NT' tipo='polígono' expresión='(-105,-105)(105,-105)(105,105)(-105,105)(-105,-105)' ancho='2' tipo='punto' expresión='(xA[s],yA[s])' familia='s' s.intervalo='[0,NT-1]' s.pasos='NT-1' fuente='Monospaced,PLAIN,12' fijo='no' tamaño='TA' tipo='punto' color='rojo' expresión='(xB[s],yB[s])' familia='s' s.intervalo='[0,NT-1]' s.pasos='NT-1' fuente='Monospaced,PLAIN,12' fijo='no' tamaño='TB' tipo='punto' expresión='(xA[s],yA[s]-10)' familia='s' s.intervalo='[0,NT-1]' s.pasos='NT-1' fuente='Monospaced,PLAIN,12' fijo='no' tamaño='TA' tipo='punto' color='rojo' ' expresión='(xB[s],yB[s]-6)' familia='s' s.intervalo='[0,NT-1]' s.pasos='NT-1' fuente='Monospaced,PLAIN,12' fijo='no' tamaño='TB' pausa='20' controles='no' auto='no' repetir='sí' inicio='t=0; p=0' hacer='p=p+1;t=t+0.01;' mientras='t<1000'