Back to main page
I've had a lot of visitors but few comments! Let me hear from you! Email me at:
Gene!
1) Press GTO CLR, RUN to initalize the program.
2) Enter the probability of truth and press A.
3) Enter a seed number as an integer between 0 and 199017 and press B.
4) Enter your guess (0 to 100) and press E.
5) If your guess is too high, the program displays 1.
6) If your guess is too low, the program displays -1.
7) If your guess is correct, the display flashes the correct answer.
8) Press D to show how many guesses you used. Press CE first if the
display is still flashing.
9) To play another game, go to step 1.
Enter Press Display Comments
GTO CLR RUN 0. Initialize
80 A 80. The probability of truth
956 B 0. Seed entered
50 E 1. High
25 E 1. High
15 E -1. Low
20 E -1. Low
17 E -1. Low
18 E -1. Low
19 E -1. Low?
19 E -1. Low
19 E 1. High?
22 E 22. Correct! Flashing Display
CE D 10. Number of guesses
Program Listing. Most instructions are self-explanatory.
Line Keycode Instruction 00 46 LBL 01 48 EXC 02 75 - 03 93 . 04 05 5 05 54 ) 06 57 FIX 07 00 0 08 52 EE 09 22 INV 10 52 EE 11 22 INV 12 57 FIX 13 56 RTN 14 46 LBL 15 11 A 16 42 STO 17 00 0 18 04 4 19 98 PRT 20 56 RTN 21 46 LBL 22 12 B 23 42 STO 24 00 0 25 09 9 26 98 PRT 27 53 ( 28 51 SBR 29 37 DMS 30 65 * 31 01 1 32 00 0 33 00 0 34 54 ) 35 51 SBR 36 48 EXC 37 42 STO 38 00 0 39 01 1 40 00 0 41 56 RTN 42 46 LBL 43 25 CLR 44 57 FIX 45 09 9 46 00 0 47 42 STO 48 00 0 49 05 5 50 56 RTN 51 46 LBL 52 15 E 53 22 INV 54 50 STF 55 01 1 56 42 STO 57 00 0 58 02 2 59 98 PRT 60 01 1 61 44 SUM 62 00 0 63 05 5 64 51 SBR 65 37 DMS 66 53 ( 67 24 CE 68 65 * 69 01 1 70 00 0 71 00 0 72 54 ) 73 51 SBR 74 48 EXC 75 42 STO 76 00 0 77 03 3 78 75 - 79 43 RCL 80 00 0 81 04 4 82 95 = 83 80 IF+ 84 42 STO 85 50 STF 86 01 1 87 46 LBL 88 42 STO 89 43 RCL 90 00 0 91 02 2 92 75 - 93 43 RCL 94 00 0 95 01 1 96 95 = 97 90 IFZ 98 33 COS 99 80 IF+ 100 34 TAN 101 60 IFF 102 01 1 103 30 SQRT 104 46 LBL 105 40 X^2 106 01 1 107 98 PRT 108 99 PAP 109 56 RTN 110 46 LBL 111 34 TAN 112 60 IFF 113 01 1 114 40 X^2 115 46 LBL 116 30 SQRT 117 01 1 118 94 +/- 119 98 PRT 120 99 PAP 121 56 RTN 122 46 LBL 123 33 COS 124 43 RCL 125 00 0 126 02 2 127 94 +/- 128 30 SQRT 129 40 X^2 130 98 PRT 131 99 PAP 132 56 RTN 133 46 LBL 134 13 C 135 51 SBR 136 37 DMS 137 98 PRT 138 56 RTN 139 46 LBL 140 14 D 141 43 RCL 142 00 0 143 05 5 144 98 PRT 145 56 RTN 146 46 LBL 147 37 DMS 148 57 FIX 149 09 9 150 53 ( 151 53 ( 152 02 2 153 04 4 154 02 2 155 09 9 156 08 8 157 65 * 158 43 RCL 159 00 0 160 09 9 161 85 + 162 09 9 163 09 9 164 09 9 165 09 9 166 01 1 167 54 ) 168 55 / 169 01 1 170 09 9 171 09 9 172 00 0 173 01 1 174 07 7 175 42 STO 176 01 1 177 00 0 178 54 ) 179 42 STO 180 01 1 181 01 1 182 51 SBR 183 48 EXC 184 22 INV 185 44 SUM 186 01 1 187 01 1 188 43 RCL 189 01 1 190 01 1 191 65 * 192 43 RCL 193 01 1 194 00 0 195 54 ) 196 42 STO 197 00 0 198 09 9 199 55 / 200 43 RCL 201 01 1 202 00 0 203 54 ) 204 56 RTN