summaryrefslogtreecommitdiff
path: root/929/CH3/EX3.13.a/Example3_13_a.sce
blob: bf10c55f4cf0af59dfdb3b9ecc587977fb9e83c2 (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
//Example 3.13(a)

clear;

clc;

C=10*10^(-9);//Assumed

C1=C;

C2=C;

f0=1*10^3;

BW=100;

R=(2^(1/2))/(2*%pi*f0*C);

R1=R;

R2=R;

R3=R;

Q=f0/BW;

K=4-((2^(1/2))/Q);

RA=10*10^3;

RB=(K-1)*RA;

RG=K/(4-K);

printf("Designed KRC Second Order Band Pass filter");

printf("\nR1=R2=R3=%.1f kohms",R*10^(-3));

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

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

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

printf("\n\nResonance Gain=%.2f V/V",RG);