SR-56 Lunar Lander Game

Back to main page


This program is taken from the SR-56 Applications Book, by Texas Instruments.

This game will play the classic game of Lunar Lander. It is still fun, although having to key in the entire program every time you turn this calculator on seems very ancient these days.

Notes: You can burn 0 to free fall. Max burn is 75 pounds of fuel in a second. Each burn should be an integer. A negative velocity indicates a descent. A positive velocity means you are ascending! When you run out of fuel, you free fall and impact on the surface. Five pounds of fuel will offset the force of gravity and keep your velocity constant.

Instructions: You may choose your on-board fuel, descent speed, and starting height. 1) Load memories as follows: Starting fuel: 600 STO 0, Starting velocity: -500 STO 1 (note: that IS a negative), Starting altitude: 2500 STO 2. 2) Burn 1 second of fuel. Input the amount of fuel to be burned and press R/S. 3) The display will show the new rate of descent and new altitude in the form -velocity.altitude. 4) Continue burning fuel until you either land successfully or crash. 5) A successful landing will show a 0 in the display. Congratulations! 6) A crash will flash your impact velocity in the display. 7) You may check the remaining fuel at any time by pressing RCL 0.

A sucessful landing is anything under 5 feet per second. (Although that would still be quite a jolt!)


Program Listing:
Line  Keycode  Instruction
00      49       FIX
01      00       0
02      56       CP
03      47       X >= T
04      00       0
05      07       7
06      00       0
07      32       X <> T
08      07       7
09      05       5
10      47       X >= T
11      01       1
12      04       4
13      32       X <> T
14      34       RCL
15      00       0
16      74       -
17      32       X <> T
18      12       INV
19      47       X >= T
20      02       2
21      03       3
22      32       X <> T
23      33       STO
24      03       3
25      94       =
26      33       STO
27      00       0
28      34       RCL
29      02       2
30      84       +
31      34       RCL
32      01       1
33      84       +
34      52       (
35      34       RCL
36      03       3
37      74       -
38      05       5
39      53       )
40      35       SUM
41      01       1
42      54       /
43      02       2
44      94       =
45      33       STO
46      02       2
47      56       CP
48      37       X = T
49      07       7
50      08       8
51      93       +/-
52      47       X >= T
53      09       9
54      03       3
55      34       RCL
56      00       0
57      37       X = T
58      08       8
59      00       0
60      34       RCL
61      02       2
62      64       *
63      04       4
64      93       +/-
65      19       10^X
66      84       +
67      34       RCL
68      01       1
69      47       X >= T
70      07       7
71      05       5
72      93       +/-
73      94       =
74      93       +/-
75      94       =
76      49       FIX
77      04       4
78      41       R/S
79      42       RST
80      34       RCL
81      02       2
82      64       *
83      01       1
84      00       0
85      93       +/-
86      84       +
87      34       RCL
88      01       1
89      43       X^2
90      94       =
91      48       SQRT
92      93       +/-
93      33       STO
94      01       1
95      00       0
96      33       STO
97      02       2
98      34       RCL
99      01       1

Visitors since 6/21/97