地球围绕太阳旋转

[x,y,z]=sphere;
%matlab中sphere函数zd [X,Y,Z]=sphere(30),其中参数30表示球面沿着经度、纬度方向被分成的面片数。
patches=surf2patch(x,y,z,z);%将曲面数据转化为块数据
Ssun=1;%太阳半径=1
Searth=0.3;%地球半径=0.3
Smoon=0.1;%月亮半径=0.1
Res=4;
Rme=1;
alpha=0; %α
beta=0; %β
theta=0; %θ
step_a=0.1; %a的步长
step_b=0.2; %b的步长
step_t=0.05; %c的步长
Csun=[0,0,0]; %太阳的坐标
h=figure; %窗口
set(h,‘toolbar’,‘none’,‘menubar’,‘none’,‘numbertitle’,‘off’) %创建窗口图
while 1==1 %旋转绕圈
clf %清除窗口图像
Cx=Rescos(alpha); %
Cy=Res
sin(alpha); %
Cz=0;
Cearth=[Cx,Cy,Cz]; %地球运行轨迹
u=(Csun-Cearth)/norm(Csun-Cearth);
v=[0,0,1];
w=cross(u,v); %cross向量叉乘
T=inv([u(1),u(2),u(3),0;v(1),v(2),v(3),0;w(1),w(2),w(3),0;0,0,0,1][1,0,0,-Cx;0,1,0,-Cy;0,0,1,-Cz;0,0,0,1]); %inv矩阵求逆
Cmoon=T
[Rmecos(beta);Rmesin(beta);0;1]; %月亮周期自转 41矩阵
%绘制太阳
patches_sun=patches; %patches给某个区域填充颜色
Rz=[cos(theta) -sin(theta) 0;sin(theta) cos(theta) 0;0 0 1]; %Rz矩阵为3
3
[len,t]=size(patches.vertices);
for i=1:len
P=Rz*[patches.vertices(i,1);patches.vertices(i,2);patches.vertices(i,3)];
patches_sun.vertices(i,1)=P(1);
patches_sun.vertices(i,2)=P(2);
patches_sun.vertices(i,3)=P(3);
end
patch(patches_sun),shading faceted,hold on %shading是用来处理色彩效果的 shading faceted是默认模式,hold on 你在当前图的轴(坐标系)中画了一幅图,再画另一幅图时,原来的图还在,与新图共存,都看得到
%绘制月亮
patches_moon=patches;
[len,t]=size(patches.vertices);
for i=1:len
P=Rz*[patches.vertices(i,1)*Smoon;patches.vertices(i,2)*Smoon;patches.vertices(i,3)Smoon]+[Cmoon(1);Cmoon(2);Cmoon(3)];
patches_moon.vertices(i,1)=P(1);
patches_moon.vertices(i,2)=P(2);
patches_moon.vertices(i,3)=P(3);
end
patch(patches_moon),shading faceted %shading是用来处理色彩效果的 shading faceted是默认模式
%绘制地球
patches_earth=patches;
[len,t]=size(patches.vertices);
for i=1:len
P=Rz
[patches.vertices(i,1)*Searth;patches.vertices(i,2)*Searth;patches.vertices(i,3)*Searth]+[Cx;Cy;Cz];
patches_earth.vertices(i,1)=P(1);
patches_earth.vertices(i,2)=P(2);
patches_earth.vertices(i,3)=P(3);
end
patch(patches_earth),shading faceted %shading是用来处理色彩效果的 shading faceted是默认模式
daspect([1,1,1]); %设置坐标轴的长:宽:高 =1
campos([5,5,2]),camtarget([0,0,0]),camup([0,0,1]),camva(30),
axis off
pause(0.1) % pause(a)暂停a秒后再执行

beta=beta+step_b;  %β=β+b步长
alpha=alpha+step_a; %α=α+a步长
theta=theta+step_t; %  θ=θ+t步长  

end

  • 1
    点赞
  • 7
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
matlab编程,太阳地球月亮公,球体贴图,基于matlab的仿真,实现了太阳的自以及地球月球的自。 k=6; n = 2^k-1; [x,y,z]=sphere(n ); A = imread('taiyang.png'); patches0=surf2patch(x,y,z,A); k=6; n = 2^k-1; [x,y,z]=sphere(n ); AA = imread('diqiu00.png'); patches1=surf2patch(x,y,z,AA); k=6; n = 2^k-1; [x,y,z]=sphere(n ); AAA = imread('yueqiu.png'); patches2=surf2patch(x,y,z,AAA); %set(patches,'edgecolor','none') % 设计太阳月亮地球的相对大小 Ssun=1; Searth=0.4; Smoon=0.2; % 设置太阳地球间的距离 Res=4; % 设置地球与月亮之间的距离 Rme=1; alpha=0; beta=0; theta=0; % 设置旋转速度 step_a=0.1; %a的步长 step_b=0.2; %b的步长 step_t=0.05; %c的步长 % 设置太阳的位置 Csun=[0,0,0]; % 计时器 time=0; h=figure; % 取消坐标轴之类的属性 set(h,'toolbar','none','menubar','none','numbertitle','off') % 进入大循环 while 1==1 clf % 设置地球的位置 Cx=4*cos(alpha); Cy=4*sin(alpha); Cz=0; Cearth=[Cx,Cy,Cz]; Cmoon=[Cx+cos(2*alpha);Cy+sin(2*alpha);0;1]; patches_sun=patches0; % z轴旋转坐标公式 Rz=[cos(5*theta) -sin(5*theta) 0;sin(5*theta) cos(5*theta) 0;0 0 1]; [len]=64*64; for i=1:len P=Rz*[patches0.vertices(i,1);patches0.vertices(i,2);patches0.vertices(i,3)]; patches_sun.vertices(i,1)=P(1); patches_sun.vertices(i,2)=P(2); patches_sun.vertices(i,3)=P(3); end patch(patches_sun),shading flat,hold on patches_moon=patches2; [len,t]=size(patches2.vertices); for i=1:len P=Rz*[patches2.vertices(i,1)*Smoon;patches2.vertices(i,2)*Smoon;patches2.vertices(i,3)*Smoon]+[Cmoon(1);Cmoon(2);Cmoon(3)]; patches_moon.vertices(i,1)=P(1); patches_moon.vertices(i,2)=P(2); patches_moon.vertices(i,3)=P(3); end patch(patches_moon),shading flat % 与改变太阳顶点值一致,改变地球的顶点值 patches_earth=patches1; [len,t]=size(patches1.vertices); for i=1:len P=Rz*[patches1.vertices(i,1)*Searth;patches1.vertices(i,2)*Searth;patches1.vertices(i,3)*Searth]+[Cx;Cy;Cz]; patches_earth.vertices(i,1)=P(1); patches_earth.vertices(i,2)=P(2); patches_earth.vertices(i,3)=P(3); end patch(patches_earth),shading flat daspect([1,1,1]); campos([7,7,2]),camtarget([0,0,0]),camup([0,0,1]),camva(30), % 关闭所有的坐标轴标签、刻度、背景 axis off %set(patches,'edgecolor','none') % 暂停0.1秒 pause(0.1) % 记时+1 time=time+1; % 太阳地球月亮一次改变的数值 beta=beta+step_b; alpha=alpha+step_a; theta=theta+step_t; end
评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值