|
|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
) x3 U! Z% W3 h0 P5 S一、简介" c1 k; p- P+ q+ H; [1 i4 d
( g! Y# N9 a+ p% K8 j) p" e1 h$ r基于matlab GUI时钟设计, q8 ~" E: z. }/ H! E6 A
0 o F4 }, ~( k, j5 v' ]
h4 b$ K( i0 K# @
二、源代码
& Z/ H' v. S' U9 @; v( ^- function varargout = clockfjnu(varargin)
- % CLOCKFJNU M-file for clockfjnu.fig
- % CLOCKFJNU, by itself, creates a new CLOCKFJNU or raises the existing
- % singleton*.
- %
- % H = CLOCKFJNU returns the handle to a new CLOCKFJNU or the handle to
- % the existing singleton*.
- %
- % CLOCKFJNU('CALLBACK',hObject,eventData,handles,...) calls the local
- % function named CALLBACK in CLOCKFJNU.M with the given input arguments.
- %
- % CLOCKFJNU('Property','Value',...) creates a new CLOCKFJNU or raises the
- % existing singleton*. Starting from the left, property value pairs are
- % applied to the GUI before clockfjnu_OpeningFunction gets called. An
- % unrecognized property name or invalid value makes property application
- % stop. All inputs are passed to clockfjnu_OpeningFcn via varargin.
- %
- % *See GUI Options on GUIDE's Tools menu. Choose "GUI allows only one
- % instance to run (singleton)".
- %
- % See also: GUIDE, GUIDATA, GUIHANDLES
- % Edit the above text to modify the response to help clockfjnu
- % Last Modified by GUIDE v2.5 23-Jun-2021 22:44:21
- % Begin initialization code - DO NOT EDIT
- gui_Singleton = 1;
- gui_State = struct('gui_Name', mfilename, ...
- 'gui_Singleton', gui_Singleton, ...
- 'gui_OpeningFcn', @clockfjnu_OpeningFcn, ...
- 'gui_OutputFcn', @clockfjnu_OutputFcn, ...
- 'gui_LayoutFcn', [] , ...
- 'gui_Callback', []);
- if nargin && ischar(varargin{1})
- gui_State.gui_Callback = str2func(varargin{1});
- end
- if nargout
- [varargout{1:nargout}] = gui_maiNFCn(gui_State, varargin{:});
- else
- gui_mainfcn(gui_State, varargin{:});
- end
- % End initialization code - DO NOT EDIT
- % --- Executes just before clockfjnu is made visible.
- function clockfjnu_OpeningFcn(hObject, eventdata, handles, varargin)
- % This function has no output args, see OutputFcn.
- % hObject handle to figure
- % eventdata reserved - to be defined in a future version of MATLAB
- % handles structure with handles and user data (see GUIDATA)
- % varargin command line arguments to clockfjnu (see VARARGIN)
- % Choose default command line output for clockfjnu
- handles.output = hObject;
- global Title;
- Title='北京时间';
- global VarTime;
- VarTime=0;
- TimeZoneString=get(handles.TimeZone,'String');
- TimeZoneStingSize=size(TimeZoneString);
- for i=1:TimeZoneStingSize(1) %时区选择中,默认选中(GMT+08:00)北京时间
- if strcmp( TimeZoneString{i},'(GMT+08:00)北京时间')
- set(handles.TimeZone,'value',i); %北京
- break;
- end
- end
- handles.t=timer('ExecutionMode','fixedRate' ,'TimeRFcn',{@TimeUpdate,handles},'Period',1);
- start(handles.t);
- set(gcf, 'DeleteFcn', {@DeleteFcn, handles.t}); %设置窗口销毁时的回调函数
- global hh;
- global hm;
- global hs;
- axes(handles.axes1);
- set(hObject,'NumberTitle','off');
- set(hObject,'MenuBar','none');
- set(hObject,'visible','on');
- A=linspace(0,6.3,1000); %0到6.3之间产生1000个点
- x1=8*cos(A);
- y1=8*sin(A); %设置外圆所对应的x,y值
- x2=7*cos(A);
- y2=7*sin(A); %设置内圆所对应的x,y值
- plot(x1,y1,'b','linewidth',1)
- hold on
- plot(x2,y2,'b','linewidth',3.5,'color',[0 0 0])
- fill(0.4*cos(A),0.4*sin(A),'r');%时钟中心小实心圆点
- axis off; %取消坐标轴显示
- axis equal;%坐标轴x,y等比率
- for k=1:12; %时钟面盘12等分,并写上相应的1,2...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',[1 0 0])
- h=text(xk,yk,num2str(k),'fontsize',16,'color',...
- [1 0 0],'HorizontalAlignment','center');
- end
- set(handles.TimeZoneStr,'string',Title);
- % 计算时针位置
- 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],[1 0 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);
- hm=fill([0 xm2 xm3 xm4 0],[0 ym2 ym3 ym4 0],[0 1 0]);
- % 计算秒针位置
- ts=-(ti(6))/60*2*pi+pi/2;
- hs=plot([0 7*cos(ts)],[0 7*sin(ts)],...
- 'color',[0 0 1],'linewidth',3);
- set(gcf,'doublebuffer','on');
- guidata(hObject, handles);
- % UIWAIT makes clockfjnu wait for user response (see UIRESUME)
- % uiwait(handles.figure1);
- % --- Outputs from this function are returned to the command line.
- function varargout = clockfjnu_OutputFcn(hObject, eventdata, handles)
- % varargout cell array for returning output args (see VARARGOUT);
- % hObject handle to figure
- % eventdata reserved - to be defined in a future version of MATLAB
- % handles structure with handles and user data (see GUIDATA)
- % Get default command line output from handles structure
- varargout{1} = handles.output;
- function date_Callback(hObject, eventdata, handles)
- % hObject handle to date (see GCBO)
- % eventdata reserved - to be defined in a future version of MATLAB
- % handles structure with handles and user data (see GUIDATA)
- % Hints: get(hObject,'String') returns contents of date as text
- % str2double(get(hObject,'String')) returns contents of date as a double
- % --- Executes during object creation, after setting all properties.
- function date_CreateFcn(hObject, eventdata, handles)
- % hObject handle to date (see GCBO)
- % eventdata reserved - to be defined in a future version of MATLAB
- % handles empty - handles not created until after all CreateFcns called
- % Hint: edit controls usually have a white background on Windows.
- % See ISPC and COMPUTER.
- if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
- set(hObject,'BackgroundColor','white');
- end! H; Y7 O0 s0 g8 ?7 _4 G. b6 E6 `
4 o1 J* d# L/ A% M, ]& [* s, y; V8 |5 H+ r7 Z& ~7 Z4 e: H1 e- T/ D8 U( Y
. g8 e5 k" b; D9 C2 p9 V( s1 B* `, F5 ?5 T( D; K
三、运行结果
7 O0 f1 T9 i" Y' F$ X. X/ H
+ N8 |$ O2 J' x
* G. H5 @8 W& u+ j3 z- C9 r: i# X5 t5 e+ e/ {' q% y
- x# g# u0 G/ J" Z |
|