zdomain.m

很多matlab的源代码

clc,v=exist('version');
ztr,disp(' '),disp('Strike a key to continue'),pause
tf2pf,disp(' '),disp('Strike a key to continue'),pause
pf2tf,disp(' '),disp('Strike a key to continue'),pause
izt,disp(' '),disp('Strike a key to continue'),pause
iztlong,disp(' '),disp('Strike a key to continue'),pause
plotpz
disp(' '),disp('Strike a key to continue'),pause
help ssresp,
disp('To find the ss response of H(z)=z/(z-0.5) to 2cos(0.25n*pi-pi/8), try')
disp('yss=ssresp(''z'',[1 0],[1 -0.5],[2 0.25*pi -pi/8])')
disp(' '),disp('Strike a key to see the result of this example'),pause
yss=ssresp('z',[1 0],[1 -0.5],[2 0.25*pi -pi/8])
disp(' '),disp('Strike a key to continue'),clear yss,pause
help sysresp2,if v~=5,pause(3),end
disp('For the response of H(z)=z/(z+0.5) to 2(0.5^n)u[n] with y[-1]=2, try')
disp('[yt,yzs,yzi]=sysresp2(''z'',[1 0],[1 0.5],[2 0],[1 -0.5],2)')
disp(' '),disp('Strike a key to see the result of this example'),pause
[yt,yzs,yzi]=sysresp2('z',[1 0],[1 0.5],[2 0],[1 -0.5],2)
disp(' '),disp('Strike a key to continue'),clear yt yzs yzi,pause
if exist('version')==5,eval('zplane3d'),
disp(' '),disp('Strike a key to continue'),pause,end
stablize,disp(' '),disp('Strike a key to continue'),pause
help tfmin,
disp('Let us find the minimum phase TF for H(z) = (2z*z+5z+2)/(4z*z+17z+4)')
disp('Strike a key to see the result'),pause
ytm=tfmin([2 5 2],[4 17 4],'z')
disp(' '),disp('Strike a key to return to menu'),clear ytm,pause