summaryrefslogtreecommitdiff
path: root/1757/CH7/EX7.3/EX7_3.sce
blob: 4e6a9894bb050dcbca290748363d0262a25595ed (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
//Example7.3  // Design active low filter with cut-off frequency 20 KHz
clc;
clear;
close;
fc = 20 ; // KHz 
f = 100 ; // frequency of filter
Af = 10 ;  // desired pass band gain
C = 0.05 ; //nF // we assume

// the cut-off frequency of active low pass filter is defined as
// fc = (1/2*%pi*R3*C);

// R3 can be calculated as
R3 = (1/(2*%pi*fc*C));
disp('The resistor value is = '+string(R3)+' ohm ');

// the pass band gain of filter is given by
// Af = 1+(R2/R1);
// assume that the inverting terminal resistor R1= 100 k ohm;
R1 = 100 ; // k ohm
R2 = (Af*R1)-R1;
disp('The resistor R2 value is = '+string(R2)+' k ohm ');

// the magnitude of an active low pass filter is given as
A = Af/(sqrt(1+(f/fc)^2));
disp('The magnitude of an active low pass filter is = '+string(A)+' ');

//the phase angle of the filter
Angle = -atand(f/fc);
disp('The phase angle of the filter is = '+string(Angle)+' ');