diff options
Diffstat (limited to '1217/CH5')
-rwxr-xr-x | 1217/CH5/EX5.1/Exa5_1.sce | 16 | ||||
-rwxr-xr-x | 1217/CH5/EX5.10/Exa5_10.sce | 17 | ||||
-rwxr-xr-x | 1217/CH5/EX5.11/Exa5_11.sce | 10 | ||||
-rwxr-xr-x | 1217/CH5/EX5.12/Exa5_12.sce | 20 | ||||
-rwxr-xr-x | 1217/CH5/EX5.13/Exa5_13.sce | 13 | ||||
-rwxr-xr-x | 1217/CH5/EX5.14/Exa5_14.sce | 18 | ||||
-rwxr-xr-x | 1217/CH5/EX5.15/Exa5_15.sce | 20 | ||||
-rwxr-xr-x | 1217/CH5/EX5.16/Exa5_16.sce | 18 | ||||
-rwxr-xr-x | 1217/CH5/EX5.17/Exa5_17.sce | 17 | ||||
-rwxr-xr-x | 1217/CH5/EX5.19/Exa5_19.sce | 9 | ||||
-rwxr-xr-x | 1217/CH5/EX5.2/Exa5_2.sce | 14 | ||||
-rwxr-xr-x | 1217/CH5/EX5.20/Exa5_20.sce | 19 | ||||
-rwxr-xr-x | 1217/CH5/EX5.21/Exa5_21.sce | 15 | ||||
-rwxr-xr-x | 1217/CH5/EX5.22/Exa5_22.sce | 13 | ||||
-rwxr-xr-x | 1217/CH5/EX5.3/Exa5_3.sce | 10 | ||||
-rwxr-xr-x | 1217/CH5/EX5.4/Exa5_4.sce | 20 | ||||
-rwxr-xr-x | 1217/CH5/EX5.5/Exa5_5.sce | 29 | ||||
-rwxr-xr-x | 1217/CH5/EX5.6/Exa5_6.sce | 12 | ||||
-rwxr-xr-x | 1217/CH5/EX5.7/Exa5_7.sce | 16 | ||||
-rwxr-xr-x | 1217/CH5/EX5.8/Exa5_8.sce | 18 | ||||
-rwxr-xr-x | 1217/CH5/EX5.9/Exa5_9.sce | 16 |
21 files changed, 340 insertions, 0 deletions
diff --git a/1217/CH5/EX5.1/Exa5_1.sce b/1217/CH5/EX5.1/Exa5_1.sce new file mode 100755 index 000000000..990c580fc --- /dev/null +++ b/1217/CH5/EX5.1/Exa5_1.sce @@ -0,0 +1,16 @@ +// Exa 5.1
+clc;
+clear;
+close;
+// given data
+fo=1;//in KHz
+disp("As choosing R2=1.16R1 will give f=1/2RC")
+// assume R1=1 Kohm and C=1 uF
+R1=1;//in Kohm
+C=1;//in uF
+R2=1.16*R1;//in Kohm
+R=1/(2*fo*10^3*C*10^-6)
+disp(R1,"Value of R1 in Kohm is ; ")
+disp(R2,"Value of R2 in Kohm is ; ")
+disp(R,"Value of R in ohm is ; ")
+disp(C,"Value of C in uF is ; ")
\ No newline at end of file diff --git a/1217/CH5/EX5.10/Exa5_10.sce b/1217/CH5/EX5.10/Exa5_10.sce new file mode 100755 index 000000000..c860cf95b --- /dev/null +++ b/1217/CH5/EX5.10/Exa5_10.sce @@ -0,0 +1,17 @@ +// Exa 5.10
+clc;
+clear;
+close;
+// given data
+fo=1;// in KHz
+d=40/100;//unitless
+T=1/fo;//in Sec
+TC=0.4*T;//in mSec
+TD=T-TC;//in mSec
+C=0.1;//in uF
+RB=TD*10^-3/(0.69*C*10^-6);//in ohm
+RA=TC*10^-3/(0.69*C*10^-6);//in ohm
+disp(RA/1000,"Value of RA in Kohm is ; ")
+disp(RB/1000,"Value of RB in Kohm is ; ")
+disp(TC,"We have TC in mSEC is :")
+disp(TD,"We have TD in mSEC is :")
\ No newline at end of file diff --git a/1217/CH5/EX5.11/Exa5_11.sce b/1217/CH5/EX5.11/Exa5_11.sce new file mode 100755 index 000000000..bbea9bf96 --- /dev/null +++ b/1217/CH5/EX5.11/Exa5_11.sce @@ -0,0 +1,10 @@ +// Exa 5.11
+clc;
+clear;
+close;
+// given data
+T=100;// in uSec
+C=15;//in
+R=T*10^-6/(1.1*C*10^-9);//in ohm
+disp(R/1000,"To obtain a output pulse at 100uSec rsistor required in Kohm is :")
+//Note : in the question 15uF is given but in the solution 15nF is used in the book
\ No newline at end of file diff --git a/1217/CH5/EX5.12/Exa5_12.sce b/1217/CH5/EX5.12/Exa5_12.sce new file mode 100755 index 000000000..f6dbc1627 --- /dev/null +++ b/1217/CH5/EX5.12/Exa5_12.sce @@ -0,0 +1,20 @@ +// Exa 5.12
+clc;
+clear;
+close;
+// given data
+VCC=15;//in Volt
+T=10;//in mSec
+ILED=20;//in mA
+Vf=1.4;//in Volt
+VBE=0.7;//in Volt
+VCEsat=0.2;//in Volt
+C=0.22;//in uF
+R=T*10^-3/(1.1*C*10^-6);//in ohm
+//output of the device
+Vo=VCC-2*VBE-VCEsat;
+R5=(Vo-Vf)/(ILED*10^-3);//in ohm
+disp(R/1000,"Value of R in Kohm is ; ")
+disp(Vo,"Output of the device in volt is : ")
+disp(R5,"Value of RB in Kohm is ; ")
+disp("Note : To improve the noise immunity of the device, a 0.01 uF capacitor is connected between pin 5 and ground. ")
\ No newline at end of file diff --git a/1217/CH5/EX5.13/Exa5_13.sce b/1217/CH5/EX5.13/Exa5_13.sce new file mode 100755 index 000000000..998fb6ed3 --- /dev/null +++ b/1217/CH5/EX5.13/Exa5_13.sce @@ -0,0 +1,13 @@ +// Exa 5.13
+clc;
+clear;
+close;
+// given data
+fo=2;// in KHz
+C=0.01;//in uF
+disp("For a divide-by-2 network, tp, output pulse duration, should be slightly larger than Y i.e. period of trigger pulse.")
+T=1/fo;//in mSec
+tp=1.2*T;//in mSec
+R=tp*10^-3/(1.1*C*10^-6);//in ohm
+disp(tp,"Period of trigger pulse in mSEC is :");
+disp(R/1000,"Value of R in Kohm is ; ");
\ No newline at end of file diff --git a/1217/CH5/EX5.14/Exa5_14.sce b/1217/CH5/EX5.14/Exa5_14.sce new file mode 100755 index 000000000..d4567f4e3 --- /dev/null +++ b/1217/CH5/EX5.14/Exa5_14.sce @@ -0,0 +1,18 @@ +// Exa 5.14
+clc;
+clear;
+close;
+// given data
+fo=2;// in KHz
+Vopp=5;//in volts
+Vsat=13;//in Volts
+// Let the value of R2 used be 10 Kohm
+R2=10;//in Kohm
+R3=(2*R2*Vsat)/Vopp;//in Kohm
+// Let C1=0.1 uF
+C1=0.1;// in uF
+R1=R3/(4*fo*10^3*C1*10^-6*R2);// in ohm
+disp(R1/1000,"Value of R1 in Kohm is ; ");
+disp(C1,"Value of C1 in uF is ; ");
+disp(R2,"Value of R2 in Kohm is ; ");
+disp(R3,"Value of R3 in Kohm is ; ");
\ No newline at end of file diff --git a/1217/CH5/EX5.15/Exa5_15.sce b/1217/CH5/EX5.15/Exa5_15.sce new file mode 100755 index 000000000..0109cf759 --- /dev/null +++ b/1217/CH5/EX5.15/Exa5_15.sce @@ -0,0 +1,20 @@ +// Exa 5.15
+clc;
+clear;
+close;
+// given data
+Vcc=12;//in Volt
+R1=10;//in Kohm
+R2=100;//in Kohm
+R3=820;//in Kohm
+// Let Vsat=10 volt
+Vsat=10;//in volt
+// part (a)
+Vopp=2*R2*Vsat/R3;//in Volt
+disp(Vopp,"Amplitude of triangular wave in volt is : ")
+Vopp=Vsat-(-Vsat);// in Volt
+disp(Vopp,"Amplitude of square wave in volt is : ")
+// part (b)
+C1=0.1;// in uF
+fo=R3*1000/(4*R1*1000*R2*1000*C1*10^-6);// in Hz
+disp(fo/1000,"Frequenci in KHz is :");
\ No newline at end of file diff --git a/1217/CH5/EX5.16/Exa5_16.sce b/1217/CH5/EX5.16/Exa5_16.sce new file mode 100755 index 000000000..cb1adbc5f --- /dev/null +++ b/1217/CH5/EX5.16/Exa5_16.sce @@ -0,0 +1,18 @@ +// Exa 5.16
+clc;
+clear;
+close;
+// given data
+fo=1;// in KHz
+// choose C=.01 uF
+C=.01;// in uF
+R=1/(2*%pi*sqrt(6)*fo*1000*C*10^-6);// in ohm
+disp("Choose the value of R1 to get RF, while considering that R1 >= 10*R to avoid loading effect. Thus choosing R1=35.6 Kohm");
+R1=35.6;// in Kohm
+RF=29*R1;//in ohm
+disp("Hence desired components values are :");
+disp(C,"Value of C in uF is ; ");
+disp(R/1000,"Value of R in Kohm is ; ");
+disp(R1,"Value of R1 in Kohm is ; ");
+disp(RF/1000,"Value of RF in Mohm is ; ");
+// Note : Answer in the book is wrong
\ No newline at end of file diff --git a/1217/CH5/EX5.17/Exa5_17.sce b/1217/CH5/EX5.17/Exa5_17.sce new file mode 100755 index 000000000..0815a6347 --- /dev/null +++ b/1217/CH5/EX5.17/Exa5_17.sce @@ -0,0 +1,17 @@ +// Exa 5.17
+clc;
+clear;
+close;
+// given data
+fo=1;// in KHz
+// choose C=.01 uF
+C=.01;// in uF
+R=1/(2*%pi*fo*1000*C*10^-6);// in ohm
+// choosing R1=10 Kohm
+R1=10;// in Kohm
+RF=2*R1;//in Kohm
+disp("Hence desired components values are :");
+disp(C,"Value of C in uF is ; ");
+disp(R/1000,"Value of R in Kohm is ; ");
+disp(R1,"Value of R1 in Kohm is ; ");
+disp(RF,"Value of RF in Kohm is ; ");
\ No newline at end of file diff --git a/1217/CH5/EX5.19/Exa5_19.sce b/1217/CH5/EX5.19/Exa5_19.sce new file mode 100755 index 000000000..8bce283be --- /dev/null +++ b/1217/CH5/EX5.19/Exa5_19.sce @@ -0,0 +1,9 @@ +// Exa 5.19
+clc;
+clear;
+close;
+// given data
+R=1;//in Kohm
+C=3.6;//in uF
+fo=1/(2*%pi*R*1000*C*10^-6);// in Hz
+disp(fo,"The frequency of oscillation in Hz is :");
\ No newline at end of file diff --git a/1217/CH5/EX5.2/Exa5_2.sce b/1217/CH5/EX5.2/Exa5_2.sce new file mode 100755 index 000000000..e40a351df --- /dev/null +++ b/1217/CH5/EX5.2/Exa5_2.sce @@ -0,0 +1,14 @@ +// Exa 5.2
+clc;
+clear;
+close;
+// given data
+fo=1;//in KHz
+BETA=0.6;//unitless
+disp("As choosing R1=1 Kohm")
+// assume R1=1 Kohm and C=1 uF
+R1=1;//in Kohm
+C=1;//in uF
+R=1/(2*fo*10^3*C*10^-6*log((1+BETA)/(1-BETA)));
+disp(R,"Value of R in ohm is ; ");
+//Answer in the book is wrong
\ No newline at end of file diff --git a/1217/CH5/EX5.20/Exa5_20.sce b/1217/CH5/EX5.20/Exa5_20.sce new file mode 100755 index 000000000..8a51b8990 --- /dev/null +++ b/1217/CH5/EX5.20/Exa5_20.sce @@ -0,0 +1,19 @@ +// Exa 5.20
+clc;
+clear;
+close;
+// given data
+R1=10;//in Kohm
+R2=47;//in Kohm
+R3=5.6;//in Kohm
+RT=4.7;//in Kohm
+CT=0.05;//in uF
+V1=-10;//in Volt
+V2=2;//in Volt
+disp("By the concept of virtual ground and using superposition theorem the op-amp output voltage can be calculated.");
+Vop=-(R1*V1/R2+R1*V2/R3);// in volt
+VEE=0;//in Volt
+I=(VEE+3-Vop)/RT;// in mA
+fo=0.32*I*10^-3/(CT*10^-6);//in Hz
+disp(Vop,"Op-amp voltage in volt is : ");
+disp(fo/1000,"Frequency in KHz is :");
\ No newline at end of file diff --git a/1217/CH5/EX5.21/Exa5_21.sce b/1217/CH5/EX5.21/Exa5_21.sce new file mode 100755 index 000000000..4d3766286 --- /dev/null +++ b/1217/CH5/EX5.21/Exa5_21.sce @@ -0,0 +1,15 @@ +// Exa 5.21
+clc;
+clear;
+close;
+// given data
+RT=50;//in Kohm
+CT=0.001;//in uF
+V=20;//in Volt
+C=10;//in uF
+fo=0.25/(RT*10^3*CT*10^-6);//in Hz
+dfl=7.8*fo/V;//in Hz
+dfc=sqrt(dfl/(2*%pi*3.6*10^3*C*10^-6));//in Hz
+disp(fo/1000,"Free running frequency in KHz is :");
+disp(dfl/1000,"Lock range in KHz is :");
+disp(dfc,"Capture range in Hz is :");
\ No newline at end of file diff --git a/1217/CH5/EX5.22/Exa5_22.sce b/1217/CH5/EX5.22/Exa5_22.sce new file mode 100755 index 000000000..623bdadfd --- /dev/null +++ b/1217/CH5/EX5.22/Exa5_22.sce @@ -0,0 +1,13 @@ +// Exa 5.22
+clc;
+clear;
+close;
+// given data
+fomax=100;// in KHz
+Resolution=2;//in Hz
+flowest=Resolution;//in Hz
+fclk=fomax*2.2;//in KHz
+// formula: 2^n=fclk/flowest
+n=(log10(fclk*1000/flowest))/log10(2);
+disp(fclk,"Frequency of reference oscillator in KHz is :");
+disp(ceil(n),"No. of bits needed is :");
\ No newline at end of file diff --git a/1217/CH5/EX5.3/Exa5_3.sce b/1217/CH5/EX5.3/Exa5_3.sce new file mode 100755 index 000000000..9c8c92203 --- /dev/null +++ b/1217/CH5/EX5.3/Exa5_3.sce @@ -0,0 +1,10 @@ +// Exa 5.3
+clc;
+clear;
+close;
+// given data
+BETA=0.41;//unitless
+R=2.7;//in Kohm
+C=0.1;//in uF
+fo=1/(2*R*C*log((1+BETA)/(1-BETA)));//in KHz
+disp(fo,"Output signal frequency in Khz is ; ")
\ No newline at end of file diff --git a/1217/CH5/EX5.4/Exa5_4.sce b/1217/CH5/EX5.4/Exa5_4.sce new file mode 100755 index 000000000..25eab8117 --- /dev/null +++ b/1217/CH5/EX5.4/Exa5_4.sce @@ -0,0 +1,20 @@ +// Exa 5.4
+clc;
+clear;
+close;
+// given data
+Ton=100;//in mSEC
+Toff=200;//in mSEC
+BETA=0.2;//unitless
+//Let R1=1 Kohm
+R1=1;//in Kohm
+R2=R1*(1-BETA)/BETA;//in Kohm
+// Assuming C=10 uF
+C=10;//in uF
+R3=Ton*10^-3/(C*10^-6*0.41);//in Kohm
+R4=Toff*10^-3/(C*10^-6*0.41);// in Kohm
+disp(R1,"Value of R1 in Kohm is ; ")
+disp(R2,"Value of R2 in Kohm is ; ")
+disp(R3/1000,"Value of R3 in Kohm is ; ")
+disp(R4/1000,"Value of R4 in Kohm is ; ")
+disp(C,"Value of C in uF is ; ")
\ No newline at end of file diff --git a/1217/CH5/EX5.5/Exa5_5.sce b/1217/CH5/EX5.5/Exa5_5.sce new file mode 100755 index 000000000..b90eed25b --- /dev/null +++ b/1217/CH5/EX5.5/Exa5_5.sce @@ -0,0 +1,29 @@ +// Exa 5.5
+clc;
+clear;
+close;
+// given data
+Vo=7.5;//in Volt
+fo=1;// in KHz
+DutyCycle=60;//in %
+disp("Zener diioe has to be used at the output to limit the output at +7.5 volt or -7.5 volt.");
+disp("Thus choose Vz=Vz1=Vz2=6.8 volt as VD=0.7 volt")
+Vz=6.8;// in volt
+Vz1=6.8;// in volt
+Vz2=6.8;// in volt
+VD=0.7;// in volt
+T=1/fo;//in mSec
+// duty cycle 60% gives Ton & Toff
+Ton=0.6*T;//in mSec
+Toff=T-Ton;//in mSec
+// choosing R2=1.16*R1
+R1=1;//in Kohm
+C=0.1;//in uF
+R2=1.16*R1;//in Kohm
+R3=Ton*10^-3/(C*10^-6);//in ohm
+R4=Toff*10^-3/(C*10^-6);//in ohm
+disp(R1,"Value of R1 in Kohm is ; ")
+disp(R2,"Value of R2 in Kohm is ; ")
+disp(R3/1000,"Value of R3 in Kohm is ; ")
+disp(R4/1000,"Value of R4 in Kohm is ; ")
+disp(C,"Value of C in uF is ; ");
\ No newline at end of file diff --git a/1217/CH5/EX5.6/Exa5_6.sce b/1217/CH5/EX5.6/Exa5_6.sce new file mode 100755 index 000000000..225179399 --- /dev/null +++ b/1217/CH5/EX5.6/Exa5_6.sce @@ -0,0 +1,12 @@ +// Exa 5.6
+clc;
+clear;
+close;
+// given data
+RA=6.8;//in Kohm
+RB=3.3;//in Kohm
+C=0.1;//in uF
+fo=1.45/((RA+2*RB)*C);// in KHz
+d=(RA+RB)/(RA+2*RB);
+disp(fo,"Frequency of oscillation in Khz is ; ");
+disp(d*100,"Duty cycle in % is :");
\ No newline at end of file diff --git a/1217/CH5/EX5.7/Exa5_7.sce b/1217/CH5/EX5.7/Exa5_7.sce new file mode 100755 index 000000000..7169fe9f9 --- /dev/null +++ b/1217/CH5/EX5.7/Exa5_7.sce @@ -0,0 +1,16 @@ +// Exa 5.7
+clc;
+clear;
+close;
+// given data
+fo=50;//in KHz
+d=75/100;//unitless
+C=1;//in nF
+disp("RA+2RB=1/(0.693*fo*10^3*C*10^-9);// in Kohm");
+disp("RA+2RB=28.9 Kohm");
+disp("d=0.75=(RA+RB)/(RA+2*RB)");
+disp("It gives RA=2*RB");
+RA=28.9/2;// in Kohm
+RB=RA/2;//in Kohm
+disp(RA,"Value of RA in Kohm is :")
+disp(RB,"Value of RB in Kohm is :");
\ No newline at end of file diff --git a/1217/CH5/EX5.8/Exa5_8.sce b/1217/CH5/EX5.8/Exa5_8.sce new file mode 100755 index 000000000..eff4ce998 --- /dev/null +++ b/1217/CH5/EX5.8/Exa5_8.sce @@ -0,0 +1,18 @@ +// Exa 5.8
+clc;
+clear;
+close;
+// given data
+fo=800;// in Hz
+d=60/100;//unitless
+T=1/fo;//in Sec
+TC=0.6*T;//in Sec
+TD=T-TC;//in Sec
+C=0.01;//in uF
+C2=10;//in uF
+RB=TD/(0.69*C*10^-6);//in ohm
+RA=(TC-0.69*RB*C*10^-6)/(0.69*C*10^-6);//in ohm
+disp(RA/1000,"Value of RA in Kohm is ; ")
+disp(RB/1000,"Value of RB in Kohm is ; ")
+disp(C,"Value of C in uF is ; ");
+disp(C2,"Value of C2 in uF is ; ");
\ No newline at end of file diff --git a/1217/CH5/EX5.9/Exa5_9.sce b/1217/CH5/EX5.9/Exa5_9.sce new file mode 100755 index 000000000..a5c659692 --- /dev/null +++ b/1217/CH5/EX5.9/Exa5_9.sce @@ -0,0 +1,16 @@ +// Exa 5.9
+clc;
+clear;
+close;
+// given data
+fo=700;// in Hz
+d=50/100;//unitless
+T=1/fo;//in Sec
+TC=0.5*T;//in Sec
+TD=T-TC;//in Sec
+C=0.1;//in uF
+RB=TD/(0.69*C*10^-6);//in ohm
+RA=TC/(0.69*C*10^-6);//in ohm
+disp(RA/1000,"Value of RA in Kohm is ; ")
+disp(RB/1000,"Value of RB in Kohm is ; ")
+disp(TC*1000,"We have TC=TD in mSEC is :")
\ No newline at end of file |