tipo_de_macro=R2 id='phi' expresión='0' evaluar='una-sola-vez' constante='si' id='phi_t' expresión='0' evaluar='una-sola-vez' constante='si' id='mousepressed' expresión='0' evaluar='una-sola-vez' constante='si' id='t_uno.x' expresión='0' evaluar='una-sola-vez' constante='si' id='t_uno.y' expresión='0' evaluar='una-sola-vez' constante='si' id='Ind' expresión='0' evaluar='una-sola-vez' constante='si' id='entrada.x' expresión='0' evaluar='una-sola-vez' constante='si' id='entrada.y' expresión='0' evaluar='una-sola-vez' constante='si' id='arg(x,y,z,w)' expresión='(x*z+y*w)/( sqrt(x^2+y^2)*sqrt(z^2+w^2))' hacer='indic_uno=((T1.mouse_x-t_uno.x)^2+(T1.mouse_y-t_uno.y)^2<1)*((T1.mouse_x-t_uno.x)^2+(T1.mouse_y-t_uno.y)^2>0.1225);entrada.x=((mousepressed=0)*(T1.mouse_pressed=1)*indic_uno=1)?T1.mouse_x:entrada.x;entrada.y=((mousepressed=0)*(T1.mouse_pressed=1)*indic_uno=1)?T1.mouse_y:entrada.y;ax=t_uno.x-entrada.x;ay=t_uno.y-entrada.y;bx=t_uno.x-T1.mouse_x;by=t_uno.y-T1.mouse_y;dir_uno=(ay*bx-ax*by);psi=(dir_uno<0)?acos(min( 1, arg(ax,ay,bx,by) ) ):2*pi-acos(min( 1, arg(ax,ay,bx,by) ) );;Ind=((T1.mouse_x-t_uno.x)^2+(T1.mouse_y-t_uno.y)^2<0.1225)?1:Ind;Ind=(T1.mouse_pressed=0)?0:Ind;t_uno.x=(Ind)?T1.mouse_x:t_uno.x;t_uno.y=(Ind)?T1.mouse_y:t_uno.y;;;phi=((T1.mouse_pressed=1)*(Ind=0)*(indic_uno=1))?(phi_t+psi)%(2*pi):phi%(2*pi);phi_t=(T1.mouse_pressed=0)?phi:phi_t;mousepressed=T1.mouse_pressed;;' id='Cálculos' evaluar='siempre' algoritmo='si' id='Int_r' expresión='1' evaluar='una-sola-vez' constante='si' id='Int_g' expresión='1' evaluar='una-sola-vez' constante='si' id='Int_b' expresión='1' evaluar='una-sola-vez' constante='si' id='Ext_r' expresión='0.6' evaluar='una-sola-vez' constante='si' id='Ext_g' expresión='0.6' evaluar='una-sola-vez' constante='si' id='Ext_b' expresión='0.7' evaluar='una-sola-vez' constante='si' tipo='arco' color='ff0000ff' centro='(t_uno.x,t_uno.y)' fin='360' relleno='(Ext_r,Ext_g,Ext_b,80)' tipo='arco' color='ff0000ff' centro='(t_uno.x,t_uno.y)' radio='.35' fin='360' relleno='(Int_r,Int_g,Int_b,80)'