summaryrefslogtreecommitdiff
path: root/929/CH6/EX6.10.b/Example6_10_b.sce
blob: a44df5c7dc3f5d54a3e8e98360a7c9c97cc4d67a (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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
//Example 6.10(b)

clear;

clc;

f0=10*10^3;

Q=25;

HobpdB=0;

R1=10*10^3;//Assumption

R2=R1;//Assumption

R5=R1;//Assumption

R6=R1;//Assumption

R3=250*10^3;//Assumption

R4=R3;//Assumption

C1=1/(2*%pi*f0*R5);//Assumption

C2=C1;//Assumption

f0reler=0.01;//as relative error defined for f0=1%

Qreler=0.01

ftf0=f0/f0reler;

ftQ=(4*Q*f0)/Qreler;

ft=1*10^6;

//Changing the component values using Phase Compensation

ch=f0/ft;

C1new=C1-(C1*ch);

C2new=C1new;

printf("Designed Biquad Filter :")

printf("\nR1=R2=R5=R6=%.2f kohms",R1*10^(-3));

printf("\nR3=R4=%.2f kohms",R4*10^(-3));

printf("\nC1=C2=%.3f nF",C1new*10^9);