initial commit / add all books

8 files changed, 200 insertions, 0 deletions

diff --git a/2075/CH7/EX7.1/pe7_1.sce b/2075/CH7/EX7.1/pe7_1.sce
new file mode 100755
index 000000000..6ab923ef3
--- /dev/null
+++ b/2075/CH7/EX7.1/pe7_1.sce
@@ -0,0 +1,12 @@
+//example 7.1

+clc; funcprot(0);

+// Initialization of Variable

+T=20;//time

+Vp=12;//voltage

+t=5;

+//calculation

+D=t/T;

+disp(D,"duty cycle:")

+Vd=(D*Vp);

+disp(Vd,"average voltage in V:")

+clear()

diff --git a/2075/CH7/EX7.2/pe7_2.sce b/2075/CH7/EX7.2/pe7_2.sce
new file mode 100755
index 000000000..778121911
--- /dev/null
+++ b/2075/CH7/EX7.2/pe7_2.sce
@@ -0,0 +1,23 @@
+//example 7.2

+clc; funcprot(0);

+// Initialization of Variable

+Vd=12;//voltage

+Vl=5;//load voltage

+Rl=10;//load resistance

+f=100;//frequency

+L=220;//inductor

+//calculation

+D=Vl/Vd;

+disp(round(D*100),"duty cycle in %:")

+T=1/f;

+disp(T*1000,"time in microsec")

+t=D*T;

+disp(round(t*10000)/10,"on time in microsec")

+Vr=Vd-Vl;

+I=Vr*round(t*10000)/10/L;

+disp(I*1000,"ripple current in mA:")

+Il=Vl/Rl;

+disp(Il*1000,"load current in mA:")

+Ip=Il+I/2;

+disp(Ip*1000,"peak inductor current in mA:")

+clear()

diff --git a/2075/CH7/EX7.3/pe7_3.sce b/2075/CH7/EX7.3/pe7_3.sce
new file mode 100755
index 000000000..c20ecd239
--- /dev/null
+++ b/2075/CH7/EX7.3/pe7_3.sce
@@ -0,0 +1,17 @@
+//example 7.3 

+clc; funcprot(0);

+// Initialization of Variable

+Id=500;//load current

+i=134;//mA

+D=.42;//duty cycle

+//calculation

+Ip=Id+i/2;

+Im=Id-i/2;

+I1=((D/3)*(Ip^2+Im*Ip+Im^2))^.5;

+disp(I1,"rms current in mA:")

+printf('by trapezium method')

+I2=D^.5*Id;

+disp(I2,"rms current in mA:")

+printf('by rectangle method')

+printf('\n rectangle method gives good result than trapezium method')

+clear()

diff --git a/2075/CH7/EX7.4/pe7_4.sce b/2075/CH7/EX7.4/pe7_4.sce
new file mode 100755
index 000000000..7ac4fe671
--- /dev/null
+++ b/2075/CH7/EX7.4/pe7_4.sce
@@ -0,0 +1,14 @@
+//example 7.4 

+clc; funcprot(0);

+// Initialization of Variable

+Vp=.3;//voltage

+I=500;//current

+D=.42;//duty cycle

+T=150;//temperature

+R=.6;//ohm

+//calculation

+Vq=I*R;

+disp(Vq/1000,"voltage in V:")

+Pq=D*Vq*I;

+disp(Pq/1000,"dissipated power in mW:")

+clear()

diff --git a/2075/CH7/EX7.5/pe7_5.sce b/2075/CH7/EX7.5/pe7_5.sce
new file mode 100755
index 000000000..7c691bc19
--- /dev/null
+++ b/2075/CH7/EX7.5/pe7_5.sce
@@ -0,0 +1,37 @@
+//example 7.5 

+clc; funcprot(0);

+// Initialization of Variable

+R=10.0;//resistance

+V1=5.0;//V

+V2=12.0;//V

+Ta=80.0;//degreeC

+Tb=150.0;

+f=150.0;//frequency

+//calculation

+D=V1/V2;

+disp(D*100,"duty cycle in %")

+T=1/f;

+disp(T*1000,"time period in microsec:")

+t=D*T;

+disp(t*1000,"on time in microsec:")

+Id=V1/R;

+disp(Id*1000,"load current in mA:")

+i=.25*Id;

+disp(i*1000,"ripple current in mA:")

+Vl=V2-V1;

+disp(Vl,"inductor voltage in V:")

+L=Vl*t/i;

+disp(L*1000,"inductor in microH:")

+Ip=Id+i/2;

+disp(Ip*1000,"inductor current in mA:")

+Ic=Id/2;

+disp(Ic*1000,"minimum capacitor current in mA:")

+Vc=1.5*V2;

+disp(Vc,"minimum capacitor voltage in V:")

+K=V1/1.23-1;

+disp(K,"Rf/Ri = :")

+P=.01*V2+D*Id*1;

+disp(P,"power of LM2595 in W:")

+Q=(Tb-Ta)/P-2.2;

+disp(Q,"thermal resistance in degreeC/W:")

+clear()

diff --git a/2075/CH7/EX7.6/pe7_6.sce b/2075/CH7/EX7.6/pe7_6.sce
new file mode 100755
index 000000000..0beef55c9
--- /dev/null
+++ b/2075/CH7/EX7.6/pe7_6.sce
@@ -0,0 +1,32 @@
+//example 7.6 

+clc; funcprot(0);

+// Initialization of Variable

+V1=12//V

+V2=22;//V

+I=.7;//A

+f=100;//kHz

+R=.4;//ohm

+Vd=.5;

+//calculation

+Pl=V2*I;

+disp(Pl,"load power in W:")

+Ps=Pl/.9;

+disp(Ps ,"supply power in W:")

+Id=round(Ps/V1*10)/10;

+disp(Id,"dc current in A:")

+i=.25*Id;

+Ip=Id+i/2;

+disp(Ip,"inductor current in A:")

+D=round((1-V1/V2)*100)/100;

+disp(D,"duty cycle :")

+t=D/f;

+L=V1*t/i;

+disp(L*1000,"inductor in microH:")

+Vp=Id*R;

+Pq=D*Vp*Id;

+disp(Pq*1000,"transistor power in mW:")

+Pd=(1-D)*.5*Id;

+disp(round(Pd*100)*10,"diode power in mW:")

+C=Id*t/2/20;

+disp(C*1e6,"capacitor in microF:")

+clear()

diff --git a/2075/CH7/EX7.7/pe7_7.sce b/2075/CH7/EX7.7/pe7_7.sce
new file mode 100755
index 000000000..ecc216b98
--- /dev/null
+++ b/2075/CH7/EX7.7/pe7_7.sce
@@ -0,0 +1,25 @@
+//example 7.7

+clc;funcprot(0);

+//Initialization of Variable

+V1=12;//V

+V2=22;//V

+I=.7;//A

+Ta=80;//degreeC

+Ps=17.1//supply power

+//calculation

+K=V2/1.23-1;

+disp(K,"Rf/Ri=:")

+printf('pick Rf=22; Ri=1.3;')

+Id=round(Ps/V1*10)/10;

+D=round((1-(V1/V2))*100)/100;

+Ir=D^.5*Id;

+disp(Id,"rms current in A:")

+Ps=Ir^2*.15;

+disp(Ps*1000,"switch power in mW:")

+Pi=D*Id*V1/50;

+disp(Pi*1000,"IC power in mW:")

+P=Ps+Pi;

+disp(P*1000,"total power in mW:")

+T=Ta+P*65;

+disp(T,"IC temperature in degreeC:")

+clear()

diff --git a/2075/CH7/EX7.8/pe7_8.sce b/2075/CH7/EX7.8/pe7_8.sce
new file mode 100755
index 000000000..752fe98a0
--- /dev/null
+++ b/2075/CH7/EX7.8/pe7_8.sce
@@ -0,0 +1,40 @@
+//example 7.8

+clc;funcprot(0);

+//Initialization of Variable

+V1=12;//V

+V2=5;//V

+Il=1;//load current

+T=10;//microsec

+K=1.25;//Npri/Nsec

+L=85;//microH

+//calculation

+Vq=V1+V2*K;

+disp(Vq,"maximum voltage in V:")

+Vd=V1*K+V2;

+disp(Vd,"diode voltage in V:")

+D=round((K*V2)*100/(V1+K*V2))/100;

+disp(D,"duty cycle:")

+Po=V2*Il;

+disp(Po,"power delivered in W:")

+Pi=round(Po/.09)/10;

+Id=Pi/V1;

+disp(Id*1000,"average current in mA:")

+Im=Id/D;

+disp(Im,"mid primary current in A:")

+Ir=(Im*D^.5);

+disp(Ir*1000,"rms current in mA:")

+i=V1*D*T/L;

+disp(i*1000,"ramp current in mA:")

+IM=Im+.24;

+disp(IM,"maximum transistor current in A:")

+Imin=Im-.24;

+disp(Imin,"minimum transistor current in A:")

+Ip=K*IM;

+disp(Ip,"diode peak current in A:")

+Imid=Il/(1-D);

+Irms=Imid*(1-D)^.5;

+disp(Irms,"secondary rms current in A:")

+C=D*Il*T/20;

+disp(C*1000,"capacitor in microF:")

+clear()

+