fig78.m

realize analysis and design for computer-controlled system

% Generates Fig 7.8
% 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

block78;

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

lw=0.9;
Ms=10;
h=1;
%
clf;
[t,x,y]=sim('block78',[0, 3.5*pi]);
subplot(3,1,1);
plot(t,y(:,3),'k',t,y(:,4),'k--','Linew',lw);
%title(['Fig 7.8']);
axis([0,10,-1.2,1.2]);
hold on
%
opt=simset('Outputpoints','specified');
[tout,x,yout]=sim('block78',[0:h:3.5*pi],opt);
hpl=plot(tout,yout(:,1),'m.');
set(hpl,'Markersize',Ms)
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 5 10]);
set(gca,'ytick',[-1 0 1]);
xlabel('Time','Fontsize',9,'Fontname','NewCenturySchlbk');
drawnow;
hold off