summaryrefslogtreecommitdiff
path: root/1658/CH18
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1658/CH18
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1658/CH18')
-rwxr-xr-x1658/CH18/EX18.1/Ex18_1.pngbin0 -> 90843 bytes
-rwxr-xr-x1658/CH18/EX18.1/Ex18_1.sce18
-rwxr-xr-x1658/CH18/EX18.10/Ex18_10.sce16
-rwxr-xr-x1658/CH18/EX18.11/Ex18_11.sce15
-rwxr-xr-x1658/CH18/EX18.12/Ex18_12.sce18
-rwxr-xr-x1658/CH18/EX18.13/Ex18_13.sce24
-rwxr-xr-x1658/CH18/EX18.14/Ex18_14.sce12
-rwxr-xr-x1658/CH18/EX18.15/Ex18_15.sce15
-rwxr-xr-x1658/CH18/EX18.16/Ex18_16.sce20
-rwxr-xr-x1658/CH18/EX18.17/Ex18_17.sce24
-rwxr-xr-x1658/CH18/EX18.18/Ex18_18.sce17
-rwxr-xr-x1658/CH18/EX18.19/Ex18_19.sce17
-rwxr-xr-x1658/CH18/EX18.2/18_2.pngbin0 -> 48288 bytes
-rwxr-xr-x1658/CH18/EX18.2/Ex18_2.sce25
-rwxr-xr-x1658/CH18/EX18.20/Ex18_20.sce13
-rwxr-xr-x1658/CH18/EX18.21/Ex18_21.sce16
-rwxr-xr-x1658/CH18/EX18.24/Ex18_24.sce16
-rwxr-xr-x1658/CH18/EX18.25/Ex18_25.sce16
-rwxr-xr-x1658/CH18/EX18.26/Ex18_26.sce32
-rwxr-xr-x1658/CH18/EX18.27/Ex18_27.sce20
-rwxr-xr-x1658/CH18/EX18.28/Ex18_28.sce21
-rwxr-xr-x1658/CH18/EX18.3/Ex18_3.sce13
-rwxr-xr-x1658/CH18/EX18.4/Ex18_4.sce16
-rwxr-xr-x1658/CH18/EX18.5/Ex18_5.sce14
-rwxr-xr-x1658/CH18/EX18.6/EX18_6.pngbin0 -> 119682 bytes
-rwxr-xr-x1658/CH18/EX18.6/Ex18_6.sce21
-rwxr-xr-x1658/CH18/EX18.7/Ex18_7.pngbin0 -> 121104 bytes
-rwxr-xr-x1658/CH18/EX18.7/Ex18_7.sce22
-rwxr-xr-x1658/CH18/EX18.9/Ex18_9.sce16
29 files changed, 457 insertions, 0 deletions
diff --git a/1658/CH18/EX18.1/Ex18_1.png b/1658/CH18/EX18.1/Ex18_1.png
new file mode 100755
index 000000000..a15557df7
--- /dev/null
+++ b/1658/CH18/EX18.1/Ex18_1.png
Binary files differ
diff --git a/1658/CH18/EX18.1/Ex18_1.sce b/1658/CH18/EX18.1/Ex18_1.sce
new file mode 100755
index 000000000..365f1a201
--- /dev/null
+++ b/1658/CH18/EX18.1/Ex18_1.sce
@@ -0,0 +1,18 @@
+
+clc;
+//e.g 18.1
+Vbb=10;
+Rb=47*10**3;
+Vcc=20;
+Rc=10*10**3;
+B=100;
+Ic=Vcc/Rc;//saturation current
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc;//cut-off voltage
+disp('V',Vce*1,"Vce=");
+i=2:-0.1:0;
+plot2d(i);
+a=gca() //get the current axes
+a.box="off";
+xlabel("VCE");
+ylabel( "IC");
diff --git a/1658/CH18/EX18.10/Ex18_10.sce b/1658/CH18/EX18.10/Ex18_10.sce
new file mode 100755
index 000000000..28ac21cab
--- /dev/null
+++ b/1658/CH18/EX18.10/Ex18_10.sce
@@ -0,0 +1,16 @@
+
+clc;
+//e.g 18.10
+Vbe=0.7;
+Rb=100*10**3;
+Vcc=10;
+Rc=10*10**3;
+beta=100;
+Ic=(Vcc-Vbe)/(Rc+(Rb/beta));//collector current
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc-(Ic*Rc);//collector to emitter voltage
+disp('V',Vce*1,"Vce=");
+Ic=Vcc/Rc;
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc;
+disp('V',Vce*1,"Vce=");
diff --git a/1658/CH18/EX18.11/Ex18_11.sce b/1658/CH18/EX18.11/Ex18_11.sce
new file mode 100755
index 000000000..3701c9ad4
--- /dev/null
+++ b/1658/CH18/EX18.11/Ex18_11.sce
@@ -0,0 +1,15 @@
+
+
+clc;
+//e.g 18.11
+Rb=100*10**3;
+Vcc=10;
+Rc=2*10**3;
+beta1=50;
+Vbe=0.7;
+Ib=(Vcc-Vbe)/(Rb+(beta1*Rc));
+disp('mA',Ib*10**3,"Ib=");
+Ic=beta1*Ib;
+disp('mA',Ic*10**3,"Ic=");
+Ie=Ic;
+disp('mA',Ie*10**3,"Ie=");
diff --git a/1658/CH18/EX18.12/Ex18_12.sce b/1658/CH18/EX18.12/Ex18_12.sce
new file mode 100755
index 000000000..81f981e4e
--- /dev/null
+++ b/1658/CH18/EX18.12/Ex18_12.sce
@@ -0,0 +1,18 @@
+
+clc;
+//e.g 18.12
+VCC=9;
+RB=220*10**3;
+RC=3.3*10**3;
+VBE=0.3;
+B=100;
+//if vc=0
+IB=(VCC-VBE)/(RB+(B*RC));
+disp('microA',IB*10**6,"IB=");
+IC=B*IB;
+disp('microA',IC*10**6,"IC=");//CORRECTION IN BOOK
+//if VC=9
+VC=9;
+IC=B*IB;
+disp('mA',IC*10**3,"IC=");
+//IC*RC=0,which means collector resistance is short circuited
diff --git a/1658/CH18/EX18.13/Ex18_13.sce b/1658/CH18/EX18.13/Ex18_13.sce
new file mode 100755
index 000000000..770d8422c
--- /dev/null
+++ b/1658/CH18/EX18.13/Ex18_13.sce
@@ -0,0 +1,24 @@
+
+clc;
+//e.g 18.13
+Vcc=12;
+Rc=3.3*10**3;
+Re=100;
+Ie=2*10**-3;
+Vbe=0.7;
+alpha=0.98;
+Ic=alpha*Ie;
+disp('mA',Ic*10**3,"Ic=");
+Vb=Vbe+(Ie*Re);
+disp('V',Vb*1,"Vb=");
+Vc=Vcc-(Ic*Rc);//collector to emitter voltage
+disp('V',Vc*1,"Vc=");
+R2=20*10**3;
+IR2=Vc/R2;
+disp('mA',IR2*10**3,"IR2=");
+Ib=Ie-Ic;
+disp('mA',Ib*10**3,"Ib=");
+IR1=IR2+Ib;
+disp('mA',IR1*10**3,"IR1=");
+R1=(Vc-Vb)/IR1;
+disp('kohm',R1*10**-3,"R1=");
diff --git a/1658/CH18/EX18.14/Ex18_14.sce b/1658/CH18/EX18.14/Ex18_14.sce
new file mode 100755
index 000000000..56cfb5b7d
--- /dev/null
+++ b/1658/CH18/EX18.14/Ex18_14.sce
@@ -0,0 +1,12 @@
+clc;
+VCC=24;
+RC=10*10**3;
+RE=270;
+VBE=0.7;
+B=45;
+VCE=5;
+IC=(VCC-VCE)/RC;
+disp('mA',IC*10**3,"IC=");
+RB=(2.6*10^3)*B;
+disp('kohm',RB*10**-3,"RB=")
+
diff --git a/1658/CH18/EX18.15/Ex18_15.sce b/1658/CH18/EX18.15/Ex18_15.sce
new file mode 100755
index 000000000..31895ff74
--- /dev/null
+++ b/1658/CH18/EX18.15/Ex18_15.sce
@@ -0,0 +1,15 @@
+
+clc;
+//e.g 18.15
+Rb=33*10**3;
+Vcc=3;
+Rc=1.8*10**3;
+beta=90;
+Vbe=0.7;
+Ib=(Vcc-Vbe)/(Rb+(Rc*beta));//collector current
+disp('mA',Ib*10**3,"Ib=");
+Ic=beta*Ib;
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc-(Ic*Rc);//collector to emitter voltage
+disp('V',Vce*1,"Vce=");
+S=(1+beta)/(1+beta*(Rc/(Rc+Rb)))//stability factor
diff --git a/1658/CH18/EX18.16/Ex18_16.sce b/1658/CH18/EX18.16/Ex18_16.sce
new file mode 100755
index 000000000..6fed67376
--- /dev/null
+++ b/1658/CH18/EX18.16/Ex18_16.sce
@@ -0,0 +1,20 @@
+
+clc;
+//e.g 18.16
+Vbe=0.7;
+Vcc=10;
+Rc=1*10**3;
+beta=100;
+R1=10*10**3;
+R2=5*10**3;
+Re=500;
+Vb=Vcc*(R2/(R1+R2));
+disp('V',Vb*1,"Vb=");
+Ve=Vb-Vbe;
+disp('V',Ve*1,"Ve=");
+Ie=Ve/Re;
+disp('mA',Ie*10**3,"Ie=");
+Ic=Ie;
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc-(Rc+Re);
+disp('V',Ve*1,"Ve=");
diff --git a/1658/CH18/EX18.17/Ex18_17.sce b/1658/CH18/EX18.17/Ex18_17.sce
new file mode 100755
index 000000000..7a8118ae1
--- /dev/null
+++ b/1658/CH18/EX18.17/Ex18_17.sce
@@ -0,0 +1,24 @@
+
+clc;
+//e.g 18.17
+Vcc=9;
+Rc=1*10**3;
+Re=680;
+beta=100;
+R1=33*10**3;
+R2=15*10**3;
+Vb=Vcc*(R2/(R1+R2));
+disp('V',Vb*1,"Vb=");
+Vbe=0.7;
+Ve=Vb-Vbe;
+disp('V',Ve*1,"Ve=");
+Ie=Ve/Re;
+disp('mA',Ie*10**3,"Ie=");
+Ic=Ie;
+disp('mA',Ic*10**3,"Ic=");
+VRc=Ic*Rc;
+disp('V',VRc*1,"VRc=");
+Vc=Vcc-VRc;
+disp('V',Vc*1,"Vc=");
+Vce=Vc-Ve;
+disp('V',Vce*1,"Vce=");
diff --git a/1658/CH18/EX18.18/Ex18_18.sce b/1658/CH18/EX18.18/Ex18_18.sce
new file mode 100755
index 000000000..7eb7204e2
--- /dev/null
+++ b/1658/CH18/EX18.18/Ex18_18.sce
@@ -0,0 +1,17 @@
+
+clc;
+VCC=5;
+RE=0.3*10**3;
+IC=1*10**-3;
+VCE=2.5;
+B=100;
+VBE=0.7;
+ICO=0;
+R2=10*10**3;
+IE=IC;
+RC=((VCC-VCE)/IC)-RE;
+disp('ohm',RC*1,"RC=");
+VE=IE*RE;
+VB=VE+VBE;
+R1=VCC*R2-R2;
+disp('Kohm',R1*10**-3,"R1=");
diff --git a/1658/CH18/EX18.19/Ex18_19.sce b/1658/CH18/EX18.19/Ex18_19.sce
new file mode 100755
index 000000000..514d52fea
--- /dev/null
+++ b/1658/CH18/EX18.19/Ex18_19.sce
@@ -0,0 +1,17 @@
+
+clc;
+Vcc=20;
+RC=1*10**3;
+RE=5*10**3;
+R1=10*10**3;
+R2=10*10**3;
+B=462;
+VBE=0.7;
+VB=Vcc*R2/(R1+R2);
+disp('V',VB*1,"VB=");
+VE=VB-VBE;
+IE=VE/RE;
+disp('mA',IE*10**3,"IE=");
+IC=IE;
+VCE=Vcc-IC*RC;
+disp('V',VCE*1,"VCE=");
diff --git a/1658/CH18/EX18.2/18_2.png b/1658/CH18/EX18.2/18_2.png
new file mode 100755
index 000000000..6ced12a56
--- /dev/null
+++ b/1658/CH18/EX18.2/18_2.png
Binary files differ
diff --git a/1658/CH18/EX18.2/Ex18_2.sce b/1658/CH18/EX18.2/Ex18_2.sce
new file mode 100755
index 000000000..903e8eff3
--- /dev/null
+++ b/1658/CH18/EX18.2/Ex18_2.sce
@@ -0,0 +1,25 @@
+
+clc;
+//e.g 18.2
+Vbb=10;
+Rb=50*10**3;
+Vcc=20;
+Rc=300;
+beta=200;
+Ic=Vcc/Rc;//saturation current
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc;//cut-off voltage
+disp('V',Vce*1,"Vce=");
+Ib=(Vbb-0.7)/Rb;
+ disp('10^-3A',Ib*10**3,"Ib=");
+ Ic=beta*Ib;
+ disp('10^-3A',Ic*10**3,"Ic=");
+Vce=Vcc-Ic*Rc;
+disp('V',Vce*1,"Vce=");
+i=21:-0.1:0;
+plot2d(i);
+a=gca() //get the current axes
+a.box="off";
+xlabel("VCE");
+ylabel( "IC");
+
diff --git a/1658/CH18/EX18.20/Ex18_20.sce b/1658/CH18/EX18.20/Ex18_20.sce
new file mode 100755
index 000000000..7576316d7
--- /dev/null
+++ b/1658/CH18/EX18.20/Ex18_20.sce
@@ -0,0 +1,13 @@
+
+clc;
+VCC=8;
+VRC=0.5;
+RC=800;
+a=0.96;
+VCE=VCC-VRC;//VRC=IC*RC
+IC=VRC/RC;
+disp('mA',IC*10**3,"IC=");
+IE=IC/a;
+disp('mA',IE*10**3,"IE=");
+IB=IE-IC;
+disp('microA',IB*10**6,"IB=");
diff --git a/1658/CH18/EX18.21/Ex18_21.sce b/1658/CH18/EX18.21/Ex18_21.sce
new file mode 100755
index 000000000..80053651c
--- /dev/null
+++ b/1658/CH18/EX18.21/Ex18_21.sce
@@ -0,0 +1,16 @@
+
+clc;
+VCC=12;
+RC=1*10**3;
+RE=100;
+R1=25*10**3;
+R2=5*10**3;
+B=50;
+VBE=0.6;
+VTH=VCC*R2/(R1+R2);
+RTH=R1*R2/(R1+R2);
+IE50=(VTH-VBE)/(RE+RTH/B);
+B=150;
+IE150=(VTH-VBE)/(RE+RTH/B);
+ICdiff=(IE150-IE50)/IE50;
+disp('%',ICdiff*100,"ICdiff=")
diff --git a/1658/CH18/EX18.24/Ex18_24.sce b/1658/CH18/EX18.24/Ex18_24.sce
new file mode 100755
index 000000000..162dd4703
--- /dev/null
+++ b/1658/CH18/EX18.24/Ex18_24.sce
@@ -0,0 +1,16 @@
+clc;
+B=50;
+VBE=0.7;
+VCC=22.5;
+RC=5.6*10**3;
+VCE=12;
+IC=1.5*10**-3;
+S=3;
+RE=(VCC-IC*RC-VCE)/IC;
+disp('kohm',RE*10^-3,"RE=");
+RTH=(4375)-RE;
+disp('kohm',RTH*10^-3,"RTH=");
+R2=0.1*B*RE;
+disp('kohm',R2*10^-3,"R2=");
+R1=(-RTH*R2)/(RTH-R2);
+disp('kohm',R1*10^-3,"R1=");
diff --git a/1658/CH18/EX18.25/Ex18_25.sce b/1658/CH18/EX18.25/Ex18_25.sce
new file mode 100755
index 000000000..c59541b59
--- /dev/null
+++ b/1658/CH18/EX18.25/Ex18_25.sce
@@ -0,0 +1,16 @@
+
+clc;
+VCC=10;
+VEE=10;
+RC=1*10**3;
+RE=5*10**3;
+RB=50*10**3;
+VBE=0.7;
+VE=-VBE;
+IE=(VEE-VBE)/RE;
+disp('mA',IE*10**3,"IE=");
+IC=IE;
+disp('mA',IC*10**3,"IC=");
+VC=VCC-IC*RC;
+VCE=VC-VE;
+disp('volts',VCE*1,"VCE=");
diff --git a/1658/CH18/EX18.26/Ex18_26.sce b/1658/CH18/EX18.26/Ex18_26.sce
new file mode 100755
index 000000000..22a335b53
--- /dev/null
+++ b/1658/CH18/EX18.26/Ex18_26.sce
@@ -0,0 +1,32 @@
+clc;
+VCC=20;
+VEE=20;
+RC=5*10**3;
+RE=10*10**3;
+RB=10*10**3;
+B1=50;
+B2=100;
+VBE1=0.7;
+VBE2=0.6;
+IE1=(VEE-VBE1)/(RE+RB/B1);
+disp('mA',IE1*10**3,"IE1=");
+IC1=IE1;
+VC1=VCC-IC1*RC;
+disp('V',VC1,"VC1=");
+VE=-VBE1;
+VCE1=VC1-VE;
+disp('V',VCE1,"VCE1=");
+IE2=(VEE-VBE2)/(RE+RB/B2);
+disp('mA',IE2*10**3,"IE2=");
+IC2=IE2;
+VC2=VCC-IC2*RC;
+disp('V',VC2,"VC2=");
+VE=-VBE2;
+VCE2=VC-VE;
+disp('V',VCE2,"VCE2=");
+delIc=(IC2-IC1)/IC1;
+disp('%',delIc*100,"delIc=");
+delVCE=(VCE1-VCE2)/VCE2;
+disp('%',delVCE*100,"delVCE=");
+
+
diff --git a/1658/CH18/EX18.27/Ex18_27.sce b/1658/CH18/EX18.27/Ex18_27.sce
new file mode 100755
index 000000000..c58e6d5d5
--- /dev/null
+++ b/1658/CH18/EX18.27/Ex18_27.sce
@@ -0,0 +1,20 @@
+
+clc;
+VCC=12;
+RC=2*10**3;
+RE=1*10**3;
+R1=100*10**3;
+R2=20*10**3;
+B=100;
+VBE=-0.2;
+VB=-VCC*R2/(R1+R2);
+disp('V',VB*1,"VB=");
+VE=VB-VBE;
+disp('V',VE*1,"VE=");
+IE=-VE/RE;
+IC=IE;
+disp('mA',IC*10**3,"IC=");
+VC=-(VCC-IC*RC);
+disp('V',VC*1,"VC=");
+VCE=VC-(VE);
+disp('V',VCE*1,"VCE=");
diff --git a/1658/CH18/EX18.28/Ex18_28.sce b/1658/CH18/EX18.28/Ex18_28.sce
new file mode 100755
index 000000000..a65caf73f
--- /dev/null
+++ b/1658/CH18/EX18.28/Ex18_28.sce
@@ -0,0 +1,21 @@
+clc;
+VCC=4.5;
+RC=1.5*10**3;
+RE=0.27*10**3;
+R2=2.7*10**3;
+R1=27*10**3;
+B=44;
+VBE=-0.3;
+VB=-VCC*R2/(R1+R2);
+disp('V',VB*1,"VB=");
+VE=VB-VBE;
+disp('V',VE*1,"VE=");
+IE=-VE/RE;
+IC=IE;
+disp('mA',IC*10**3,"IC=");
+VRC=IC*RC;
+disp('V',VRC*1,"VRC=");
+VC=-[VCC-VRC]
+disp('V',VC*1,"VC=");
+VCE=VC-(VE);
+disp('V',VCE*1,"VCE=");
diff --git a/1658/CH18/EX18.3/Ex18_3.sce b/1658/CH18/EX18.3/Ex18_3.sce
new file mode 100755
index 000000000..8362a7afb
--- /dev/null
+++ b/1658/CH18/EX18.3/Ex18_3.sce
@@ -0,0 +1,13 @@
+
+clc;
+//e.g 18.3
+Rb=180*10**3;
+Vcc=25;
+Rc=820;
+beta=80;
+Ib=Vcc/Rb;//saturation current
+disp('mA',Ib*10**3,"Ib=");
+Ic=beta*Ib;
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc-(Ic*Rc);//cut-off voltage
+disp('V',Vce*1,"Vce=");
diff --git a/1658/CH18/EX18.4/Ex18_4.sce b/1658/CH18/EX18.4/Ex18_4.sce
new file mode 100755
index 000000000..9c618b52c
--- /dev/null
+++ b/1658/CH18/EX18.4/Ex18_4.sce
@@ -0,0 +1,16 @@
+
+clc;
+//e.g 18.4;
+Vcc=12;
+Rc=330;
+Ib=0.3*10**-3;
+beta=100;
+//Ib=Vcc/Rb;//saturation current
+Rb=Vcc/Ib;
+disp('Kohm',Rb*10**-3,"Rb=");
+S=1+beta;
+disp(S);
+Ic=beta*Ib;
+disp('10^-3A',Ic*10**3,"Ic=");
+Vce=Vcc-(Ic*Rc);//cut-off voltage
+disp('V',Vce*1,"Vce=");
diff --git a/1658/CH18/EX18.5/Ex18_5.sce b/1658/CH18/EX18.5/Ex18_5.sce
new file mode 100755
index 000000000..41d17e7eb
--- /dev/null
+++ b/1658/CH18/EX18.5/Ex18_5.sce
@@ -0,0 +1,14 @@
+
+clc;
+//e.g 18.5
+Rb=400*10**3;
+Vcc=20;
+Rc=2*10**3;
+Re=1*10**3;
+beta=100;
+Ib=Vcc/(Rb+(beta*Re));//saturation current
+disp('mA',Ib*10**3,"Ib=");
+Ic=beta*Ib;
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc-(Ic*(Rc+Re));//cut-off voltage
+disp('V',Vce*1,"Vce=");
diff --git a/1658/CH18/EX18.6/EX18_6.png b/1658/CH18/EX18.6/EX18_6.png
new file mode 100755
index 000000000..39cb8a41c
--- /dev/null
+++ b/1658/CH18/EX18.6/EX18_6.png
Binary files differ
diff --git a/1658/CH18/EX18.6/Ex18_6.sce b/1658/CH18/EX18.6/Ex18_6.sce
new file mode 100755
index 000000000..8c92781e3
--- /dev/null
+++ b/1658/CH18/EX18.6/Ex18_6.sce
@@ -0,0 +1,21 @@
+clc;
+//e.g 18.1
+Vcc=12;
+Rc=2.2*10**3;
+Rb=240;
+B=50;
+Vbe=0.7;
+RE=0;
+Ic=(Vcc-Vbe)/(RE+(Rb/B));//collector current
+disp('mA',Ic,"Ic=");
+Vce=Vcc-(Ic*10**-3)*Rc;//CE voltage
+disp('V',Vce*1,"Vce=");
+Icsat=Vcc/Rc;
+disp('mA',Icsat*10**3,"Icsat=");
+Vcec=Vcc;//cutoff voltage
+i=5.45:-0.5:0;
+plot(i);
+a=gca() //get the current axes
+a.box="off";
+xlabel("VCE");
+ylabel( "IC");
diff --git a/1658/CH18/EX18.7/Ex18_7.png b/1658/CH18/EX18.7/Ex18_7.png
new file mode 100755
index 000000000..0db4a1eef
--- /dev/null
+++ b/1658/CH18/EX18.7/Ex18_7.png
Binary files differ
diff --git a/1658/CH18/EX18.7/Ex18_7.sce b/1658/CH18/EX18.7/Ex18_7.sce
new file mode 100755
index 000000000..579f116c0
--- /dev/null
+++ b/1658/CH18/EX18.7/Ex18_7.sce
@@ -0,0 +1,22 @@
+clc;
+//e.g 18.7
+Vcc=30;
+Rb=1.5*10**6;
+Rc=5*10**3;
+beta=100;
+Ic=Vcc/Rc;//saturation current
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc;//cut-off voltage
+disp('V',Vce*1,"Vce=");
+Ib=Vcc/Rb;//base current
+disp('microA',Ib*10**6,"Ib=");
+ Ic=beta*Ib;
+ disp('mA',Ic*10**3,"Ic=");
+ Vce=Vcc-Ic*Rc;
+ disp('V',Vce*1,"Vce=");
+i=6:-0.2:0;
+plot2d(i);
+a=gca() //get the current axes
+a.box="off";
+xlabel("VCE");
+ylabel( "IC");
diff --git a/1658/CH18/EX18.9/Ex18_9.sce b/1658/CH18/EX18.9/Ex18_9.sce
new file mode 100755
index 000000000..dbdea9bd0
--- /dev/null
+++ b/1658/CH18/EX18.9/Ex18_9.sce
@@ -0,0 +1,16 @@
+
+
+clc;
+//e.g 18.9
+Rb=180*10**3;
+Vcc=25;
+Rc=820;
+Re=200;
+beta=80;
+Vbe=0.7;
+Ic=(Vcc-Vbe)/(Re+(Rb/beta));//collector current
+disp('mA',Ic*10**3,"Ic=");
+Vce=Vcc-(Ic*Rc);//collector to emitter voltage
+disp('V',Vce*1,"Vce=");
+S=(1+beta)/(1+beta*(Re/(Re+Rb)));
+disp(S,"S=");//stability factor