From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 61/CH9/EX9.1/ex9_1.sce | 35 +++++++++++++++++++++++++++++++++++
 61/CH9/EX9.2/ex9_2.sce | 11 +++++++++++
 61/CH9/EX9.3/ex9_3.sce |  7 +++++++
 61/CH9/EX9.4/ex9_4.sce |  7 +++++++
 61/CH9/EX9.5/ex9_5.sce | 15 +++++++++++++++
 61/CH9/EX9.6/ex9_6.sce | 25 +++++++++++++++++++++++++
 61/CH9/EX9.7/ex9_7.sce |  8 ++++++++
 61/CH9/EX9.8/ex9_8.sce |  7 +++++++
 8 files changed, 115 insertions(+)
 create mode 100755 61/CH9/EX9.1/ex9_1.sce
 create mode 100755 61/CH9/EX9.2/ex9_2.sce
 create mode 100755 61/CH9/EX9.3/ex9_3.sce
 create mode 100755 61/CH9/EX9.4/ex9_4.sce
 create mode 100755 61/CH9/EX9.5/ex9_5.sce
 create mode 100755 61/CH9/EX9.6/ex9_6.sce
 create mode 100755 61/CH9/EX9.7/ex9_7.sce
 create mode 100755 61/CH9/EX9.8/ex9_8.sce

(limited to '61/CH9')

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
-- 
cgit