diff options
Diffstat (limited to '2492/CH6')
-rwxr-xr-x | 2492/CH6/EX6.1/ex6_1.sce | 16 | ||||
-rwxr-xr-x | 2492/CH6/EX6.10/ex6_10.sce | 28 | ||||
-rwxr-xr-x | 2492/CH6/EX6.2/ex6_2.sce | 23 | ||||
-rwxr-xr-x | 2492/CH6/EX6.3/ex6_3.sce | 26 | ||||
-rwxr-xr-x | 2492/CH6/EX6.4/ex6_4.sce | 14 | ||||
-rwxr-xr-x | 2492/CH6/EX6.5/ex6_5.sce | 18 | ||||
-rwxr-xr-x | 2492/CH6/EX6.6/ex6_6.sce | 16 | ||||
-rwxr-xr-x | 2492/CH6/EX6.7/ex6_7.sce | 12 | ||||
-rwxr-xr-x | 2492/CH6/EX6.8/ex6_8.sce | 23 | ||||
-rwxr-xr-x | 2492/CH6/EX6.9/ex6_9.sce | 35 |
10 files changed, 211 insertions, 0 deletions
diff --git a/2492/CH6/EX6.1/ex6_1.sce b/2492/CH6/EX6.1/ex6_1.sce new file mode 100755 index 000000000..d1f3c73d5 --- /dev/null +++ b/2492/CH6/EX6.1/ex6_1.sce @@ -0,0 +1,16 @@ +// Exa 6.1
+format('v',6)
+clc;
+clear;
+close;
+// Given data
+BWf = 5;// in MHz
+BWf= BWf * 10^6;// in Hz
+Av = 100;
+BW = 500;// in kHz
+BW = BW * 10^3;// in Hz
+// BWf = (1+(B*Av))*BW;
+B = ((BWf/BW)-1)/Av;
+disp(B,"The amount of negative feed back is");
+Avf = Av/(1+(Av*B));
+disp(Avf,"The new gain after negative feed back is");
diff --git a/2492/CH6/EX6.10/ex6_10.sce b/2492/CH6/EX6.10/ex6_10.sce new file mode 100755 index 000000000..e3675e53a --- /dev/null +++ b/2492/CH6/EX6.10/ex6_10.sce @@ -0,0 +1,28 @@ +// Exa 6.10
+format('v',6)
+clc;
+clear;
+close;
+// Given data
+h_fe = 50;
+h_ie = 1.2;// in k ohm
+h_ie = h_ie * 10^3;// in ohm
+R_C = 1;// in k ohm
+R_C = R_C * 10^3;// in ohm
+R_E = 200;// in ohm
+R_B = 2;// in k ohm
+R_B = R_B * 10^3;// in ohm
+Av = (-h_fe*R_C)/h_ie;
+disp(Av,"The voltage gain (Av) is");
+Ri = (h_ie*R_B)/(h_ie+R_B);// in ohm
+disp(Ri,"The input resistance (Ri) in ohm is");
+// vi= vs (on neglecting Rs), hence i_E= i_B+h_fe*i_B = (1+h_fe)*i_B (i)
+// vo= -i_C*R_C = -h_fe*i_B*R_C (As i_C= h_fe*i_B) (ii)
+// From eq (i) : vi= i_B*h_ie+i_E*R_E= i_B*(h_ie+(1+h_fe)*R_E) (iii)
+// i_L= i_B (iv)
+// Avf = (h_fe*i_B*R_C)/(i_B*(h_ie+(1+h_fe)*R_E));
+Avf = (-h_fe*R_C)/( h_ie+(1+h_fe)*R_E );
+disp(Avf,"The voltage gain (Avf) is");
+Rif = (R_B*(h_ie + ((1+h_fe)*R_E)))/(R_B+(h_ie + ((1+h_fe)*R_E)));// in ohm
+Rif= Rif*10^-3;// in k ohm
+disp(Rif,"The input resistance (Rif) in k ohm is");
diff --git a/2492/CH6/EX6.2/ex6_2.sce b/2492/CH6/EX6.2/ex6_2.sce new file mode 100755 index 000000000..1b0a9f3ed --- /dev/null +++ b/2492/CH6/EX6.2/ex6_2.sce @@ -0,0 +1,23 @@ +// Exa 6.2
+format('v',5)
+clc;
+clear;
+close;
+// Given data
+h11 = 2;// in k ohm
+h11 = h11 * 10^3;// in ohm
+h12 = 0;
+h21 = 80;
+h22= 1*10^-3;// in mho
+R_L= 10*10^3;// in ohm
+B= 10/100;
+Ri= 2;// in k ohm
+R_Ldesh= (R_L*1/h22)/(R_L+1/h22);// in ohm
+Av= h21*R_Ldesh/h11;
+disp(Av,"Part (a) : The value of Av of the basic amplifier is : ")
+D= 1+Av*B;
+disp(D,"The value of densitivity factor is : ")
+Avf= Av/(1+B*Av);
+disp(Avf,"The value of Avf is : ")
+Rif= (1+Av*B)*Ri;// in k ohm
+disp(Rif,"The value of Rif in k ohm is : ")
diff --git a/2492/CH6/EX6.3/ex6_3.sce b/2492/CH6/EX6.3/ex6_3.sce new file mode 100755 index 000000000..4571c86db --- /dev/null +++ b/2492/CH6/EX6.3/ex6_3.sce @@ -0,0 +1,26 @@ +// Exa 6.3
+format('e',8)
+clc;
+clear;
+close;
+// Given data
+f_osc = 6.5;// in kHz
+f_osc = f_osc * 10^3;// in Hz
+// f_osc = 1/(2*%pi*sqrt(6)*RC);
+RC = 1/(2*%pi*sqrt(6)*f_osc);// in sec
+disp(RC,"The value of RC in sec is : ")
+format('v',5)
+// Possible selection of R and C may be
+R= 1;// in k ohm
+C= RC/R;// in mF
+C= C*10^3;// in µF
+disp("The posible selection of R and C : ")
+disp("(a) : "+string(R)+" kΩ and "+string(C)+" µF")
+format('v',6)
+R= 10;// in k ohm
+C= RC/R;// in mF
+C= C*10^3;// in µF
+disp("The posible selection of R and C : ")
+disp("(a) : "+string(R)+" kΩ and "+string(C)+" µF")
+
+
diff --git a/2492/CH6/EX6.4/ex6_4.sce b/2492/CH6/EX6.4/ex6_4.sce new file mode 100755 index 000000000..d70dc8a34 --- /dev/null +++ b/2492/CH6/EX6.4/ex6_4.sce @@ -0,0 +1,14 @@ +// Exa 6.4
+format('v',6)
+clc;
+clear;
+close;
+// Given data
+A= 1000;
+dA= 100;
+dAbyAf= 0.1/100;
+// dAf/Af = 1/|1+B*A| * dA/A or
+B= (dA-dAbyAf*A)/(dAbyAf*A^2)
+disp(B,"The reverse transmission factor of the feedback networks used is : ");
+Af = A/(1+(B*A));
+disp(Af,"The gain with feed back is");
diff --git a/2492/CH6/EX6.5/ex6_5.sce b/2492/CH6/EX6.5/ex6_5.sce new file mode 100755 index 000000000..391dbd729 --- /dev/null +++ b/2492/CH6/EX6.5/ex6_5.sce @@ -0,0 +1,18 @@ +// Exa 6.5
+format('v',6)
+clc;
+clear;
+close;
+// Given data
+Vout = 36;// in V
+Vs = 0.028;// in V
+B = 1.2/100;
+A = Vout/Vs;
+Af = A/(1+(B*A));
+Vo =Af*Vs;// in V
+disp(Vo,"The output voltage in V is");
+// 1+BA = 7 or
+BA= 6;
+Af= A/(1+BA);
+Vin = Vout/Af;// in V
+disp(Vin,"The input voltage in V is");
diff --git a/2492/CH6/EX6.6/ex6_6.sce b/2492/CH6/EX6.6/ex6_6.sce new file mode 100755 index 000000000..7ff825339 --- /dev/null +++ b/2492/CH6/EX6.6/ex6_6.sce @@ -0,0 +1,16 @@ +// Exa 6.6
+format('v',6)
+clc;
+clear;
+close;
+// Given data
+f_L = 20;// in Hz
+f_H = 50;// in kHz
+f_H = f_H * 10^3;// in Hz
+Ao = 1000;
+B = 10/100;
+f_HF =f_H*(1+(B*Ao));// in Hz
+f_HF = f_HF * 10^-6;// in MHz
+disp(f_HF,"The value of f_HF in MHz is");
+f_LF = f_L/(1+(B*Ao));// in Hz
+disp(f_LF,"The value of f_LF in Hz is");
diff --git a/2492/CH6/EX6.7/ex6_7.sce b/2492/CH6/EX6.7/ex6_7.sce new file mode 100755 index 000000000..c71465340 --- /dev/null +++ b/2492/CH6/EX6.7/ex6_7.sce @@ -0,0 +1,12 @@ +// Exa 6.7
+format('e',9)
+clc;
+clear;
+close;
+// Given data
+f_o = 1;// in kHz
+f_o = f_o * 10^3;// in Hz
+// f_o = 1/(2*%pi*Rc);
+RC = 1/(2*%pi*f_o);
+disp(RC,"The value of RC is : ")
+disp("So R and C can be choosen as 15.9 kΩ and 0.01 µF respectively.")
diff --git a/2492/CH6/EX6.8/ex6_8.sce b/2492/CH6/EX6.8/ex6_8.sce new file mode 100755 index 000000000..1ba3886fb --- /dev/null +++ b/2492/CH6/EX6.8/ex6_8.sce @@ -0,0 +1,23 @@ +// Exa 6.8
+format('v',5)
+clc;
+clear;
+close;
+// Given data
+h11 = 2;// in k ohm
+h11 = h11 * 10^3;// in ohm
+h12 = 0;
+h21 = 80;
+h22= 1*10^-3;// in mho
+R_L= 10*10^3;// in ohm
+B= 10/100;
+Ri= 2;// in k ohm
+R_Ldesh= (R_L*1/h22)/(R_L+1/h22);// in ohm
+Av= h21*R_Ldesh/h11;
+disp(Av,"Part (a) : The value of Av of the basic amplifier is : ")
+D= 1+Av*B;
+disp(D,"The value of densitivity factor is : ")
+Avf= Av/(1+B*Av);
+disp(Avf,"The value of Avf is : ")
+Rif= (1+Av*B)*Ri;// in k ohm
+disp(Rif,"The value of Rif in k ohm is : ")
diff --git a/2492/CH6/EX6.9/ex6_9.sce b/2492/CH6/EX6.9/ex6_9.sce new file mode 100755 index 000000000..90278909e --- /dev/null +++ b/2492/CH6/EX6.9/ex6_9.sce @@ -0,0 +1,35 @@ +// Exa 6.9
+format('v',6)
+clc;
+clear;
+close;
+// Given data
+h_ie = 1.5 * 10^3;// in ohm
+h_fe = 100;
+// R = R1||R2 = 20;// in k ohm
+R = 20 * 10^3;// in ohm
+R_E = 560;// in ohm
+R_S = 600;// in ohm
+Avf = (h_fe*R_E)/(h_ie+(h_fe*R_E));
+VoByVs = Avf;
+disp(VoByVs,"The value of midband voltage gain (vo/vs) is :");
+Ri = h_ie + ((1+h_fe)*R_E);// in ohm
+Ri= Ri*10^-3;// in k ohm
+disp(Ri,"The value of input impedance (Ri) in k ohm is : ")
+Ri= Ri*10^3;// in ohm
+Ro = (R_S+h_ie)/(1+h_fe);// in ohm
+disp(Ro,"The value of output impedance (Ro) in ohm is : ")
+R_desh_i = (R*Ri)/(R+Ri);// in ohm
+R_desh_i=R_desh_i*10^-3;// in k ohm
+disp(R_desh_i,"The value of R''i in k ohm is");
+// For load resistance of 10 k ohm
+R_L = 10;// in k ohm
+R_L = R_L * 10^3;// in ohm
+R_desh_o = (Ro*R_L)/(Ro+R_L);// in ohm
+disp(R_desh_o,"The value of R''o for load resistance of 10 k ohm in ohm is");
+// For load resistance of 220 ohm
+R_L = 220;// in ohm
+R_desh_o = (Ro*R_L)/(Ro+R_L);// in ohm
+disp(R_desh_o,"The value of R''o for load resistance of 220 ohm in ohm is");
+
+// Note: There is a calculation mistake to evaluate the value of R_desh_i (R'i)
|