summaryrefslogtreecommitdiff
path: root/506/CH9
diff options
context:
space:
mode:
Diffstat (limited to '506/CH9')
-rwxr-xr-x506/CH9/EX9.1/Example9_1.sce37
-rwxr-xr-x506/CH9/EX9.2/Example9_2.sce38
-rwxr-xr-x506/CH9/EX9.3.a/Example9_3a.sce47
-rwxr-xr-x506/CH9/EX9.3.b/Example9_3b.sce62
-rwxr-xr-x506/CH9/EX9.4/Example9_4.sce57
-rwxr-xr-x506/CH9/EX9.5/Example9_5.sce23
-rwxr-xr-x506/CH9/EX9.6.a/Example9_6a.sce33
-rwxr-xr-x506/CH9/EX9.6.b/Example9_6b.sce31
8 files changed, 328 insertions, 0 deletions
diff --git a/506/CH9/EX9.1/Example9_1.sce b/506/CH9/EX9.1/Example9_1.sce
new file mode 100755
index 000000000..173921565
--- /dev/null
+++ b/506/CH9/EX9.1/Example9_1.sce
@@ -0,0 +1,37 @@
+clear;
+clc;
+
+//Caption:To find Q point
+//Given Data
+Vcc=22.5//in V
+Rc=5.6;//in K
+Re=1;//in K
+R2=10;//in K
+R1=90;//in K
+B=55;//beta
+
+
+V=(R2*Vcc)/(R2+R1);//Thevenin Equivallent Voltage
+Rb=(R2*R1)/(R2+R1);//Thevenin Equivallent Resistance
+disp('Volts',V,'The equivallent Vbb =');
+disp('ohm',Rb,'The equivallent Rb is');
+
+//For base current large compared to reverse saturation current ie Ib>>Ico it follows that Ic=B*Ib
+
+//Applying KVL to the base circuit
+//0.65-2.25+Ic+10*Ib=0
+disp('As B=55 we have Ic=55*Ib');
+
+//We have -1.60+Ic+(10/55)*Ic=0
+Ic=1.60/(65/55);
+Ib=Ic/55;
+disp('milli amp',Ic,'Ic=');
+disp('micro amp',Ib,'Ib=');
+
+//Applying KVL to the collector circuit yields
+//-22.5+6.6*Ic+Ib+Vce
+
+Vce = 22.5-(6.6*1.36)-0.025;
+disp('Volts',Vce,'Vce=');
+
+//end \ No newline at end of file
diff --git a/506/CH9/EX9.2/Example9_2.sce b/506/CH9/EX9.2/Example9_2.sce
new file mode 100755
index 000000000..fe980b575
--- /dev/null
+++ b/506/CH9/EX9.2/Example9_2.sce
@@ -0,0 +1,38 @@
+clear;
+clc;
+
+//Caption:To find resistances in 2N335 transistor
+//Given Data
+Rc=4;//in K
+Vcc=20;//in V
+Vce=10;//in V
+Ic=2;//in mA
+//Ic varies from 1.75 to 2.25 and B(beta) varies from 36 to 90
+
+Re = (Vcc-Vce)/Ic - Rc;
+
+//S=delta Ic/delta B
+Ic2=2.25;//in mA
+Ic1=1.75;//in mA
+B2=90;
+B1=36;
+S=(Ic2-Ic1)/(B2-B1);
+S2=(S*36*(1+90))/1.75;
+disp(S2,'S2=','K',Re,'Re=','B2=90');
+
+//S2=(1+B)*(1+(Rb/Re))/(1+B+(Rb/Re))
+Rb=(S2-1)*(1+B2)*Re/(1+B2-S2);
+disp('K',Rb,'Rb=');
+
+Vbe=0.65;//in V
+disp('V',Vbe,'We know that Vbe = ');
+
+V = Vbe + ((Rb+Re*(1+B1))*Ic1/B1);
+disp('Volts',V,'V = ');
+
+R1=Rb*Vcc/V;
+R2=R1*V/(Vcc-V);
+disp('K',R1,'R1=');
+disp('K',R2,'R2=');
+
+//end \ No newline at end of file
diff --git a/506/CH9/EX9.3.a/Example9_3a.sce b/506/CH9/EX9.3.a/Example9_3a.sce
new file mode 100755
index 000000000..8d304cc5e
--- /dev/null
+++ b/506/CH9/EX9.3.a/Example9_3a.sce
@@ -0,0 +1,47 @@
+clear;
+clc;
+
+//Caption:Variation of Ic in given Transistor
+//Given Data at 25degree C
+Re=4.7;//in K
+Rb=7.75;//in K
+B1=55;//beta at 25degree C
+Ic1=1.5;//in mA
+Ico1=1;
+Vbe1=0.6;//in V
+
+//Part a
+
+Ico2=33000;//in nA
+Vbe2=0.225;//in V
+M1=1/(1+(Rb/(Re*B1)));//Stability Factor
+disp(M1,'Stabitity Factor at 25deree C=');
+B2=100;//at 175degree C
+M2=1/(1+(Rb/(Re*B2)));//Stability Factor
+disp(M2,'Stabitity Factor at 175degree C=');
+
+if(M2>M1)
+ M1=1;
+ M2=1;
+end
+
+//Let k = (delta Ic)/(Ic1)
+k=(1+(Rb/Re))*(M1*(Ico2-Ico1)*(10^-9)/Ic1*(10^-3))-(M1*(Vbe2-Vbe1)/(Ic1*Re))+(1+(Rb/Re))*(M2*(B2-B1)/(B2*B1));
+deltaIc=k*Ic1;
+disp('mA',deltaIc,'Change in Collector Current at 175degree C is =');
+
+//Given Data at -65degree C
+ Ico2=1.95*(10^-3);
+ B2=25;
+ Vbe2=0.78;
+
+ M2=1/(1+(Rb/(Re*B2)));//Stability Factor
+ disp(M2,'Stabitity Factor at -65degree C=');
+
+//Let k = (delta Ic)/(Ic1)
+k=(1+(Rb/Re))*(M1*(Ico2-Ico1)*(10^-9)/Ic1*(10^-3))-(M1*(Vbe2-Vbe1)/(Ic1*Re))+(1+(Rb/Re))*(M2*(B2-B1)/(B2*B1));
+deltaIc=k*Ic1;
+disp('mA',deltaIc,'Change in Collector Current at -65degree C is =')
+
+
+//End \ No newline at end of file
diff --git a/506/CH9/EX9.3.b/Example9_3b.sce b/506/CH9/EX9.3.b/Example9_3b.sce
new file mode 100755
index 000000000..99d218d82
--- /dev/null
+++ b/506/CH9/EX9.3.b/Example9_3b.sce
@@ -0,0 +1,62 @@
+clear;
+clc;
+
+//Caption:Variation of Ic in given Transistor
+//Given Data at 25degree C
+Re=4.7;//in K
+Rb=7.75;//in K
+B1=55;//beta at 25degree C
+Ic1=1.5;//in mA
+Ico1=1;
+Vbe1=0.6;//in V
+
+//Part b
+
+Ico2=33000;//in nA
+Vbe2=0.225;//in V
+M1=1/(1+(Rb/(Re*B1)));//Stability Factor
+//Given Data at -65degree C
+ Ico2=1.95*(10^-3);
+ B2=25;
+ Vbe2=0.78;
+
+ M2=1/(1+(Rb/(Re*B2)));//Stability Factor
+
+//Let k = (delta Ic)/(Ic1)
+k=(1+(Rb/Re))*(M1*(Ico2-Ico1)*(10^-9)/Ic1*(10^-3))-(M1*(Vbe2-Vbe1)/(Ic1*Re))+(1+(Rb/Re))*(M2*(B2-B1)/(B2*B1));
+deltaIc=k*Ic1;
+
+
+//Given Data
+Ico2=32;//in nA
+Vbe2=0.10;//in V
+M1=1/(1+(Rb/(Re*B1)));//Stability Factor
+disp(M1,'Stabitity Factor at 25deree C=');
+B2=90;//at 175degree C
+M2=1/(1+(Rb/(Re*B2)));//Stability Factor
+disp(M2,'Stabitity Factor at 75degree C=');
+
+if(M2>M1)
+ M1=1;
+ M2=1;
+end
+
+//Let k = (delta Ic)/(Ic1)
+k=(1+(Rb/Re))*(M1*(Ico2-Ico1)*(10^-9)/Ic1*(10^-3))-(M1*(Vbe2-Vbe1)/(Ic1*Re))+(1+(Rb/Re))*(M2*(B2-B1)/(B2*B1));
+deltaIc=k*Ic1;
+disp('mA',deltaIc,'Change in Collector Current at 75degree C is =');
+
+//Given Data at -65degree C
+ Ico2=1.95*(10^-3);
+ B2=20;
+ Vbe2=0.38;
+
+ M2=1/(1+(Rb/(Re*B2)));//Stability Factor
+ disp(M2,'Stabitity Factor at -65degree C=');
+
+//Let k = (delta Ic)/(Ic1)
+k=(1+(Rb/Re))*(M1*(Ico2-Ico1)*(10^-9)/Ic1*(10^-3))-(M1*(Vbe2-Vbe1)/(Ic1*Re))+(1+(Rb/Re))*(M2*(B2-B1)/(B2*B1));
+deltaIc=k*Ic1;
+disp('mA',deltaIc,'Change in Collector Current at -65degree C is =');
+
+//End \ No newline at end of file
diff --git a/506/CH9/EX9.4/Example9_4.sce b/506/CH9/EX9.4/Example9_4.sce
new file mode 100755
index 000000000..51fbb4f13
--- /dev/null
+++ b/506/CH9/EX9.4/Example9_4.sce
@@ -0,0 +1,57 @@
+clear;
+clc;
+
+//Caption: To design a self bias circuit
+
+//Given Data at 25degree C
+B1=150;//beta
+Ico1=50;//in nA
+
+//Given Data at 65degree C
+B2=1200;//beta
+Ico2=3;//in micro A
+
+Vbe=0.65;//in mV
+Vcc=20;//in V
+M=1;
+//Assumption: Each factor Ico,B, and Vbe cuses the same percentge change(5%)
+
+//Let Rb/Re=k
+//(1+k)*((1200-150)/(1200*150))=0.05
+
+k=((0.05)*((1200*150)/(1200-150)))-1;
+disp(k,'Rb/Re=');
+//Let us check our assumption
+
+if(M>(1/(1+(k/B1))))
+ M=1;
+end
+
+//(1+(Rb/Re))*((Ico2-Ico1)/Ic1)=0.05 Since Ico2>>Ico1, we consider only Ico2
+
+Ic1=((1+k)*Ico2)/(0.05*1000);
+disp('mA',Ic1,'Ic1=');
+
+//Vbe changes 2.5mV/degree
+DVbe=2.5*40;
+//Total increment
+dVbe=2*DVbe*(10^-3);
+
+//Let l=(Ic1*Re)
+l=dVbe/0.05;
+
+Re=l/Ic1;
+disp(Re,'Re=');
+Rb=k*Re;
+disp(Rb,'Rb=');
+
+B=(B1+B2)/2;//beta
+V=((Ic1/B)*Rb)+(Vbe)+(((Ic1/B)+Ic1)*Re);
+disp('Volts',V,'V=');
+R1=(Rb*Vcc)/V;
+R2=(R1*V)/(Vcc-V);
+
+disp('ohm',R1,'R1=');
+disp('ohm',R2,'R2=');
+
+//end \ No newline at end of file
diff --git a/506/CH9/EX9.5/Example9_5.sce b/506/CH9/EX9.5/Example9_5.sce
new file mode 100755
index 000000000..da4980a8e
--- /dev/null
+++ b/506/CH9/EX9.5/Example9_5.sce
@@ -0,0 +1,23 @@
+clear;
+clc;
+
+//Caption:Value of theta for Ge Transistor
+
+//Given Data
+Vcc=30;//in V
+Rc=2;//in K
+Re=4.7;//in K
+Ic=1.5;//in mA
+
+//We know that dPc/dIc = Vcc - (2*Ic*(Rc+Re))
+//Let D=dPc/dIc
+
+D = Vcc - (2*Ic*(Re+Rc));
+disp('Ic increases by 0.131mA over a temprature range of 35 to 75 degree C');
+disp('theta<(A=(dPc/dIc)*(dIc/dTc))');
+A=D*((0.131*(10^-3))/(75-25));
+
+disp('degreeC/W',1/A,'theta<');
+disp('The upper bound on theta is so high that transistor would not violate it and therefore circuit will be safe from thermal runaway');
+
+//End \ No newline at end of file
diff --git a/506/CH9/EX9.6.a/Example9_6a.sce b/506/CH9/EX9.6.a/Example9_6a.sce
new file mode 100755
index 000000000..b51c30f27
--- /dev/null
+++ b/506/CH9/EX9.6.a/Example9_6a.sce
@@ -0,0 +1,33 @@
+clear;
+clc;
+
+//Caption: To find parameters of power amplifier using pnp gemanium transistor
+
+//Given Data
+B=100;//beta
+Ico=-5;//in mA
+Ic=-1;//in mA
+Vcc=40;
+Re=5;//in ohm
+Rc=10;//in ohm
+
+//Ic= BIb + (1+B)*Ico
+//Ic=B(Ib+Ico)
+Ib=-(Ic/B)+Ico;
+disp('mA',Ib,'Ib=');
+
+//Neglecting Vbe
+Rb=(5-Vcc)/(Ib*0.001);
+disp('ohm',Rb,'Rb=');
+
+Vce=Vcc-15;
+if(Vce>(Vcc/2))
+ S=(1+B)*(1+(Rb/Re))/(1+B+(Rb/Re));
+ disp(S,'Stability Factor is=');
+end
+
+A=-(Vcc+(2*Ic*(Re+Rc)))*(S)*(0.007*Ico*0.01);
+
+disp('degreeC/W',1/A,'theta=');
+
+//end \ No newline at end of file
diff --git a/506/CH9/EX9.6.b/Example9_6b.sce b/506/CH9/EX9.6.b/Example9_6b.sce
new file mode 100755
index 000000000..54eabcfa0
--- /dev/null
+++ b/506/CH9/EX9.6.b/Example9_6b.sce
@@ -0,0 +1,31 @@
+clear;
+clc;
+
+//Caption: To find parameters of power amplifier using pnp gemanium transistor
+
+//Given Data
+B=100;//beta
+Ico=-5;//in mA
+Ic=-1;//in mA
+Vcc=40;
+Re=5;//in ohm
+Rc=10;//in ohm
+
+//Ic= BIb + (1+B)*Ico
+//Ic=B(Ib+Ico)
+Ib=-(Ic/B)+Ico;
+
+//Neglecting Vbe
+Rb=(5-Vcc)/(Ib*0.001);
+
+Vce=Vcc-15;
+if(Vce>(Vcc/2))
+ S=(1+B)*(1+(Rb/Re))/(1+B+(Rb/Re));
+ disp(S,'Stability Factor is=');
+end
+
+A=-(Vcc+(2*Ic*(Re+Rc)))*(S)*(0.007*Ico*0.01);
+
+disp('degreeC/W',1/A,'theta=');
+
+//end \ No newline at end of file
generated by cgit (git 2.34.1) at 2025-01-11 06:21:04 +0000