Calculator benchmark

[jhallen]

Yes, I will update when I have free time.

I did update the HP-48 page- I was curious about programming the HP-48, so I've implemented the HP-15c style method on the HP-48:

(should be a lot better on the HP-28..)

Code:


Lshift { Lshift { ' Alpha A Right ' Alpha A Right Right Lshift { ' Alpha B Right ' Alpha B Enter
                                                                     { { A A } { B B } }
' Alpha Alpha C S T Alpha STO                                        'CST' STO

Lshift << ' Alpha C Right STO Alpha E Spc Alpha C Enter              << 'C' STO E C >>
' Alpha A STO                                                        'A' STO

Lshift << ' Alpha D Right STO Alpha E Spc Alpha D Enter              << 'D' STO E D >>
' Alpha B STO                                                        'B' STO

Lshift << Alpha C Lshift Stack Nxt Dup Dup * + Alpha D Rshift Ln -   << C DUP DUP * + D LN -
          Alpha D Lshift X^2 Rshift Ln Enter                            D X^2 LN >>
' Alpha E STO                                                        'E' STO

CST                                                                  CST

93 keystrokes for setup.

Code:


2 . 5 6 B
3 . 1 2 A
   Shows:
      11.914
      1.88
      2.56
1 . 2 8 B
2 / B               (.64 -> B)
6 . 2 4 A
2 * A               (12.48 -> A)
etc.

61 keystrokes for execution.