1 files changed, 22 insertions, 0 deletions
diff --git a/165/CH4/EX4.10/ex4_10.sce b/165/CH4/EX4.10/ex4_10.sce
new file mode 100644
index 000000000..aae8a77fe
--- /dev/null
+++ b/165/CH4/EX4.10/ex4_10.sce
@@ -0,0 +1,22 @@
+//Example 4.10
+clc;
+
+Im=20*10^-3;       //Full Scale Current
+Vm=100*10^-3;      //Voltage across MCI
+Rm=Vm/Im;          //Meter Resistence
+
+//Shunt resistence for fullscale current of 50 A
+I=50;
+Rsh=Im*Rm/(I-Im);
+disp(Rsh,'Shunt resistence for fullscale current of 50 A')
+
+P=Vm*I;         //Power Dissipation
+disp(P,'Power Dissipation when as Ammeter')
+
+//Voltage Multiplier for full scale reading with 500 V
+V=500;
+Rsh=V/Im-Rm;
+disp(Rsh,'Voltage Multiplier for full scale reading with 500 V')
+
+P=V*Im;        //Power Dissipation
+disp(P,'Power Dissipation when used as Voltmeter')
+\ No newline at end of file