balead.m

华东理工大学自动化系《控制系统分析、设计和应用》教材配套程序实例,有关说明： 1. 安装MATLAB软件。安装时

function Gc=balead(G,kc,wcg,dPm)
% 基于伯德图的超前或滞后校正解析设计法根据所需闭环性能计算校正器的传递函数
% 对象为G，可采用传递函数、零极点和状态空间模型
% wcg是幅值交角频率，kc是校正器增益，dPm是相位裕度（含安全量）
% Gc是校正器传递函数

% Copyright 2000-2001 ECUST. 
%   $Revision: 1.1 $  $Date: 2001/08/01 11:35:26 $
G=tf(G);num=G.num{1};den=G.den{1};nv=polyval(num,j*wcg);dv=polyval(den,j*wcg);
g=nv/dv;theta_G=angle(g);MG=abs(g);dpm=dPm*pi/180;dt=(dpm-theta_G);
Tz=(1+kc*MG*cos(dt))/(-wcg*kc*MG*sin(dt));Tp=(cos(dt)+kc*MG)/(wcg*sin(dt));
Gc=tf([Tz 1],[Tp 1]);