1 files changed, 23 insertions, 0 deletions
diff --git a/1964/CH12/EX12.4/ex12_4.sce b/1964/CH12/EX12.4/ex12_4.sce
new file mode 100755
index 000000000..11344ffd9
--- /dev/null
+++ b/1964/CH12/EX12.4/ex12_4.sce
@@ -0,0 +1,23 @@
+//Chapter-12, Example 12.4, Page 344
+//=============================================================================
+clc
+clear
+//INPUT DATA
+Vac=230;//AC supply voltage
+f=60;//frequency in Hz
+Rl=900;//load resistance in ohms
+noofturns=5;//no of turns
+Rl=900;//resistance of load in ohms
+rs=100;//secondary coil resistance in ohms
+//CALCULATIONS
+Vs=(Vac)/(noofturns);//voltage across two ends of secondary in V
+Vrms=(Vs)/2;//voltage from center tapping to one end
+Vm=Vrms*sqrt(2);//mean voltage in V
+Vdc=(2*Vm)/(%pi);//voltage across load in V
+Idc=(Vdc)/(rs+Rl);//DC current flowing through to load in A
+Pdc=(Idc)^2*(Rl);//DC power delivered to the load in W
+PIV=2*Vm;//PIV across each diode in V
+Vr=sqrt((Vrms)^2-(Vdc)^2);//Ripple voltage in V
+fr=2*f;//frequency of ripple voltage in Hz
+mprintf("Thus voltage across load,DC current flowing through to load,DC power delivered to the load,PIV across each diode,Ripple voltage are %2.1f V,%g A,%1.3f W,%d V,%2.2f V and %d Hz respectively",Vdc,Idc,Pdc,PIV,Vr,fr);
+//=================================END OF PROGRAM======================================================================================================