fig18.m

realize analysis and design for computer-controlled system

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

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

lw=0.9;
uc=1;
w=1;
a=w/2;
b=2*w;
K=2*w*w;
h=0.5;
opt=simset('Refine',2);
%
[t,x,y]=sim('block16',[0, 15],opt);
clf;
subplot(3,2,1);
plot(t,y(:,1),'k--',t,y(:,4),'k',t,y(:,7),'k:','Linew',lw);
axis([0,15,0,1.5]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 5 10 15]);
set(gca,'ytick',[0 1]);
ylabel('Output','Fontsize',9,'Fontname','NewCenturySchlbk');
text(-3.1,1.4,'(a)','Fontname','NewCenturySchlbk','Fontsize',9)
drawnow;
%
subplot(3,2,3);
[ts,ys]=stairs(t,y(:,6));
plot(t,y(:,3),'k--',ts,ys,'m','Linew',lw);
axis([0,15,-0.6,0.6]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 5 10 15]);
set(gca,'ytick',[-0.5 0 0.5]);
ylabel('Input','Fontsize',9,'Fontname','NewCenturySchlbk');
xlabel('Time (\omega_0\it{t})','Fontsize',9,'Fontname','NewCenturySchlbk');
drawnow;
%
h=1.08;
%
[t,x,y]=sim('block16',[0, 15],opt);
subplot(3,2,2);
plot(t,y(:,1),'k--',t,y(:,4),'k',t,y(:,7),'k:','Linew',lw);
axis([0,15,0,1.5]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 5 10 15]);
set(gca,'ytick',[0.0 1.0]);
ylabel('Output','Fontsize',9,'Fontname','NewCenturySchlbk');
text(-3.1,1.4,'(b)','Fontname','NewCenturySchlbk','Fontsize',9)
drawnow;
%
subplot(3,2,4);
[ts,ys]=stairs(t,y(:,6));
plot(t,y(:,3),'k--',ts,ys,'m','Linew',lw);
axis([0,15,-0.6,0.6]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 5 10 15]);
set(gca,'ytick',[-0.5 0 0.5]);
ylabel('Input','Fontsize',9,'Fontname','NewCenturySchlbk');
xlabel('Time (\omega_0\it{t})','Fontsize',9,'Fontname','NewCenturySchlbk');
drawnow;
%
ylblalgn;

close_system('block16',0)