q814.m

来自「matlab在电子信息中的应用和实例中的源代码」· M 代码 · 共 19 行

%《MATLAB及在电子信息课程中的应用》第八章例8.14程序q814
% 四阶连续和离散系统开闭环bode图
% 电子工业出版社出版  陈怀琛 吴大正 高西全合著 2001年10月初版，2003年7月第二版
%
clear,
Ts=0.1
s=zpk(-6,[0,-1,-10,-10],200)	    % 生成四阶连续系统s
sd=c2d(s,Ts)						% 变换为四阶离散系统sd
sb=feedback(s,1)					% 把连续系统闭合，生成闭环系统sb
sbd=feedback(sd,1)				    % 把离散系统闭合，生成闭环系统sbd
figure(1),bode(s,'--',sb,'.-')		% 在图1中同时绘出连续系统的开闭环频率特性
set(gcf,'color','w')                % 设置图形背景色为白色
figure(2),bode(sd,'--',sbd,'.-')	% 在图2中同时绘出离散系统的开闭环频率特性
set(gcf,'color','w')                % 设置图形背景色为白色
damp(sb)							% 闭环sb的根的固有频率和阻尼系数
damp(sbd)							% 判断闭环sbd的根的固有频率和阻尼系数
[Gm,Pm,wcg,wcp]=margin(s)		    % 判断闭环sb的稳定裕度
[Gmd,Pmd,wcgd,wcpd]=margin(sd)	    % 判断闭环sb的稳定裕度