diff options
Diffstat (limited to '61/CH9')
-rwxr-xr-x | 61/CH9/EX9.1/ex9_1.sce | 35 | ||||
-rwxr-xr-x | 61/CH9/EX9.2/ex9_2.sce | 11 | ||||
-rwxr-xr-x | 61/CH9/EX9.3/ex9_3.sce | 7 | ||||
-rwxr-xr-x | 61/CH9/EX9.4/ex9_4.sce | 7 | ||||
-rwxr-xr-x | 61/CH9/EX9.5/ex9_5.sce | 15 | ||||
-rwxr-xr-x | 61/CH9/EX9.6/ex9_6.sce | 25 | ||||
-rwxr-xr-x | 61/CH9/EX9.7/ex9_7.sce | 8 | ||||
-rwxr-xr-x | 61/CH9/EX9.8/ex9_8.sce | 7 |
8 files changed, 115 insertions, 0 deletions
diff --git a/61/CH9/EX9.1/ex9_1.sce b/61/CH9/EX9.1/ex9_1.sce new file mode 100755 index 000000000..d8c9df192 --- /dev/null +++ b/61/CH9/EX9.1/ex9_1.sce @@ -0,0 +1,35 @@ +//ex9.1
+V_CC=15;
+R_C=1*10^3;
+R_1=20*10^3;
+R_2=5.1*10^3;
+R_3=5.1*10^3;
+R_4=15*10^3;
+R_E_1=47;
+R_E_2=330;
+R_E_3=16;
+R_L=16; //SPEAKER IS THE LOAD;
+B_ac_Q1=200;
+B_ac_Q2=B_ac_Q1;
+B_ac_Q3=50;
+//R_c1=R_C||[R_3||R_4||B_acQ2*B_ac_Q3*(R_E_3||R_L)] is ac collector resistance
+R=(R_E_3*R_L)/(R_E_3+R_L);
+R=B_ac_Q2*B_ac_Q3*R;
+R=(R*R_4)/(R+R_4);
+R=(R*R_3)/(R+R_3);
+R_c1=(R*R_C)/(R_C+R); //ac collector resistance
+//V_B=((R_2||(B_acQ1*(R_E_1+R_E_2)))/(R_1+(R_2||B_acQ1*(R_E_1+R_E_2))))*V_CC;
+//This is the base voltage;
+//LET R=(R_2||(B_acQ1*(R_E_1+R_E_2)))
+R=(R_2*B_ac_Q1*(R_E_1+R_E_2))/(R_2+B_ac_Q1*(R_E_1+R_E_2));
+V_B=R*V_CC/(R_1+R);
+I_E=(V_B-0.7)/(R_E_1+R_E_2);
+r_e_Q1=25*10^-3/I_E;
+A_v1=(-1)*(R_c1)/(R_E_1+r_e_Q1); //voltage gain of 1st stage
+//total input resistance of 1st stage is R_in_tot_1=R_1||R_2||B_ac_Q1*(R_E_1+r_e_Q1);
+R_in_tot_1=(R_1*(R_2*B_ac_Q1*(R_E_1+r_e_Q1)/(R_2+B_ac_Q1*(R_E_1+r_e_Q1))))/(R_1+(R_2*B_ac_Q1*(R_E_1+r_e_Q1)/(R_2+B_ac_Q1*(R_E_1+r_e_Q1))));
+A_v2=1; //gain of darlington voltage-follower
+A_v_tot=A_v1*A_v2; //total gain
+A_p=(A_v_tot^2)*(R_in_tot_1/R_L); //power gain
+disp(A_v_tot,'Voltage gain')
+disp(A_p,'Power gain')
\ No newline at end of file diff --git a/61/CH9/EX9.2/ex9_2.sce b/61/CH9/EX9.2/ex9_2.sce new file mode 100755 index 000000000..f85b98f2d --- /dev/null +++ b/61/CH9/EX9.2/ex9_2.sce @@ -0,0 +1,11 @@ +//ex9.2
+V_in=176*10^-3;
+R_in=2.9*10^3; //total input resistance from previous question
+A_p=42429; //power gain from previous question
+V_CC=15;
+I_CC=0.6; //emitter current
+P_in=V_in^2/R_in;
+P_out=P_in*A_p;
+P_DC=I_CC*V_CC;
+eff=P_out/P_DC;
+disp(eff,'efficiency')
\ No newline at end of file diff --git a/61/CH9/EX9.3/ex9_3.sce b/61/CH9/EX9.3/ex9_3.sce new file mode 100755 index 000000000..0142433e5 --- /dev/null +++ b/61/CH9/EX9.3/ex9_3.sce @@ -0,0 +1,7 @@ +//ex9.3
+V_CC=20;
+R_L=16;
+V_out_peak=V_CC;
+I_out_peak=V_CC/R_L;
+disp(V_out_peak,'ideal maximum peak output voltage in volts')
+disp(I_out_peak,'ideal maximum current in amperes')
\ No newline at end of file diff --git a/61/CH9/EX9.4/ex9_4.sce b/61/CH9/EX9.4/ex9_4.sce new file mode 100755 index 000000000..ea6b8ace3 --- /dev/null +++ b/61/CH9/EX9.4/ex9_4.sce @@ -0,0 +1,7 @@ +//ex9.4
+V_CC=20;
+R_L=16;
+V_out_peak=V_CC/2;
+I_out_peak=V_out_peak/R_L;
+disp(V_out_peak,'ideal maximum output peak voltage in volts')
+disp(I_out_peak,'ideal maximum current in amperes')
\ No newline at end of file diff --git a/61/CH9/EX9.5/ex9_5.sce b/61/CH9/EX9.5/ex9_5.sce new file mode 100755 index 000000000..6cc985552 --- /dev/null +++ b/61/CH9/EX9.5/ex9_5.sce @@ -0,0 +1,15 @@ +//ex9.5
+V_CC=20;
+R_L=8;
+B_ac=50;
+r_e=6;
+V_out_peak=V_CC/2;
+V_CEQ=V_out_peak;
+I_out_peak=V_CEQ/R_L;
+I_c_sat=I_out_peak;
+P_out=0.25*I_c_sat*V_CC;
+P_DC=(I_c_sat*V_CC)/%pi;
+R_in=B_ac*(r_e+R_L);
+disp(P_out,'maximum ac output power in Watts');
+disp(P_DC,'maximum DC output power in Watts');
+disp(R_in,'input resistance in ohms');
\ No newline at end of file diff --git a/61/CH9/EX9.6/ex9_6.sce b/61/CH9/EX9.6/ex9_6.sce new file mode 100755 index 000000000..7e31204e1 --- /dev/null +++ b/61/CH9/EX9.6/ex9_6.sce @@ -0,0 +1,25 @@ +//ex9.6
+V_DD=24;
+V_in=100*10^-3;
+R1=440;
+R2=5.1*10^3;
+R3=100*10^3;
+R4=10^3;
+R5=100;
+R7=15*10^3;
+R_L=33;
+V_TH_Q1=2;
+V_TH_Q2=-2;
+I_R1=(V_DD-(-V_DD))/(R1+R2+R3);
+V_B=V_DD-I_R1*(R1+R2); //BASE VOLTAGE
+V_E=V_B+0.7; //EMITTER VOLTAGE
+I_E=(V_DD-V_E)/(R4+R5); //EMITTER CURRENT
+V_R6=V_TH_Q1-V_TH_Q2; //VOLTAGE DROP ACROSS R6
+I_R6=I_E;
+R6=V_R6/I_R6;
+r_e=25*10^-3/I_E; //UNBYPASSED EMITTER RESISTANCE
+A_v=R7/(R5+r_e); //VOLTAGE GAIN
+V_out=A_v*V_in;
+P_L=V_out^2/R_L;
+disp(R6,'value of resistance R6 in ohms fot AB operation')
+disp(P_L,'power across load in watts')
\ No newline at end of file diff --git a/61/CH9/EX9.7/ex9_7.sce b/61/CH9/EX9.7/ex9_7.sce new file mode 100755 index 000000000..32d197d01 --- /dev/null +++ b/61/CH9/EX9.7/ex9_7.sce @@ -0,0 +1,8 @@ +//ex9.7
+f=200*10^3; //frequency in hertz
+I_c_sat=100*10^-3;
+V_ce_sat=0.2;
+t_on=1*10^-6;
+T=1/f; //time period of signal
+P_D_avg=(t_on/T)*I_c_sat*V_ce_sat;
+disp(P_D_avg,'average power dissipation in Watts')
\ No newline at end of file diff --git a/61/CH9/EX9.8/ex9_8.sce b/61/CH9/EX9.8/ex9_8.sce new file mode 100755 index 000000000..c01a44154 --- /dev/null +++ b/61/CH9/EX9.8/ex9_8.sce @@ -0,0 +1,7 @@ +//ex9.8
+P_D_avg=4*10^-3; //from previous question
+V_CC=24;
+R_c=100;
+P_out=(0.5*V_CC^2)/R_c;
+n=(P_out)/(P_out+P_D_avg); //n is efficiency
+disp(n,'efficiency')
\ No newline at end of file |