Woz calculates "e"
03-07-2016, 04:46 AM (This post was last modified: 03-07-2016 04:30 PM by Gerson W. Barbosa.)
Post: #6
 Gerson W. Barbosa Senior Member Posts: 1,452 Joined: Dec 2013
RE: Woz calculates "e"
(03-06-2016 07:24 PM)Dwight Sturrock Wrote:  e^1

A short 12C program commemorating Woz's e^1 program:

0
STO 0
1
2
ENTER
n!
1/x
STO +0
X<>Y
1
-
x=0
GTO 15
GTO 05
RCL 0
1
+

Just curious about how it would look on the HP-33C red LED display :-)

Code:
 01-       1     1 02-      31     ENTER 03-   23  0     STO 0 04-      31     ENTER 05-      22     Rv 06-23 61  0     ST0 * 0 07-       1     1 08-      51     + 09-      21     x<>y 10-  24   0     RCL  0 11-  15   3   g 1/x 12-      51     + 13-  14  74   f PAUSE 14-      21     x<>y 15-       1     1 16-       2     2 17-   4  51   f x>y 18-  13  05     GTO 05 19-      22     Rv 20-      22     Rv 21-  13  00     GTO 00

Edited to fix a typo (33C, not 34C)

P.S.: HP-12C version:

Code:
 01-       1     1 02-      36     ENTER 03-   44  0     STO 0 04-44 20  0     ST0 * 0 05-       1     1 06-      40     + 07-      34     x<>y 08-   45  0     RCL  0 09-      22     1/x 10-      40     + 11-   43 31   g PSE 12-      34     x<>y 13-   43 36     LASTx 14-   42 14   f RND 15-   43 35   g x=0 16-43,33 19     GTO 19 17-      33     Rv 18-43,33 04     GTO 04 19-      33     Rv 20-      33     Rv 21-43,33 00     GTO 00

f 2 GTO 00 R/S -->

2.00
2.50
2.67
2.71
2.72
2.72

f 9 R/S -->

2.000000000
2.500000000
2.666666667
2.708333334
2.716666667
2.718055556
2.718253969
2.718278771
2.718281527
2.718281803
2.718281828
2.718281830
 « Next Oldest | Next Newest »

 Messages In This Thread Woz calculates "e" - Martin Hepperle - 03-04-2016, 02:40 PM RE: Woz calculates "e" - Dave Britten - 03-04-2016, 03:20 PM RE: Woz calculates "e" - Steve Simpkin - 03-04-2016, 07:38 PM RE: Woz calculates "e" - Willy R. Kunz - 03-08-2016, 11:09 AM RE: Woz calculates "e" - EdS2 - 03-05-2016, 09:48 AM RE: Woz calculates "e" - Dwight Sturrock - 03-06-2016, 07:24 PM RE: Woz calculates "e" - Gerson W. Barbosa - 03-07-2016 04:46 AM

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