微波实验报告 smith原图 matlab(7)

b=imag(y);

%计算并画出第二支节的匹配点位置 x1=-tan(2*pi*Ls21); x2=-tan(2*pi*Ls22); y1=1+i*(1/x1); y2=1+i*(1/x2);

gamma1=(y1-1)/(y1+1); gamma2=(y2-1)/(y2+1); aa1=real(gamma1); bb1=-imag(gamma1); aa2=real(gamma2); bb2=-imag(gamma2); plot(aa1,bb1,'rp'); plot(aa2,bb2,'rp'); alpha1=atan2(bb1,aa1); alpha2=atan2(bb2,aa2); Re1=[0,cos(alpha1)]; Re2=[0,cos(alpha2)]; Im1=[0,sin(alpha1)]; Im2=[0,sin(alpha2)]; plot(Re1,Im1,'r'); plot(Re2,Im2,'r');

%计算并画出第一支节的匹配点位置

plot(abs(gamma1)*cos(alpha1+pi/2),abs(gamma1)*sin(alpha1+pi/2),'bp');

plot(abs(gamma2)*cos(alpha2+pi/2),abs(gamma2)*sin(alpha2+pi/2),'bp');

Re3=[0,cos(alpha1+pi/2)]; Re4=[0,cos(alpha2+pi/2)]; Im3=[0,sin(alpha1+pi/2)]; Im4=[0,sin(alpha2+pi/2)]; plot(Re3,Im3,'b'); plot(Re4,Im4,'b'); hold off;

else

t=0:0.0001:2*pi;

plot(0.5*(cos(t)),(0.5*sin(t)+0.5),'c'); hold on;

[Gamma2,Lmin,Lmax]=circlefun(R,X,Zo); axis('equal',[-1,1,-1,1]); hold off; end

hold off;

rho=(1+abs(Gamma2))/(1-abs(Gamma2));

if imag(Ls11)==0 & imag(Ls12)==0 & imag(Ls21)==0 & imag(Ls22)==0

set(handles.Ht5,'string',strcat(' 在负载处并入长度为',num2str(Ls11),'λ 的短路支节,再在d=λ/ 8处并入长度为',num2str(Ls21),'λ 的短路支节就可实现匹配'),'fontname','宋体','fontsize',10);

set(handles.Ht6,'string',strcat(' 或在负载处并入长度为',num2str(Ls12),'λ 的短路支节,再在d=λ/ 8处并入长度为',num2str(Ls22),'λ 的短路支节就可实现匹配'),'fontname','宋体','fontsize',10); else

set(handles.Ht5,'string',strcat(' WARNING ! 等 G 圆与λ/ 8辅助圆无交点'),'fontname','宋体','fontsize',10);

set(handles.Ht6,'string',strcat(' 双支节匹配出现盲区！'),'fontname','宋体','fontsize',10); end

function V_Callback(hObject, eventdata, handles) % hObject handle to V (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 V as text

% str2double(get(hObject,'String')) returns contents of V as a double

% --- Executes during object creation, after setting all properties. function V_CreateFcn(hObject, eventdata, handles) % hObject handle to V (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

function U_Callback(hObject, eventdata, handles) % hObject handle to U (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 U as text

% str2double(get(hObject,'String')) returns contents of U as a double

% --- Executes during object creation, after setting all properties. function U_CreateFcn(hObject, eventdata, handles) % hObject handle to U (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

function edit40_Callback(hObject, eventdata, handles) % hObject handle to edit40 (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 edit40 as text % str2double(get(hObject,'String')) returns contents of edit40 as a double

% --- Executes during object creation, after setting all properties. function edit40_CreateFcn(hObject, eventdata, handles) % hObject handle to edit40 (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

3.参考资料：

【1】胡鹤飞.Matlab及其应用.北京邮电大学出版社.2012

【2】董金明，林萍实，邓晖.微波技术（第二版）.机械工业出版社.2009 【3】Matlab技术论坛 http://www.ilovematlab.cn/ 【4】pudn程序员联合开发网 http://www.pudn.com/ 【5】百度文库 matlab GUI 快速入门