fig530.m

来自「realize analysis and design for computer」· M 代码 · 共 65 行

% Generates Fig 5.30
% Computer Controlled Systems (3rd ed)
% Author: B. Wittenmark
% Last edit: 1997-07-04
% Copyright (c) 1996 by K. J. 舠tr鰉, B. Wittenmark and
% Department of Automatic Control, Lund Institute of
% Technology, Lund, Sweden

newplot;clf;
set(gcf,'PaperUnits','centimeters','PaperPosition',[2 2 13 10])
set(gcf,'Units','centimeters','position',get(gcf,'PaperPosition'))
clear
lw=0.9;

block530;

tau=2;
h=1;
K=0.4;
Ti=0.4;
am=0.37;
bm1=0.63;
bm2=0;
%
%set_param('block530/Delay','Delay time',tau);
[t,x,y]=sim('block530',[0, 40]);
clf;
subplot(3,1,1);
plot(t,y(:,3),'k:',t,y(:,1),'k','Linew',lw);
axis([0,40,0,1.5]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 20 40]);
set(gca,'ytick',[0 1]);
ylabel('Output','Fontname','NewCenturySchlbk','Fontsize',9);
hold on;
drawnow;
%
subplot(3,1,2);
[ts,ys]=stairs(t,y(:,2));
plot(ts,ys,'m','Linew',lw);
axis([0,40,0,1.5]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 20 40]);
set(gca,'ytick',[0 1]);
ylabel('Input','Fontname','NewCenturySchlbk','Fontsize',9)
xlabel('Time','Fontname','NewCenturySchlbk','Fontsize',9)
hold on;
drawnow;
%
tau=2;
K=0.1;
Ti=0.5;
bm1=0;
bm2=0;
%set_param('block530/Delay','Delaytime',tau);
[t,x,y]=sim('block530',[0, 40]);
subplot(3,1,1);
plot(t,y(:,1),'k--','Linew',lw);
drawnow;
%
subplot(3,1,2);
[ts,ys]=stairs(t,y(:,2));
plot(ts,ys,'m--','Linew',lw);
drawnow;
close_system('block530',0);