summaryrefslogtreecommitdiff
path: root/3129/CH17
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3129/CH17
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 '3129/CH17')
-rwxr-xr-x3129/CH17/EX17.1/ex17_1.sce27
-rwxr-xr-x3129/CH17/EX17.2/ex17_2.sce30
-rwxr-xr-x3129/CH17/EX17.3/ex17_3.sce26
-rwxr-xr-x3129/CH17/EX17.4/ex17_4.sce19
4 files changed, 102 insertions, 0 deletions
diff --git a/3129/CH17/EX17.1/ex17_1.sce b/3129/CH17/EX17.1/ex17_1.sce
new file mode 100755
index 000000000..8872889b0
--- /dev/null
+++ b/3129/CH17/EX17.1/ex17_1.sce
@@ -0,0 +1,27 @@
+//Finding the Transistor voltage and current with clamping
+//Example 17.1(Page No-766)
+clc
+clear
+//given data
+Vcc=100;//in volts
+Rc=1.5;//in ohms
+Vd1=2.1;//in volts
+Vd2=0.9;//in volts
+Vbe=0.7;// in volts
+Vb=15;//in volts
+Rb=2.5;//in ohms
+B=16;
+
+//part(a)
+I1=(Vb-Vd1-Vbe)/Rb;
+Ic=B*I1;
+printf('(a)Collecter current without clamping:%2.2f A\n',Ic)
+
+//part(b)
+Vce=Vbe+Vd1-Vd2;
+printf(' (b)Clamping voltage:%.1f V\n',Vce)
+
+//part(c)
+IL=(Vcc-Vce)/Rc;
+Ic=B*(I1+IL)/(B+1);
+printf(' (c)Collector current with clampingIc:%2.2f A\n',Ic)
diff --git a/3129/CH17/EX17.2/ex17_2.sce b/3129/CH17/EX17.2/ex17_2.sce
new file mode 100755
index 000000000..98421e9c7
--- /dev/null
+++ b/3129/CH17/EX17.2/ex17_2.sce
@@ -0,0 +1,30 @@
+//Finding the Circuit values of a UJT Triggering ciruit
+//Example 17.2(Page No-774)
+clc
+clear
+//given data
+Vs=30;//in volts
+n=0.51;
+Ip=10*10^-6;//amperes
+Vv=3.5;//volts
+Iv=10*10^-3;//amps
+f=60;//Hz
+tg=50*10^-6;//in sec
+Vd=0.5;//volts
+T=1/f;//sec
+Vp=n*Vs+Vd;
+C=0.5*10^-6;//assume C
+x=(Vs-Vp)/Ip;//upper limit of R
+x=x*10^-6;//in megaohms
+printf('upper limit of R:%2.2f kohms\n',x);
+y=(Vs-Vv)/Iv;//lower limit of R
+y=y*10^-3;//in kiloohms
+printf('lower limit of R:%2.2f Mohms\n',y);
+R=1/(f*C*log(1/(1-n)));
+R=R*10^-3;//in kohms
+printf('Value of R:%2.2f kohms\n',R);
+Vb1=Vp;//peak gate voltage
+Rb1=tg/C;
+printf('Rb1:%d Ohms\n',Rb1);
+Rb2=10^4/(n*Vs);
+printf('Rb2:%.2f Ohms\n',Rb2);
diff --git a/3129/CH17/EX17.3/ex17_3.sce b/3129/CH17/EX17.3/ex17_3.sce
new file mode 100755
index 000000000..59cb1e17e
--- /dev/null
+++ b/3129/CH17/EX17.3/ex17_3.sce
@@ -0,0 +1,26 @@
+//Finding the Circuit values of a programmable UJT triggering circuit
+//Example 17.3(Page No-776)
+clc
+clear
+//given data
+Vs=30//V
+Ig=1*10^-3//A
+f=60//Hz
+tg=50*10^-6//sec
+Vrk=10//V
+T=1/f//time period
+Vp=Vrk//peak triggering voltage
+C=0.5*10^-6//F (assume)
+Rk=tg/C
+printf('value of Rk:%.2f ohm\n',Rk)
+n=Vp/Vs
+printf('intrinsic ratio n:%.2f\n',n)
+r=1/(f*C*log(Vs/(Vs-Vp)))
+R=r*10^-3
+printf('R:%.1f ohms\n',R)
+Rg=Vs*(1-n)*10^-3/Ig//in kilo-ohms
+printf('Rg:%d kohms\n',Rg)
+R1=Rg/n//in kiloohms
+R2=Rg/(1-n)//in kiloohms
+printf('R1:%d kohms\n',R1)
+printf('R2:%d kohms\n',R2)
diff --git a/3129/CH17/EX17.4/ex17_4.sce b/3129/CH17/EX17.4/ex17_4.sce
new file mode 100755
index 000000000..342a2707b
--- /dev/null
+++ b/3129/CH17/EX17.4/ex17_4.sce
@@ -0,0 +1,19 @@
+//Finding the minimum width of a gate pulse for a thyristor converter
+//Example 17.4(Page No-777)
+clc
+clear
+//given data
+Ih=500*10^-3//holding current in A
+td=1.5*10^-6//delay time in sec
+a=30*%pi/180//alpha is a delay angle in radians
+L=10*10^-3//load L in H
+R=10//load R in ohms
+V=120//supply voltage in V
+f=60//supply freq in Hz
+Vm=sqrt(2)*V//maximum voltage value in V
+wt=a
+V1=Vm*sin(wt)
+di=V1/L//di is rate of rise of anode current at instant of triggering
+t1=Ih/di//time req by current to reach to holding current value
+tg=(t1+td)*10^6//in microsec
+printf('minimum width of gate pulse tg:%.2f microsec\n',tg)