summaryrefslogtreecommitdiff
path: root/2279/CH4/EX4.18/Ex4_18.sce
blob: b8e2032bc8c9bbd7426c8ecafd8163a9d75d02e4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//Example 4.18
//Convolution sum of x[n] and h[n]
clc
clear
n1=-100:0;
n2=0:100;
n3=-100:100;
b=0.8//assume the constant b=0.4
a=0.8//assume the constant a=0.8
for i=1:length(n1)
    x(i)=a^n1(i);
    h(i)=b^n1(i);
end
y=convol(x,h);
subplot(3,1,1)
xtitle("input signal x(n)","....................n","x[n]");
plot(n1,x,'.');
subplot(3,1,2)
xtitle("system response h(n)","....................n","h[n]");
plot(n2,h,'.');
subplot(3,1,3)
xtitle("output signal y(n)",".............................n","y[n]");
plot(n3,y,'.');