Back to main page

This program first appeared in the V5N2P10 issue of TI PPC Notes (still available in limited quantities from former editor Palmer Hanson-email me for his snail mail address). Printer is optional. Master Library module is required.

If you are wrong, the punishment is the subtraction of the number from your total accumulated points. If you let the number slip by and are wrong, only 1 point is subtracted from your total.

1) Enter a seed between 1 and 100000 and press A.

2) With a printer, the divisor is printed, otherwise displayed for about
3 seconds.

3) When the number is displayed, decide if its divisible by the divisor
and press and hold down R/S if you think it is. If you stop the program,
press E to continue.

4) With a printer, your current score will be printed, otherwise it will
be shown in the display and the calculator will stop. Press R/S for the
next number.

5) Once the 15 numbers have been shown, the calculator will print and
display .11111111, followed by your total score.

6) Go to step 1 for a new game.

**Program Listing.** Most instructions are self-explanatory.

Line Keycode Instruction 00 69 OP 01 38 38 02 43 RCL 03 08 08 04 99 PRT 05 76 LBL 06 14 D 07 36 PGM 08 15 15 09 13 C 10 58 FIX 11 00 00 12 52 EE 13 22 INV 14 52 EE 15 42 STO 16 12 12 17 66 PAU 18 66 PAU 19 66 PAU 20 25 CLR 21 97 DSZ 22 00 00 23 00 00 24 00 00 25 25 CLR 26 42 STO 27 12 12 28 09 9 29 35 1/X 30 58 FIX 31 09 09 32 66 PAU 33 66 PAU 34 99 PRT 35 58 FIX 36 00 00 37 43 RCL 38 08 08 39 99 PRT 40 98 ADV 41 91 R/S 42 76 LBL 43 11 A 44 42 STO 45 09 09 46 02 2 47 00 0 48 69 OP 49 07 07 50 69 OP 51 19 19 52 25 CLR 53 36 PGM 54 15 15 55 10 E' 56 12 B 57 01 1 58 42 STO 59 10 10 60 01 1 61 00 0 62 00 0 63 42 STO 64 11 11 65 25 CLR 66 42 STO 67 08 08 68 01 1 69 05 5 70 42 STO 71 00 00 72 14 D 73 76 LBL 74 12 B 75 02 2 76 42 STO 77 10 10 78 01 1 79 00 0 80 42 STO 81 11 11 82 36 PGM 83 15 15 84 13 C 85 58 FIX 86 00 00 87 52 EE 88 22 INV 89 52 EE 90 42 STO 91 14 14 92 66 PAU 93 66 PAU 94 66 PAU 95 66 PAU 96 66 PAU 97 66 PAU 98 99 PRT 99 98 ADV 100 92 RTN 101 76 LBL 102 15 E 103 43 RCL 104 12 12 105 55 / 106 43 RCL 107 14 14 108 95 = 109 22 INV 110 59 INT 111 42 STO 112 15 15 113 29 CP 114 43 RCL 115 15 15 116 67 EQ 117 10 E' 118 43 RCL 119 12 12 120 22 INV 121 44 SUM 122 08 08 123 43 RCL 124 08 08 125 99 PRT 126 87 IFF 127 07 07 128 14 D 129 91 R/S 130 14 D 131 76 LBL 132 10 E' 133 43 RCL 134 12 12 135 44 SUM 136 08 08 137 43 RCL 138 08 08 139 99 PRT 140 87 IFF 141 07 07 142 14 D 143 91 R/S 144 14 DThat's it! Enjoy!