TI-59 Treasure Island Game

Back to main page | Email me at: Gene!


This program first appeared in the V9N3P6 issue of TI PPC Notes by Dejan Ristanovic (TI PPC Notes copies are still available in limited quantities from former editor Palmer Hanson - email me for his snail mail address). Printer and master library are required.
Background: You have come to an island looking for treasure. You have a map with a 10 x 10 grid locating the treasure and other physical features of the island, but you don't know your own starting point coordinates. You can move one square at a time in one of the four directions (up, down, left, right). Your problem is to use the map and the information describing the square you are on after each move to determine where you are (which isn't really the point of the game but a necessary step) and where the treasure is. The game ends when you move to the square that holds the treasure.

There are sharks in the water surrounding the island. If you try to go off the island, sharks will attack you. Try it a second time and they will eat you, ending the game.

The board will have certain symbols on it which indicate the type of terrain you are on. W means woods, M means a mountain, T means a trees, C means a cave, R means rocks, and X marks the spot where the treasure is. (Of course, X marked the spot!).

Data Registers to be loaded: You will want to load the following numbers into the data registers and make a data card out of them. Note that since several registers contain numbers that are longer than 13 digits, you need to enter those in two parts as shown. The "special" digits must be entered into the register as a SUM to it's existing contents and cannot be directly keyed in with the main part of the number.

Register   Value         Special Digits
  40       43.44332321   636
  41       30.43032413   137
  42       37.13735171   7
  43       15.21513421   7
  44       35.23532152   6
  45       75.93633131   517
  46       3637133537
  47       2020202020
  48       43133600
  49       32310045
  50       3241350021
  51       2417271600
  52       9.993623133   352
  53       45324100
  54       1335170016
  55       1713167300
  56       1624160024
  57       6200.062
  58       3773000000
  59       7575757575
To enter the special digits, AFTER you have entered the 10 digit numbers presented above, do the following: Enter the number below, press the EE key, enter negative 11, and sum the number into the appropriate memory. THEN record your data card.
636 EE -11 SUM 40
137 EE -11 SUM 41
7   EE -11 SUM 42 SUM 43
6   EE -11 SUM 44
517 EE -11 SUM 45
352 EE -11 SUM 52

Instructions: 1) Enter banks 1 and 2 of the program into the TI- 59. 2) Enter the data card into bank 3. 3) Enter a starting seed into the display and press E. After about 2 minutes, a 10 x 10 grid map will be printed. A sample printout for a starting seed of 16463 is shown here. TI-59 Treasure Island Sample

To Move: Press A to move one square left, press B to move one square right, press C to move one square up, and D to move one square down. After each move, the contents of the square you have moved to will be printed.

Continue moving until you find the treasure or have been eaten by sharks.

You can play again with the same map but with a different starting position by restarting the game by pressing 2nd C'.

To play with a different map, enter a new seed and press E.


Program Listing. Most instructions are self-explanatory. A couple need special attention. Remember that to enter the HIR (82) instruction, you must type STO 82, then go back and delete the 42 keycode for the store instruction.

Line  Keycode  Instruction
00      98       ADV
01      43       RCL
02      53       53
03      69       OP
04      01       01
05      00       0
06      69       OP
07      04       04
08      69       OP
09      05       05
10      69       OP
11      00       00
12      43       RCL
13      46       46
14      69       OP
15      02       02
16      43       RCL
17      48       48
18      69       OP
19      03       03
20      01       1
21      03       3
22      03       3
23      07       7
24      52       EE
25      06       6
26      22       INV
27      52       EE
28      69       OP
29      04       04
30      69       OP
31      05       05
32      43       RCL
33      03       03
34      99       PRT
35      03       3
36      06       6
37      01       1
38      05       5
39      03       3
40      05       5
41      04       4
42      00       0
43      69       OP
44      04       04
45      43       RCL
46      06       06
47      69       OP
48      06       06
49      91       R/S
50      76       LBL
51      17       B'
52      36       PGM
53      15       15
54      71       SBR
55      88       DMS
56      65       *
57      01       1
58      00       0
59      95       =
60      59       INT
61      92       RTN
62      76       LBL
63      12       B
64      69       OP
65      21       21
66      76       LBL
67      95       =
68      61       GTO
69      03       03
70      06       06
71      76       LBL
72      11       A
73      69       OP
74      31       31
75      61       GTO
76      95       =
77      76       LBL
78      13       C
79      69       OP
80      32       32
81      61       GTO
82      95       =
83      76       LBL
84      14       D
85      69       OP
86      22       22
87      61       GTO
88      95       =
89      76       LBL
90      19       D'
91      43       RCL
92      19       19
93      65       *
94      02       2
95      85       +
96      02       2
97      00       0
98      95       =
99      42       STO
100     08       08
101     43       RCL
102     18       18
103     32       X <> T
104     04       4
105     77       GE
106     01       01
107     14       14
108     69       OP
109     28       28
110     05       5
111     22       INV
112     44       SUM
113     18       18
114     73       RCL IND
115     08       08
116     55       /
117     53       (
118     01       1
119     00       0
120     75       -
121     02       2
122     65       *
123     43       RCL
124     18       18
125     54       )
126     22       INV
127     28       LOG
128     52       EE
129     82       HIR
130     04       04
131     95       =
132     42       STO
133     17       17
134     22       INV
135     59       INT
136     22       INV
137     44       SUM
138     17       17
139     65       *
140     01       1
141     00       0
142     00       0
143     95       =
144     42       STO
145     16       16
146     59       INT
147     22       INV
148     44       SUM
149     16       16
150     22       INV
151     52       EE
152     92       RTN
153     76       LBL
154     15       E
155     42       STO
156     09       09
157     02       2
158     00       0
159     42       STO
160     00       00
161     43       RCL
162     59       59
163     72       STO IND
164     00       00
165     69       OP
166     20       20
167     43       RCL
168     00       00
169     32       X <> T
170     03       3
171     09       9
172     77       GE
173     01       01
174     61       61
175     03       3
176     01       1
177     22       INV
178     44       SUM
179     30       30
180     04       4
181     04       4
182     42       STO
183     00       00
184     73       RCL IND
185     00       00
186     59       INT
187     42       STO
188     04       04
189     73       RCL IND
190     00       00
191     22       INV
192     59       INT
193     65       *
194     01       1
195     00       0
196     95       =
197     59       INT
198     42       STO
199     03       03
200     17       B'
201     42       STO
202     18       18
203     17       B'
204     42       STO
205     19       19
206     19       D'
207     32       X <> T
208     07       7
209     05       5
210     22       INV
211     67       EQ
212     02       02
213     00       00
214     43       RCL
215     04       04
216     44       SUM
217     16       16
218     43       RCL
219     16       16
220     55       /
221     01       1
222     00       0
223     00       0
224     85       +
225     43       RCL
226     17       17
227     95       =
228     65       *
229     82       HIR
220     14       14
221     95       =
222     72       STO IND
223     08       08
224     97       DSZ
225     03       03
236     02       02
237     00       00
238     69       OP
239     30       30
240     04       4
241     00       0
242     32       X <> T
243     43       RCL
244     00       00
245     77       GE
246     01       01
247     84       84
248     02       2
249     00       0
250     42       STO
251     00       00
252     16       A'
253     43       RCL
254     57       57
255     82       HIR
256     08       08
257     69       OP
258     01       01
259     68       NOP
260     68       NOP
261     73       RCL IND
262     00       00
263     69       OP
264     02       02
265     69       OP
266     20       20
267     73       RCL IND
268     00       00
269     69       OP
270     03       03
271     69       OP
272     05       05
273     69       OP
274     20       20
275     43       RCL
276     00       00
277     32       X <> T
278     03       3
279     09       9
280     77       GE
281     02       02
282     61       61
283     16       A'
284     98       ADV
285     76       LBL
286     18       C'
287     98       ADV
288     17       B'
289     42       STO
290     01       01
291     17       B'
292     42       STO
293     02       02
294     85       +
295     43       RCL
296     01       01
297     55       /
298     01       1
299     00       0
300     95       =
301     42       STO
302     03       03
303     25       CLR
304     42       STO
305     06       06
306     69       OP
307     26       26
308     01       1
309     00       0
310     32       X <> T
311     43       RCL
312     01       01
313     77       GE
314     03       03
315     25       25
316     43       RCL
317     02       02
318     77       GE
319     03       03
320     25       25
321     29       CP
322     77       GE
323     03       03
324     55       55
325     69       OP
326     00       00
327     43       RCL
328     47       47
329     69       OP
330     02       02
331     69       OP
332     04       04
333     43       RCL
334     52       52
335     82       HIR
336     07       07
337     69       OP
338     05       05
339     43       RCL
340     10       10
341     42       STO
342     01       01
343     43       RCL
344     11       11
345     42       STO
346     02       02
347     87       IFF
348     01       01
349     04       04
350     19       19
351     86       STF
352     01       01
353     25       CLR
354     91       R/S
355     43       RCL
356     01       01
357     22       INV
358     77       GE
359     03       03
360     25       25
361     43       RCL
362     01       01
363     42       STO
364     18       18
365     43       RCL
366     02       02
367     42       STO
368     19       19
369     19       D'
370     32       X <> T
371     04       4
372     04       4
373     67       EQ
374     04       04
375     64       64
376     04       4 
377     05       5
378     42       STO
379     05       05
380     73       RCL IND
381     05       05
382     59       INT
383     67       EQ
384     03       03
385     91       91
386     69       OP
387     35       35
388     61       GTO
389     03       03
390     80       80
391     73       RCL IND
392     05       05
393     82       HIR
394     05       05
395     43       RCL
396     49       49
397     69       OP
398     02       02
399     43       RCL
400     50       50
401     69       OP
402     03       03
403     43       RCL
404     51       51
405     69       OP
406     04       04
407     69       OP
408     05       05
409     43       RCL
410     01       01
411     42       STO
412     10       10
413     43       RCL
414     02       02
415     42       STO
416     11       11
417     32       X <> T
418     91       R/S
419     43       RCL
420     54       54
421     69       OP
422     02       02
423     43       RCL
424     55       55
425     69       OP
426     03       03
427     02       2
428     49       PRD
429     06       06
430     01       1
431     02       2
432     44       SUM
433     06       06
434     81       RST
435     76       LBL
436     16       A'
437     69       OP
438     00       00
439     43       RCL
440     47       47
441     69       OP
442     02       02
443     69       OP
444     03       03
445     04       4
446     07       7
447     02       2
448     00       0
449     69       OP
450     01       01
451     02       2
452     00       0
453     04       4
454     07       7
455     52       EE
456     06       6
457     22       INV
458     52       EE
459     69       OP
460     04       04
461     69       OP
462     05       05
463     92       RTN
464     43       RCL
465     56       56
466     69       OP
467     02       02
468     43       RCL
469     58       58
470     69       OP
471     03       03
472     81       RST

That's it. Enjoy!