MATLAB 光学谐振腔的设计

1、A1：光学谐振腔的设计设计任务：有一平面镜和曲率半径为的凹面镜，画出光束发散角与腔长的关系曲线。设计要求：（1）具有友好输入输出界面；（2）可输入不同凹面镜曲率半径值，查看结果变化情况。function varargout = A1(varargin)% A1 M-file for A1.fig% A1, by itself, creates a new A1 or raises the existing% singleton*.% H = A1 returns the handle to a new A1 or the handle to% the existing singleton*.%

2、 A1('CALLBACK',hObject,eventData,handles,.) calls the local% function named CALLBACK in A1.M with the given input arguments.% A1('Property','Value',.) creates a new A1 or raises the% existing singleton*. Starting from the left, property value pairs are% applied to the GUI bef

3、ore A1_OpeningFunction gets called. An% unrecognized property name or invalid value makes property application% stop. All inputs are passed to A1_OpeningFcn via varargin.% *See GUI Options on GUIDE's Tools menu. Choose "GUI allows only one% instance to run (singleton)".% See also: GUID

4、E, GUIDATA, GUIHANDLES% Copyright 2002-2003 The MathWorks, Inc.% Edit the above text to modify the response to help A1% Last Modified by GUIDE v2.5 21-Oct-2010 18:17:18% Begin initialization code - DO NOT EDITgui_Singleton = 1;gui_State = struct('gui_Name', mfilename, . 'gui_Singleton

5、9;, gui_Singleton, . 'gui_OpeningFcn', A1_OpeningFcn, . 'gui_OutputFcn', A1_OutputFcn, . 'gui_LayoutFcn', , . 'gui_Callback', );if nargin && ischar(varargin1) gui_State.gui_Callback = str2func(varargin1);endif nargout varargout1:nargout = gui_mainfcn(gui_State

6、, varargin:);else gui_mainfcn(gui_State, varargin:);end% End initialization code - DO NOT EDIT% - Executes just before A1 is made visible.function A1_OpeningFcn(hObject, eventdata, handles, varargin)% This function has no output args, see OutputFcn.% hObject handle to figure% eventdata reserved - to

7、 be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)% varargin command line arguments to A1 (see VARARGIN)% Choose default command line output for A1handles.output = hObject;% Update handles structureguidata(hObject, handles);% UIWAIT makes A1 wait fo

8、r user response (see UIRESUME)% uiwait(handles.figure1);% - Outputs from this function are returned to the command line.function varargout = A1_OutputFcn(hObject, eventdata, handles) % varargout cell array for returning output args (see VARARGOUT);% hObject handle to figure% eventdata reserved - to

9、be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)% Get default command line output from handles structurevarargout1 = handles.output;% - Executes on button press in pushbutton1.function pushbutton1_Callback(hObject, eventdata, handles)% hObject hand

10、le to pushbutton1 (see GCBO)% eventdata reserved - to be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)handles.R=str2double(get(handles.editR,'string');handles.B=str2double(get(handles.editB,'string');guidata(hObject,handles);L=0.1*1

11、01:0.1:102;f=sqrt(L*handles.R*102-L.2);w=sqrt(handles.B*10(-4)*f/pi);jiao=2*handles.B*10(-4)/pi./w;plot(L,jiao);grid on;xlabel('腔长l(cm)');ylabel('散射角(rad)'); title('光束发散角与腔长的关系曲线');function editR_Callback(hObject, eventdata, handles)% hObject handle to editR (see GCBO)% event

12、data 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 editR as text% str2double(get(hObject,'String') returns contents of editR as a double% - Executes during object cr

13、eation, after setting all properties.function editR_CreateFcn(hObject, eventdata, handles)% hObject handle to editR (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

14、white background on Windows.% See ISPC and COMPUTER.if ispc set(hObject,'BackgroundColor','white');else set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor');endfunction editB_Callback(hObject, eventdata, handles)% hObject handle to editB (see GCBO)%

15、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 editB as text% str2double(get(hObject,'String') returns contents of editB as a double% - Executes during obje

16、ct creation, after setting all properties.function editB_CreateFcn(hObject, eventdata, handles)% hObject handle to editB (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 ha

17、ve a white background on Windows.% See ISPC and COMPUTER.if ispc set(hObject,'BackgroundColor','white');else set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor');end% - Executes on button press in pushbutton2.function pushbutton2_Callback(hObject, ev

18、entdata, handles)close(gcf)% hObject handle to pushbutton2 (see GCBO)% eventdata reserved - to be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)% - Executes on key press over pushbutton2 with no controls selected.function pushbutton2_KeyPressFcn(hObject, eventdata, handles)% hObject handle to pushbutton2 (see GCBO)% eventdata reserved - to be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)% -