Finally got an HP 42S

[Gerson W. Barbosa]

Congratulations!

As a celebration for your new acquisition, I've written this 42-byte 42S program. Certainly not the best example to demonstrate the capabilites of the HP-42S, but an example of a program that uses only the stack (Quite easier on the HP-42S than on the HP-41C). Some of you might want to make the program shorter while keeping the same byte-count, thus allowing for a more meaningful program name.

Enjoy your new HP-42S!

Gerson.

Code:


00 { 42-Byte Prgm }
01>LBL "V"
02 0
03 SIGN
04 STO ST Z
05>LBL 00
06 2
07 STO× ST T
08 RCL+ ST L
09 SQRT
10 ×
11 DSE ST Y
12 GTO 00
13 R^
14 STO+ ST X
15 RCL÷ ST Y
16 ENTER
17 RCL÷ ST L
18 X^2
19 RCL× ST Y
20 6
21 ÷
22 +
23 .END.