1 files changed, 14 insertions, 0 deletions
diff --git a/1733/CH2/EX2.30/2_30.sce b/1733/CH2/EX2.30/2_30.sce
new file mode 100755
index 000000000..00c990727
--- /dev/null
+++ b/1733/CH2/EX2.30/2_30.sce
@@ -0,0 +1,14 @@
+//2.30
+clc;
+Vm=415*2^0.5/3^0.5;
+Vdc=460;
+Idc=200;
+alph=acosd(Vdc*%pi/(3*3^0.5*Vm));
+printf("Firing Angle = %.2f degree", alph)
+Pdc=Vdc*Idc;
+printf("\ndc Power = %.2f W", Pdc)
+Iac=Idc*(120/180)^0.5;
+printf("\nAC line current = %.2f A", Iac)
+Ip=Idc;
+Irms_thy=Ip*(120/360)^0.5;
+printf(" \nRMS thyristor current = %.1f A", Irms_thy)