summaryrefslogtreecommitdiff
path: root/3871/CH10/EX10.23/Ex10_23.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3871/CH10/EX10.23/Ex10_23.sce
parentd1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff)
downloadScilab-TBC-Uploads-master.tar.gz
Scilab-TBC-Uploads-master.tar.bz2
Scilab-TBC-Uploads-master.zip
Added new codeHEADmaster
Diffstat (limited to '3871/CH10/EX10.23/Ex10_23.sce')
-rw-r--r--3871/CH10/EX10.23/Ex10_23.sce32
1 files changed, 32 insertions, 0 deletions
diff --git a/3871/CH10/EX10.23/Ex10_23.sce b/3871/CH10/EX10.23/Ex10_23.sce
new file mode 100644
index 000000000..e2868167c
--- /dev/null
+++ b/3871/CH10/EX10.23/Ex10_23.sce
@@ -0,0 +1,32 @@
+//===========================================================================
+//chapter 10 example 23
+clc
+clear all
+
+//variable declaration
+V = 3; //battery voltage in volts
+Rm = 60; //resistance in Ω
+Ifm = 1.2; //full-scale deflection meter current in mA
+Rh = 1500; //half-scale deflection resistance in Ω
+V1 = 0.3; //at 10 % drop in battery voltage in V
+
+//calculations
+If = V/Rh; //battery current for full-scale deflection in A
+If1 = If*10^3; //battery current for full-scale deflection in mA
+Ish = If1-Ifm; //current through zero adjuster resistor i.e,shunt resistor in mA
+Rsh = (Ifm*Rm)/Ish; //resistance in Ω
+Rse = Rh-((Rsh*Rm)/(Rsh+Rm)); //current limiting resistor i.e,series resistor
+V3 = V-V1; //voltage in V
+If2 = V3/Rh; //battery current at full-scale deflection in A
+If21 = If2*10^3; //battery current at full-scale deflection in mA
+Ish1 =If21-Ifm; //current through shunt resistor in mA
+Rsh1 = (Ifm*Rm)/Ish1; //shunt resistor in Ω
+Rh1 = Rse+((Rm*Rsh1)/(Rm+Rsh1)); //total internal circuit resistance in Ω
+e =((Rh-Rh1)/(Rh1))*100; //percentage error in %
+
+//calculation
+mprintf("resistance = %3.2f Ω",Rsh);
+mprintf("\ncurrent limiting resistor = %3.2f Ω",Rse);
+mprintf("\nshunt resistor = %3.2f Ω",Rsh1);
+mprintf("\npercentage error = %3.3f percentage ",e);
+