电偶极子图形用户界面.docx

下载文档

3
0
约2.16千字
约 6页
2017-07-29 发布于重庆
举报
版权申诉
保障服务

电偶极子图形用户界面.docx

1、本文档共6页，可阅读全部内容。
2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。

电偶极子图形用户界面

本题仿照例18制作电偶极子的图形界面，要用到的控件有，菜单编辑器、单选按钮、复选框、双位按钮。程序如下：function varargout = zdk(varargin)gui_Singleton = 1;gui_State = struct(gui_Name, mfilename, ...gui_Singleton, gui_Singleton, ...gui_OpeningFcn, @zdk_OpeningFcn, ...gui_OutputFcn, @zdk_OutputFcn, ...gui_LayoutFcn, [] , ...gui_Callback, []);if nargin ischar(varargin{1}) gui_State.gui_Callback = str2func(varargin{1});endif nargout [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});else gui_mainfcn(gui_State, varargin{:});endfunction zdk_OpeningFcn(hObject, eventdata, handles, varargin)handles.output = hObject;guidata(hObject, handles);function varargout = zdk_OutputFcn(hObject, eventdata, handles) varargout{1} = handles.output;function radiobutton1_Callback(hObject, eventdata, handles)z=get(handles.radiobutton1,max);set(handles.radiobutton1,value,z);p=get(handles.radiobutton2,min);set(handles.radiobutton2,value,p);dk1function radiobutton2_Callback(hObject, eventdata, handles)z=get(handles.radiobutton1,min);set(handles.radiobutton1,value,z);p=get(handles.radiobutton2,max);set(handles.radiobutton2,value,p);dk2function checkbox1_Callback(hObject, eventdata, handles)checkbox1_state=get(hObject,Value);if checkbox1_state==get(hObject,Max); title(电偶极子图像)elseif checkbox1_state==get(hObject,Min); title()endfunction Ffig_Callback(hObject, eventdata, handles)function togglebutton1_Callback(hObject, eventdata, handles)button_state=get(hObject,Value);if button_state==get(hObject,Max) grid onelseif button_state==get(hObject,Min) grid offendfunction dk1 h=0.041;x=-0.3:h:0.3;y=-0.3:h:0.3; [X,Y]=meshgrid(x,y); Z=1./sqrt((X-0.2).^2.+Y.^2)-1./sqrt((X+0.2).^2+Y.^2); [PX,PY]=gradient(-Z,h); contour(x,y,Z,[-12,-8,-5,-3,-2,-1,-.5,-.1,.1,.5,1,2,3,4,5,8,12],r) hold on quiver(X,Y,PX,PY,b) hold offfunction dk2 h=0.041;x=-0.3:h:0.3;y=-0.3:h:0.3; [X,Y]=meshgrid(x,y); Z=4./sqrt((X-0.2).^2.+Y.^2)-1./sqrt((X+0.2).^2+Y.^2); [PX,PY]=gradient(-Z,h); contour(x,y,Z,[-19,-17,-15,-12,-8,-5,-3,-2,-1,-.5,