Sweet! I knew HP-41 could get a better score, had no idea there was enough space to show two results at once on the display.
(08-18-2021 08:20 PM)C.Ret Wrote: HP-41C
SETUP: using Alpha register to display X & Y from A & B in registers 01 & 02 respectively.
Code:
PACK 4 [shift][GTO][ . ][ . ]
PRGM 1 [prgm]
001 RCL 01 2 [RCL][∑+ ]
002 ENTER^ 1 [enter]
003 X^2 2 [shift][√x ]
004 + 1 [ + ]
005 RCL 02 2 [RCL]][1/x]
006 LN 1 [LN]
007 - 1 [ - ]
008 LASTX 2 [shift][ . ]
009 2 1 [ 2 ]
010 * 1 [ x ]
011 CLA 3 [alpha][shift][ ← ]
012 ARCL Y 4 [shift][RCL][ . ][ * ]
013 "~, 3 [shift][XEQ][ . ]
014 ARCL X 4 [shift][RCL][ . ][ 6 ]
015 AVIEW 2 [shift][R/S]
016 2 2 [alpha][ 2 ]
PRGM 1 [prgm]
EXECUSION: each press on R/S key display X and Y in the display.
Code:
3,12 STO 01 6 [ 3 ][ . ][ 1 ][ 2 ][STO][∑+ ]
2,56 STO 02 R/S 7 [ 2 ][ . ][ 5 ][ 6 ][STO][1/x][R/S]
ST/ 02 R/S 4 [STO][ / ][1/x][R/S]
ST/ 02 R/S 4 [STO][ / ][1/x][R/S]
ST* 01 R/S 4 [STO][ * ][∑+ ][R/S]
ST* 01 R/S 4 [STO][ * ][∑+ ][R/S]
ST* 01 ST/ 02 R/S 7 [STO][ * ][∑+ ][STO][ / ][1/x][R/S]
ST/ 02 R/S 4 [STO][ / ][1/x][R/S]
ST/ 02 R/S 4 [STO][ / ][1/x][R/S]
1,32 STO 02 R/S 7 [ 1 ][ . ][ 3 ][ 2 ][STO][1/x][R/S]
18,59 STO 01 R/S 8 [ 1 ][ 8 ][ . ][ 5 ][ 9 ][STO][∑+ ][R/S]
17,63 STO 01 R/S 8 [ 1 ][ 7 ][ . ][ 6 ][ 3 ][STO][∑+ ][R/S]
ST* 02 R/S 4 [STO][ * ][1/x][R/S]
ST* 02 R/S 4 [STO][ * ][1/x][R/S]
SCORE: 113 keystrokes
Search
Member List
Calendar
Help
