z "ELECTRONIC FORMULA PROGRAM : VERSION 1.0":"WRITTEN BY""KIM F. SMITH":"N4JHX": 2a"SOME NOTES ON USING THIS PROGRAM........":"TO ENTER IN SCIENTIFIC NOTATION, USE THIS FORMAT: FOR EXAMPLE 1000 OHMS OR"("1 KILO OHM IS ENTERED AS 1E3 OHMS AND 1 MILLION HERTZ OR 1 MEGAHERTZ IS"F2"ENTERED AS 1E6 HERTZ.....SIMILARLY, VERY SMALL NUMBERS USE A NEGATIVE":"EXPONENT LIKE 25 MICROHENRIES IS 25E-6 HENRIES AND 150 PICOFARADS ARE"<"150E-12 FARADS...NOTE THAT IF A PROMPT ASKS FOR MEGAHERTZ , DIVIDE TOTAL":"HERTZ BY 1 MILLION & ENTER AS A DECIMAL"`F"YOU ARE ENCOURAGED TO PICK APART THIS PROGRAM FOR THE MATHEMATICAL":"DERIVATIONS. FOR EXAMPLE, ROOTS ARE DERIVED ALGEBRAICLY THAT IS SAY THE SQUARE " P"ROOT OF 4 IS THE SAME AS 4 TO THE 1/2 POWER OR AS IN THE MANUAL AS 4^(1/2).":"USING THIS METHOD, YOU CAN TAKE CUBE ROOTS, FOURTH ROOTS ETC. FOR ANY OTHER" Z"MATHEMATICAL PROGRAM. OTHER EXAMPLES: RETURNING TANGENTS TO DEGREES BY":"MULTIPLYING BY PI-RADS (180/) AND, RETURNING LOG BASE 10 FROM NATURAL LOGS BY"9!d"DIVIDING BY LOG(10) WHICH IS THE NATURAL LOG OF 10 TO THE C128.":"SIMILARLY, MULTIPLYING BY LOG(10) WILL RETURN A LOG BASE 10 TO A NATURAL LOG"!n"CAPABLE OF BEING USED BY THE EXP(X) FUNCTION. USE THESE DERIVATIONS IN":"OTHER PROGRAMS."<"x"NOTE:JUST PRESS THE LETTER OF THE FORMULA YOU WANT AND FOLLOW THE PROMPTS.":"MENUS, SUBMENUS, ETC. CAN BE OBTAINED BY PRESSING X WHEN MENU:X APPEARS."""PRESS X TO ENTER PROGRAM AND CALCULATE TO YOUR HEARTS CONTENT !"" * KIM F. SMITH *" A$"A$"X"180"150#"(A). OHMS LAW (B). SERIES VALUES (C). PARALLEL VALUES"D#"(D). REACTANCE (E). WAVELENGTH (F). DECIBEL"_#"(G) AC CONVERSIONS"h# A$y#A$"A"300# A$"B"670#A$"C"1190#A$"D"1710#A$"E"5190#A$"F"5790#A$"G"6360#"210#,""$6"(A). E=IR (B). I=E/R (C). R=E/I (D). P=IE (E). E=P/I (F). I=P/E (G). R=E2/P (H). P=I2R"$@" "$J"(I). E= PR (J). I= P/R (K). R=P/I2 (L). P=E2/R"%T"MENU : X"%^ A$,%hA$"X"180=%rA$"A"500N%|A$"B"510_%A$"C"520p%A$"D"530%A$"E"540%A$"F"550%A$"G"560%A$"H"570%A$"I"580%A$"J"590%A$"K"600%A$"L"610&350J&"":"INPUT I (AMPS)";I:"INPUT R (OHMS)";R:"E=";IR;"VOLTS": 620&"":"INPUT E (VOLTS)";E:"INPUT R (OHMS)";R:"I=";ER;"AMPS":620&"":"INPUT E (VOLTS)";E:"INPUT I (AMPS)";I:"R=";EI;"OHMS":620#'"":"INPUT I (AMPS)";I:"INPUT E (VOLTS)";E:"P=";IE;"WATTS":620l'"":"INPUT P (WATTS)";P:"INPUT I (AMPS)";I:"E=";PI;"VOLTS":620'&"":"INPUT P (WATTS)";P:"INPUT E (VOLTS)";E:"I=";PE;"AMPS":620(0"":"INPUT E (VOLTS)";E:"INPUT P (WATTS)";P:"R=";E2P;"OHMS":620J(:"":"INPUT I (AMPS)";I:"INPUT R (OHMS)";R:"P=";I2R;"WATTS":620(D"":"INPUT P (WATTS)";P:"INPUT R (OHMS)";R:"E=";(PR)(12);"VOLTS":620(N"":"INPUT P (WATTS)";P:"INPUT R (OHMS)";R:"I=";(PR)(12);"AMPS":6205)X"":"INPUT P (WATTS)";P:"INPUT I (AMPS)";I:"R=";PI2;"OHMS":620)b"":"INPUT E (VOLTS)";E:"INPUT R (OHMS)";R:"P=";E2R;"WATTS":620)l"ANOTHER PROBLEM (Y/N) ")vA$)A$"Y"300)A$"N"180)630)""%*"COMPONENT VALUES IN SERIES FOR RESISTANCE, CAPACITANCE & INDUCTANCE"R*"(A). RT = R1 + R2 + R3 . . ."*" 1 ":"(B). C = ":" T 1 1 1 "+" + + . . .":" C1 C2 C3"4+"(C). LT = L1 + L2 + L3 . . ."L+"MENU : X"U+ A$f+A$"A"800w+A$"C"930+A$"B"1060+ A$"X"180+ 740+ "":"HOW MANY R'S";X+*"FIRST R";A+4+>XX1+H"NEXT R";R+RARA,\ X1 ,f "RT = ";A;" OHMS">,p"ANOTHER PROBLEM (Y/N)"F,zA$W,A$"N"670h,A$"Y"800q,890,"":"HOW MANY L'S";X,"FIRST L";A,,XX1,"NEXT L";L,ALA, X1,"LT = ";A;" HENRIES" -"ANOTHER PROBLEM (Y/N)"-A$&-A$"Y"9307-A$"N"670A-1020\-$"":"HOW MANY C'S";Xm-."FIRST C";As-8}-BXX1-L"NEXT C";C-VA1((1C)(1A))-` X1-j"CT = ";A;" FARADS"-t"ANOTHER PROBLEM (Y/N)"-~A$.A$"Y"1060.A$"N"670.1150o."":"COMPONENT VALUES IN PARALLEL FOR RESISTANCE, CAPACITANCE & INDUCTANCE"." 1 ":"(A). R = ":" T 1 1 1 "'/" + + . . .":" R1 R2 R3"U/"(B). CT = C1 + C2 + C3 . . ."/" 1 ":"(C). L = ":" T 1 1 1 "0" + + . . .":" L1 L2 L3""0"MENU : X"*0A$<0A$"A"1320N0A$"B"1450`0 A$"C"1580q0A$"X"180{012600("":"HOW MANY R'S";X02"FIRST R";A0<0FXX10P"NEXT R";R0ZA1((1R)(1A))0d X11n"RT = ";A;" OHMS" 1x"ANOTHER PROBLEM (Y/N)"(1A$:1A$"Y"1320L1A$"N"1190V11410q1"":"HOW MANY C'S";X1"FIRST C";A11XX11"NEXT C";C1ACA1 X11"CT = ";A;" FARADS"1"ANOTHER PROBLEM (Y/N)"1A$ 2A$"Y"14502A$"N"1190'2"1540B2,"":"HOW MANY L'S";XS26"FIRST L";AY2@c2JXX1s2T"NEXT L";L2^A1((1L)(1A))2h X12r"LT = ";A;" HENRIES"2|"ANOTHER PROBLEM (Y/N)"2A$2A$"Y"15802A$"N"119031670N3"(A). INDUCTIVE REACTANCE (B). CAPACITIVE REACTANCE (C). RCL"v3"(D). RESONANCE":"MENU : X"~3A$3A$"X"1803A$"A"18003A$"B"31803A$"C"45603A$"D"486031730 4"(A). SERIES R L CIRCUITS (B). PARALLEL R L CIRCUITS"u4" XL XL "4"(C). X = 2FL (D). L = (E). F = "5&" L 2 F 2 L"850"REACTANCE SUBMENU : X"A5: A$S5DA$"X"1710e5NA$"A"2110w5XA$"B"25805bA$"C"19305lA$"D"19905vA$"E"205051850 6"":"INPUT INDUCTANCE";L:"INPUT FREQUENCY";F:X(2)FL:"XL = ";X;" OHMS"+6"ANOTHER PROBLEM (Y/N)"36A$E6A$"Y"1930W6A$"N"1800a619506"":"INPUT INDUCTIVE REACTANCE";X:"INPUT FREQUENCY";F:LX((2)F):"L = ";L;" HENRIES"6"ANOTHER PROBLEM (Y/N)"6A$6A$"Y"1990 7A$"N"180072010t7"":"INPUT INDUCTIVE REACTANCE";X:"INPUT INDUCTANCE";L:FX((2)L):"F = ";F;" HERTZ"7 "ANOTHER PROBLEM (Y/N)"7A$7 A$"Y"20507*A$"N"18007420707>""#8H"(A). ER = IT X";(142);" RT (B). EL = IT X";(142);" XL"o8R" "8\"(C). Z = 2 2 (D). E = 2 29f" T RT + XL T ER + EX""9p" XL>9z"(E). TAN = "Y9" RT"9"PRESS X TO RETURN TO SUB SUB MENU"9 A$9 A$"X"18009 A$"A" 22809 A$"B" 23409 A$"C" 24009 A$"D" 2520: A$"E" 2460:2200:"":"TOTAL CURRENT THROUGH PURE RESISTANCE";I:"TOTAL PURE RESISTANCE";R:EIR:"E = ";E;" VOLTS (RESISTIVE AC RMS VOLTAGE DROP)":"ANOTHER PROBLEM (Y/N)":A$: A$"Y"2280: A$"N"2110: 2300p;$ "":"TOTAL REACTIVE CURRENT";I:"TOTAL INDUCTIVE REACTANCE";X:EIX:"E = ";E;" VOLTS(INDUCTIVE AC RMS VOLTAGE DROP)";. "ANOTHER PROBLEM (Y/N)";8 A$;B A$"Y"2340;L A$"N"2110;V 2360;<` "":"TOTAL PURE RESISTANCE";R:"TOTAL INDUCTIVE REACTANCE";X:Z((R2)(X2))(12):"Z = ";Z;" OHMS (IMPEDANCE)"Y "ANOTHER PROBLEM (Y/N)"> A$"> A$"Y"25204> A$"N"2110>> 2540G> ""> " ET ET">( "(A). I = (B). I = ">2 " R RT L XT"?< " "F?F "(C). I = 2 2 "l?P " T IR + IL"?Z " ET RT X";(142);" XL" @d " "Z@n "(D). Z = à  (E). Z = 2 2 "@x " T IT T RT + XL"@ " IL@ "(F). TAN = "@ " IR"%A "PRESS X TO RETURN TO SUB SUB MENU".A A$AA A$"X"1800TA A$"A"2820gA A$"B"2830zA A$"C"2840A A$"D"2850A A$"E"2860A A$"F"2870A 2730-B "":"TOTAL AC RMS VOLTS";E:"TOTAL PURE RESISTANCE";R:IER:"IR =";I;" AMPS (RESISTIVE CURRENT)":2930B "":"TOTAL AC RMS VOLTS";E:"TOTAL INDUCTIVE REACTANCE";R:IER:"IR =";I;" AMPS (REACTIVE CURRENT)":2980&C "":"RESISTIVE CURRENT";R:"REACTIVE CURRENT";X:I((R2)(X2))(12):"IT = ";I;" AMPS (TOTAL AC RMS CIRCUIT CURRENT)":3030C" "":"TOTAL AC RMS VOLTS";E:"TOTAL AC RMS CIRCUIT CURRENT";I:ZEI:"ZT =";Z;" OHMS (IMPEDANCE)":3080D, "":"TOTAL PURE RESISTANCE";R:"TOTAL INDUCTIVE REACTANCE";L:Z(RL)(((R2)(L2))(12)):"ZT =";Z;" OHMS (IMPEDANCE)":3130D6 "":"TOTAL INDUCTIVE CURRENT";X:"TOTAL PURE RESISTIVE CURRENT";R:A(180)((XR)):"ANGLE = ";A;" DEGREES (PHASE ANGLE)"D@ "ANOTHER PROBLEM (Y/N)"DJ A$DT A$"Y"2870D^ A$"N"2580Dh 2890Er "ANOTHER PROBLEM (Y/N)"E| A$-E A$"Y"2820?E A$"N"2580IE 2940fE "ANOTHER PROBLEM (Y/N)"oE A$E A$"Y"2830E A$"N"2580E 2990E "ANOTHER PROBLEM (Y/N)"E A$E A$"Y"2840E A$"N"2580E 3040F "ANOTHER PROBLEM (Y/N)"F A$)F A$"Y"2850;F& A$"N"2580EF0 3090bF: "ANOTHER PROBLEM (Y/N)"kFD A$}FN A$"Y"2860FX A$"N"2580Fb 3140Fl "(A). SERIES R C CIRCUITS (B). PARALLEL R C CIRCUITS"*Gv " 1 1 1 "zG "(C). X = (D). C = (E). F = "G " C 2FC 2 F XC 2 C XC"G "REACTANCE SUBMENU : X"G A$ H A$"X"1710H A$"A"34901H A$"B"3960CH A$"C"3310UH A$"D"3370gH A$"E"3430qH 3230H "":"INPUT CAPACITANCE";C:"INPUT FREQUENCY";F:X1((2)FC):"XC = ";X;" OHMS"H "ANOTHER PROBLEM (Y/N)"H A$I A$"Y"3310I A$"N"3180 I 3330I* "":"INPUT CAPACITIVE REACTANCE";X:"INPUT FREQUENCY";F:C1((2)FX):"C = ";C;" FARADS"I4 "ANOTHER PROBLEM (Y/N)"I> A$IH A$"Y"3370IR A$"N"3180I\ 33909Jf "":"INPUT CAPACITIVE REACTANCE";X:"INPUT CAPACITANCE";C:F1((2)CX):"F = ";F;" HERTZ"VJp "ANOTHER PROBLEM (Y/N)"^Jz A$pJ A$"Y"3430J A$"N"3180J 3450J ""J "(A). ER = IT X";(142);" RT (B). EC = IT X";(142);" XC"4K " "{K "(C). Z = 2 2 (D). E = 2 2K " T RT + XC T ER + EX"K " XCL "(E). TAN = "L " RT"NL "PRESS X TO RETURN TO SUB SUB MENU"WL A$jL A$"X"3180L A$"A" 3660L A$"B" 3720L$ A$"C" 3780L. A$"D" 3900L8 A$"E" 3840LB3580eML"":"TOTAL CURRENT THROUGH PURE RESISTANCE";I:"TOTAL PURE RESISTANCE";R:EIR:"E = ";E;" VOLTS (RESISTIVE AC RMS VOLTAGE DROP)"MV"ANOTHER PROBLEM (Y/N)"M`A$MjA$"Y"3660MtA$"N"3490M~3680:N"":"TOTAL CAPACITIVE CURRENT ";I:"TOTAL CAPACITIVE REACTANCE";X:EIX:"E = ";E;" VOLTS(CAPACITIVE AC RMS VOLTAGE DROP)"XN"ANOTHER PROBLEM (Y/N)"`NA$rNA$"Y"3720NA$"N"3490N3740O"":"TOTAL PURE RESISTANCE";R:"TOTAL CAPACITIVE REACTANCE";X:Z((R2)(X2))(12):"Z = ";Z;" OHMS (IMPEDANCE)"$O"ANOTHER PROBLEM (Y/N)",OA$>OA$"Y"3780POA$"N"3490ZO3800O"":"TOTAL CAPACITIVE REACTANCE";X:"TOTAL PURE RESISTANCE";R:A((180)((XR))):"ANGLE = ";A;" DEGREES (PHASE ANGLE)"O "ANOTHER PROBLEM (Y/N)"PA$PA$"Y"3840'P(A$"N"34901P23860P<"":"PURELY RESISTIVE VOLTAGE DROP";R:"REACTIVE VOLTAGE DROP";X:E((R2)(X2))(12):"E = ";E;" VOLTS (AC RMS SOURCE VOLTAGE)"PF"ANOTHER PROBLEM (Y/N)"PPA$PZA$"Y"3900QdA$"N"3490 Qn3920Qx""QQ" ET ET"Q"(A). I = (B). I = "Q" R RT C XT"Q" "R"(C). I = 2 2 ";R" T IR + IC"R" ET RT X";(142);" XC"R" ")S"(D). Z = à  (E). Z = 2 2 "sS" T IT T RT + XC"S" ICS"(F). TAN = "S" IR"S"PRESS X TO RETURN TO SUB SUB MENU"S A$T A$"X"3180#T" A$"A"42006T, A$"B"4210IT6 A$"C"4220\T@ A$"D"4230oTJ A$"E"4240TT A$"F"4250T^4110Th"":"TOTAL AC RMS VOLTS";E:"TOTAL PURE RESISTANCE";R:IER:"IR =";I;" AMPS (RESISTIVE CURRENT)":4310qUr"":"TOTAL AC RMS VOLTS";E:"TOTAL CAPACITIVE REACTANCE";R:IER:"IR =";I;" AMPS (REACTIVE CURRENT)":4360U|"":"RESISTIVE CURRENT";R:"REACTIVE CURRENT";X:I((R2)(X2))(12):"IT = ";I;" AMPS (TOTAL AC RMS CIRCUIT CURRENT)":4410fV"":"TOTAL AC RMS VOLTS";E:"TOTAL AC RMS CIRCUIT CURRENT";I:ZEI:"ZT =";Z;" OHMS (IMPEDANCE)":4460V"":"TOTAL PURE RESISTANCE";R:"TOTAL CAPACITIVE REACTANCE";L:Z(RL)(((R2)(L2))(12)):"ZT =";Z;" OHMS (IMPEDANCE)":4510tW"":"TOTAL CAPACITIVE CURRENT";X:"TOTAL PURE RESISTIVE CURRENT";R:A (180)((XR)):"ANGLE = ";A;" DEGREES (PHASE ANGLE)"W"ANOTHER PROBLEM (Y/N)"WA$WA$"Y"4250WA$"N"3960W4270W"ANOTHER PROBLEM (Y/N)"W A$WA$"Y"4200XA$"N"3960X43208X"ANOTHER PROBLEM (Y/N)"AX A$SXA$"Y"4210eX&A$"N"3960oX04370X:"ANOTHER PROBLEM (Y/N)"XD A$XNA$"Y"4220XXA$"N"3960Xb4420Xl"ANOTHER PROBLEM (Y/N)"Xv A$XA$"Y"4230 YA$"N"3960Y44704Y"ANOTHER PROBLEM (Y/N)"=Y A$OYA$"Y"4240aYA$"N"3960kY4520tY""Y"(A). SERIES RCL CIRCUITS: XN = XL - XC"Y"[IF XL = XC THEN GO TO RESONANCE]"Z"(B). PARALLEL RCL CIRCUITS: IN = IC - IL">Z"[IF IC = IL THEN GO TO RESONANCE]"aZ"REACTANCE SUB MENU : X"iZ A${ZA$"X"1710Z A$"A"4670Z*A$"B"4750Z44620[>"":"INDUCTIVE REACTANCE";L:"CAPACITIVE REACTANCE";C:N(LC):"XN = ";N;" OHMS": LC 4820![HLC48302[RO0101:OP[\"ANOTHER PROBLEM (Y/N)"Y[f A$k[pA$"Y"4670}[zA$"N"4560[4710["":"CAPACITIVE CURRENT";C:"INDUCTIVE CURRENT";L:N(CL):"IN = ";N;" AMPS":CL4840[CL4850\"ANOTHER PROBLEM (Y/N)"\ A$0\A$"Y"4750B\A$"N"4560L\4780\"NET REACTANCE IS INDUCTIVE. USE INDUCTIVE REACTANCE SERIES RL FORMULAS":\"NET REACTANCE IS CAPACITIVE. USE CAPACITIVE REACTANCE SERIES RC FORMULAS":E]"NET CURRENT IS CAPACITIVE. USE CAPACITIVE REACTANCE PARALLEL RC FORMULAS":]"NET CURRENT IS INDUCTIVE. USE INDUCTIVE REACTANCE PARALLEL RL FORMULAS":]"RESONANCE FORMULA"]" 1"^"(A). F = "H^" "^$" "^." 2 L X";(142);" C"^8"(B). FIND L FOR A SPECIFIC FREQUENCY AND CAPACITANCE"6_B"(C). FIND C FOR A SPECIFIC FREQUENCY AND INDUCTANCE"X_L"REACTANCE SUB MENU : X"`_VA$r_`A$"X"1710_jA$"A"5010_tA$"B"5070_~A$"C"5130_4950 `"":"INDUCTANCE";L:"CAPACITANCE";C:F1((2)((LC)(12))):"F = ";F;" HERTZ"'`"ANOTHER PROBLEM (Y/N)"/`A$A`A$"Y"5010S`A$"N"4860]`5030`"":"RESONANT FREQUENCY";F:"CAPACITANCE";C:L((1(2))2)((F2)C):"L = ";L;" HENRIES"`"ANOTHER PROBLEM (Y/N)"`A$`A$"Y"5070aA$"N"4860a5090pa "":"RESONANT FREQUENCY";F:"INDUCTANCE";L:C((1(2))2)((F2)L):"C = ";C;" FARADS"a"ANOTHER PROBLEM (Y/N)"aA$a(A$"Y"5130a2A$"N"4860a<5150bF"HALF WAVELENGTH GUIDE FOR WIRE ANTENNAS (Z=50 OHMS AT RESONANCE) &"]bP"QUARTER WAVELENGTH GUIDE FOR 50 OHM TRANSMISSION LINES TO RESONANT LOAD"bZ"(A). ANTENNA LENGTH IN CENTIMETERS (B). ANTENNA LENGTH IN METERS"bd"(C). ANTENNA LENGTH IN INCHES (D). ANTENNA LENGTH IN FEET"cn"(E). TRANSMISSION LINE LENGTH IN FEET"Mcx"(F). TRANSMISSION LINE LENGTH IN INCHES"}c"(G). TRANSMISSION LINE LENGTH IN METERS"c"MENU : X"cA$cA$"X"140cA$"A"5370cA$"B"5430cA$"C"5490cA$"D"5550dA$"E"5610dA$"F"5670(dA$"G"57303d 5270d"":"RESONANT FREQUENCY (MHZ)";F:L13790.45307F:"HALF LENGTH IS ";L;" CENTIMETERS"d"ANOTHER PROBLEM (Y/N)"dA$dA$"Y"5370d"A$"N"5190d,53908e6"":"RESONANT FREQUENCY (MHZ)";F:L137.9045307F:"HALF LENGTH IS ";L;" METERS"Ve@"ANOTHER PROBLEM (Y/N)"^eJA$peTA$"Y"5430e^A$"N"5190eh5450er"":"RESONANT FREQUENCY (MHZ)";F:L5429.312231F:"HALF LENGTH IS ";L;" INCHES"f|"ANOTHER PROBLEM (Y/N)"fA$fA$"Y"5490,fA$"N"51906f5510f"":"RESONANT FREQUENCY (MHZ)";F:L452.4426859F:"HALF LENGTH IS ";L;" FEET"f"ANOTHER PROBLEM (Y/N)"fA$fA$"Y"5550fA$"N"5190f5570Ng"":"VELOCITY FACTOR";V:"RESONANT FREQUENCY (MHZ)";F:L(245.8927641V)F:"QUARTER LENGTH IS ";L;" FEET"lg"ANOTHER PROBLEM (Y/N)"tgA$gA$"Y"5610gA$"N"5190g5630h&"":"VELOCITY FACTOR";V:"RESONANT FREQUENCY (MHZ)";F:L(2950.713169V)F:"QUARTER LEMGTH IS ";L;" INCHES"2h0"ANOTHER PROBLEM (Y/N)":h:A$LhDA$"Y"5670^hNA$"N"5190hhX5690hb"":"VELOCITY FACTOR";V:"RESONANT FREQUENCY (MHZ)";F:L(74.9481145V)F:"QUARTER LENGTH IS ";L;" METERS"hl"ANOTHER PROBLEM (Y/N)"hvA$iA$"Y"5730#iA$"N"5190-i5750^i"DECIBEL GAIN & LOSS FOR POWER & VOLTAGE"i"(A). DECIBEL GAIN/LOSS FOR POWER GIVEN INPUT & OUTPUT POWER"i"(B). FIND INPUT POWER GIVEN DB GAIN/LOSS AND OUTPUT POWER"&j"(C). FIND OUTPUT POWER GIVEN DB GAIN/LOSS AND INPUT POWER"oj"(D). DECIBEL GAIN/LOSS FOR VOLTAGE GIVEN INPUT & OUTPUT VOLTAGES"j"(E). FIND INPUT VOLTAGE GIVEN DB GAIN/LOSS AND OUTPUT VOLTAGE"j"(F). FIND OUTPUT VOLTAGE GIVEN DB GAIN/LOSS AND INPUT VOLTAGE"k"MENU : X"kA$)kA$"X"140;kA$"A"5960Mk A$"B"6020_kA$"C"6090qk A$"D"6160k*A$"E"6220k4A$"F"6290k>5870.lH"":"OUTPUT POWER (WATTS)";O:"INPUT POWER (WATTS)";I:D(((OI))((10)))10:D;" DECIBELS":"IF DB IS NEGATIVE, IT IS DECIBELS LOSS"LlR"ANOTHER PROBLEM (Y/N)"Tl\A$flfA$"Y"5960xlpA$"N"5790lz5980l"IF DB IS A LOSS, ENTER AS A NEGATIVE NUMBER""m"DECIBEL GAIN/LOSS";D:"OUTPUT POWER (WATTS)";O:IO(((D10)((10)))):"INPUT POWER = ";I;" WATTS"@m"ANOTHER PROBLEM (Y/N)"HmA$ZmA$"Y"6020lmA$"N"5790vm6050m"IF DB IS A LOSS, ENTER AS A NEGATIVE NUMBER"n"DECIBEL GAIN/LOSS";D:"INPUT POWER (WATTS)";I:O(((D10)((10))))I:"OUTPUT POWER = ";O;" WATTS"4n"ANOTHER PROBLEM (Y/N)"uA$"M"7390Hu6510u"":"AC PEAK VALUE";V:AV.637:A" AC VOLTS (AVE)"u"ANOTHER PROBLEM (Y/N)"u"A$u,A$"Y"6670u6A$"N"6360u@6690vJ"":"AC AVE VALUE";V:AV.637:A" AC VOLTS (PEAK)",vT"ANOTHER PROBLEM (Y/N)"4v^A$FvhA$"Y"6730XvrA$"N"6360bv|6750v"":"AC RMS VALUE";V:AV.900854039:A" AC VOLTS (AVE)"v"ANOTHER PROBLEM (Y/N)"vA$vA$"Y"6790vA$"N"6360v68102w"":"AC AVE VALUE";V:AV.900854039:A" AC VOLTS (RMS)"Pw"ANOTHER PROBLEM (Y/N)"XwA$jwA$"Y"6850|wA$"N"6360w6870w"":"AC PEAK VALUE";V:AV.707106781:A" AC VOLTS (RMS)"w"ANOTHER PROBLEM (Y/N)"wA$wA$"Y"6910x&A$"N"6360x06930Xx:"":"AC RMS VALUE";V:AV.707106781:A" AC VOLTS (PEAK)"vxD"ANOTHER PROBLEM (Y/N)"~xNA$xXA$"Y"6970xbA$"N"6360xl6990xv"":"AC PEAK-PEAK VALUE";V:AV2.828427125:A" AC VOLTS (RMS)"y"ANOTHER PROBLEM (Y/N)"yA$)yA$"Y"7030;yA$"N"6360Ey7050y"":"AC RMS VALUE";V:AV2.828427125:A" AC VOLTS (PEAK-PEAK)"y"ANOTHER PROBLEM (Y/N)"yA$yA$"Y"7090yA$"N"6360y7110z"":"AC PEAK-PEAK VALUE";V:AV2:A" AC VOLTS (PEAK)"8z"ANOTHER PROBLEM (Y/N)"@zA$Rz A$"Y"7150dzA$"N"6360nz 7170z*"":"AC PEAK VALUE";V:AV2:A" AC VOLTS (PEAK-PEAK)"z4"ANOTHER PROBLEM (Y/N)"z>A$zHA$"Y"7210zRA$"N"6360z\72307{f"":"FREQUENCY (HZ)";V:A1V:A" SECONDS (PERIOD)"U{p"ANOTHER PROBLEM (Y/N)"]{zA$o{A$"Y"7270{A$"N"6360{7290{"":"PERIOD (SECONDS)";V:A1V:A" HZ (FREQUENCY)"{"ANOTHER PROBLEM (Y/N)"{A${A$"Y"7330|A$"N"6360|73506|"TIME CONSTANT INFO..."`|" RISING CURVE DECAY CURVE"|"T1 = 63.2% 36.8% "|"T2 = 86.5% 13.5%"|"T3 = 95% 5%"|"T4 = 98.2% 1.8%"}"T5 = 99.3% 0.7%"Q}$"(A). T = RC (B). R = T/C (C). C = T/R"}."(D). T = L/R (E). R = L/T (F). L = RT"}8"CONVERSION SUBMENU : X"}BA$}LA$"X"6360}VA$"A"7580}`A$"B"7640}jA$"C"7700~tA$"D"7760~~A$"E"7820+~A$"F"78805~7490~"":"RESISTANCE (OHMS)";R:"CAPACITANCE (FARADS)";C:TRC:T" SECONDS"~"ANOTHER PROBLEM (Y/N)"~A$~A$"Y"7580~A$"N"7390~7600'"":"TIME CONSTANT (SECONDS)";T:"CAPACITANCE (FARADS)";C:RTC:R" OHMS "E"ANOTHER PROBLEM (Y/N)"MA$_A$"Y"7640qA$"N"7390{ 7660"":"TIME CONSTANT (SECONDS)";T:"RESISTANCE (OHMS)";R:CTR:C" FARADS""ANOTHER PROBLEM (Y/N)"(A$2A$"Y"7700<A$"N"7390F7720kP"":"INDUCTANCE (HENRIES)";L:"RESISTANCE (OHMS)";R:TLR:T" SECONDS"Z"ANOTHER PROBLEM (Y/N)"dA$nA$"Y"7760xA$"N"73907780"":"INDUCTANCE (HENRIES)";L:"TIME CONSTANT (SECONDS)";T:RLT:R" OHMS"-"ANOTHER PROBLEM (Y/N)"5A$GA$"Y"7820YA$"N"7390c7840"":"RESISTANCE (OHMS)";R:"TIME CONSTANT (SECONDS)";T:LRT:L" HENRIES"с"ANOTHER PROBLEM (Y/N)"فA$A$"Y"7880A$"N"73907900