ex541.m

来自「详细介绍了Mathlab的使用方法与技巧」· M 代码 · 共 24 行

Ts=0.02;[numh,denh]=pade(Ts/2,1);sysh=tf(numh,denh);
numo=1;deno1=[0.05 1 0];deno2=[0.003 1];deno3=[0.001 1];
sysgo1=tf(numo,deno1);sysgo2=tf(numo,deno2);sysgo3=tf(numo,deno3);
sysgho=sysh*sysgo1*sysgo2*sysgo3;[kp,kv,ka,jienci]=wucha(sysgho);k=300/kv;
sysgho=k*sysgho;margin(sysgho); 
[Gm,Pm,Wcg,Wcp]=margin(sysgho),
h=20*log10(Gm)
gamma_cas=45;delta=6;      
%设计要求的相角裕度 ，(4.1.21)式中的 设置为 
gamma_l=gamma_cas+delta;                           %根据(4.1.21)式 = +△
w=0.01:0.01:1000;                                   %设置计算频率点
[mag,phase]=bode(sysgho,w);
n=find(180+phase-(gamma_l)<=0.1);                     %求出对应 的频率
wgamma_l=n(1)/100;                         %n(1)的值与校正后实际 频率相差100倍
[mag,phase]=bode(sysgho,wgamma_l);                   %求出在 频率点的相位值
rr=-20*log10(mag);beta=10^(rr/20);                      %根据(4.1.22)式： 
w2=wgamma_l/10;w1=beta*w2;                         %根据第④步，求出 和 
numc=[1/w2,1];denc=[1/w1,1];             %根据(4.1.23)式，求出系统校正网络的传递函数
disp('系统校正网络的传递函数');
Gc=tf(numc,denc)                     
disp('系统校正后的开环传递函数');
GcG=Gc*sysgho             
margin(GcG)