YATZEE GAME

00000000: 01 08 26 08 0A 00 8F 20  2A 2A 2A 2A 2A 20 59 41  |..&.... ***** YA|
00000010: 48 54 5A 45 45 20 2A 2A  2A 20 50 2E 52 4F 57 45  |HTZEE *** P.ROWE|
00000020: 20 2A 2A 2A 2A 2A 00 4B  08 14 00 8F 20 2A 20 43  | *****.K.... * C|
00000030: 4F 50 59 52 49 47 48 54  20 31 39 37 38 2C 20 52  |OPYRIGHT 1978, R|
00000040: 45 47 45 4E 54 53 20 4F  46 20 2A 00 70 08 1E 00  |EGENTS OF *.p...|
00000050: 8F 20 55 4E 49 56 45 52  53 49 54 59 20 4F 46 20  |. UNIVERSITY OF |
00000060: 43 41 4C 49 46 2E 2C 20  42 45 52 4B 45 4C 45 59  |CALIF., BERKELEY|
00000070: 00 95 08 28 00 8F 20 2A  2A 20 4C 41 57 52 45 4E  |...(.. ** LAWREN|
00000080: 43 45 20 48 41 4C 4C 20  4F 46 20 53 43 49 45 4E  |CE HALL OF SCIEN|
00000090: 43 45 20 2A 2A 00 BC 08  32 00 99 20 22 93 11 11  |CE **...2.. "...|
000000A0: 11 11 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |................|
000000B0: 57 45 4C 43 4F 4D 45 20  54 4F 22 3B 00 DE 08 3C  |WELCOME TO";...<|
000000C0: 00 99 20 22 11 11 11 11  11 9D 9D 9D 9D 9D 9D 9D  |.. "............|
000000D0: 9D 9D 9D AC A2 A2 A2 A2  A2 A2 A2 BB 22 3B 00 FD  |............";..|
000000E0: 08 46 00 99 20 22 9D 9D  9D 9D 9D 9D 9D 9D 9D 11  |.F.. "..........|
000000F0: 12 A1 59 41 48 54 5A 45  45 92 A1 22 3B 00 1B 09  |..YAHTZEE..";...|
00000100: 50 00 99 20 22 9D 9D 9D  9D 9D 9D 9D 9D 9D 11 BC  |P.. "...........|
00000110: 12 A2 A2 A2 A2 A2 A2 A2  92 BE 22 00 45 09 5A 00  |..........".E.Z.|
00000120: 53 24 B2 22 31 32 33 34  35 36 54 46 48 53 4C 45  |S$."123456TFHSLE|
00000130: 59 22 3A 46 B2 30 3A 47  B2 30 3A 53 53 B2 30 3A  |Y":F.0:G.0:SS.0:|
00000140: 45 24 B2 22 22 00 60 09  5F 00 81 20 49 B2 31 20  |E$."".`._.. I.1 |
00000150: A4 20 33 39 3A 45 24 B2  45 24 AA 22 20 22 3A 82  |. 39:E$.E$." ":.|
00000160: 00 7B 09 64 00 4C 24 B2  22 13 11 11 11 11 11 11  |.{.d.L$.".......|
00000170: 11 11 11 11 11 11 11 1D  1D 1D 22 00 9E 09 69 00  |.........."...i.|
00000180: 41 24 28 30 29 B2 22 A6  A6 A6 9D 9D 9D 11 A6 A6  |A$(0).".........|
00000190: A6 9D 9D 9D 11 A6 A6 A6  9D 9D 9D 91 91 22 00 C1  |............."..|
000001A0: 09 6E 00 41 24 28 31 29  B2 22 20 20 20 9D 9D 9D  |.n.A$(1)."   ...|
000001B0: 11 20 D1 20 9D 9D 9D 11  20 20 20 9D 9D 9D 91 91  |. . ....   .....|
000001C0: 22 00 E4 09 73 00 41 24  28 32 29 B2 22 D1 20 20  |"...s.A$(2).".  |
000001D0: 9D 9D 9D 11 20 20 20 9D  9D 9D 11 20 20 D1 9D 9D  |....   ....  ...|
000001E0: 9D 91 91 22 00 07 0A 78  00 41 24 28 33 29 B2 22  |..."...x.A$(3)."|
000001F0: D1 20 20 9D 9D 9D 11 20  D1 20 9D 9D 9D 11 20 20  |.  .... . ....  |
00000200: D1 9D 9D 9D 91 91 22 00  2A 0A 7D 00 41 24 28 34  |......".*.}.A$(4|
00000210: 29 B2 22 D1 20 D1 9D 9D  9D 11 20 20 20 9D 9D 9D  |).". .....   ...|
00000220: 11 D1 20 D1 9D 9D 9D 91  91 22 00 4D 0A 82 00 41  |.. ......".M...A|
00000230: 24 28 35 29 B2 22 D1 20  D1 9D 9D 9D 11 20 D1 20  |$(5).". ..... . |
00000240: 9D 9D 9D 11 D1 20 D1 9D  9D 9D 91 91 22 00 70 0A  |..... ......".p.|
00000250: 87 00 41 24 28 36 29 B2  22 D1 D1 D1 9D 9D 9D 11  |..A$(6).".......|
00000260: 20 20 20 9D 9D 9D 11 D1  D1 D1 9D 9D 9D 91 91 22  |   ............"|
00000270: 00 94 0A 8C 00 42 24 B2  22 B0 C0 C0 C0 AE 9D 11  |.....B$.".......|
00000280: DD 9D 11 DD 9D 11 DD 9D  11 BD 9D 9D C0 9D 9D C0  |................|
00000290: 9D 9D C0 22 00 B6 0A 91  00 42 24 B2 42 24 AA 22  |...".....B$.B$."|
000002A0: 9D 9D AD 9D 91 DD 9D 91  DD 9D 91 DD 9D 91 22 3A  |..............":|
000002B0: 53 54 24 B2 22 22 00 DE  0A 96 00 43 24 B2 22 22  |ST$."".....C$.""|
000002C0: 3A 81 20 49 B2 31 20 A4  20 36 3A 43 24 B2 43 24  |:. I.1 . 6:C$.C$|
000002D0: AA 22 12 20 20 20 20 20  92 20 20 22 3A 82 00 F8  |.".     .  ":...|
000002E0: 0A 9B 00 43 24 B2 C8 28  43 24 2C 35 32 29 3A 43  |...C$..(C$,52):C|
000002F0: 52 24 B2 C7 28 31 33 29  00 1D 0B A0 00 44 24 B2  |R$..(13).....D$.|
00000300: 22 9D CF A3 A3 A3 D0 9D  11 A7 9D 11 BA 9D 9D A4  |"...............|
00000310: 9D 9D A4 9D 9D A4 9D 9D  CC 9D 91 A5 22 00 29 0B  |............".).|
00000320: AA 00 86 20 53 28 31 33  29 00 5D 0B C8 00 99 20  |... S(13).].... |
00000330: 22 11 11 11 11 22 3B 43  52 24 3B 22 1D 1D 1D 1D  |"....";CR$;"....|
00000340: 1D 1D 1D 1D 43 41 52 45  20 46 4F 52 20 49 4E 53  |....CARE FOR INS|
00000350: 54 52 55 43 54 49 4F 4E  53 3F 20 22 3B 00 7B 0B  |TRUCTIONS? ";.{.|
00000360: D2 00 46 B2 31 38 AB 46  3A 99 20 C7 28 46 29 3B  |..F.18.F:. .(F);|
00000370: 22 20 92 9D 22 3B 3A 54  B2 54 49 00 9C 0B DC 00  |" ..";:T.TI.....|
00000380: A1 20 49 24 3A 8B 20 49  24 B2 22 22 20 AF 20 54  |. I$:. I$."" . T|
00000390: 49 AB 54 B3 32 35 20 A7  20 32 32 30 00 AF 0B E6  |I.T.25 . 220....|
000003A0: 00 8B 20 49 24 B2 22 4E  22 20 A7 20 36 33 30 00  |.. I$."N" . 630.|
000003B0: C3 0B F0 00 8B 20 49 24  B3 B1 22 59 22 20 A7 20  |..... I$.."Y" . |
000003C0: 32 31 30 00 F4 0B FA 00  99 20 22 93 20 20 20 54  |210...... ".   T|
000003D0: 48 49 53 20 49 53 20 41  20 47 41 4D 45 20 4F 46  |HIS IS A GAME OF|
000003E0: 20 43 48 41 4E 43 45 20  50 4C 41 59 45 44 20 57  | CHANCE PLAYED W|
000003F0: 49 54 48 22 00 22 0C 04  01 99 20 22 35 20 44 49  |ITH".".... "5 DI|
00000400: 43 45 2E 20 20 54 48 45  20 4F 42 4A 45 43 54 20  |CE.  THE OBJECT |
00000410: 49 53 20 54 4F 20 47 45  54 20 41 53 20 4D 41 4E  |IS TO GET AS MAN|
00000420: 59 22 00 51 0C 0E 01 99  20 22 50 4F 49 4E 54 53  |Y".Q.... "POINTS|
00000430: 20 41 53 20 50 4F 53 53  49 42 4C 45 2E 20 20 4F  | AS POSSIBLE.  O|
00000440: 4E 45 20 47 41 4D 45 20  43 4F 4E 53 49 53 54 53  |NE GAME CONSISTS|
00000450: 22 00 7E 0C 18 01 99 20  22 4F 46 20 31 33 20 54  |".~.... "OF 13 T|
00000460: 55 52 4E 53 2E 20 20 45  41 43 48 20 54 55 52 4E  |URNS.  EACH TURN|
00000470: 20 59 4F 55 20 4D 41 59  20 52 4F 4C 4C 22 00 A3  | YOU MAY ROLL"..|
00000480: 0C 22 01 99 20 22 54 48  45 20 44 49 43 45 20 55  |.".. "THE DICE U|
00000490: 50 20 54 4F 20 54 48 52  45 45 20 54 49 4D 45 53  |P TO THREE TIMES|
000004A0: 2E 11 22 00 D1 0C 2C 01  99 20 22 20 20 20 41 46  |.."...,.. "   AF|
000004B0: 54 45 52 20 45 41 43 48  20 52 4F 4C 4C 20 28 45  |TER EACH ROLL (E|
000004C0: 58 43 45 50 54 20 54 48  45 20 4C 41 53 54 29 2C  |XCEPT THE LAST),|
000004D0: 22 00 01 0D 36 01 99 20  22 59 4F 55 20 4D 41 59  |"...6.. "YOU MAY|
000004E0: 20 45 4C 45 43 54 20 54  4F 20 4B 45 45 50 20 41  | ELECT TO KEEP A|
000004F0: 4E 59 20 4F 52 20 41 4C  4C 20 4F 46 20 54 48 45  |NY OR ALL OF THE|
00000500: 22 00 2E 0D 40 01 99 20  22 44 49 43 45 20 41 53  |"...@.. "DICE AS|
00000510: 20 54 48 45 59 20 41 52  45 2E 20 20 54 48 45 20  | THEY ARE.  THE |
00000520: 4F 4E 45 53 20 54 48 41  54 20 41 52 45 22 00 6A  |ONES THAT ARE".j|
00000530: 0D 4A 01 99 20 22 4E 4F  54 20 4B 45 50 54 20 41  |.J.. "NOT KEPT A|
00000540: 52 45 20 52 4F 4C 4C 45  44 20 41 47 41 49 4E 2E  |RE ROLLED AGAIN.|
00000550: 20 20 46 4F 52 20 45 58  41 4D 50 4C 45 3A 22 3B  |  FOR EXAMPLE:";|
00000560: 4C 24 3B 22 11 11 11 11  22 3B 00 8A 0D 54 01 81  |L$;"....";...T..|
00000570: 20 49 B2 31 20 A4 20 35  3A 99 20 42 24 3B 22 1D  | I.1 . 5:. B$;".|
00000580: 1D 1D 1D 1D 1D 1D 22 3B  3A 82 00 B1 0D 5E 01 48  |......";:....^.H|
00000590: 28 31 29 B2 35 3A 48 28  32 29 B2 32 3A 48 28 33  |(1).5:H(2).2:H(3|
000005A0: 29 B2 33 3A 48 28 34 29  B2 33 3A 48 28 35 29 B2  |).3:H(4).3:H(5).|
000005B0: 31 00 D9 0D 68 01 99 4C  24 3B 22 11 11 11 11 11  |1...h..L$;".....|
000005C0: 1D 22 3B 3A 81 20 49 B2  31 20 A4 20 35 3A 99 20  |.";:. I.1 . 5:. |
000005D0: 41 24 28 48 28 49 29 29  3B 00 07 0E 72 01 99 20  |A$(H(I));...r.. |
000005E0: 22 1D 1D 1D 1D 1D 1D 1D  22 3B 3A 82 3A 99 20 22  |".......";:.:. "|
000005F0: 11 11 11 11 1D 1D 1D 1D  4B 45 45 50 3F 20 33 33  |........KEEP? 33|
00000600: 91 22 3A 54 B2 54 49 00  1C 0E 7C 01 8B 20 54 49  |.":T.TI...|.. TI|
00000610: AB 54 B3 32 34 30 20 A7  20 33 38 30 00 41 0E 90  |.T.240 . 380.A..|
00000620: 01 99 20 22 91 91 91 91  91 91 91 91 91 91 91 91  |.. "............|
00000630: 4D 45 41 4E 53 20 54 48  41 54 20 59 4F 55 20 22  |MEANS THAT YOU "|
00000640: 3B 00 69 0E 9A 01 99 20  22 52 4F 4C 4C 45 44 20  |;.i.... "ROLLED |
00000650: 41 20 20 20 20 12 35 92  20 12 32 92 20 12 33 92  |A    .5. .2. .3.|
00000660: 20 12 33 92 20 12 31 92  22 00 99 0E A4 01 99 20  | .3. .1."...... |
00000670: 22 41 4E 44 20 59 4F 55  20 57 41 4E 54 20 54 4F  |"AND YOU WANT TO|
00000680: 20 4B 45 45 50 20 54 48  45 20 54 57 4F 20 12 33  | KEEP THE TWO .3|
00000690: 92 27 53 2C 20 41 4E 44  22 00 BD 0E AE 01 99 20  |.'S, AND"...... |
000006A0: 22 52 4F 4C 4C 20 54 48  45 20 12 35 92 20 12 32  |"ROLL THE .5. .2|
000006B0: 92 20 12 31 92 20 41 47  41 49 4E 2E 22 00 EA 0E  |. .1. AGAIN."...|
000006C0: B8 01 99 20 22 11 1D 1D  1D 1D 1D 1D 1D 1D 50 52  |... ".........PR|
000006D0: 45 53 53 20 12 52 45 54  55 52 4E 92 20 54 4F 20  |ESS .RETURN. TO |
000006E0: 43 4F 4E 54 49 4E 55 45  22 3B 00 01 0F C2 01 A1  |CONTINUE";......|
000006F0: 20 49 24 3A 8B 20 49 24  B2 22 22 20 A7 20 34 35  | I$:. I$."" . 45|
00000700: 30 00 34 0F CC 01 99 20  22 93 20 20 20 41 46 54  |0.4.... ".   AFT|
00000710: 45 52 20 54 48 45 20 52  4F 4C 4C 49 4E 47 2C 20  |ER THE ROLLING, |
00000720: 59 4F 55 20 53 43 4F 52  45 20 54 48 45 20 46 49  |YOU SCORE THE FI|
00000730: 56 45 22 3B 00 66 0F D6  01 99 20 22 44 49 43 45  |VE";.f.... "DICE|
00000740: 20 49 4E 20 4F 4E 45 20  4F 46 20 54 48 45 20 31  | IN ONE OF THE 1|
00000750: 33 20 53 43 4F 52 49 4E  47 20 43 41 54 45 47 4F  |3 SCORING CATEGO|
00000760: 52 49 45 53 22 3B 00 94  0F E0 01 99 20 22 28 4F  |RIES";...... "(O|
00000770: 4E 45 20 43 41 54 45 47  4F 52 59 20 46 4F 52 20  |NE CATEGORY FOR |
00000780: 45 41 43 48 20 54 55 52  4E 29 2E 20 20 41 54 20  |EACH TURN).  AT |
00000790: 54 48 45 22 00 C6 0F EA  01 99 20 22 45 4E 44 20  |THE"...... "END |
000007A0: 4F 46 20 54 48 45 20 47  41 4D 45 2C 20 54 48 45  |OF THE GAME, THE|
000007B0: 20 31 33 20 53 43 4F 52  45 53 20 41 52 45 20 41  | 13 SCORES ARE A|
000007C0: 44 44 45 44 22 3B 00 F1  0F F4 01 99 20 22 54 4F  |DDED";...... "TO|
000007D0: 20 47 49 56 45 20 54 48  45 20 54 4F 54 41 4C 20  | GIVE THE TOTAL |
000007E0: 28 50 4C 55 53 20 42 4F  4E 55 53 45 53 29 2E 11  |(PLUS BONUSES)..|
000007F0: 22 00 11 10 FE 01 99 20  22 54 48 45 20 31 33 20  |"...... "THE 13 |
00000800: 43 41 54 45 47 4F 52 49  45 53 20 41 52 45 3A 11  |CATEGORIES ARE:.|
00000810: 22 00 42 10 08 02 99 20  22 31 20 2D 20 4F 4E 45  |".B.... "1 - ONE|
00000820: 53 22 3B 43 52 24 3B 22  32 20 2D 20 54 57 4F 53  |S";CR$;"2 - TWOS|
00000830: 22 3B 43 52 24 3B 22 33  20 2D 20 54 48 52 45 45  |";CR$;"3 - THREE|
00000840: 53 22 00 74 10 12 02 99  20 22 34 20 2D 20 46 4F  |S".t.... "4 - FO|
00000850: 55 52 53 22 3B 43 52 24  3B 22 35 20 2D 20 46 49  |URS";CR$;"5 - FI|
00000860: 56 45 53 22 3B 43 52 24  3B 22 36 20 2D 20 53 49  |VES";CR$;"6 - SI|
00000870: 58 45 53 22 00 A3 10 1C  02 99 20 22 11 54 20 2D  |XES"...... ".T -|
00000880: 20 54 48 52 45 45 20 4F  46 20 41 20 4B 49 4E 44  | THREE OF A KIND|
00000890: 20 28 53 43 4F 52 45 53  20 41 4C 4C 20 44 49 43  | (SCORES ALL DIC|
000008A0: 45 29 22 00 CE 10 26 02  99 20 22 46 20 2D 20 46  |E)"...&.. "F - F|
000008B0: 4F 55 52 20 4F 46 20 41  20 4B 49 4E 44 20 28 53  |OUR OF A KIND (S|
000008C0: 41 4D 45 20 41 53 20 41  42 4F 56 45 29 22 00 F1  |AME AS ABOVE)"..|
000008D0: 10 30 02 99 20 22 48 20  2D 20 46 55 4C 4C 20 48  |.0.. "H - FULL H|
000008E0: 4F 55 53 45 20 28 53 43  4F 52 45 53 20 32 35 29  |OUSE (SCORES 25)|
000008F0: 22 00 23 11 3A 02 99 20  22 53 20 2D 20 53 4D 41  |".#.:.. "S - SMA|
00000900: 4C 4C 20 53 54 52 41 49  47 48 54 28 34 20 49 4E  |LL STRAIGHT(4 IN|
00000910: 20 41 20 52 4F 57 29 20  53 43 4F 52 45 53 20 33  | A ROW) SCORES 3|
00000920: 30 22 3B 00 55 11 44 02  99 20 22 4C 20 2D 20 4C  |0";.U.D.. "L - L|
00000930: 4F 4E 47 20 53 54 52 41  49 47 48 54 20 28 35 20  |ONG STRAIGHT (5 |
00000940: 49 4E 20 41 20 52 4F 57  29 20 53 43 4F 52 45 53  |IN A ROW) SCORES|
00000950: 20 34 30 22 3B 00 85 11  4E 02 99 20 22 45 20 2D  | 40";...N.. "E -|
00000960: 20 45 58 54 52 41 20 4F  52 20 43 48 41 4E 43 45  | EXTRA OR CHANCE|
00000970: 20 28 53 43 4F 52 45 53  20 54 4F 54 41 4C 20 44  | (SCORES TOTAL D|
00000980: 49 43 45 29 22 00 B1 11  58 02 99 20 22 59 20 2D  |ICE)"...X.. "Y -|
00000990: 20 59 41 48 54 5A 45 45  20 28 35 20 4F 46 20 41  | YAHTZEE (5 OF A|
000009A0: 20 4B 49 4E 44 29 20 53  43 4F 52 45 53 20 35 30  | KIND) SCORES 50|
000009B0: 22 00 E2 11 62 02 99 20  22 11 1D 1D 1D 1D 1D 1D  |"...b.. ".......|
000009C0: 50 52 45 53 53 20 12 52  45 54 55 52 4E 92 20 54  |PRESS .RETURN. T|
000009D0: 4F 20 53 54 41 52 54 20  54 48 45 20 47 41 4D 45  |O START THE GAME|
000009E0: 22 3B 00 F9 11 6C 02 A1  20 49 24 3A 8B 20 49 24  |";...l.. I$:. I$|
000009F0: B2 22 22 20 A7 20 36 32  30 00 11 12 76 02 99 20  |."" . 620...v.. |
00000A00: 22 93 22 3B 43 24 3B 3A  81 20 49 B2 31 20 A4 20  |".";C$;:. I.1 . |
00000A10: 36 00 32 12 80 02 99 20  22 12 20 22 3B CA 28 53  |6.2.... ". ";.(S|
00000A20: 24 2C 49 2C 31 29 3B 22  27 53 20 92 20 20 22 3B  |$,I,1);"'S .  ";|
00000A30: 3A 82 00 52 12 8A 02 99  20 22 9D 9D 22 3B 43 24  |:..R.... "..";C$|
00000A40: 3A 99 20 43 24 3B 22 12  54 48 52 45 45 92 20 20  |:. C$;".THREE.  |
00000A50: 22 3B 00 7E 12 94 02 99  20 22 12 46 4F 55 52 20  |";.~.... ".FOUR |
00000A60: 92 20 20 12 48 4F 55 53  45 92 20 20 12 53 4D 41  |.  .HOUSE.  .SMA|
00000A70: 4C 4C 92 20 20 12 4C 4F  4E 47 20 92 22 3B 00 93  |LL.  .LONG .";..|
00000A80: 12 9E 02 99 20 22 20 20  12 45 58 54 52 41 92 22  |.... "  .EXTRA."|
00000A90: 3B 43 24 00 B2 12 A8 02  99 20 A6 31 36 29 3B 22  |;C$...... .16);"|
00000AA0: 12 20 20 20 20 20 20 20  11 9D 9D 9D 9D 9D 9D 9D  |.       ........|
00000AB0: 22 3B 00 D9 12 B2 02 99  20 22 59 41 48 54 5A 45  |";...... "YAHTZE|
00000AC0: 45 11 9D 9D 9D 9D 9D 9D  9D 20 20 20 20 20 20 20  |E........       |
00000AD0: 22 3B 43 52 24 3B 4C 24  3B 00 F9 12 B7 02 81 20  |";CR$;L$;...... |
00000AE0: 49 B2 31 20 A4 20 35 3A  99 20 42 24 3B 22 1D 1D  |I.1 . 5:. B$;"..|
00000AF0: 1D 1D 1D 1D 1D 22 3B 3A  82 00 1C 13 BC 02 81 20  |.....";:....... |
00000B00: 49 B2 31 20 A4 20 31 33  3A 53 28 49 29 B2 AB 31  |I.1 . 13:S(I)..1|
00000B10: 3A 82 3A 51 B2 30 3A 47  B2 47 AA 31 00 39 13 C6  |:.:Q.0:G.G.1.9..|
00000B20: 02 81 20 49 B2 31 20 A4  20 31 33 3A 4C B2 31 3A  |.. I.1 . 13:L.1:|
00000B30: 81 20 4A B2 31 20 A4 20  33 00 5A 13 D0 02 81 20  |. J.1 . 3.Z.... |
00000B40: 4B B2 4C 20 A4 20 35 3A  48 28 4B 29 B2 B5 28 36  |K.L . 5:H(K)..(6|
00000B50: AC BB 28 31 29 AA 31 29  3A 82 00 73 13 DA 02 99  |..(1).1):..s....|
00000B60: 20 4C 24 3B 22 11 1D 22  3B 3A 81 20 4B B2 31 20  | L$;"..";:. K.1 |
00000B70: A4 20 35 00 89 13 E4 02  8B 20 4B B1 B2 4C 20 A7  |. 5...... K..L .|
00000B80: 20 99 20 41 24 28 30 29  3B 00 B1 13 E6 02 99 20  | . A$(0);...... |
00000B90: 41 24 28 48 28 4B 29 29  3B 22 1D 1D 1D 1D 1D 1D  |A$(H(K));"......|
00000BA0: 1D 22 3B 3A 82 3A 8B 20  4A B2 33 20 A7 20 39 32  |.";:.:. J.3 . 92|
00000BB0: 30 00 C8 13 E8 02 A1 20  49 24 3A 8B 20 49 24 B3  |0...... I$:. I$.|
00000BC0: B1 22 22 A7 20 37 34 34  00 D9 13 EE 02 99 20 4C  |."". 744...... L|
00000BD0: 24 3B 22 11 11 11 11 11  22 00 F0 13 F8 02 99 20  |$;"....."...... |
00000BE0: 22 1D 1D 1D 4B 45 45 50  3F 20 22 3B 3A 4B B2 30  |"...KEEP? ";:K.0|
00000BF0: 00 0E 14 02 03 46 B2 31  38 AB 46 3A 99 20 C7 28  |.....F.18.F:. .(|
00000C00: 46 29 3B 22 20 92 9D 22  3B 3A 54 B2 54 49 00 2F  |F);" ..";:T.TI./|
00000C10: 14 0C 03 A1 20 49 24 3A  8B 20 49 24 B2 22 22 20  |.... I$:. I$."" |
00000C20: AF 20 54 49 AB 54 B3 32  35 20 A7 20 37 38 30 00  |. TI.T.25 . 780.|
00000C30: 61 14 16 03 8B 20 49 24  B1 22 2F 22 20 AF 20 49  |a.... I$."/" . I|
00000C40: 24 B3 22 37 22 20 A7 20  99 20 49 24 3B 3A 4B B2  |$."7" . . I$;:K.|
00000C50: 4B AA 31 3A 49 28 4B 29  B2 C6 28 49 24 29 AB 34  |K.1:I(K)..(I$).4|
00000C60: 38 00 74 14 20 03 8B 20  49 24 B2 22 41 22 20 A7  |8.t. .. I$."A" .|
00000C70: 20 39 31 35 00 9A 14 25  03 8B 20 49 24 B2 C7 28  | 915...%.. I$..(|
00000C80: 32 30 29 20 AF 20 4B B1  30 20 A7 20 4B B2 4B AB  |20) . K.0 . K.K.|
00000C90: 31 3A 99 20 22 20 9D 9D  22 3B 00 AE 14 2A 03 8B  |1:. " ..";...*..|
00000CA0: 20 49 24 B3 B1 43 52 24  20 A7 20 37 37 30 00 C4  | I$..CR$ . 770..|
00000CB0: 14 2F 03 8B 20 4B B2 30  20 A7 20 4C B2 31 3A 89  |./.. K.0 . L.1:.|
00000CC0: 20 39 31 30 00 DC 14 34  03 81 20 4C B2 31 20 A4  | 910...4.. L.1 .|
00000CD0: 20 4B 3A 81 20 4D B2 4C  20 A4 20 35 00 F2 14 3E  | K:. M.L . 5...>|
00000CE0: 03 8B 20 49 28 4C 29 B2  48 28 4D 29 20 A7 20 38  |.. I(L).H(M) . 8|
00000CF0: 35 30 00 FE 14 48 03 82  3A 89 20 38 36 30 00 20  |50...H..:. 860. |
00000D00: 15 52 03 48 28 4D 29 B2  48 28 4C 29 3A 48 28 4C  |.R.H(M).H(L):H(L|
00000D10: 29 B2 49 28 4C 29 3A 82  20 4C 3A 89 20 38 39 30  |).I(L):. L:. 890|
00000D20: 00 34 15 5C 03 99 20 22  20 20 3F 3F 3F 91 22 3A  |.4.\.. "  ???.":|
00000D30: 54 B2 54 49 00 48 15 66  03 8B 20 54 49 AB 54 B3  |T.TI.H.f.. TI.T.|
00000D40: 33 30 20 A7 20 38 37 30  00 5B 15 70 03 99 20 45  |30 . 870.[.p.. E|
00000D50: 24 3B 22 91 22 3A 89 20  37 36 30 00 79 15 7A 03  |$;".":. 760.y.z.|
00000D60: 99 20 22 91 22 3B 43 52  24 3B 45 24 3A 8B 20 4B  |. ".";CR$;E$:. K|
00000D70: B3 B1 35 20 A7 20 39 31  30 00 B3 15 84 03 99 20  |..5 . 910...... |
00000D80: 43 52 24 3B 22 20 59 4F  55 20 43 41 4E 20 50 52  |CR$;" YOU CAN PR|
00000D90: 45 53 53 20 12 41 92 20  54 4F 20 4B 45 45 50 20  |ESS .A. TO KEEP |
00000DA0: 41 4C 4C 20 54 48 45 20  44 49 43 45 91 22 3A 54  |ALL THE DICE.":T|
00000DB0: B2 54 49 00 C8 15 86 03  8B 20 54 49 AB 54 B3 31  |.TI...... TI.T.1|
00000DC0: 32 30 20 A7 20 39 30 32  00 D7 15 88 03 99 20 45  |20 . 902...... E|
00000DD0: 24 3A 89 20 39 32 30 00  DF 15 8E 03 82 20 4A 00  |$:. 920...... J.|
00000DE0: F6 15 93 03 99 20 22 9D  9D 9D 9D 9D 9D 20 20 20  |..... "......   |
00000DF0: 20 20 20 20 22 3B 00 07  16 98 03 8B 20 49 B3 31  |    ";...... I.1|
00000E00: 33 20 A7 20 39 35 30 00  25 16 A2 03 81 20 41 B2  |3 . 950.%.... A.|
00000E10: 31 20 A4 20 31 33 3A 8B  20 53 28 41 29 B3 B1 AB  |1 . 13:. S(A)...|
00000E20: 31 20 A7 20 82 00 30 16  AC 03 89 20 31 30 33 30  |1 . ..0.... 1030|
00000E30: 00 41 16 B6 03 99 20 4C  24 3B 22 11 11 11 11 11  |.A.... L$;".....|
00000E40: 22 00 57 16 C0 03 99 20  A6 32 35 29 3B 22 53 43  |".W.... .25);"SC|
00000E50: 4F 52 45 3F 20 22 3B 00  75 16 CA 03 46 B2 31 38  |ORE? ";.u...F.18|
00000E60: AB 46 3A 99 20 C7 28 46  29 3B 22 20 92 9D 22 3B  |.F:. .(F);" ..";|
00000E70: 3A 54 B2 54 49 00 96 16  D4 03 A1 20 49 24 3A 8B  |:T.TI...... I$:.|
00000E80: 20 49 24 B2 22 22 20 AF  20 54 49 AB 54 B3 32 35  | I$."" . TI.T.25|
00000E90: 20 A7 20 39 38 30 00 BB  16 DE 03 81 20 41 B2 31  | . 980...... A.1|
00000EA0: 20 A4 20 31 33 3A 8B 20  49 24 B2 CA 28 53 24 2C  | . 13:. I$..(S$,|
00000EB0: 41 2C 31 29 20 A7 20 31  30 31 30 00 C7 16 E8 03  |A,1) . 1010.....|
00000EC0: 82 3A 89 20 39 37 30 00  DC 16 F2 03 8B 20 53 28  |.:. 970...... S(|
00000ED0: 41 29 B2 AB 31 20 A7 20  31 30 32 38 00 15 17 FC  |A)..1 . 1028....|
00000EE0: 03 99 20 43 52 24 3B 22  11 59 4F 55 20 4D 41 59  |.. CR$;".YOU MAY|
00000EF0: 20 55 53 45 20 4F 4E 45  20 53 43 4F 52 49 4E 47  | USE ONE SCORING|
00000F00: 20 43 41 54 45 47 4F 52  59 20 4F 4E 43 45 91 22  | CATEGORY ONCE."|
00000F10: 3A 54 B2 54 49 00 2B 17  FE 03 8B 20 54 49 AB 54  |:T.TI.+.... TI.T|
00000F20: B3 31 32 30 20 A7 20 31  30 32 32 00 3F 17 00 04  |.120 . 1022.?...|
00000F30: 99 20 45 24 3B 22 91 22  3B 3A 89 20 39 35 30 00  |. E$;".";:. 950.|
00000F40: 58 17 04 04 99 20 22 9D  9D 9D 9D 9D 9D 9D 20 20  |X.... ".......  |
00000F50: 20 20 20 20 20 20 22 3B  00 76 17 06 04 53 28 41  |      ";.v...S(A|
00000F60: 29 B2 30 3A 81 20 4A B2  31 20 A4 20 36 3A 4D 28  |).0:. J.1 . 6:M(|
00000F70: 4A 29 B2 30 3A 82 00 98  17 10 04 81 20 4A B2 31  |J).0:....... J.1|
00000F80: 20 A4 20 35 3A 4D 28 48  28 4A 29 29 B2 4D 28 48  | . 5:M(H(J)).M(H|
00000F90: 28 4A 29 29 AA 31 3A 82  00 B7 17 1A 04 8B 20 41  |(J)).1:....... A|
00000FA0: B3 37 20 A7 20 53 28 41  29 B2 41 AC 4D 28 41 29  |.7 . S(A).A.M(A)|
00000FB0: 3A 89 20 31 31 39 30 00  E6 17 24 04 91 20 41 AB  |:. 1190...$.. A.|
00000FC0: 36 20 89 20 31 30 37 30  2C 31 30 37 30 2C 31 30  |6 . 1070,1070,10|
00000FD0: 39 30 2C 31 31 31 30 2C  31 31 31 30 2C 31 31 38  |90,1110,1110,118|
00000FE0: 30 2C 31 31 36 30 00 05  18 2E 04 81 4A B2 31 20  |0,1160......J.1 |
00000FF0: A4 20 36 3A 8B 20 4D 28  4A 29 B1 41 AB 35 20 A7  |. 6:. M(J).A.5 .|
00001000: 20 31 31 38 30 00 12 18  38 04 82 3A 89 20 31 31  | 1180...8..:. 11|
00001010: 39 30 00 39 18 42 04 81  20 4A B2 31 20 A4 20 36  |90.9.B.. J.1 . 6|
00001020: 3A 8B 20 4D 28 4A 29 B2  31 20 B0 20 4D 28 4A 29  |:. M(J).1 . M(J)|
00001030: B2 34 20 A7 20 31 31 39  30 00 4E 18 4C 04 82 3A  |.4 . 1190.N.L..:|
00001040: 53 28 39 29 B2 32 35 3A  89 20 31 31 39 30 00 70  |S(9).25:. 1190.p|
00001050: 18 56 04 43 B2 30 3A 81  20 4A B2 31 20 A4 20 36  |.V.C.0:. J.1 . 6|
00001060: 3A 8B 20 4D 28 4A 29 B2  35 20 A7 20 31 31 35 30  |:. M(J).5 . 1150|
00001070: 00 89 18 60 04 43 B2 43  AA 31 3A 8B 20 4D 28 4A  |...`.C.C.1:. M(J|
00001080: 29 B2 30 20 A7 20 43 B2  30 00 9C 18 6A 04 8B 20  |).0 . C.0...j.. |
00001090: 43 B2 41 AB 36 20 A7 20  31 31 35 30 00 A9 18 74  |C.A.6 . 1150...t|
000010A0: 04 82 3A 89 20 31 31 39  30 00 C1 18 7E 04 53 28  |..:. 1190...~.S(|
000010B0: 41 29 B2 31 30 AC 41 AB  37 30 3A 89 20 31 31 39  |A).10.A.70:. 119|
000010C0: 30 00 E3 18 88 04 81 20  4A B2 32 20 A4 20 35 3A  |0...... J.2 . 5:|
000010D0: 8B 20 48 28 4A 29 B3 B1  48 28 31 29 20 A7 20 31  |. H(J)..H(1) . 1|
000010E0: 31 39 30 00 00 19 92 04  82 3A 53 28 31 33 29 B2  |190......:S(13).|
000010F0: 35 30 3A 8D 20 32 30 30  30 3A 89 20 31 31 39 30  |50:. 2000:. 1190|
00001100: 00 22 19 9C 04 53 28 41  29 B2 48 28 31 29 AA 48  |."...S(A).H(1).H|
00001110: 28 32 29 AA 48 28 33 29  AA 48 28 34 29 AA 48 28  |(2).H(3).H(4).H(|
00001120: 35 29 00 40 19 A6 04 8B  20 41 B2 31 33 20 B0 20  |5).@.... A.13 . |
00001130: 53 28 31 33 29 B3 B1 35  30 20 A7 20 31 32 32 30  |S(13)..50 . 1220|
00001140: 00 62 19 B0 04 81 20 4A  B2 32 20 A4 20 35 3A 8B  |.b.... J.2 . 5:.|
00001150: 20 48 28 4A 29 B3 B1 48  28 31 29 20 A7 20 31 32  | H(J)..H(1) . 12|
00001160: 32 30 00 99 19 BA 04 82  3A 51 B2 51 AA 31 30 30  |20......:Q.Q.100|
00001170: 3A 99 20 43 52 24 3B 22  11 20 20 20 31 30 30 20  |:. CR$;".   100 |
00001180: 50 4F 49 4E 54 20 42 4F  4E 55 53 91 22 3A 8D 20  |POINT BONUS.":. |
00001190: 32 30 30 30 3A 54 B2 54  49 00 AE 19 BC 04 8B 20  |2000:T.TI...... |
000011A0: 54 49 AB 54 B3 38 30 20  A7 20 31 32 31 32 00 B7  |TI.T.80 . 1212..|
000011B0: 19 BE 04 99 20 45 24 00  E6 19 C4 04 49 24 B2 C4  |.... E$.....I$..|
000011C0: 28 53 28 41 29 29 AA 22  20 22 3A 8B 20 53 28 41  |(S(A))." ":. S(A|
000011D0: 29 B1 39 20 A7 20 49 24  B2 C9 28 49 24 2C C3 28  |).9 . I$..(I$,.(|
000011E0: 49 24 29 AB 31 29 00 0D  1A CE 04 99 20 22 13 22  |I$).1)...... "."|
000011F0: 3B 3A 4A B2 41 3A 8B 20  41 B1 36 20 A7 20 99 20  |;:J.A:. A.6 . . |
00001200: 22 11 11 11 11 22 3B 3A  4A B2 41 AB 36 00 32 1A  |"....";:J.A.6.2.|
00001210: D8 04 8B 20 41 B3 B1 31  33 20 A7 20 99 20 A6 37  |... A..13 . . .7|
00001220: AC 4A AB 36 29 3B 44 24  3B 49 24 3A 89 20 31 32  |.J.6);D$;I$:. 12|
00001230: 37 30 00 52 1A E2 04 99  20 22 11 11 11 11 22 3B  |70.R.... "....";|
00001240: A6 31 36 29 3B 22 CF A3  A3 A3 A3 A3 D0 9D 11 A7  |.16);"..........|
00001250: 22 3B 00 7B 1A EC 04 99  20 22 9D 11 BA 9D 9D A4  |";.{.... "......|
00001260: 9D 9D A4 9D 9D A4 9D 9D  A4 9D 9D A4 9D 9D CC 9D  |................|
00001270: 91 A5 20 22 3B 49 24 3B  22 20 22 00 83 1A F6 04  |.. ";I$;" ".....|
00001280: 82 20 49 00 A7 1A 14 05  54 B2 53 28 31 29 AA 53  |. I.....T.S(1).S|
00001290: 28 32 29 AA 53 28 33 29  AA 53 28 34 29 AA 53 28  |(2).S(3).S(4).S(|
000012A0: 35 29 AA 53 28 36 29 00  D5 1A 1E 05 99 20 4C 24  |5).S(6)...... L$|
000012B0: 3B 22 11 11 11 11 22 3B  43 52 24 3B 22 54 4F 50  |;"....";CR$;"TOP|
000012C0: 20 48 41 4C 46 20 3D 22  3B 54 3B 22 9D 20 50 4F  | HALF =";T;". PO|
000012D0: 49 4E 54 53 22 00 02 1B  28 05 8B 20 54 B1 36 32  |INTS"...(.. T.62|
000012E0: 20 A7 20 54 B2 54 AA 33  35 3A 99 20 22 50 4C 55  | . T.T.35:. "PLU|
000012F0: 53 20 33 35 20 42 4F 4E  55 53 20 50 4F 49 4E 54  |S 35 BONUS POINT|
00001300: 53 22 00 2F 1B 32 05 55  B2 53 28 37 29 AA 53 28  |S"./.2.U.S(7).S(|
00001310: 38 29 AA 53 28 39 29 AA  53 28 31 30 29 AA 53 28  |8).S(9).S(10).S(|
00001320: 31 31 29 AA 53 28 31 32  29 AA 53 28 31 33 29 00  |11).S(12).S(13).|
00001330: 52 1B 3C 05 99 20 22 42  4F 54 54 4F 4D 20 48 41  |R.<.. "BOTTOM HA|
00001340: 4C 46 20 3D 22 3B 55 3B  22 9D 20 50 4F 49 4E 54  |LF =";U;". POINT|
00001350: 53 22 00 7A 1B 46 05 8B  20 51 B1 30 20 A7 20 99  |S".z.F.. Q.0 . .|
00001360: 20 22 50 4C 55 53 22 3B  51 3B 22 9D 20 42 4F 4E  | "PLUS";Q;". BON|
00001370: 55 53 20 50 4F 49 4E 54  53 22 00 A0 1B 50 05 99  |US POINTS"...P..|
00001380: 20 22 54 4F 54 41 4C 20  3D 20 12 22 3B 54 AA 55  | "TOTAL = .";T.U|
00001390: AA 51 3B 22 9D 12 20 92  20 50 4F 49 4E 54 53 22  |.Q;".. . POINTS"|
000013A0: 00 B0 1B 55 05 53 53 B2  53 53 AA 54 AA 55 AA 51  |...U.SS.SS.T.U.Q|
000013B0: 00 C9 1B 5A 05 99 20 22  11 41 4E 4F 54 48 45 52  |...Z.. ".ANOTHER|
000013C0: 20 47 41 4D 45 3F 20 22  3B 00 D2 1B 5C 05 54 B2  | GAME? ";...\.T.|
000013D0: 54 49 00 F4 1B 5E 05 A1  20 49 24 3A 8B 20 49 24  |TI...^.. I$:. I$|
000013E0: B2 22 22 20 AF 20 54 49  AB 54 B3 32 35 20 A7 20  |."" . TI.T.25 . |
000013F0: 31 33 37 34 00 1C 1C 60  05 46 B2 31 38 AB 46 3A  |1374...`.F.18.F:|
00001400: 99 20 C7 28 46 29 3B 22  20 92 9D 22 3B 3A 8B 20  |. .(F);" ..";:. |
00001410: 49 24 B2 22 22 20 A7 20  31 33 37 32 00 34 1C 64  |I$."" . 1372.4.d|
00001420: 05 8B 20 C8 28 49 24 2C  31 29 B2 22 59 22 20 A7  |.. .(I$,1)."Y" .|
00001430: 20 36 33 30 00 42 1C 69  05 8B 20 47 B2 31 20 A7  | 630.B.i.. G.1 .|
00001440: 20 80 00 56 1C 6E 05 99  20 22 91 91 91 91 22 3B  | ..V.n.. "....";|
00001450: 43 52 24 3B 45 24 00 78  1C 78 05 99 20 22 59 4F  |CR$;E$.x.x.. "YO|
00001460: 55 20 47 4F 54 22 3B 53  53 3B 22 9D 20 50 4F 49  |U GOT";SS;". POI|
00001470: 4E 54 53 20 49 4E 22 3B  00 8E 1C 82 05 99 20 47  |NTS IN";...... G|
00001480: 3B 22 9D 20 47 41 4D 45  53 20 46 4F 52 22 00 B2  |;". GAMES FOR"..|
00001490: 1C 8C 05 99 20 22 41 4E  20 41 56 45 52 41 47 45  |.... "AN AVERAGE|
000014A0: 20 4F 46 20 12 22 3B B5  28 53 53 AD 47 AA 2E 35  | OF .";.(SS.G..5|
000014B0: 29 3B 00 D0 1C 96 05 99  20 22 9D 12 20 92 20 50  |);...... ".. . P|
000014C0: 4F 49 4E 54 53 20 50 45  52 20 47 41 4D 45 2E 22  |OINTS PER GAME."|
000014D0: 00 E0 1C A0 05 99 20 45  24 3B 22 91 22 3B 3A 80  |...... E$;".";:.|
000014E0: 00 F3 1C D0 07 43 B2 35  33 3A 81 20 4B B2 31 20  |.....C.53:. K.1 |
000014F0: A4 20 36 00 0E 1D DA 07  97 20 35 39 34 30 39 2C  |. 6...... 59409,|
00001500: 43 3A 43 B2 31 31 33 AB  43 3A 54 B2 54 49 00 23  |C:C.113.C:T.TI.#|
00001510: 1D E4 07 8B 20 54 49 AB  54 B3 31 30 20 A7 20 32  |.... TI.T.10 . 2|
00001520: 30 32 30 00 2B 1D EE 07  82 3A 8E 00 00 00 64     |020.+....:....d |

..&.... ***** YAHTZEE *** P.ROWE *****.K
.... * COPYRIGHT 1978, REGENTS OF *.P...
. UNIVERSITY OF CALIF., BERKELEY...(.. *
* LAWRENCE HALL OF SCIENCE **...2.. "...
................WELCOME TO";...<.. "....
....................";...F.. "..........
..YAHTZEE..";...P.. "...................
..".E.Z.S$."123456TFHSLEY":F.0:G.0:SS.0:
E$."".`._.. I.1 . 39:E$.E$." ":..{.D.L$.
"................."...I.A$(0).".........
.............".A.N.A$(1)."   .... Q ....
   ....."...S.A$(2)."Q  ....   ....  Q..
..."...X.A$(3)."Q  .... Q ....  Q.....".
*.}.A$(4)."Q Q....   ....Q Q.....".M...A
$(5)."Q Q.... Q ....Q Q.....".P...A$(6).
"QQQ....   ....QQQ.....".....B$.".......
...................".....B$.B$."........
......":ST$."".....C$."":. I.1 . 6:C$.C$
.".     .  ":......C$.H(C$,52):CR$.G(13)
... .D$.".O...P.................L...".).
... S(13).].H.. "....";CR$;"........CARE
 FOR INSTRUCTIONS? ";.{.R.F.18.F:. G(F);
" ..";:T.TI...... I$:. I$."" . TI.T.25 .
 220...... I$."N" . 630.C.... I$.."Y" . 
210...... ".   THIS IS A GAME OF CHANCE 
PLAYED WITH".".... "5 DICE.  THE OBJECT 
IS TO GET AS MANY".Q.... "POINTS AS POSS
IBLE.  ONE GAME CONSISTS".~.... "OF 13 T
URNS.  EACH TURN YOU MAY ROLL"...".. "TH
E DICE UP TO THREE TIMES..".Q.,.. "   AF
TER EACH ROLL (EXCEPT THE LAST),"...6.. 
"YOU MAY ELECT TO KEEP ANY OR ALL OF THE
"...@.. "DICE AS THEY ARE.  THE ONES THA
T ARE".J.J.. "NOT KEPT ARE ROLLED AGAIN.
  FOR EXAMPLE:";L$;"....";...T.. I.1 . 5
:. B$;".......";:....^.H(1).5:H(2).2:H(3
).3:H(4).3:H(5).1.Y.H..L$;"......";:. I.
1 . 5:. A$(H(I));...R.. ".......";:.:. "
........KEEP? 33.":T.TI...|.. TI.T.240 .
 380.A.... "............MEANS THAT YOU "
;.I.... "ROLLED A    .5. .2. .3. .3. .1.
"...... "AND YOU WANT TO KEEP THE TWO .3
.'S, AND"...... "ROLL THE .5. .2. .1. AG
AIN."...... ".........PRESS .RETURN. TO 
CONTINUE";...B.. I$:. I$."" . 450.4.L.. 
".   AFTER THE ROLLING, YOU SCORE THE FI
VE";.F.V.. "DICE IN ONE OF THE 13 SCORIN
G CATEGORIES";...... "(ONE CATEGORY FOR 
EACH TURN).  AT THE".F.... "END OF THE G
AME, THE 13 SCORES ARE ADDED";...... "TO
 GIVE THE TOTAL (PLUS BONUSES).."...... 
"THE 13 CATEGORIES ARE:.".B.... "1 - ONE
S";CR$;"2 - TWOS";CR$;"3 - THREES".T....
 "4 - FOURS";CR$;"5 - FIVES";CR$;"6 - SI
XES"...... ".T - THREE OF A KIND (SCORES
 ALL DICE)".N.&.. "F - FOUR OF A KIND (S
AME AS ABOVE)"...0.. "H - FULL HOUSE (SC
ORES 25)".#.:.. "S - SMALL STRAIGHT(4 IN
 A ROW) SCORES 30";.U.D.. "L - LONG STRA
IGHT (5 IN A ROW) SCORES 40";...N.. "E -
 EXTRA OR CHANCE (SCORES TOTAL DICE)"...
X.. "Y - YAHTZEE (5 OF A KIND) SCORES 50
"...B.. ".......PRESS .RETURN. TO START 
THE GAME";...L.. I$:. I$."" . 620...V.. 
".";C$;:. I.1 . 6.2.... ". ";J(S$,I,1);"
'S .  ";:..R.... "..";C$:. C$;".THREE.  
";.~.... ".FOUR .  .HOUSE.  .SMALL.  .LO
NG .";...... "  .EXTRA.";C$...... .16);"
.       ........";.Y.... "YAHTZEE.......
.       ";CR$;L$;...... I.1 . 5:. B$;"..
.....";:....... I.1 . 13:S(I)..1:.:Q.0:G
.G.1.9.F.. I.1 . 13:L.1:. J.1 . 3.Z.P.. 
K.L . 5:H(K)..(6..(1).1):..S.Z.. L$;".."
;:. K.1 . 5...... K..L . . A$(0);...... 
A$(H(K));".......";:.:. J.3 . 920.H.... 
I$:. I$.."". 744.Y.... L$;"....."...... 
"...KEEP? ";:K.0.....F.18.F:. G(F);" .."
;:T.TI./.... I$:. I$."" . TI.T.25 . 780.
A.... I$."/" . I$."7" . . I$;:K.K.1:I(K)
.F(I$).48.T. .. I$."A" . 915...%.. I$.G(
20) . K.0 . K.K.1:. " ..";...*.. I$..CR$
 . 770.D./.. K.0 . L.1:. 910...4.. L.1 .
 K:. M.L . 5...>.. I(L).H(M) . 850...H..
:. 860. .R.H(M).H(L):H(L).I(L):. L:. 890
.4.\.. "  ???.":T.TI.H.F.. TI.T.30 . 870
.[.P.. E$;".":. 760.Y.Z.. ".";CR$;E$:. K
..5 . 910...... CR$;" YOU CAN PRESS .A. 
TO KEEP ALL THE DICE.":T.TI.H.... TI.T.1
20 . 902.W.... E$:. 920...... J...... ".
.....       ";...... I.13 . 950.%.... A.
1 . 13:. S(A)...1 . ..0.... 1030.A.... L
$;".....".W.... .25);"SCORE? ";.U.J.F.18
.F:. G(F);" ..";:T.TI...T.. I$:. I$."" .
 TI.T.25 . 980...... A.1 . 13:. I$.J(S$,
A,1) . 1010.G....:. 970...... S(A)..1 . 
1028...... CR$;".YOU MAY USE ONE SCORING
 CATEGORY ONCE.":T.TI.+.... TI.T.120 . 1
022.?.... E$;".";:. 950.X.... ".......  
      ";.V...S(A).0:. J.1 . 6:M(J).0:...
.... J.1 . 5:M(H(J)).M(H(J)).1:....... A
.7 . S(A).A.M(A):. 1190...$.. A.6 . 1070
,1070,1090,1110,1110,1180,1160......J.1 
. 6:. M(J).A.5 . 1180...8..:. 1190.9.B..
 J.1 . 6:. M(J).1 . M(J).4 . 1190.N.L..:
S(9).25:. 1190.P.V.C.0:. J.1 . 6:. M(J).
5 . 1150...`.C.C.1:. M(J).0 . C.0...J.. 
C.A.6 . 1150...T..:. 1190.A.~.S(A).10.A.
70:. 1190...... J.2 . 5:. H(J)..H(1) . 1
190......:S(13).50:. 2000:. 1190."...S(A
).H(1).H(2).H(3).H(4).H(5).@.... A.13 . 
S(13)..50 . 1220.B.... J.2 . 5:. H(J)..H
(1) . 1220......:Q.Q.100:. CR$;".   100 
POINT BONUS.":. 2000:T.TI...... TI.T.80 
. 1212...... E$...D.I$.D(S(A))." ":. S(A
).9 . I$.I(I$,C(I$).1)...N.. ".";:J.A:. 
A.6 . . "....";:J.A.6.2.X.. A..13 . . .7
.J.6);D$;I$:. 1270.R.... "....";.16);"O.
....P...";.{.... "....................L.
.. ";I$;" "...... I.....T.S(1).S(2).S(3)
.S(4).S(5).S(6).U.... L$;"....";CR$;"TOP
 HALF =";T;". POINTS"...(.. T.62 . T.T.3
5:. "PLUS 35 BONUS POINTS"./.2.U.S(7).S(
8).S(9).S(10).S(11).S(12).S(13).R.<.. "B
OTTOM HALF =";U;". POINTS".Z.F.. Q.0 . .
 "PLUS";Q;". BONUS POINTS". .P.. "TOTAL 
= .";T.U.Q;".. . POINTS"...U.SS.SS.T.U.Q
.I.Z.. ".ANOTHER GAME? ";.R.\.T.TI...^..
 I$:. I$."" . TI.T.25 . 1374...`.F.18.F:
. G(F);" ..";:. I$."" . 1372.4.D.. H(I$,
1)."Y" . 630.B.I.. G.1 . ..V.N.. "....";
CR$;E$.X.X.. "YOU GOT";SS;". POINTS IN";
...... G;". GAMES FOR"...... "AN AVERAGE
 OF .";.(SS.G..5);.P.... ".. . POINTS PE
R GAME."... .. E$;".";:....P.C.53:. K.1 
. 6...Z.. 59409,C:C.113.C:T.TI.#.... TI.
T.10 . 2020.+....:....D

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL