可视化计算离线作业(5)

','fontsize',9,'FontWeight','demi','color','black');

text(-50,50,'太阳');%对太阳进行标识

line(-55,50,'color','r','marker','.','markersize',80);

text(-50,40,'地球');%对地球进行标识

line(-55,40,'color','k','marker','.','markersize',40);

%绘制轨道

s1=[0:.01:2*pi];

line(Lmax1*cos(s1),Lmin1*sin(s1),'linestyle',':');%地球轨迹axis([-60,60,-60,60]);

%开始画图

t=0;

while 1

if~ishandle(hh)

return;

end

q0=t*w0;q1=t*w1;t=t+1;%设置运动规律

if t>=4320;

t=0;

end%得到一周就重置

x0=Lmax0*cos(q1); y0 = Lmin0*sin(q1);%设置太阳

x1 = x0+Lmax1*cos(q1); y1=y0+Lmin1*sin(q1);%设置地球坐标 set(sun,'xdata',x0,'ydata',y0);

set(earth,'xdata',x1,'ydata',y1);

drawnow;

end