Back to main page |
**Email me at:**
Gene!

The program presented below will play the game of Eleven-Thirty on the HP-65. It was written by John Rausch and appeared in the V2N3P28 issue of PPC Journal (March 1975). Thanks to John wherever he is today!

**Instructions: **

1) Store a decimal seed into memory 4 (STO 4).

2) Ante an initial "Pot" by entering the amount and pressing C. (You
must give a starting amount here)

3) Deal the first two numbers. The HP-65 will show two numbers between
11 and 30. Pot is zero if display flashes. The numbers will be in the
form of XX.YY.

4) Bet any amount you wish that the next number will be between the
first two numbers. Enter bet, press B. Display will show the next
number. If it is positive, you won. If it has a minus sign, you lost.
Note: you may not bet more than what is in the pot!

5) If you won, your bet is added to your "pot." If you lost, it is
subtracted. To see the amount in the pot, press D.

Line Instruction Keycode 01 DSP 21 02 . 83 03 2 02 04 RCL 5 34 05 05 0 00 06 g X = Y 35 23 07 0 00 08 / 81 09 E 15 10 STO 1 33 01 11 E 15 12 STO 2 33 02 13 EEX 43 14 2 02 15 / 81 16 RCL 1 34 01 17 + 61 18 RTN 24 19 LBL 23 20 B 12 21 DSP 21 22 . 83 23 0 00 24 STO 3 33 03 25 0 00 26 g X = Y 35 23 27 0 00 28 / 81 29 RCL 5 34 05 30 RCL 3 34 03 31 g X > Y 35 24 32 0 00 33 / 81 34 RCL 2 34 02 35 RCL 1 34 01 36 g X > Y 35 24 37 g X <> Y 35 07 38 STO 1 33 01 39 g RDN 35 08 40 STO 2 33 02 41 RCL 1 34 01 42 E 15 43 RCL 2 34 02 44 g X > Y 35 24 45 g RDN 35 08 46 g NOP 35 01 47 g X > Y 35 24 48 GTO 22 49 1 01 50 CHS 42 51 RCL 3 34 03 52 CHS 42 53 GTO 22 54 2 02 55 LBL 23 56 1 01 57 RCL 3 34 03 58 LBL 23 59 2 02 60 STO 33 61 + 61 62 5 05 63 g RDN 35 08 64 RTN 24 65 LBL 23 66 C 13 67 STO 5 33 05 68 RTN 24 69 LBL 23 70 D 14 71 RCL 5 34 05 72 RTN 24 73 LBL 23 74 E 15 75 RCL 4 34 04 76 g 35 77 PI 02 78 + 61 79 ENTER 41 80 * 71 81 f-1 32 82 INT 83 83 STO 4 33 04 84 2 02 85 0 00 86 * 71 87 1 01 88 1 01 89 + 61 90 f 31 91 INT 83 92 RTN 24

That's it!

Visitors since 8/4/97