initial commit / add all books

10 files changed, 196 insertions, 0 deletions

diff --git a/1850/CH7/EX7.1/exa_7_1.sce b/1850/CH7/EX7.1/exa_7_1.sce
new file mode 100755
index 000000000..4856eecce
--- /dev/null
+++ b/1850/CH7/EX7.1/exa_7_1.sce
@@ -0,0 +1,20 @@
+// Exa 7.1

+clc;

+clear;

+close;

+//given data

+f=200;// in Hz

+// Let us take

+C=0.1;// in micro F

+C=C*10^-6;// in F

+R=1/(2*%pi*f*C*sqrt(6));// in ohm

+R=R*10^-3;// in k ohm

+// R1>=10*R, Let

+R1=10*R;// in kohm

+R_f= 29*R1;// in k ohm

+R_f=R_f*10^-3; // in M ohm

+R_f=ceil(R_f);

+disp(R_f,"Resistor of phase-shift oscillator in Mohm")

+

+

+

diff --git a/1850/CH7/EX7.11/exa_7_11.sce b/1850/CH7/EX7.11/exa_7_11.sce
new file mode 100755
index 000000000..9d1acbd97
--- /dev/null
+++ b/1850/CH7/EX7.11/exa_7_11.sce
@@ -0,0 +1,21 @@
+// Exa 7.11

+clc;

+clear;

+close;

+//given data

+C1= 0.01;// in microF

+C1=C1*10^-6;// in F

+R1=120;// in kohm

+R1=R1*10^3;// in ohm

+R2=1.2;// in kohm

+R2=R2*10^3;// in ohm

+R3=6.8;// in kohm

+R3=R3*10^3;// in ohm

+V_sat= 15;// in volt

+// Part(a)

+Vp_p= 2*(R2/R3)*V_sat;//in volt

+disp(Vp_p,"Peak to peak amplitude of triangular wave in volt")

+

+// Part(b)

+fo= R3/(4*R1*C1*R2);//in Hz

+disp(fo*10^-3,"Frequency of triangular wave in kHz");

diff --git a/1850/CH7/EX7.12/exa_7_12.sce b/1850/CH7/EX7.12/exa_7_12.sce
new file mode 100755
index 000000000..19d26429a
--- /dev/null
+++ b/1850/CH7/EX7.12/exa_7_12.sce
@@ -0,0 +1,18 @@
+// Exa 7.12

+clc;

+clear;

+close;

+//given data

+T= 100;// in micro sec

+T=T*10^-6;//in se

+V_sat= 12;// in volt

+V1= 0.7;// in volt

+V= 0.7;// in volt

+V_D1= V;

+V_D2=V_D1;

+C1= 0.1;// in microF

+C1=C1*10^-6;// in F

+Bita1= 0.1;

+// Formula T= R3*C1*log((1+V1/V_sat)/(1-Bita1))

+R3= T/(C1*log((1+V1/V_sat)/(1-Bita1)));// in ohm

+disp(R3*10^-3,"Value of R3 in kohm")

diff --git a/1850/CH7/EX7.2/exa_7_2.sce b/1850/CH7/EX7.2/exa_7_2.sce
new file mode 100755
index 000000000..e29ff2af3
--- /dev/null
+++ b/1850/CH7/EX7.2/exa_7_2.sce
@@ -0,0 +1,33 @@
+// Exa 7.2

+clc;

+clear;

+close;

+//given data

+f=1;// in kHz

+f=f*10^3;// in Hz

+V_CC= 10;// in volt

+I_B_max= 500;// in nA (for 741 IC op-amp)

+I_B_max= I_B_max*10^-9;// in A

+I1= 100*I_B_max;// in A

+V_out= (V_CC-1);// in volt

+V_in= V_out/29;

+R1= V_in/I1;// in ohm

+R1=R1*10^-3;//in k ohm

+// 5.6 k ohm resistor may be used for R1, being standard value resistor

+R1=5.6;// in k ohm (standard value)

+A=29;

+R_f= A*R1;

+// 180 k ohm resistor may be used to provide A > 29

+R_f=180;// in k ohm (standard value)

+R_comp= R_f;

+R=R1;// in k ohm

+R=R*10^3;// in ohm

+C=1/(2*%pi*f*R*sqrt(6));// in F

+C=C*10^6;// in micro F

+disp(R_comp,"Value of R_comp and R_f in kohm");

+disp(R*10^-3,"Value of R and R1 in kohm");

+disp(C,"Used capacitor in micro F")

+

+

+

+

diff --git a/1850/CH7/EX7.3/exa_7_3.sce b/1850/CH7/EX7.3/exa_7_3.sce
new file mode 100755
index 000000000..9895b5acb
--- /dev/null
+++ b/1850/CH7/EX7.3/exa_7_3.sce
@@ -0,0 +1,28 @@
+// Exa 7.3

+clc;

+clear;

+close;

+//given data

+f=10;// in kHz

+f=f*10^3;// in Hz

+I_Bmax= 500;// in nA

+I_Bmax= I_Bmax*10^-9;// in amphere

+// Let current through resistor R1 be equal to 100 times I_Bmax, so

+I_1= 100*I_Bmax;// in amp

+Vcc= 10;// in volt

+Vout= Vcc-1;// in volt

+Addition_RfR1= Vout/(500*10^-6);// value of Rf+R1 in ohm

+Addition_RfR1=Addition_RfR1*10^-3;// in kohm

+// Rf= 2*R1, So

+R1= Addition_RfR1/3;// (used 5.6 kohm Standard value resistor)

+R1= 5.6;// in kohm

+Rf= 2*R1;// in kohm// (used 12 kohm standard value resistor)

+Rf=ceil(Rf);

+R=R1;// in kohm

+C= 1/(2*%pi*f*R);// in F (Used 2700pF standard value)

+C=2700;// in pF 

+disp(R1,"Value of R1 in kohm")

+disp(Rf,"Value of Rf in kohm")

+disp(R,"Value of R in kohm")

+disp(C,"Value of C in pF")

+

diff --git a/1850/CH7/EX7.4/exa_7_4.sce b/1850/CH7/EX7.4/exa_7_4.sce
new file mode 100755
index 000000000..2b9eb3603
--- /dev/null
+++ b/1850/CH7/EX7.4/exa_7_4.sce
@@ -0,0 +1,12 @@
+// Exa 7.4

+clc;

+clear;

+close;

+//given data

+R= 1;// in kohm

+R=R*10^3;// in ohm

+C= 4.7;// in micro F

+C=C*10^-6;// in F

+omega=1/(R*C);// in radians/second

+f=omega/(2*%pi);// in Hz

+disp(f,"Frequency of the oscillation of the circuit in Hz")

diff --git a/1850/CH7/EX7.6/exa_7_6.sce b/1850/CH7/EX7.6/exa_7_6.sce
new file mode 100755
index 000000000..0aa2c76d9
--- /dev/null
+++ b/1850/CH7/EX7.6/exa_7_6.sce
@@ -0,0 +1,11 @@
+// Exa 7.6

+clc;

+clear;

+close;

+//given data

+R= 10;// in kohm

+R=R*10^3;// in ohm

+C= 100;// in pF

+C=C*10^-12;// in F

+f=1/(2*%pi*R*C);// in Hz

+disp(f*10^-3,"Frequency of the oscillation of the circuit in kHz")

diff --git a/1850/CH7/EX7.7/exa_7_7.sce b/1850/CH7/EX7.7/exa_7_7.sce
new file mode 100755
index 000000000..ea0c1f66e
--- /dev/null
+++ b/1850/CH7/EX7.7/exa_7_7.sce
@@ -0,0 +1,13 @@
+// Exa 7.7

+clc;

+clear;

+close;

+//given data

+fo= 318;// in Hz

+C= 0.015;// in microF

+C=C*10^-6;// in F

+R=0.159/(fo*C);// in ohm

+R=R*10^-3;// in kohm

+R=floor(R);

+disp(C*10^6,"Value of C1, C2 and C3 in micro F");

+disp(R,"Value of R1, R2 and R3 in kohm")

diff --git a/1850/CH7/EX7.8/exa_7_8.sce b/1850/CH7/EX7.8/exa_7_8.sce
new file mode 100755
index 000000000..ade7cc038
--- /dev/null
+++ b/1850/CH7/EX7.8/exa_7_8.sce
@@ -0,0 +1,15 @@
+// Exa 7.8

+clc;

+clear;

+close;

+//given data

+fo= 1.5;// in kHz

+fo=fo*10^3;// in Hz

+

+C= 0.01;// in microF

+C=C*10^-6;// in F

+R=0.159/(fo*C);// in ohm

+R=R*10^-3;// in kohm

+R=floor(R);

+disp(C*10^6,"Value of C1, C2 and C3 in micro F");

+disp(R,"Value of R1, R2 and R3 in kohm")

diff --git a/1850/CH7/EX7.9/exa_7_9.sce b/1850/CH7/EX7.9/exa_7_9.sce
new file mode 100755
index 000000000..74d640cae
--- /dev/null
+++ b/1850/CH7/EX7.9/exa_7_9.sce
@@ -0,0 +1,25 @@
+// Exa 7.9

+clc;

+clear;

+close;

+//given data

+C= 0.1;// in microF

+C=C*10^-6;// in F

+R=12;// in kohm

+R=R*10^3;// in ohm

+R1=120;// in kohm

+R1=R1*10^3;// in ohm

+Rf=1;// in Mohm

+Rf=Rf*10^6;// in ohm

+V_sat= 10;// in volt

+// Part(i)

+f=Rf/(4*R1*R*C);//in Hz

+disp(f*10^-3,"Signal Frequency in kHz")

+

+// Part(ii)

+Vp_p= 2*R1*V_sat/Rf;// in Vp_p

+disp(Vp_p,"Amplitude of the triangular wave in Vp_p")

+

+// Part(iii)

+Vp_p= (V_sat)-(-V_sat);

+disp(Vp_p,"Amplitude of the square wave in Vp_p")