summaryrefslogtreecommitdiff
path: root/2609/CH6
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2609/CH6
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 '2609/CH6')
-rwxr-xr-x2609/CH6/EX6.1/Ex6_1.sce27
-rwxr-xr-x2609/CH6/EX6.10/Ex6_10.sce19
-rwxr-xr-x2609/CH6/EX6.11/Ex6_11.sce13
-rwxr-xr-x2609/CH6/EX6.12/Ex6_12.sce11
-rwxr-xr-x2609/CH6/EX6.13/Ex6_13.sce19
-rwxr-xr-x2609/CH6/EX6.14/Ex6_14.sce16
-rwxr-xr-x2609/CH6/EX6.15/Ex6_15.sce20
-rwxr-xr-x2609/CH6/EX6.16/Ex6_16.sce15
-rwxr-xr-x2609/CH6/EX6.17/Ex6_17.sce15
-rwxr-xr-x2609/CH6/EX6.18/Ex6_18.sce21
-rwxr-xr-x2609/CH6/EX6.19/Ex6_19.sce46
-rwxr-xr-x2609/CH6/EX6.3/Ex6_3.sce20
-rwxr-xr-x2609/CH6/EX6.5/Ex6_5.sce20
-rwxr-xr-x2609/CH6/EX6.6/Ex6_6.sce12
-rwxr-xr-x2609/CH6/EX6.7/Ex6_7.sce20
-rwxr-xr-x2609/CH6/EX6.8/Ex6_8.sce12
-rwxr-xr-x2609/CH6/EX6.9/Ex6_9.sce31
17 files changed, 337 insertions, 0 deletions
diff --git a/2609/CH6/EX6.1/Ex6_1.sce b/2609/CH6/EX6.1/Ex6_1.sce
new file mode 100755
index 000000000..5c3cc9e30
--- /dev/null
+++ b/2609/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,27 @@
+//Ex 6.1
+clc;
+clear;
+close;
+format('v',6);
+f0=600;//Hz//Oscillating Frequency
+disp("Various design parameters are :-");
+C=0.05;//micro F//Chosen for the design
+disp(C,"Capacitance(micro F)");
+format('v',5);
+R=1/(2*%pi*f0*sqrt(6)*C*10^-6);//ohm
+R=R/1000;//kohm
+disp(R,"Resistance R(kohm)");
+disp("We can use R=2.2 kohm for design purpose.")
+//To avoid loading effect
+Ri=10*R;//kohm//Ri>=10*R
+Ri=ceil(Ri);//kohm
+disp(Ri,"Resistance Ri(kohm)");
+Rf=29*Ri;//kohm//Rf>=29*Ri
+disp(Rf,"Resistance Rf(kohm)");
+disp("We can use Rf=640 kohm for design purpose.")
+Rf=640;//kohm
+//Balancing the circuit
+Rom=Rf*Ri/(Rf+Ri);//kohm
+Rom=ceil(Rom);//kohm
+format('v',6);
+disp(Rom,"Resistance Rom(kohm)");
diff --git a/2609/CH6/EX6.10/Ex6_10.sce b/2609/CH6/EX6.10/Ex6_10.sce
new file mode 100755
index 000000000..7337ccd9c
--- /dev/null
+++ b/2609/CH6/EX6.10/Ex6_10.sce
@@ -0,0 +1,19 @@
+//Ex 6.10
+clc;
+clear;
+close;
+format('v',6);
+f0=1;///kHz
+Vsat=14;//V
+disp("Various design parameters are :-");
+C1=0.05;//micro F//Chosen for the design
+disp(C1,"Capacitance(micro F)");
+Rf=1/(2*f0*10^3*C1*10^-6)/1000;//kohm
+disp(Rf,"Resistance Rf(kohm)");
+//R2=0.86*R1 and Rf=R1||R2
+R2byR1=0.86;//from R2=0.86*R1
+R2=Rf*(1+R2byR1);//kohm
+R1=R2/R2byR1;//kohm
+disp(R1,"Resistance R1(kohm)");
+disp("Use R1=22 kohm for the design.");
+disp(R2,"Resistance R2(kohm)");
diff --git a/2609/CH6/EX6.11/Ex6_11.sce b/2609/CH6/EX6.11/Ex6_11.sce
new file mode 100755
index 000000000..e6fb3cffb
--- /dev/null
+++ b/2609/CH6/EX6.11/Ex6_11.sce
@@ -0,0 +1,13 @@
+//Ex 6.11
+clc;
+clear;
+close;
+format('v',6);
+T=10;//ms//(Time period)
+f0=1/(T*10^-3);//Hz
+C=0.05;//micro F//Chosen for the design
+//Formula : f0=1/{2*Rf*C*log(1+2*R2/R1)}
+Rf=1/(f0*2*C*10^-6*log(1+2))/1000;//kohm//By putting R1=R2 for this case
+Rf=round(Rf);//kohm
+disp(Rf,"Resistance Rf(kohm)");
+disp(C,"Capacitance for the design(micro F)");
diff --git a/2609/CH6/EX6.12/Ex6_12.sce b/2609/CH6/EX6.12/Ex6_12.sce
new file mode 100755
index 000000000..b0d83a3dc
--- /dev/null
+++ b/2609/CH6/EX6.12/Ex6_12.sce
@@ -0,0 +1,11 @@
+//Ex 6.12
+clc;
+clear;
+close;
+format('v',6);
+R1=4.7;//kohm
+R2=3.3;//kohm
+Rf=2;//kohm
+C=0.1;//micro F
+f0=1/2/(Rf*1000)/(C*10^-6)/log(1+2*R2/R1)/1000;//kHz
+disp(f0,"Frequency of output signal(kHz)");
diff --git a/2609/CH6/EX6.13/Ex6_13.sce b/2609/CH6/EX6.13/Ex6_13.sce
new file mode 100755
index 000000000..4dfb195ef
--- /dev/null
+++ b/2609/CH6/EX6.13/Ex6_13.sce
@@ -0,0 +1,19 @@
+//Ex 6.13
+clc;
+clear;
+close;
+format('v',6);
+f0=1.5;//kHz
+Vout=6;//V////peak to peak
+Vsat=13.5;//V
+disp("Various design parameters are : ");
+R2=10;//kohm///choosen for the design
+R1=R2*2*Vsat/Vout;//kohm
+disp(R1,"R1(kohm)");
+disp(R2,"R2(kohm)");
+disp("Use R1=50 kohm for the design");
+//Let Cf=0.05 micro F for the design
+Cf=0.05;//micro F
+disp(Cf,"Cf(micro F)");
+Ri=R1*1000/(f0*1000)/4/(Cf*10^-6*R2*1000)/1000;//kohm
+disp(Ri,"Ri(kohm)");
diff --git a/2609/CH6/EX6.14/Ex6_14.sce b/2609/CH6/EX6.14/Ex6_14.sce
new file mode 100755
index 000000000..a2ee02b49
--- /dev/null
+++ b/2609/CH6/EX6.14/Ex6_14.sce
@@ -0,0 +1,16 @@
+//Ex 6.14
+clc;
+clear;
+close;
+format('v',4);
+//Data given
+R1=6.8;//kohm
+Ri=100;//kohm
+R2=1.5;//kohm
+Cf=0.01;//micro F
+Vsat=14;//V
+Vo_pp=2*R2/R1*Vsat;//V////Peak to peak output of triangular wave
+disp(Vo_pp,"Peak to peak output of triangular wave(V)");
+format('v',5);
+f0=R1*1000/(4*Ri*10^3*Cf*10^-6*R2*10^3)/1000;//kHz//Oscillating Frequency
+disp(f0,"Oscillation frequency(Hz)");
diff --git a/2609/CH6/EX6.15/Ex6_15.sce b/2609/CH6/EX6.15/Ex6_15.sce
new file mode 100755
index 000000000..dac52471b
--- /dev/null
+++ b/2609/CH6/EX6.15/Ex6_15.sce
@@ -0,0 +1,20 @@
+//Ex 6.15
+clc;
+clear;
+close;
+format('v',4);
+//Data given
+f0=1;//kHz
+Vo_pp=7;//V
+Vsat=14;//V
+disp("Various design parameters are :-");
+//Let R2=10;//kohm for the design
+R2=10;//kohm
+R1=2*R2*Vsat/Vo_pp;//kohm
+disp(R1,"R1(kohm)");
+disp(R2,"R2(kohm)");
+//Choose Cf=0.1 micro F for the design
+Cf=0.1;//micro F
+disp(Cf,"Cf(micro F)");
+Ri=R1*10^3/(4*f0*10^3*Cf*10^-6*R2*10^3)/1000;//kohm
+disp(Ri,"Ri(kohm)");
diff --git a/2609/CH6/EX6.16/Ex6_16.sce b/2609/CH6/EX6.16/Ex6_16.sce
new file mode 100755
index 000000000..f0a3ed40a
--- /dev/null
+++ b/2609/CH6/EX6.16/Ex6_16.sce
@@ -0,0 +1,15 @@
+//Ex 6.16
+clc;
+clear;
+close;
+format('v',4);
+//Data given
+tau=1;//ms(time period)
+R1byR2=1.8:0.2:9;//range of R1/R2
+Beta_min=1/(1+min(R1byR2));//minimum value of Beta
+Beta_max=1/(1+max(R1byR2));//maximum value of Beta
+Tmax=2*tau*log((1+Beta_min)/(1-Beta_min));//ms////For minimum value of Beta
+fmin=1/(Tmax*10^-3);//Hz
+Tmin=2*tau*log((1+Beta_max)/(1-Beta_max));//ms////For maximum value of Beta
+fmax=1/(Tmin*10^-3)/1000;//kHz
+disp("Frequency range is "+string(fmin)+" Hz to "+string(fmax)+" kHz.");
diff --git a/2609/CH6/EX6.17/Ex6_17.sce b/2609/CH6/EX6.17/Ex6_17.sce
new file mode 100755
index 000000000..b30826e46
--- /dev/null
+++ b/2609/CH6/EX6.17/Ex6_17.sce
@@ -0,0 +1,15 @@
+//Ex 6.17
+clc;
+clear;
+close;
+format('v',4);
+//Data given
+Ls=3;//H
+Cs=0.05;//pF
+Rs=2;//kohm
+Cm=10;//pF
+fS=1/2/%pi/sqrt(Ls*Cs*10^-12)/1000;//kHz
+disp(fS,"Series resonant frequency(kHz)");
+CT=Cm*Cs/(Cm+Cs);//pF////Equivalent capacitance
+fP=1/2/%pi/sqrt(Ls*CT*10^-12)/1000;//kHz
+disp(fP,"Parallel resonant frequency(kHz)");
diff --git a/2609/CH6/EX6.18/Ex6_18.sce b/2609/CH6/EX6.18/Ex6_18.sce
new file mode 100755
index 000000000..6fc9919c0
--- /dev/null
+++ b/2609/CH6/EX6.18/Ex6_18.sce
@@ -0,0 +1,21 @@
+//Ex 6.18
+clc;
+clear;
+close;
+format('v',5);
+//Data given
+f0=5;//kHz
+D=60;//%////duty cycle
+VCC=12;//V
+//As D=t1/(t1+t2)
+t2BYt1=1/(D/100)-1;//ratio of t1 & t2
+//RB/(2*RA-RB)=t2/t1
+RAbyRB=(1/t2BYt1+1)/2;//Ratio of RA & RB
+disp("Various design parameters are :");
+//Let CT=0.05 micro F for this design choosing between 0.01 & 1 microo F
+CT=0.05;//micro F
+disp(CT,"CT(micro F)");
+RA=1/(f0*10^3)/(5/3)^2/(CT*10^-6)/1000;//kohm
+disp(RA,"RA(kohm)");
+RB=RA/RAbyRB;//kohm
+disp(RB,"RB(kohm)");
diff --git a/2609/CH6/EX6.19/Ex6_19.sce b/2609/CH6/EX6.19/Ex6_19.sce
new file mode 100755
index 000000000..e94fcb231
--- /dev/null
+++ b/2609/CH6/EX6.19/Ex6_19.sce
@@ -0,0 +1,46 @@
+//Ex 6.19
+clc;
+clear;
+close;
+format('v',6);
+//Data given
+Rf=15;//kohm
+RT1=4.7;//kohm
+R1=56;//kohm
+R2=6.8;//kohm
+R3=10;//kohm
+R4=1;//kohm
+R5=1;//kohm
+CB=1;//micro F
+CT=0.05;//mic
+VCC=15;//V
+V1=-15;//V////Voltage given through the resistance(R1) 56 kohm
+disp("Part (i)");
+Vin=2;//V
+Vo=Rf/R1*(-V1)-Rf/R2*Vin;//V
+disp(Vo,"Voltage Vo(V)");
+N_VCC=0;//V////-VCC////voltage given to the 12th pin of IC
+V7=N_VCC+3;//V
+disp(V7,"Voltage V7(V)");
+I=(V7-Vo)/RT1;//mA
+disp(I,"Current I(mA)");
+Rmult=R4*R5/(R4+R5)+R3;//kohm////on pin 3
+disp(Rmult,"Total resistance on pin 3, Rmult(kohm)");
+format('v',4);
+f0=0.32*I*10^-3/(CT*10^-6)/1000;//kHz
+disp(f0,"Oscillation frequency(kHz)");
+disp("Part (ii)");
+format('v',4);
+Vin=5;//V
+Vo=Rf/R1*(-V1)-Rf/R2*Vin;//V
+disp(Vo,"Voltage Vo(V)");
+N_VCC=0;//V////-VCC////voltage given to the 12th pin of IC
+V7=N_VCC+3;//V
+disp(V7,"Voltage V7(V)");
+I=(V7-Vo)/RT1;//mA
+format('v',6);
+disp(I,"Current I(mA)");
+Rmult=R4*R5/(R4+R5)+R3;//kohm////on pin 3
+disp(Rmult,"Total resistance on pin 3, Rmult(kohm)");
+f0=0.32*I*10^-3/(CT*10^-6)/1000;//kHz
+disp(f0,"Oscillation frequency(kHz)");
diff --git a/2609/CH6/EX6.3/Ex6_3.sce b/2609/CH6/EX6.3/Ex6_3.sce
new file mode 100755
index 000000000..50c251696
--- /dev/null
+++ b/2609/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,20 @@
+//Ex 6.3
+clc;
+clear;
+close;
+format('v',5);
+f0=12;//kHz//Oscillating Frequency
+disp("Various design parameters are :-");
+C=0.01;//micro F//Chosen for the design between 0.01 & 1 micro F
+disp(C,"Capacitance(micro F)");
+R=1/(2*%pi*f0*1000*C*10^-6);//ohm
+R=R/1000;//kohm
+disp(R,"Resistance R(kohm)");
+format('v',5);
+Ri=3*R/2;//kohm//Ri>=3*R/2
+disp(Ri,"Resistance Ri(kohm)");
+disp("We can use Ri=2.2 kohm for design purpose.")
+Ri=2.2;//kohm
+Rf=2*Ri;//kohm
+disp(Rf,"Resistance Rf(kohm)");
+disp("We should use Rf=4.7 kohm for design purpose.")
diff --git a/2609/CH6/EX6.5/Ex6_5.sce b/2609/CH6/EX6.5/Ex6_5.sce
new file mode 100755
index 000000000..6d4288587
--- /dev/null
+++ b/2609/CH6/EX6.5/Ex6_5.sce
@@ -0,0 +1,20 @@
+//Ex 6.5
+clc;
+clear;
+close;
+format('v',5);
+f0=2;//kHz//Oscillating Frequency
+disp("Various design parameters are :-");
+C=0.05;//micro F//Chosen for the design
+disp(C,"Capacitance(micro F)");
+R=1/(2*%pi*f0*1000*C*10^-6);//ohm
+R=R/1000;//kohm
+disp(R,"Resistance R(kohm)");
+format('v',5);
+Ri=3*R/2;//kohm//Ri>=3*R/2
+format('v',4);
+disp(Ri,"Resistance Ri(kohm)");
+disp("We can use Ri=2.2 kohm for design purpose.")
+Rf=2*Ri;//kohm
+disp(Rf,"Resistance Rf(kohm)");
+disp("We should use 5k pot for Rf.")
diff --git a/2609/CH6/EX6.6/Ex6_6.sce b/2609/CH6/EX6.6/Ex6_6.sce
new file mode 100755
index 000000000..13009e2c7
--- /dev/null
+++ b/2609/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,12 @@
+//Ex 6.6
+clc;
+clear;
+close;
+format('v',6);
+//Data given
+R1=1;//kohm
+R2=1;//kohm
+R=1;//kohm
+C=4.7;//micro F
+f0=1/(2*%pi*R*10^3*C*10^-6);//Hz//Oscillating Frequency
+disp(f0,"Oscillation frequency(Hz)");
diff --git a/2609/CH6/EX6.7/Ex6_7.sce b/2609/CH6/EX6.7/Ex6_7.sce
new file mode 100755
index 000000000..80cb41272
--- /dev/null
+++ b/2609/CH6/EX6.7/Ex6_7.sce
@@ -0,0 +1,20 @@
+//Ex 6.7
+clc;
+clear;
+close;
+format('v',5);
+f0=200;//Hz//Oscillating Frequency
+disp("Various design parameters are :-");
+C=0.05;//micro F//Chosen for the design
+disp(C,"Capacitance(micro F)");
+R=0.159/(f0*C*10^-6);//ohm
+R=R/1000;//kohm
+disp(R,"Resistance R(kohm)");
+disp("We should use R=510 kohm for the design.")
+R=510;//kohm
+C1=C;C2=C;C3=C;//micro F
+disp(C3,C2,C1,"Capacitance C1, C2 & C3(micro F)");
+R2=R;R3=R;//kohm
+disp(R3,R2,"Resistance R2, R3(kohm)");
+disp("1000k pot can be used.")
+//Answer for R is calculated wrong in the textbook.
diff --git a/2609/CH6/EX6.8/Ex6_8.sce b/2609/CH6/EX6.8/Ex6_8.sce
new file mode 100755
index 000000000..c225e8ad7
--- /dev/null
+++ b/2609/CH6/EX6.8/Ex6_8.sce
@@ -0,0 +1,12 @@
+//Ex 6.8
+clc;
+clear;
+close;
+format('v',5);
+Rf=570;//kohm
+Ri=15;//kohm
+A=Rf/Ri;//Gain of the circuit
+Amin=29;//Minimum Gain requirement of RC phase shift oscillator
+deltaA=(A-Amin)/Amin*100;//%(Exceeding Gain)
+disp(deltaA,"Gain is exceeded by(%) ");
+disp("It will cause distortion at output.");
diff --git a/2609/CH6/EX6.9/Ex6_9.sce b/2609/CH6/EX6.9/Ex6_9.sce
new file mode 100755
index 000000000..540e9f913
--- /dev/null
+++ b/2609/CH6/EX6.9/Ex6_9.sce
@@ -0,0 +1,31 @@
+//Ex 6.9
+clc;
+clear;
+close;
+format('v',6);
+disp("Part (a)");
+L1=25;//micro H
+L2=10;//micro H
+Rf=22;//kohm
+C=0.01;//micro F
+LT=L1+L2;//micro H
+fr=1/(2*%pi*sqrt(C*10^-6*LT*10^-6));//Hz
+fr=fr/1000;//kHz
+f0=fr;///kHz
+disp(f0,"Oscillation frequency(kHz)");
+Ri=Rf/(L1/L2);//kohm
+disp(Ri,"Resistance Ri(kohm)");
+disp("Part (b)");
+C1=220;//pF
+C2=680;//pF
+Rf=22;//kohm
+L=1;//mH
+CT=C1*C2/(C1+C2);//pF
+fr=1/(2*%pi*sqrt(L*10^-3*CT*10^-12));//Hz
+fr=fr/1000;//kHz
+f0=fr;///kHz
+f0=round(f0);//kHz
+disp(f0,"Oscillation frequency(kHz)");
+Ri=Rf/(C1/C2);//kohm
+disp(Ri,"Resistance Ri(kohm)");
+