% zdemo what does the signal z^n look like?
% J(Y)S

% first setup graphs
close all
figure(1); set(1, 'Position', [  5 200 390 350]);
c = exp(i*(0:63)/10);
plot(c); axis([-1.5,1.5,-1.5,1.5]);
figure(2); set(2, 'Position', [400 200 390 350]);
b=0;
'loop until right-click'
t = 1:64;

% loop until right mouse button is clicked
while (b-2)

 % draw circle
 figure(1);

 % get input
 [x,y,b] = ginput(1)
 clf
 plot(c); axis([-1.5,1.5,-1.5,1.5]); hold on;
 plot(x,y,'r*');

 % draw signal
 figure(2); clf;
 z = (x+i*y) * ones(size(t));
 s = z .^ t ;
 plot(t,real(s), t,imag(s));

end