1 files changed, 34 insertions, 0 deletions
diff --git a/147/CH8/EX8.17/Example8_17.sce b/147/CH8/EX8.17/Example8_17.sce
new file mode 100644
index 000000000..80cbaf7ad
--- /dev/null
+++ b/147/CH8/EX8.17/Example8_17.sce
@@ -0,0 +1,34 @@
+close();
+clear;
+clc;
+Re = 200; //ohm
+R1 = 1000; //ohm
+R2 = 10*R1; //ohm
+Rc = 2000; //ohm
+Rl = Rc;
+Vbeq = 0.7; //V
+B = 100;
+Vcc = 15; //V
+//(a)
+Rb = (R1*R2)/(R1+R2); //ohm
+Vbb = R1*Vcc/(R1+R2); //V
+Icq = (Vbb-Vbeq)/(Rb/(B+1) + Re); //A
+mprintf("(a) Icq = %0.3f mA\n\n",Icq*1000);
+//(b)
+//KVL around collector circuit with Icq = Ieq
+Vceq = Vcc - Icq*(Re+Rc); //V
+mprintf("(b) Vceq = %0.2f V\n\n",Vceq);
+
+//(c)
+slope1 = 1/Rc + 1/Rl; //S
+Rac = 1/slope1;
+mprintf("(c) slope of ac load line, slope1 = %d mS\n\n",slope1*1000);
+
+//(d)
+slope2 = 1/(Rc+Re); //S
+Rdc = 1/slope2;
+mprintf("(d) slope of dc load line, slope2 = %0.3f mS\n\n",slope2*1000);
+Vcemax = Vceq + Icq*Rac;
+Ilm = (Vcemax-Vceq)/Rl; //A
+mprintf("(e) peak value of undistorted il, Ilm = %0.3f mA",Ilm*1000);
+