fig717.m

realize analysis and design for computer-controlled system

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

tau=20;
block717;

newplot;
set(gcf,'PaperUnits','centimeters','PaperPosition',[2 2 13 10])
set(gcf,'Units','centimeters','position',get(gcf,'PaperPosition'))

lw=0.9;
w=1;
C=0.01;
clf;
%
[t,x,y]=sim('block717',[0, 10]);
subplot(3,1,1)
plot(t,y(:,3),'k--',t,y(:,1),'m','Linew',lw);
%title(['Fig 7.17']);
axis([0,10,-1,3]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 5 10]);
set(gca,'ytick',[0 2]);
text(-0.8,2.95,'(a)','Fontname','NewCenturySchlbk','Fontsize',9)
drawnow;
%
subplot(3,1,2)
plot(t,y(:,4),'k','Linew',lw);
axis([0,10,-1,2]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 5 10]);
set(gca,'ytick',[-1 0 1 2]);
text(-0.8,2,'(b)','Fontname','NewCenturySchlbk','Fontsize',9)
drawnow;
%
subplot(3,1,3)
plot(t,y(:,2),'k','Linew',lw);
axis([0,10,-0.5,1.5]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 5 10]);
set(gca,'ytick',[0 1]);
text(-0.8,1.5,'(c)','Fontname','NewCenturySchlbk','Fontsize',9)
xlabel('Time','Fontsize',9,'Fontname','NewCenturySchlbk');
drawnow;