matlab编写时钟,[转载]zz Matlab写的时钟，很漂亮

阳光穿透心脏的1/2处 2023-01-13 12:59 90阅读 0赞

try %可以运行

close all

hfig=figure('visible','off');

set(hfig,'NumberTitle','off');

set(hfig,'name','My Clock');

set(hfig,'MenuBar','none');

set(hfig,'color',\[0.5 0.7 0.3\]);

set(hfig,'visible','on');

A=linspace(0,6.3,1000);

x1=8\*cos(A);

y1=8\*sin(A);

x2=7\*cos(A);

y2=7\*sin(A);

plot(x1,y1,'b','linewidth',1.4)

hold on

plot(x2,y2,'b','linewidth',3.5)

fill(0.4\*cos(A),0.4\*sin(A),'r');

axis off

axis(\[-10 10 -10 10\])

axis equal

set(gca,'position',\[\[0.13 0.05 0.775 0.815\]\])

title(date,'fontsize',18)

for k=1:12;

xk=9\*cos(-2\*pi/12\*k+pi/2);

yk=9\*sin(-2\*pi/12\*k+pi/2);

plot(\[xk/9\*8 xk/9\*7\],\[yk/9\*8 yk/9\*7\],'color',\[0.3 0.8 0.9\])

h=text(xk,yk,num2str(k),'fontsize',16,'color',...

\[0.9 0.3 0.8\],'HorizontalAlignment','center');

end

% 计算时针位置

ti=clock;

th=-(ti(4)+ti(5)/60+ti(6)/3600)/12\*2\*pi+pi/2;

xh3=4.0\*cos(th);

yh3=4.0\*sin(th);

xh2=xh3/2+0.5\*cos(th-pi/2);

yh2=yh3/2+0.5\*sin(th-pi/2);

xh4=xh3/2-0.5\*cos(th-pi/2);

yh4=yh3/2-0.5\*sin(th-pi/2);

hh=fill(\[0 xh2 xh3 xh4 0\],\[0 yh2 yh3 yh4 0\],\[0.6 0.5 0.3\]);

% 计算分针位置

tm=-(ti(5)+ti(6)/60)/60\*2\*pi+pi/2;

xm3=6.0\*cos(tm);

ym3=6.0\*sin(tm);

xm2=xm3/2+0.5\*cos(tm-pi/2);

ym2=ym3/2+0.5\*sin(tm-pi/2);

xm4=xm3/2-0.5\*cos(tm-pi/2);

ym4=ym3/2-0.5\*sin(tm-pi/2);

hm=fill(\[0 xm2 xm3 xm4 0\],\[0 ym2 ym3 ym4 0\],\[0.6 0.5 0.3\]);

% 计算秒针位置

ts=-(ti(6))/60\*2\*pi+pi/2;

hs=plot(\[0 7\*cos(ts)\],\[0 7\*sin(ts)\],...

'color',\[0.6 0.5 0.3\],'linewidth',3);

set(gcf,'doublebuffer','on');

k=1;

while k<6;

ti=clock;

% 计算时针位置

th=-(ti(4)+ti(5)/60+ti(6)/3600)/12\*2\*pi+pi/2;

xh3=4.0\*cos(th);

yh3=4.0\*sin(th);

xh2=xh3/2+0.5\*cos(th-pi/2);

yh2=yh3/2+0.5\*sin(th-pi/2);

xh4=xh3/2-0.5\*cos(th-pi/2);

yh4=yh3/2-0.5\*sin(th-pi/2);

set(hh,'XData',\[0 xh2 xh3 xh4 0\],'YData',\[0 yh2 yh3 yh4 0\])

% 计算分针位置

tm=-(ti(5)+ti(6)/60)/60\*2\*pi+pi/2;

xm3=6.0\*cos(tm);

ym3=6.0\*sin(tm);

xm2=xm3/2+0.5\*cos(tm-pi/2);

ym2=ym3/2+0.5\*sin(tm-pi/2);

xm4=xm3/2-0.5\*cos(tm-pi/2);

ym4=ym3/2-0.5\*sin(tm-pi/2);

set(hm,'XData',\[0 xm2 xm3 xm4 0\],'YData',\[0 ym2 ym3 ym4 0\])

% 计算秒针位置

ts=-(ti(6))/60\*2\*pi+pi/2;

set(hs,'XData',\[0 7\*cos(ts)\],'YData',\[0 7\*sin(ts)\])

drawnow;

pause(0.09)

end

catch

end

matlab编写时钟,[转载]zz Matlab写的时钟，很漂亮

发表评论取消回复

还没有评论，来说两句吧...

相关阅读

相关求时钟时钟和分针的夹角

相关用matlab绘制一个时钟

相关利用canvas写七彩时钟！

相关 matlab viewmtx,[转载]Matlab指令小记：dftmtx

相关 matlab编写时钟,[转载]zz Matlab写的时钟，很漂亮

相关 Linux: 硬件时钟, 系统时钟, 网络时钟, 时区修改和同步

相关时钟

相关人体时钟

相关时钟

相关系统时钟