summaryrefslogtreecommitdiff
path: root/3515/CH6
diff options
context:
space:
mode:
Diffstat (limited to '3515/CH6')
-rw-r--r--3515/CH6/EX6.1/Ex6_1.sce12
-rw-r--r--3515/CH6/EX6.10/Ex6_10.sce14
-rw-r--r--3515/CH6/EX6.11/Ex6_11.sce17
-rw-r--r--3515/CH6/EX6.12/Ex6_12.sce21
-rw-r--r--3515/CH6/EX6.14/Ex6_14.sce21
-rw-r--r--3515/CH6/EX6.2/Ex6_2.sce16
-rw-r--r--3515/CH6/EX6.3/Ex6_3.sce21
-rw-r--r--3515/CH6/EX6.4/Ex6_4.sce16
-rw-r--r--3515/CH6/EX6.5/Ex6_5.sce24
-rw-r--r--3515/CH6/EX6.6/Ex6_6.sce15
-rw-r--r--3515/CH6/EX6.7/Ex6_7.sce13
-rw-r--r--3515/CH6/EX6.8/Ex6_8.sce21
12 files changed, 211 insertions, 0 deletions
diff --git a/3515/CH6/EX6.1/Ex6_1.sce b/3515/CH6/EX6.1/Ex6_1.sce
new file mode 100644
index 000000000..4d7ae872e
--- /dev/null
+++ b/3515/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,12 @@
+// Exa 6.1
+format('v',7);
+clc;
+clear;
+close;
+// Given data
+Vf= 0.0125;// in volt
+Vo= 0.5;// in volt
+Bita= Vf/Vo;
+// For oscillator A*Bita= 1
+A= 1/Bita;
+disp("Amplifier Should have a minimum gain of "+string(A)+" to provide oscillation")
diff --git a/3515/CH6/EX6.10/Ex6_10.sce b/3515/CH6/EX6.10/Ex6_10.sce
new file mode 100644
index 000000000..c3fbb4381
--- /dev/null
+++ b/3515/CH6/EX6.10/Ex6_10.sce
@@ -0,0 +1,14 @@
+// Exa 6.10
+format('v',8);
+clc;
+clear;
+close;
+// Given data
+R1= 220;// in kohm
+R1=R1*10^3;// in ohm
+R2=R1;// in ohm
+C1= 250;// in pF
+C1= C1*10^-12;// in F
+C2=C1;// in F
+f= 1/(2*%pi*R1*C1);
+disp(f,"Frequency of oscilltions in Hz is : ")
diff --git a/3515/CH6/EX6.11/Ex6_11.sce b/3515/CH6/EX6.11/Ex6_11.sce
new file mode 100644
index 000000000..34c88775a
--- /dev/null
+++ b/3515/CH6/EX6.11/Ex6_11.sce
@@ -0,0 +1,17 @@
+// Exa 6.11
+format('v',7);
+clc;
+clear;
+close;
+// Given data
+R= 10;// in kohm
+R=R*10^3;// in ohm
+f=1000;
+fie= 60;// in °
+// The impedence of given circuit , Z= R+j*1/(omega*C)
+// the phase shift, tan(fie)= imaginary part/ Real part
+// tand(fie) = 1/(omega*R*C)
+C= 1/(2*%pi*R*tand(fie));
+disp(C*10^12,"The value of C in pF is : ")
+
+// Note : There is an calculation error to evaluate the value of C, So the answer in the book is wrong
diff --git a/3515/CH6/EX6.12/Ex6_12.sce b/3515/CH6/EX6.12/Ex6_12.sce
new file mode 100644
index 000000000..f24a80c2d
--- /dev/null
+++ b/3515/CH6/EX6.12/Ex6_12.sce
@@ -0,0 +1,21 @@
+// Exa 6.12
+format('v',7);
+clc;
+clear;
+close;
+// Given data
+L= 50;// in µH
+L= L*10^-6;// in H
+C1= 300;// in pF
+C1= C1*10^-12;// in F
+C2= 100;// in pF
+C2= C2*10^-12;// in F
+C_eq= C1*C2/(C1+C2);// in F
+f= 1/(2*%pi*sqrt(L*C_eq));// in Hz
+disp(f*10^-6,"Frequency of oscillations in MHz is : ")
+Bita= C2/C1;
+// (iii)
+// A*Bita >=1, so A*Bita= 1 (for sustained oscillations)
+Amin= 1/Bita;
+disp(Amin,"Minimum gain to substain oscillations is : ")
+
diff --git a/3515/CH6/EX6.14/Ex6_14.sce b/3515/CH6/EX6.14/Ex6_14.sce
new file mode 100644
index 000000000..6ce27709d
--- /dev/null
+++ b/3515/CH6/EX6.14/Ex6_14.sce
@@ -0,0 +1,21 @@
+// Exa 6.14
+format('v',4);
+clc;
+clear;
+close;
+// Given data
+L1= 2;// in mH
+L1= L1*10^-3;// in H
+L2= 1.5;// in mH
+L2= L2*10^-3;// in H
+// Formula f= 1/(2*%pi*sqrt((L1+L2)*C)
+// For f= 1000 kHz, C will be maximum
+f=1000;// in kHz
+f=f*10^3;// in Hz
+Cmax= 1/((2*%pi*f)^2*(L1+L2));// in F
+// For f= 2000 kHz, C will be maximum
+f=2000;// in kHz
+f=f*10^3;// in Hz
+Cmin= 1/((2*%pi*f)^2*(L1+L2));// in F
+disp(Cmin*10^12,"Minimum Capacitance in pF is : ")
+disp(Cmax*10^12,"Maximum Capacitance in pF is : ")
diff --git a/3515/CH6/EX6.2/Ex6_2.sce b/3515/CH6/EX6.2/Ex6_2.sce
new file mode 100644
index 000000000..a6d80e17f
--- /dev/null
+++ b/3515/CH6/EX6.2/Ex6_2.sce
@@ -0,0 +1,16 @@
+// Exa 6.2
+format('v',6);
+clc;
+clear;
+close;
+// Given data
+R1= 50;// in kohm
+R1=R1*10^3;// in ohm
+R2=R1;// in ohm
+R3=R2;// in ohm
+C1= 60;// in pF
+C1= C1*10^-12;// in F
+C2=C1;// in F
+C3=C2;// in F
+f= 1/(2*%pi*R1*C1*sqrt(6));
+disp(f*10^-3,"Frequency of oscilltions in kHz is : ")
diff --git a/3515/CH6/EX6.3/Ex6_3.sce b/3515/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..38e5ab2bc
--- /dev/null
+++ b/3515/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,21 @@
+// Exa 6.3
+format('v',5);
+clc;
+clear;
+close;
+// Given data
+f=2;// in kHz
+f=f*10^3;// in Hz
+// Let
+R= 10;// in kohm (As R should be greater than 1 kohm)
+R=R*10^3;// in ohm
+// Formula f= 1/(2*%pi*R*C)
+C= 1/(2*%pi*f*R);// in F
+C= C*10^9;// in nF
+// For Bita to be 1/3, Choose
+R4= R;// in ohm
+R3= 2*R4;// in ohm
+disp(C,"Value of C in nF is : ")
+disp(R3*10^-3,"Value of R3 in kohm is : ")
+disp(R4*10^-3,"Value of R4 in kohm is : ")
+
diff --git a/3515/CH6/EX6.4/Ex6_4.sce b/3515/CH6/EX6.4/Ex6_4.sce
new file mode 100644
index 000000000..e1506d3f5
--- /dev/null
+++ b/3515/CH6/EX6.4/Ex6_4.sce
@@ -0,0 +1,16 @@
+// Exa 6.4
+format('v',7);
+clc;
+clear;
+close;
+// Given data
+R1= 200;// in kohm
+R1=R1*10^3;// in ohm
+R2=R1;// in ohm
+C1= 200;// in pF
+C1= C1*10^-12;// in F
+C2=C1;// in F
+f= 1/(2*%pi*R1*C1);// in Hz
+disp(f*10^-3,"Frequency of oscilltions in kHz is : ")
+
+// Note: Calculation to find the value of f in the book is wrong, so answer in the book is wrong
diff --git a/3515/CH6/EX6.5/Ex6_5.sce b/3515/CH6/EX6.5/Ex6_5.sce
new file mode 100644
index 000000000..53e04af83
--- /dev/null
+++ b/3515/CH6/EX6.5/Ex6_5.sce
@@ -0,0 +1,24 @@
+// Exa 6.5
+format('v',7);
+clc;
+clear;
+close;
+// Given data
+L= 100;// in µH
+L= L*10^-6;// in H
+C1= .001;// in µF
+C1= C1*10^-6;// in F
+C2= .01;// in µF
+C2= C2*10^-6;// in F
+C= C1*C2/(C1+C2);// in F
+// (i)
+f= 1/(2*%pi*sqrt(L*C));// in Hz
+disp(round(f*10^-3),"Operating frequency in kHz is : ")
+// (ii)
+Bita= C1/C2;
+disp(Bita,"Feedback fraction is : ")
+// (iii)
+// A*Bita >=1, so Amin*Bita= 1
+Amin= 1/Bita;
+disp(Amin,"Minimum gain to substain oscillations is : ")
+
diff --git a/3515/CH6/EX6.6/Ex6_6.sce b/3515/CH6/EX6.6/Ex6_6.sce
new file mode 100644
index 000000000..48f35971a
--- /dev/null
+++ b/3515/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,15 @@
+// Exa 6.6
+format('v',6);
+clc;
+clear;
+close;
+// Given data
+L= 15;// in µH
+L= L*10^-6;// in H
+C1= .004;// in µF
+C1= C1*10^-6;// in F
+C2= .04;// in µF
+C2= C2*10^-6;// in F
+C= C1*C2/(C1+C2);// in F
+f= 1/(2*%pi*sqrt(L*C));// in Hz
+disp(f*10^-3,"Frequency of oscillations in kHz is : ")
diff --git a/3515/CH6/EX6.7/Ex6_7.sce b/3515/CH6/EX6.7/Ex6_7.sce
new file mode 100644
index 000000000..f279d67e2
--- /dev/null
+++ b/3515/CH6/EX6.7/Ex6_7.sce
@@ -0,0 +1,13 @@
+// Exa 6.7
+format('v',7);
+clc;
+clear;
+close;
+// Given data
+L= 0.01;// in H
+C= 10;// in pF
+C= C*10^-12;// in F
+f= 1/(2*%pi*sqrt(L*C));// in Hz
+disp(f*10^-3,"Frequency of oscillations in kHz is : ")
+
+// Note: Calculation to find the value of f in the book is wrong, so answer in the book is wrong
diff --git a/3515/CH6/EX6.8/Ex6_8.sce b/3515/CH6/EX6.8/Ex6_8.sce
new file mode 100644
index 000000000..cd685f6e5
--- /dev/null
+++ b/3515/CH6/EX6.8/Ex6_8.sce
@@ -0,0 +1,21 @@
+// Exa 6.8
+format('v',5);
+clc;
+clear;
+close;
+// Given data
+L= 0.8;// in H
+
+C= .08;// in pF
+C= C*10^-12;// in F
+C_M= 1.9;// in pF
+C_M= C_M*10^-12;// in F
+C_T= C*C_M/(C+C_M);// in F
+R=5;// in kohm
+f_s= 1/(2*%pi*sqrt(L*C));// in Hz
+disp(f_s*10^-3,"Series resonant frequency in kHz is : ")
+// (ii)
+f_p= 1/(2*%pi*sqrt(L*C_T));// in Hz
+disp(f_p*10^-3,"parallel resonant frequency in kHz is : ")
+
+// Note: Calculation to find the value of parallel resonant frequency in the book is wrong, so answer in the book is wrong