Post Reply 
HP 41 - branching to local label and return stack - FINAL RESULTS AND PROGRAMS
06-22-2019, 04:16 PM (This post was last modified: 06-22-2019 04:40 PM by Artur - Brasil.)
Post: #37
RE: HP 41 - branching to local label and return stack
Well, let's study the variables allocation in registers.
Remember: I'll try do not use the one register for two variables.
First menu can have 5 keys - A-E or a-e or mix of them;
The same for second menu.

For MAGNETIC FLUX: φ - B.A+Fmm/R = 0


-----+-----+-------+-----+-------+
MENU | REG | A...B | REG | a...e |
1st..|..01.|.. - ..|..11.|.. % ..| % represents the theta letter!
.....|..02.|.. B ..|..12.|.......|
.....|..03.|.. A ..|..13.|.......|
.....|..04.|.. R ..|..14.|.......|
.....|..05.|.......|..15.|. FMM .|
2nd..|..06.|.......|..16.|.......|
.....|..07.|.......|..17.|.......|
.....|..08.|.......|..18.|.......|
.....|..09.|.......|..19.|.......|
.....|..10.|.......|..20.|.......|


User will see:

- B A R ^FMM
A B C D E

Key A has no meaning in this menu.

For PERMEABILITY: (u + uo.ur) - B/H = 0

-----+-----+-------+-----+-------+
MENU | REG | A...B | REG | a...e |
1st..|..01.|.. u ..|..11.|.......|
.....|..02.|.......|..12.|.. L ..|
.....|..03.|.. A ..|..13.|.......|
.....|..04.|.. R ..|..14.|.......|
.....|..05.|. ur ..|..15.|.......|
2nd..|..06.|.......|..16.|.......|
.....|..07.|.......|..17.|.......|
.....|..08.|.......|..18.|.......|
.....|..09.|.......|..19.|.......|
.....|..10.|.......|..20.|.......|


User will see:

u ^L A R uR
A b .C D E

(The dot is just to align here in my post)

For RELUTANCE: R - L/(u+uo.ur).A = 0

-----+-----+-------+-----+-------+
MENU | REG | A...B | REG | a...e |
1st..|..01.|.. u ..|..11.|.......|
.....|..02.|.. - ..|..12.|.......|
.....|..03.|.......|..13.|.. H ..|
.....|..04.|.. R ..|..14.|.......|
.....|..05.|. ur ..|..15.|.......|
2nd..|..06.|.......|..16.|.......|
.....|..07.|.......|..17.|.......|
.....|..08.|.......|..18.|.......|
.....|..09.|.......|..19.|.......|
.....|..10.|.......|..20.|.......|

User will see:

u - ^H R uR
A B .c D E

(The dot is just to align here in my post)

For FIELD INTENSITY: H - (Fmm+NI)/L = 0

-----+-----+-------+-----+-------+
MENU | REG | A...B | REG | a...e |
1st..|..01.|.. - ..|..11.|.......|
.....|..02.|.......|..12.|.. L ..|
.....|..03.|.......|..13.|.. H ..|
.....|..04.|.......|..14.|.. I ..|
.....|..05.|.......|..15.|. FMM .|
2nd..|..06.|.. N ..|..16.|.......|
.....|..07.|.......|..17.|.......|
.....|..08.|.......|..18.|.......|
.....|..09.|.......|..19.|.......|
.....|..10.|.......|..20.|.......|
User will see:
[font=courier]
- ^L ^H ^I FMM>
A b .c ..d E
second menu (pressing I)
<N
A .B C D E

(The dot is just to align here in my post)

In real HP code, as we have just 12 characters in display and 15 per line of program, I can use : instead of space to separate some variables.

Bellow, I copy just the appearance of menus. See how I tried to keep each variable attached to one register for all equations.

- B A R ^FMM
u ^L A R uR
u - ^H R uR
- ^L ^H ^I FMM> <N


Next post the implementation of some of these equations.

ARTUR MARIO JUNIOR
BRAZIL
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
RE: HP 41 - branching to local label and return stack - Artur - Brasil - 06-22-2019 04:16 PM



User(s) browsing this thread: 1 Guest(s)