(11C) Generate Pair of Parallel Resistors

[Gamo]

Program to generate in endless loop of
Two Parallel Resistors with your desire total.

This program give different pair of resistors that match the giving total.

Procedure:

[A] // Total [ENTER] Step [A]

[B] // Press any key to Stop Loop [B] 1st Resistor [R/S] 2nd Resistor [R/S] continue forward loop.

[C] // [C] Backward loop, Press any key to Stop Loop [B] 1st Resistor [R/S] 2nd Resistor.

[E] Initialize

---------------------------------------------------

Example: FIX 3

Destination total is 25.75
Pick two difference pair of resistors of your choice.

I will use 0.5 for loop steps.

[E] Initialize

25.75 ENTER .5

[A] ---->Program keep generate two resistors that match your giving total in this case is 25.75

Once you see the pair you like press any key to stop I recommend ENTER key.

[B] I pick this pair: 30.25 [R/S] 173.097 [R/S] --> Continue Loop Forward

[C] This loop go backward: Once you see the pair you like press any key to stop.
I pick this pair: --> [B] 28.250 [R/S] 290.975

---------------------------------------------------------
Program:

Code:


LBL A
STO 1
Rv
STO 0
RCL 0
LBL 5
RCL 1
+
LBL 1
STO 2
PSE
RCL 0
x
RCL 2
RCL 0
-
÷
STO 3
PSE
PSE
LBL 3
RCL 4
X≠0
GTO 4
RCL 2
GTO 5
------------------------------
LBL B
RCL 2
R/S
RCL 3
R/S
GTO 3
----------------------------
LBL C
1
STO 4
LBL 4
RCL 2
RCL 1
-
GTO 1
---------------------------
LBL E
CLx
STO 1
STO 2
STO 3
STO 4
RTN

Gamo