YAHTZEE
FILE INFORMATION
FILENAME(S): YAHTZEE
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-10-19 22:35:53
APPEARS ON: 1 disk(s)
FILE HASH
4a267f3fb355e33842f7b022f824c6bb7f7525bf20b27cd5a4958b5070dfcc3b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAMES 9 | YAHTZEE | PRG | Radd Maxx | 14 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 01 00 8F 20 59 41 48 54 5A 45 45 20 |..#.... YAHTZEE |
00000010: 20 20 20 20 20 20 20 20 20 20 20 20 20 53 45 50 | SEP|
00000020: 54 38 30 00 43 08 03 00 8F 20 47 41 4D 45 20 4F |T80.C.... GAME O|
00000030: 46 20 59 41 48 54 5A 45 45 2D 44 49 43 45 20 47 |F YAHTZEE-DICE G|
00000040: 41 4D 45 00 59 08 28 00 97 35 33 32 38 30 2C 30 |AME.Y.(..53280,0|
00000050: 3A 97 35 33 32 38 31 2C 30 00 63 08 2D 00 99 20 |:.53281,0.c.-.. |
00000060: 22 9A 22 00 8A 08 32 00 99 20 22 93 11 11 11 11 |"."...2.. ".....|
00000070: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 57 45 |..............WE|
00000080: 4C 43 4F 4D 45 20 54 4F 22 3B 00 AC 08 3C 00 99 |LCOME TO";...<..|
00000090: 20 22 11 11 11 11 11 9D 9D 9D 9D 9D 9D 9D 9D 9D | "..............|
000000A0: 9D AC A2 A2 A2 A2 A2 A2 A2 BB 22 3B 00 CB 08 46 |..........";...F|
000000B0: 00 99 20 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 11 12 A1 |.. "............|
000000C0: 59 41 48 54 5A 45 45 92 A1 22 3B 00 E9 08 50 00 |YAHTZEE..";...P.|
000000D0: 99 20 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 11 BC 12 A2 |. ".............|
000000E0: A2 A2 A2 A2 A2 A2 92 BE 22 00 13 09 5A 00 53 24 |........"...Z.S$|
000000F0: B2 22 31 32 33 34 35 36 54 46 48 53 4C 45 59 22 |."123456TFHSLEY"|
00000100: 3A 46 B2 30 3A 47 B2 30 3A 53 53 B2 30 3A 45 24 |:F.0:G.0:SS.0:E$|
00000110: B2 22 22 00 2E 09 5F 00 81 20 49 B2 31 20 A4 20 |.""..._.. I.1 . |
00000120: 33 39 3A 45 24 B2 45 24 AA 22 20 22 3A 82 00 49 |39:E$.E$." ":..I|
00000130: 09 64 00 4C 24 B2 22 13 11 11 11 11 11 11 11 11 |.d.L$.".........|
00000140: 11 11 11 11 11 1D 1D 1D 22 00 6D 09 69 00 41 24 |........".m.i.A$|
00000150: 28 30 29 B2 22 90 A6 A6 A6 9D 9D 9D 11 A6 A6 A6 |(0)."...........|
00000160: 9D 9D 9D 11 A6 A6 A6 9D 9D 9D 91 91 22 00 91 09 |............"...|
00000170: 6E 00 41 24 28 31 29 B2 22 1C 20 20 20 9D 9D 9D |n.A$(1).". ...|
00000180: 11 20 D1 20 9D 9D 9D 11 20 20 20 9D 9D 9D 91 91 |. . .... .....|
00000190: 22 00 B5 09 73 00 41 24 28 32 29 B2 22 9F D1 20 |"...s.A$(2).".. |
000001A0: 20 9D 9D 9D 11 20 20 20 9D 9D 9D 11 20 20 D1 9D | .... .... ..|
000001B0: 9D 9D 91 91 22 00 D9 09 78 00 41 24 28 33 29 B2 |...."...x.A$(3).|
000001C0: 22 9C D1 20 20 9D 9D 9D 11 20 D1 20 9D 9D 9D 11 |".. .... . ....|
000001D0: 20 20 D1 9D 9D 9D 91 91 22 00 FD 09 7D 00 41 24 | ......"...}.A$|
000001E0: 28 34 29 B2 22 1E D1 20 D1 9D 9D 9D 11 20 20 20 |(4).".. ..... |
000001F0: 9D 9D 9D 11 D1 20 D1 9D 9D 9D 91 91 22 00 21 0A |..... ......".!.|
00000200: 82 00 41 24 28 35 29 B2 22 1F D1 20 D1 9D 9D 9D |..A$(5).".. ....|
00000210: 11 20 D1 20 9D 9D 9D 11 D1 20 D1 9D 9D 9D 91 91 |. . ..... ......|
00000220: 22 00 45 0A 87 00 41 24 28 36 29 B2 22 9E D1 D1 |".E...A$(6)."...|
00000230: D1 9D 9D 9D 11 20 20 20 9D 9D 9D 11 D1 D1 D1 9D |..... ........|
00000240: 9D 9D 91 91 22 00 69 0A 8C 00 42 24 B2 22 B0 C0 |....".i...B$."..|
00000250: C0 C0 AE 9D 11 DD 9D 11 DD 9D 11 DD 9D 11 BD 9D |................|
00000260: 9D C0 9D 9D C0 9D 9D C0 22 00 8B 0A 91 00 42 24 |........".....B$|
00000270: B2 42 24 AA 22 9D 9D AD 9D 91 DD 9D 91 DD 9D 91 |.B$."...........|
00000280: DD 9D 91 22 3A 53 54 24 B2 22 22 00 B3 0A 96 00 |...":ST$."".....|
00000290: 43 24 B2 22 22 3A 81 20 49 B2 31 20 A4 20 36 3A |C$."":. I.1 . 6:|
000002A0: 43 24 B2 43 24 AA 22 12 20 20 20 20 20 92 20 20 |C$.C$.". . |
000002B0: 22 3A 82 00 CD 0A 9B 00 43 24 B2 C8 28 43 24 2C |":......C$..(C$,|
000002C0: 35 32 29 3A 43 52 24 B2 C7 28 31 33 29 00 F2 0A |52):CR$..(13)...|
000002D0: A0 00 44 24 B2 22 9D CF A3 A3 A3 D0 9D 11 A7 9D |..D$."..........|
000002E0: 11 BA 9D 9D A4 9D 9D A4 9D 9D A4 9D 9D CC 9D 91 |................|
000002F0: A5 22 00 FE 0A AA 00 86 20 53 28 31 33 29 00 32 |."...... S(13).2|
00000300: 0B C8 00 99 20 22 11 11 11 11 22 3B 43 52 24 3B |.... "....";CR$;|
00000310: 22 1D 1D 1D 1D 1D 1D 1D 1D 43 41 52 45 20 46 4F |"........CARE FO|
00000320: 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 3F 20 |R INSTRUCTIONS? |
00000330: 22 3B 00 50 0B D2 00 46 B2 31 38 AB 46 3A 99 20 |";.P...F.18.F:. |
00000340: C7 28 46 29 3B 22 20 92 9D 22 3B 3A 54 B2 54 49 |.(F);" ..";:T.TI|
00000350: 00 58 0B D7 00 A1 49 24 00 74 0B DC 00 8B 20 49 |.X....I$.t.... I|
00000360: 24 B2 22 22 20 AF 20 54 49 AB 54 B3 32 35 20 A7 |$."" . TI.T.25 .|
00000370: 20 32 32 30 00 87 0B E6 00 8B 20 49 24 B2 22 4E | 220...... I$."N|
00000380: 22 20 A7 20 36 33 30 00 9B 0B F0 00 8B 20 49 24 |" . 630...... I$|
00000390: B3 B1 22 59 22 20 A7 20 32 31 30 00 CC 0B FA 00 |.."Y" . 210.....|
000003A0: 99 20 22 93 20 20 20 54 48 49 53 20 49 53 20 41 |. ". THIS IS A|
000003B0: 20 47 41 4D 45 20 4F 46 20 43 48 41 4E 43 45 20 | GAME OF CHANCE |
000003C0: 50 4C 41 59 45 44 20 57 49 54 48 22 00 FA 0B 04 |PLAYED WITH"....|
000003D0: 01 99 20 22 35 20 44 49 43 45 2E 20 20 54 48 45 |.. "5 DICE. THE|
000003E0: 20 4F 42 4A 45 43 54 20 49 53 20 54 4F 20 47 45 | OBJECT IS TO GE|
000003F0: 54 20 41 53 20 4D 41 4E 59 22 00 29 0C 0E 01 99 |T AS MANY".)....|
00000400: 20 22 50 4F 49 4E 54 53 20 41 53 20 50 4F 53 53 | "POINTS AS POSS|
00000410: 49 42 4C 45 2E 20 20 4F 4E 45 20 47 41 4D 45 20 |IBLE. ONE GAME |
00000420: 43 4F 4E 53 49 53 54 53 22 00 56 0C 18 01 99 20 |CONSISTS".V.... |
00000430: 22 4F 46 20 31 33 20 54 55 52 4E 53 2E 20 20 45 |"OF 13 TURNS. E|
00000440: 41 43 48 20 54 55 52 4E 20 59 4F 55 20 4D 41 59 |ACH TURN YOU MAY|
00000450: 20 52 4F 4C 4C 22 00 7B 0C 22 01 99 20 22 54 48 | ROLL".{.".. "TH|
00000460: 45 20 44 49 43 45 20 55 50 20 54 4F 20 54 48 52 |E DICE UP TO THR|
00000470: 45 45 20 54 49 4D 45 53 2E 11 22 00 A9 0C 2C 01 |EE TIMES.."...,.|
00000480: 99 20 22 20 20 20 41 46 54 45 52 20 45 41 43 48 |. " AFTER EACH|
00000490: 20 52 4F 4C 4C 20 28 45 58 43 45 50 54 20 54 48 | ROLL (EXCEPT TH|
000004A0: 45 20 4C 41 53 54 29 2C 22 00 D9 0C 36 01 99 20 |E LAST),"...6.. |
000004B0: 22 59 4F 55 20 4D 41 59 20 45 4C 45 43 54 20 54 |"YOU MAY ELECT T|
000004C0: 4F 20 4B 45 45 50 20 41 4E 59 20 4F 52 20 41 4C |O KEEP ANY OR AL|
000004D0: 4C 20 4F 46 20 54 48 45 22 00 06 0D 40 01 99 20 |L OF THE"...@.. |
000004E0: 22 44 49 43 45 20 41 53 20 54 48 45 59 20 41 52 |"DICE AS THEY AR|
000004F0: 45 2E 20 20 54 48 45 20 4F 4E 45 53 20 54 48 41 |E. THE ONES THA|
00000500: 54 20 41 52 45 22 00 42 0D 4A 01 99 20 22 4E 4F |T ARE".B.J.. "NO|
00000510: 54 20 4B 45 50 54 20 41 52 45 20 52 4F 4C 4C 45 |T KEPT ARE ROLLE|
00000520: 44 20 41 47 41 49 4E 2E 20 20 46 4F 52 20 45 58 |D AGAIN. FOR EX|
00000530: 41 4D 50 4C 45 3A 22 3B 4C 24 3B 22 11 11 11 11 |AMPLE:";L$;"....|
00000540: 22 3B 00 62 0D 54 01 81 20 49 B2 31 20 A4 20 35 |";.b.T.. I.1 . 5|
00000550: 3A 99 20 42 24 3B 22 1D 1D 1D 1D 1D 1D 1D 22 3B |:. B$;".......";|
00000560: 3A 82 00 89 0D 5E 01 48 28 31 29 B2 35 3A 48 28 |:....^.H(1).5:H(|
00000570: 32 29 B2 32 3A 48 28 33 29 B2 33 3A 48 28 34 29 |2).2:H(3).3:H(4)|
00000580: B2 33 3A 48 28 35 29 B2 31 00 B1 0D 68 01 99 4C |.3:H(5).1...h..L|
00000590: 24 3B 22 11 11 11 11 11 1D 22 3B 3A 81 20 49 B2 |$;"......";:. I.|
000005A0: 31 20 A4 20 35 3A 99 20 41 24 28 48 28 49 29 29 |1 . 5:. A$(H(I))|
000005B0: 3B 00 DF 0D 72 01 99 20 22 1D 1D 1D 1D 1D 1D 1D |;...r.. ".......|
000005C0: 22 3B 3A 82 3A 99 20 22 11 11 11 11 1D 1D 1D 1D |";:.:. "........|
000005D0: 4B 45 45 50 3F 20 33 33 91 22 3A 54 B2 54 49 00 |KEEP? 33.":T.TI.|
000005E0: F4 0D 7C 01 8B 20 54 49 AB 54 B3 32 34 30 20 A7 |..|.. TI.T.240 .|
000005F0: 20 33 38 30 00 19 0E 90 01 99 20 22 91 91 91 91 | 380...... "....|
00000600: 91 91 91 91 91 91 91 91 4D 45 41 4E 53 20 54 48 |........MEANS TH|
00000610: 41 54 20 59 4F 55 20 22 3B 00 41 0E 9A 01 99 20 |AT YOU ";.A.... |
00000620: 22 52 4F 4C 4C 45 44 20 41 20 20 20 20 12 35 92 |"ROLLED A .5.|
00000630: 20 12 32 92 20 12 33 92 20 12 33 92 20 12 31 92 | .2. .3. .3. .1.|
00000640: 22 00 71 0E A4 01 99 20 22 41 4E 44 20 59 4F 55 |".q.... "AND YOU|
00000650: 20 57 41 4E 54 20 54 4F 20 4B 45 45 50 20 54 48 | WANT TO KEEP TH|
00000660: 45 20 54 57 4F 20 12 33 92 27 53 2C 20 41 4E 44 |E TWO .3.'S, AND|
00000670: 22 00 95 0E AE 01 99 20 22 52 4F 4C 4C 20 54 48 |"...... "ROLL TH|
00000680: 45 20 12 35 92 20 12 32 92 20 12 31 92 20 41 47 |E .5. .2. .1. AG|
00000690: 41 49 4E 2E 22 00 C2 0E B8 01 99 20 22 11 1D 1D |AIN."...... "...|
000006A0: 1D 1D 1D 1D 1D 1D 50 52 45 53 53 20 12 52 45 54 |......PRESS .RET|
000006B0: 55 52 4E 92 20 54 4F 20 43 4F 4E 54 49 4E 55 45 |URN. TO CONTINUE|
000006C0: 22 3B 00 D9 0E C2 01 A1 20 49 24 3A 8B 20 49 24 |";...... I$:. I$|
000006D0: B2 22 22 20 A7 20 34 35 30 00 0C 0F CC 01 99 20 |."" . 450...... |
000006E0: 22 93 20 20 20 41 46 54 45 52 20 54 48 45 20 52 |". AFTER THE R|
000006F0: 4F 4C 4C 49 4E 47 2C 20 59 4F 55 20 53 43 4F 52 |OLLING, YOU SCOR|
00000700: 45 20 54 48 45 20 46 49 56 45 22 3B 00 3E 0F D6 |E THE FIVE";.>..|
00000710: 01 99 20 22 44 49 43 45 20 49 4E 20 4F 4E 45 20 |.. "DICE IN ONE |
00000720: 4F 46 20 54 48 45 20 31 33 20 53 43 4F 52 49 4E |OF THE 13 SCORIN|
00000730: 47 20 43 41 54 45 47 4F 52 49 45 53 22 3B 00 6C |G CATEGORIES";.l|
00000740: 0F E0 01 99 20 22 28 4F 4E 45 20 43 41 54 45 47 |.... "(ONE CATEG|
00000750: 4F 52 59 20 46 4F 52 20 45 41 43 48 20 54 55 52 |ORY FOR EACH TUR|
00000760: 4E 29 2E 20 20 41 54 20 54 48 45 22 00 9E 0F EA |N). AT THE"....|
00000770: 01 99 20 22 45 4E 44 20 4F 46 20 54 48 45 20 47 |.. "END OF THE G|
00000780: 41 4D 45 2C 20 54 48 45 20 31 33 20 53 43 4F 52 |AME, THE 13 SCOR|
00000790: 45 53 20 41 52 45 20 41 44 44 45 44 22 3B 00 C9 |ES ARE ADDED";..|
000007A0: 0F F4 01 99 20 22 54 4F 20 47 49 56 45 20 54 48 |.... "TO GIVE TH|
000007B0: 45 20 54 4F 54 41 4C 20 28 50 4C 55 53 20 42 4F |E TOTAL (PLUS BO|
000007C0: 4E 55 53 45 53 29 2E 11 22 00 E9 0F FE 01 99 20 |NUSES).."...... |
000007D0: 22 54 48 45 20 31 33 20 43 41 54 45 47 4F 52 49 |"THE 13 CATEGORI|
000007E0: 45 53 20 41 52 45 3A 11 22 00 1A 10 08 02 99 20 |ES ARE:."...... |
000007F0: 22 31 20 2D 20 4F 4E 45 53 22 3B 43 52 24 3B 22 |"1 - ONES";CR$;"|
00000800: 32 20 2D 20 54 57 4F 53 22 3B 43 52 24 3B 22 33 |2 - TWOS";CR$;"3|
00000810: 20 2D 20 54 48 52 45 45 53 22 00 4C 10 12 02 99 | - THREES".L....|
00000820: 20 22 34 20 2D 20 46 4F 55 52 53 22 3B 43 52 24 | "4 - FOURS";CR$|
00000830: 3B 22 35 20 2D 20 46 49 56 45 53 22 3B 43 52 24 |;"5 - FIVES";CR$|
00000840: 3B 22 36 20 2D 20 53 49 58 45 53 22 00 7B 10 1C |;"6 - SIXES".{..|
00000850: 02 99 20 22 11 54 20 2D 20 54 48 52 45 45 20 4F |.. ".T - THREE O|
00000860: 46 20 41 20 4B 49 4E 44 20 28 53 43 4F 52 45 53 |F A KIND (SCORES|
00000870: 20 41 4C 4C 20 44 49 43 45 29 22 00 A6 10 26 02 | ALL DICE)"...&.|
00000880: 99 20 22 46 20 2D 20 46 4F 55 52 20 4F 46 20 41 |. "F - FOUR OF A|
00000890: 20 4B 49 4E 44 20 28 53 41 4D 45 20 41 53 20 41 | KIND (SAME AS A|
000008A0: 42 4F 56 45 29 22 00 C9 10 30 02 99 20 22 48 20 |BOVE)"...0.. "H |
000008B0: 2D 20 46 55 4C 4C 20 48 4F 55 53 45 20 28 53 43 |- FULL HOUSE (SC|
000008C0: 4F 52 45 53 20 32 35 29 22 00 FB 10 3A 02 99 20 |ORES 25)"...:.. |
000008D0: 22 53 20 2D 20 53 4D 41 4C 4C 20 53 54 52 41 49 |"S - SMALL STRAI|
000008E0: 47 48 54 28 34 20 49 4E 20 41 20 52 4F 57 29 20 |GHT(4 IN A ROW) |
000008F0: 53 43 4F 52 45 53 20 33 30 22 3B 00 2D 11 44 02 |SCORES 30";.-.D.|
00000900: 99 20 22 4C 20 2D 20 4C 4F 4E 47 20 53 54 52 41 |. "L - LONG STRA|
00000910: 49 47 48 54 20 28 35 20 49 4E 20 41 20 52 4F 57 |IGHT (5 IN A ROW|
00000920: 29 20 53 43 4F 52 45 53 20 34 30 22 3B 00 5D 11 |) SCORES 40";.].|
00000930: 4E 02 99 20 22 45 20 2D 20 45 58 54 52 41 20 4F |N.. "E - EXTRA O|
00000940: 52 20 43 48 41 4E 43 45 20 28 53 43 4F 52 45 53 |R CHANCE (SCORES|
00000950: 20 54 4F 54 41 4C 20 44 49 43 45 29 22 00 89 11 | TOTAL DICE)"...|
00000960: 58 02 99 20 22 59 20 2D 20 59 41 48 54 5A 45 45 |X.. "Y - YAHTZEE|
00000970: 20 28 35 20 4F 46 20 41 20 4B 49 4E 44 29 20 53 | (5 OF A KIND) S|
00000980: 43 4F 52 45 53 20 35 30 22 00 BA 11 62 02 99 20 |CORES 50"...b.. |
00000990: 22 11 1D 1D 1D 1D 1D 1D 50 52 45 53 53 20 12 52 |".......PRESS .R|
000009A0: 45 54 55 52 4E 92 20 54 4F 20 53 54 41 52 54 20 |ETURN. TO START |
000009B0: 54 48 45 20 47 41 4D 45 22 3B 00 D1 11 6C 02 A1 |THE GAME";...l..|
000009C0: 20 49 24 3A 8B 20 49 24 B2 22 22 20 A7 20 36 32 | I$:. I$."" . 62|
000009D0: 30 00 E9 11 76 02 99 20 22 93 22 3B 43 24 3B 3A |0...v.. ".";C$;:|
000009E0: 81 20 49 B2 31 20 A4 20 36 00 0B 12 80 02 99 20 |. I.1 . 6...... |
000009F0: 22 12 81 20 22 3B CA 28 53 24 2C 49 2C 31 29 3B |".. ";.(S$,I,1);|
00000A00: 22 27 53 20 92 20 20 22 3B 3A 82 00 2D 12 8A 02 |"'S . ";:..-...|
00000A10: 99 20 22 81 9D 9D 22 3B 43 24 3A 99 20 43 24 3B |. "...";C$:. C$;|
00000A20: 22 12 1C 54 48 52 45 45 92 20 20 22 3B 00 5D 12 |"..THREE. ";.].|
00000A30: 94 02 99 20 22 12 9F 46 4F 55 52 20 92 20 20 12 |... "..FOUR . .|
00000A40: 9C 48 4F 55 53 45 92 20 20 12 1E 53 4D 41 4C 4C |.HOUSE. ..SMALL|
00000A50: 92 20 20 12 1F 4C 4F 4E 47 20 92 22 3B 00 73 12 |. ..LONG .";.s.|
00000A60: 9E 02 99 20 22 20 20 12 9E 45 58 54 52 41 92 22 |... " ..EXTRA."|
00000A70: 3B 43 24 00 93 12 A8 02 99 20 A6 31 36 29 3B 22 |;C$...... .16);"|
00000A80: 12 81 20 20 20 20 20 20 20 11 9D 9D 9D 9D 9D 9D |.. .......|
00000A90: 9D 22 3B 00 BB 12 B2 02 99 20 22 99 59 41 48 54 |.";...... ".YAHT|
00000AA0: 5A 45 45 11 9D 9D 9D 9D 9D 9D 9D 20 20 20 20 20 |ZEE........ |
00000AB0: 20 20 22 3B 43 52 24 3B 4C 24 3B 00 DB 12 B7 02 | ";CR$;L$;.....|
00000AC0: 81 20 49 B2 31 20 A4 20 35 3A 99 20 42 24 3B 22 |. I.1 . 5:. B$;"|
00000AD0: 1D 1D 1D 1D 1D 1D 1D 22 3B 3A 82 00 FE 12 BC 02 |.......";:......|
00000AE0: 81 20 49 B2 31 20 A4 20 31 33 3A 53 28 49 29 B2 |. I.1 . 13:S(I).|
00000AF0: AB 31 3A 82 3A 51 B2 30 3A 47 B2 47 AA 31 00 1B |.1:.:Q.0:G.G.1..|
00000B00: 13 C6 02 81 20 49 B2 31 20 A4 20 31 33 3A 4C B2 |.... I.1 . 13:L.|
00000B10: 31 3A 81 20 4A B2 31 20 A4 20 33 00 3C 13 D0 02 |1:. J.1 . 3.<...|
00000B20: 81 20 4B B2 4C 20 A4 20 35 3A 48 28 4B 29 B2 B5 |. K.L . 5:H(K)..|
00000B30: 28 36 AC BB 28 31 29 AA 31 29 3A 82 00 55 13 DA |(6..(1).1):..U..|
00000B40: 02 99 20 4C 24 3B 22 11 1D 22 3B 3A 81 20 4B B2 |.. L$;"..";:. K.|
00000B50: 31 20 A4 20 35 00 6B 13 E4 02 8B 20 4B B1 B2 4C |1 . 5.k.... K..L|
00000B60: 20 A7 20 99 20 41 24 28 30 29 3B 00 93 13 E6 02 | . . A$(0);.....|
00000B70: 99 20 41 24 28 48 28 4B 29 29 3B 22 1D 1D 1D 1D |. A$(H(K));"....|
00000B80: 1D 1D 1D 22 3B 3A 82 3A 8B 20 4A B2 33 20 A7 20 |...";:.:. J.3 . |
00000B90: 39 32 30 00 AA 13 E8 02 A1 20 49 24 3A 8B 20 49 |920...... I$:. I|
00000BA0: 24 B3 B1 22 22 A7 20 37 34 34 00 BB 13 EE 02 99 |$.."". 744......|
00000BB0: 20 4C 24 3B 22 11 11 11 11 11 22 00 D2 13 F8 02 | L$;".....".....|
00000BC0: 99 20 22 1D 1D 1D 4B 45 45 50 3F 20 22 3B 3A 4B |. "...KEEP? ";:K|
00000BD0: B2 30 00 F0 13 02 03 46 B2 31 38 AB 46 3A 99 20 |.0.....F.18.F:. |
00000BE0: C7 28 46 29 3B 22 20 92 9D 22 3B 3A 54 B2 54 49 |.(F);" ..";:T.TI|
00000BF0: 00 11 14 0C 03 A1 20 49 24 3A 8B 20 49 24 B2 22 |...... I$:. I$."|
00000C00: 22 20 AF 20 54 49 AB 54 B3 32 35 20 A7 20 37 38 |" . TI.T.25 . 78|
00000C10: 30 00 43 14 16 03 8B 20 49 24 B1 22 2F 22 20 AF |0.C.... I$."/" .|
00000C20: 20 49 24 B3 22 37 22 20 A7 20 99 20 49 24 3B 3A | I$."7" . . I$;:|
00000C30: 4B B2 4B AA 31 3A 49 28 4B 29 B2 C6 28 49 24 29 |K.K.1:I(K)..(I$)|
00000C40: AB 34 38 00 56 14 20 03 8B 20 49 24 B2 22 41 22 |.48.V. .. I$."A"|
00000C50: 20 A7 20 39 31 35 00 7C 14 25 03 8B 20 49 24 B2 | . 915.|.%.. I$.|
00000C60: C7 28 32 30 29 20 AF 20 4B B1 30 20 A7 20 4B B2 |.(20) . K.0 . K.|
00000C70: 4B AB 31 3A 99 20 22 20 9D 9D 22 3B 00 90 14 2A |K.1:. " ..";...*|
00000C80: 03 8B 20 49 24 B3 B1 43 52 24 20 A7 20 37 37 30 |.. I$..CR$ . 770|
00000C90: 00 A6 14 2F 03 8B 20 4B B2 30 20 A7 20 4C B2 31 |.../.. K.0 . L.1|
00000CA0: 3A 89 20 39 31 30 00 BE 14 34 03 81 20 4C B2 31 |:. 910...4.. L.1|
00000CB0: 20 A4 20 4B 3A 81 20 4D B2 4C 20 A4 20 35 00 D4 | . K:. M.L . 5..|
00000CC0: 14 3E 03 8B 20 49 28 4C 29 B2 48 28 4D 29 20 A7 |.>.. I(L).H(M) .|
00000CD0: 20 38 35 30 00 E0 14 48 03 82 3A 89 20 38 36 30 | 850...H..:. 860|
00000CE0: 00 02 15 52 03 48 28 4D 29 B2 48 28 4C 29 3A 48 |...R.H(M).H(L):H|
00000CF0: 28 4C 29 B2 49 28 4C 29 3A 82 20 4C 3A 89 20 38 |(L).I(L):. L:. 8|
00000D00: 39 30 00 16 15 5C 03 99 20 22 20 20 3F 3F 3F 91 |90...\.. " ???.|
00000D10: 22 3A 54 B2 54 49 00 2A 15 66 03 8B 20 54 49 AB |":T.TI.*.f.. TI.|
00000D20: 54 B3 33 30 20 A7 20 38 37 30 00 3D 15 70 03 99 |T.30 . 870.=.p..|
00000D30: 20 45 24 3B 22 91 22 3A 89 20 37 36 30 00 5B 15 | E$;".":. 760.[.|
00000D40: 7A 03 99 20 22 91 22 3B 43 52 24 3B 45 24 3A 8B |z.. ".";CR$;E$:.|
00000D50: 20 4B B3 B1 35 20 A7 20 39 31 30 00 95 15 84 03 | K..5 . 910.....|
00000D60: 99 20 43 52 24 3B 22 20 59 4F 55 20 43 41 4E 20 |. CR$;" YOU CAN |
00000D70: 50 52 45 53 53 20 12 41 92 20 54 4F 20 4B 45 45 |PRESS .A. TO KEE|
00000D80: 50 20 41 4C 4C 20 54 48 45 20 44 49 43 45 91 22 |P ALL THE DICE."|
00000D90: 3A 54 B2 54 49 00 AA 15 86 03 8B 20 54 49 AB 54 |:T.TI...... TI.T|
00000DA0: B3 31 32 30 20 A7 20 39 30 32 00 B9 15 88 03 99 |.120 . 902......|
00000DB0: 20 45 24 3A 89 20 39 32 30 00 C1 15 8E 03 82 20 | E$:. 920...... |
00000DC0: 4A 00 D8 15 93 03 99 20 22 9D 9D 9D 9D 9D 9D 20 |J...... "...... |
00000DD0: 20 20 20 20 20 20 22 3B 00 E9 15 98 03 8B 20 49 | ";...... I|
00000DE0: B3 31 33 20 A7 20 39 35 30 00 07 16 A2 03 81 20 |.13 . 950...... |
00000DF0: 41 B2 31 20 A4 20 31 33 3A 8B 20 53 28 41 29 B3 |A.1 . 13:. S(A).|
00000E00: B1 AB 31 20 A7 20 82 00 12 16 AC 03 89 20 31 30 |..1 . ....... 10|
00000E10: 33 30 00 23 16 B6 03 99 20 4C 24 3B 22 11 11 11 |30.#.... L$;"...|
00000E20: 11 11 22 00 39 16 C0 03 99 20 A6 32 35 29 3B 22 |..".9.... .25);"|
00000E30: 53 43 4F 52 45 3F 20 22 3B 00 57 16 CA 03 46 B2 |SCORE? ";.W...F.|
00000E40: 31 38 AB 46 3A 99 20 C7 28 46 29 3B 22 20 92 9D |18.F:. .(F);" ..|
00000E50: 22 3B 3A 54 B2 54 49 00 78 16 D4 03 A1 20 49 24 |";:T.TI.x.... I$|
00000E60: 3A 8B 20 49 24 B2 22 22 20 AF 20 54 49 AB 54 B3 |:. I$."" . TI.T.|
00000E70: 32 35 20 A7 20 39 38 30 00 9D 16 DE 03 81 20 41 |25 . 980...... A|
00000E80: B2 31 20 A4 20 31 33 3A 8B 20 49 24 B2 CA 28 53 |.1 . 13:. I$..(S|
00000E90: 24 2C 41 2C 31 29 20 A7 20 31 30 31 30 00 A9 16 |$,A,1) . 1010...|
00000EA0: E8 03 82 3A 89 20 39 37 30 00 BE 16 F2 03 8B 20 |...:. 970...... |
00000EB0: 53 28 41 29 B2 AB 31 20 A7 20 31 30 32 38 00 F7 |S(A)..1 . 1028..|
00000EC0: 16 FC 03 99 20 43 52 24 3B 22 11 59 4F 55 20 4D |.... CR$;".YOU M|
00000ED0: 41 59 20 55 53 45 20 4F 4E 45 20 53 43 4F 52 49 |AY USE ONE SCORI|
00000EE0: 4E 47 20 43 41 54 45 47 4F 52 59 20 4F 4E 43 45 |NG CATEGORY ONCE|
00000EF0: 91 22 3A 54 B2 54 49 00 0D 17 FE 03 8B 20 54 49 |.":T.TI...... TI|
00000F00: AB 54 B3 31 32 30 20 A7 20 31 30 32 32 00 21 17 |.T.120 . 1022.!.|
00000F10: 00 04 99 20 45 24 3B 22 91 22 3B 3A 89 20 39 35 |... E$;".";:. 95|
00000F20: 30 00 3A 17 04 04 99 20 22 9D 9D 9D 9D 9D 9D 9D |0.:.... ".......|
00000F30: 20 20 20 20 20 20 20 20 22 3B 00 58 17 06 04 53 | ";.X...S|
00000F40: 28 41 29 B2 30 3A 81 20 4A B2 31 20 A4 20 36 3A |(A).0:. J.1 . 6:|
00000F50: 4D 28 4A 29 B2 30 3A 82 00 7A 17 10 04 81 20 4A |M(J).0:..z.... J|
00000F60: B2 31 20 A4 20 35 3A 4D 28 48 28 4A 29 29 B2 4D |.1 . 5:M(H(J)).M|
00000F70: 28 48 28 4A 29 29 AA 31 3A 82 00 99 17 1A 04 8B |(H(J)).1:.......|
00000F80: 20 41 B3 37 20 A7 20 53 28 41 29 B2 41 AC 4D 28 | A.7 . S(A).A.M(|
00000F90: 41 29 3A 89 20 31 31 39 30 00 C8 17 24 04 91 20 |A):. 1190...$.. |
00000FA0: 41 AB 36 20 89 20 31 30 37 30 2C 31 30 37 30 2C |A.6 . 1070,1070,|
00000FB0: 31 30 39 30 2C 31 31 31 30 2C 31 31 31 30 2C 31 |1090,1110,1110,1|
00000FC0: 31 38 30 2C 31 31 36 30 00 E7 17 2E 04 81 4A B2 |180,1160......J.|
00000FD0: 31 20 A4 20 36 3A 8B 20 4D 28 4A 29 B1 41 AB 35 |1 . 6:. M(J).A.5|
00000FE0: 20 A7 20 31 31 38 30 00 F4 17 38 04 82 3A 89 20 | . 1180...8..:. |
00000FF0: 31 31 39 30 00 1B 18 42 04 81 20 4A B2 31 20 A4 |1190...B.. J.1 .|
00001000: 20 36 3A 8B 20 4D 28 4A 29 B2 31 20 B0 20 4D 28 | 6:. M(J).1 . M(|
00001010: 4A 29 B2 34 20 A7 20 31 31 39 30 00 30 18 4C 04 |J).4 . 1190.0.L.|
00001020: 82 3A 53 28 39 29 B2 32 35 3A 89 20 31 31 39 30 |.:S(9).25:. 1190|
00001030: 00 54 18 56 04 43 B2 30 3A 81 20 4A B2 31 20 A4 |.T.V.C.0:. J.1 .|
00001040: 20 36 3A 8B 20 20 20 4D 28 4A 29 B2 35 20 A7 20 | 6:. M(J).5 . |
00001050: 31 31 35 30 00 6D 18 60 04 43 B2 43 AA 31 3A 8B |1150.m.`.C.C.1:.|
00001060: 20 4D 28 4A 29 B2 30 20 A7 20 43 B2 30 00 80 18 | M(J).0 . C.0...|
00001070: 6A 04 8B 20 43 B2 41 AB 36 20 A7 20 31 31 35 30 |j.. C.A.6 . 1150|
00001080: 00 8D 18 74 04 82 3A 89 20 31 31 39 30 00 A5 18 |...t..:. 1190...|
00001090: 7E 04 53 28 41 29 B2 31 30 AC 41 AB 37 30 3A 89 |~.S(A).10.A.70:.|
000010A0: 20 31 31 39 30 00 C7 18 88 04 81 20 4A B2 32 20 | 1190...... J.2 |
000010B0: A4 20 35 3A 8B 20 48 28 4A 29 B3 B1 48 28 31 29 |. 5:. H(J)..H(1)|
000010C0: 20 A7 20 31 31 39 30 00 E4 18 92 04 82 3A 53 28 | . 1190......:S(|
000010D0: 31 33 29 B2 35 30 3A 8D 20 32 30 30 30 3A 89 20 |13).50:. 2000:. |
000010E0: 31 31 39 30 00 06 19 9C 04 53 28 41 29 B2 48 28 |1190.....S(A).H(|
000010F0: 31 29 AA 48 28 32 29 AA 48 28 33 29 AA 48 28 34 |1).H(2).H(3).H(4|
00001100: 29 AA 48 28 35 29 00 24 19 A6 04 8B 20 41 B2 31 |).H(5).$.... A.1|
00001110: 33 20 B0 20 53 28 31 33 29 B3 B1 35 30 20 A7 20 |3 . S(13)..50 . |
00001120: 31 32 32 30 00 46 19 B0 04 81 20 4A B2 32 20 A4 |1220.F.... J.2 .|
00001130: 20 35 3A 8B 20 48 28 4A 29 B3 B1 48 28 31 29 20 | 5:. H(J)..H(1) |
00001140: A7 20 31 32 32 30 00 7D 19 BA 04 82 3A 51 B2 51 |. 1220.}....:Q.Q|
00001150: AA 31 30 30 3A 99 20 43 52 24 3B 22 11 20 20 20 |.100:. CR$;". |
00001160: 31 30 30 20 50 4F 49 4E 54 20 42 4F 4E 55 53 91 |100 POINT BONUS.|
00001170: 22 3A 8D 20 32 30 30 30 3A 54 B2 54 49 00 92 19 |":. 2000:T.TI...|
00001180: BC 04 8B 20 54 49 AB 54 B3 38 30 20 A7 20 31 32 |... TI.T.80 . 12|
00001190: 31 32 00 9B 19 BE 04 99 20 45 24 00 CA 19 C4 04 |12...... E$.....|
000011A0: 49 24 B2 C4 28 53 28 41 29 29 AA 22 20 22 3A 8B |I$..(S(A))." ":.|
000011B0: 20 53 28 41 29 B1 39 20 A7 20 49 24 B2 C9 28 49 | S(A).9 . I$..(I|
000011C0: 24 2C C3 28 49 24 29 AB 31 29 00 F1 19 CE 04 99 |$,.(I$).1)......|
000011D0: 20 22 13 22 3B 3A 4A B2 41 3A 8B 20 41 B1 36 20 | ".";:J.A:. A.6 |
000011E0: A7 20 99 20 22 11 11 11 11 22 3B 3A 4A B2 41 AB |. . "....";:J.A.|
000011F0: 36 00 16 1A D8 04 8B 20 41 B3 B1 31 33 20 A7 20 |6...... A..13 . |
00001200: 99 20 A6 37 AC 4A AB 36 29 3B 44 24 3B 49 24 3A |. .7.J.6);D$;I$:|
00001210: 89 20 31 32 37 30 00 36 1A E2 04 99 20 22 11 11 |. 1270.6.... "..|
00001220: 11 11 22 3B A6 31 36 29 3B 22 CF A3 A3 A3 A3 A3 |..";.16);"......|
00001230: D0 9D 11 A7 22 3B 00 5F 1A EC 04 99 20 22 9D 11 |....";._.... "..|
00001240: BA 9D 9D A4 9D 9D A4 9D 9D A4 9D 9D A4 9D 9D A4 |................|
00001250: 9D 9D CC 9D 91 A5 20 22 3B 49 24 3B 22 20 22 00 |...... ";I$;" ".|
00001260: 67 1A F6 04 82 20 49 00 8B 1A 14 05 54 B2 53 28 |g.... I.....T.S(|
00001270: 31 29 AA 53 28 32 29 AA 53 28 33 29 AA 53 28 34 |1).S(2).S(3).S(4|
00001280: 29 AA 53 28 35 29 AA 53 28 36 29 00 B9 1A 1E 05 |).S(5).S(6).....|
00001290: 99 20 4C 24 3B 22 11 11 11 11 22 3B 43 52 24 3B |. L$;"....";CR$;|
000012A0: 22 54 4F 50 20 48 41 4C 46 20 3D 22 3B 54 3B 22 |"TOP HALF =";T;"|
000012B0: 9D 20 50 4F 49 4E 54 53 22 00 E6 1A 28 05 8B 20 |. POINTS"...(.. |
000012C0: 54 B1 36 32 20 A7 20 54 B2 54 AA 33 35 3A 99 20 |T.62 . T.T.35:. |
000012D0: 22 50 4C 55 53 20 33 35 20 42 4F 4E 55 53 20 50 |"PLUS 35 BONUS P|
000012E0: 4F 49 4E 54 53 22 00 13 1B 32 05 55 B2 53 28 37 |OINTS"...2.U.S(7|
000012F0: 29 AA 53 28 38 29 AA 53 28 39 29 AA 53 28 31 30 |).S(8).S(9).S(10|
00001300: 29 AA 53 28 31 31 29 AA 53 28 31 32 29 AA 53 28 |).S(11).S(12).S(|
00001310: 31 33 29 00 36 1B 3C 05 99 20 22 42 4F 54 54 4F |13).6.<.. "BOTTO|
00001320: 4D 20 48 41 4C 46 20 3D 22 3B 55 3B 22 9D 20 50 |M HALF =";U;". P|
00001330: 4F 49 4E 54 53 22 00 5E 1B 46 05 8B 20 51 B1 30 |OINTS".^.F.. Q.0|
00001340: 20 A7 20 99 20 22 50 4C 55 53 22 3B 51 3B 22 9D | . . "PLUS";Q;".|
00001350: 20 42 4F 4E 55 53 20 50 4F 49 4E 54 53 22 00 84 | BONUS POINTS"..|
00001360: 1B 50 05 99 20 22 54 4F 54 41 4C 20 3D 20 12 22 |.P.. "TOTAL = ."|
00001370: 3B 54 AA 55 AA 51 3B 22 9D 12 20 92 20 50 4F 49 |;T.U.Q;".. . POI|
00001380: 4E 54 53 22 00 94 1B 55 05 53 53 B2 53 53 AA 54 |NTS"...U.SS.SS.T|
00001390: AA 55 AA 51 00 AD 1B 5A 05 99 20 22 11 41 4E 4F |.U.Q...Z.. ".ANO|
000013A0: 54 48 45 52 20 47 41 4D 45 3F 20 22 3B 00 B6 1B |THER GAME? ";...|
000013B0: 5C 05 54 B2 54 49 00 D8 1B 5E 05 A1 20 49 24 3A |\.T.TI...^.. I$:|
000013C0: 8B 20 49 24 B2 22 22 20 AF 20 54 49 AB 54 B3 32 |. I$."" . TI.T.2|
000013D0: 35 20 A7 20 31 33 37 34 00 00 1C 60 05 46 B2 31 |5 . 1374...`.F.1|
000013E0: 38 AB 46 3A 99 20 C7 28 46 29 3B 22 20 92 9D 22 |8.F:. .(F);" .."|
000013F0: 3B 3A 8B 20 49 24 B2 22 22 20 A7 20 31 33 37 32 |;:. I$."" . 1372|
00001400: 00 18 1C 64 05 8B 20 C8 28 49 24 2C 31 29 B2 22 |...d.. .(I$,1)."|
00001410: 59 22 20 A7 20 36 33 30 00 31 1C 65 05 8B 20 C8 |Y" . 630.1.e.. .|
00001420: 28 49 24 2C 31 29 B2 22 4E 22 20 A7 20 31 33 38 |(I$,1)."N" . 138|
00001430: 35 00 3C 1C 66 05 89 20 31 33 37 34 00 4A 1C 69 |5.<.f.. 1374.J.i|
00001440: 05 8B 20 47 B2 31 20 A7 20 80 00 5E 1C 6E 05 99 |.. G.1 . ..^.n..|
00001450: 20 22 91 91 91 91 22 3B 43 52 24 3B 45 24 00 80 | "....";CR$;E$..|
00001460: 1C 78 05 99 20 22 59 4F 55 20 47 4F 54 22 3B 53 |.x.. "YOU GOT";S|
00001470: 53 3B 22 9D 20 50 4F 49 4E 54 53 20 49 4E 22 3B |S;". POINTS IN";|
00001480: 00 96 1C 82 05 99 20 47 3B 22 9D 20 47 41 4D 45 |...... G;". GAME|
00001490: 53 20 46 4F 52 22 00 BA 1C 8C 05 99 20 22 41 4E |S FOR"...... "AN|
000014A0: 20 41 56 45 52 41 47 45 20 4F 46 20 12 22 3B B5 | AVERAGE OF .";.|
000014B0: 28 53 53 AD 47 AA 2E 35 29 3B 00 D8 1C 96 05 99 |(SS.G..5);......|
000014C0: 20 22 9D 12 20 92 20 50 4F 49 4E 54 53 20 50 45 | ".. . POINTS PE|
000014D0: 52 20 47 41 4D 45 2E 22 00 E8 1C A0 05 99 20 45 |R GAME."...... E|
000014E0: 24 3B 22 91 22 3B 3A 80 00 FB 1C D0 07 43 B2 35 |$;".";:......C.5|
000014F0: 33 3A 81 20 4B B2 31 20 A4 20 36 00 16 1D DA 07 |3:. K.1 . 6.....|
00001500: 97 20 35 39 34 30 39 2C 43 3A 43 B2 31 31 33 AB |. 59409,C:C.113.|
00001510: 43 3A 54 B2 54 49 00 2B 1D E4 07 8B 20 54 49 AB |C:T.TI.+.... TI.|
00001520: 54 B3 31 30 20 A7 20 32 30 32 30 00 33 1D EE 07 |T.10 . 2020.3...|
00001530: 82 3A 8E 00 00 00 64 |.:....d |
..#.... YAHTZEE SEPT80.C...
. GAME OF YAHTZEE-DICE GAME.Y.(..53280,0
:.53281,0.C.-.. "."...2.. ".............
......WELCOME TO";...<.. "..............
..........";.K.F.. "............YAHTZEE.
.";...P.. "....................."...Z.S$
."123456TFHSLEY":F.0:G.0:SS.0:E$.""..._.
. I.1 . 39:E$.E$." ":..I.D.L$.".........
........".M.I.A$(0)."...................
...."...N.A$(1).". .... Q .... .....
"...S.A$(2).".Q .... .... Q.....".Y.
X.A$(3).".Q .... Q .... Q....."...}.A$
(4).".Q Q.... ....Q Q.....".!...A$(5).
".Q Q.... Q ....Q Q.....".E...A$(6).".QQ
Q.... ....QQQ.....".I...B$."..........
................".....B$.B$."...........
...":ST$."".....C$."":. I.1 . 6:C$.C$.".
. ":..M...C$.H(C$,52):CR$.G(13)...
.D$.".O...P.................L..."......
S(13).2.H.. "....";CR$;"........CARE FO
R INSTRUCTIONS? ";.P.R.F.18.F:. G(F);" .
.";:T.TI.X.W..I$.T.... I$."" . TI.T.25 .
220...... I$."N" . 630...... I$.."Y" .
210.L.... ". THIS IS A GAME OF CHANCE
PLAYED WITH"...... "5 DICE. THE OBJECT
IS TO GET AS MANY".).... "POINTS AS POSS
IBLE. ONE GAME CONSISTS".V.... "OF 13 T
URNS. EACH TURN YOU MAY ROLL".{.".. "TH
E DICE UP TO THREE TIMES.."...,.. " AF
TER EACH ROLL (EXCEPT THE LAST),".Y.6..
"YOU MAY ELECT TO KEEP ANY OR ALL OF THE
"...@.. "DICE AS THEY ARE. THE ONES THA
T ARE".B.J.. "NOT KEPT ARE ROLLED AGAIN.
FOR EXAMPLE:";L$;"....";.B.T.. I.1 . 5
:. B$;".......";:....^.H(1).5:H(2).2:H(3
).3:H(4).3:H(5).1...H..L$;"......";:. I.
1 . 5:. A$(H(I));...R.. ".......";:.:. "
........KEEP? 33.":T.TI...|.. TI.T.240 .
380...... "............MEANS THAT YOU "
;.A.... "ROLLED A .5. .2. .3. .3. .1.
".Q.... "AND YOU WANT TO KEEP THE TWO .3
.'S, AND"...... "ROLL THE .5. .2. .1. AG
AIN.".B.... ".........PRESS .RETURN. TO
CONTINUE";.Y.B.. I$:. I$."" . 450...L..
". AFTER THE ROLLING, YOU SCORE THE FI
VE";.>.V.. "DICE IN ONE OF THE 13 SCORIN
G CATEGORIES";.L.... "(ONE CATEGORY FOR
EACH TURN). AT THE"...... "END OF THE G
AME, THE 13 SCORES ARE ADDED";.I.... "TO
GIVE THE TOTAL (PLUS BONUSES).."......
"THE 13 CATEGORIES ARE:."...... "1 - ONE
S";CR$;"2 - TWOS";CR$;"3 - THREES".L....
"4 - FOURS";CR$;"5 - FIVES";CR$;"6 - SI
XES".{.... ".T - THREE OF A KIND (SCORES
ALL DICE)"...&.. "F - FOUR OF A KIND (S
AME AS ABOVE)".I.0.. "H - FULL HOUSE (SC
ORES 25)"...:.. "S - SMALL STRAIGHT(4 IN
A ROW) SCORES 30";.-.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";.Q.L.. I$:. I$."" . 620...V..
".";C$;:. I.1 . 6...... ".. ";J(S$,I,1);
"'S . ";:..-.... "...";C$:. C$;"..THREE
. ";.].... "..FOUR . ..HOUSE. ..SMALL
. ..LONG .";.S.... " ..EXTRA.";C$.....
. .16);".. ........";...... ".YAHT
ZEE........ ";CR$;L$;...... I.1 .
5:. B$;".......";:....... I.1 . 13:S(I).
.1:.:Q.0:G.G.1...F.. I.1 . 13:L.1:. J.1
. 3.<.P.. K.L . 5:H(K)..(6..(1).1):..U.Z
.. L$;"..";:. K.1 . 5.K.... K..L . . A$(
0);...... A$(H(K));".......";:.:. J.3 .
920...... I$:. I$.."". 744...... L$;"...
..".R.... "...KEEP? ";:K.0.....F.18.F:.
G(F);" ..";:T.TI...... I$:. I$."" . TI.T
.25 . 780.C.... I$."/" . I$."7" . . I$;:
K.K.1:I(K).F(I$).48.V. .. I$."A" . 915.|
.%.. I$.G(20) . K.0 . K.K.1:. " ..";...*
.. I$..CR$ . 770.../.. K.0 . L.1:. 910..
.4.. L.1 . K:. M.L . 5.T.>.. I(L).H(M) .
850...H..:. 860...R.H(M).H(L):H(L).I(L)
:. L:. 890...\.. " ???.":T.TI.*.F.. TI.
T.30 . 870.=.P.. E$;".":. 760.[.Z.. ".";
CR$;E$:. K..5 . 910...... CR$;" YOU CAN
PRESS .A. TO KEEP ALL THE DICE.":T.TI...
... TI.T.120 . 902...... E$:. 920.A....
J.X.... "...... ";...... I.13 . 95
0...... A.1 . 13:. S(A)...1 . ....... 10
30.#.... L$;".....".9.... .25);"SCORE? "
;.W.J.F.18.F:. G(F);" ..";:T.TI.X.T.. I$
:. I$."" . TI.T.25 . 980...... A.1 . 13:
. I$.J(S$,A,1) . 1010......:. 970......
S(A)..1 . 1028...... CR$;".YOU MAY USE O
NE SCORING CATEGORY ONCE.":T.TI...... TI
.T.120 . 1022.!.... E$;".";:. 950.:....
"....... ";.X...S(A).0:. J.1 . 6:
M(J).0:..Z.... J.1 . 5:M(H(J)).M(H(J)).1
:....... A.7 . S(A).A.M(A):. 1190.H.$..
A.6 . 1070,1070,1090,1110,1110,1180,1160
......J.1 . 6:. M(J).A.5 . 1180...8..:.
1190...B.. J.1 . 6:. M(J).1 . M(J).4 . 1
190.0.L..:S(9).25:. 1190.T.V.C.0:. J.1 .
6:. M(J).5 . 1150.M.`.C.C.1:. M(J).0
. C.0...J.. C.A.6 . 1150...T..:. 1190...
~.S(A).10.A.70:. 1190.G.... J.2 . 5:. H(
J)..H(1) . 1190......:S(13).50:. 2000:.
1190.....S(A).H(1).H(2).H(3).H(4).H(5).$
.... A.13 . S(13)..50 . 1220.F.... J.2 .
5:. H(J)..H(1) . 1220.}....:Q.Q.100:. C
R$;". 100 POINT BONUS.":. 2000:T.TI...
... TI.T.80 . 1212...... E$.J.D.I$.D(S(A
))." ":. S(A).9 . I$.I(I$,C(I$).1)...N..
".";:J.A:. A.6 . . "....";:J.A.6...X..
A..13 . . .7.J.6);D$;I$:. 1270.6.... "..
..";.16);"O.....P...";._.... "..........
..........L... ";I$;" ".G.... I.....T.S(
1).S(2).S(3).S(4).S(5).S(6)...... L$;"..
..";CR$;"TOP HALF =";T;". POINTS"...(..
T.62 . T.T.35:. "PLUS 35 BONUS POINTS"..
.2.U.S(7).S(8).S(9).S(10).S(11).S(12).S(
13).6.<.. "BOTTOM HALF =";U;". POINTS".^
.F.. Q.0 . . "PLUS";Q;". BONUS POINTS"..
.P.. "TOTAL = .";T.U.Q;".. . POINTS"...U
.SS.SS.T.U.Q...Z.. ".ANOTHER GAME? ";...
\.T.TI.X.^.. I$:. I$."" . TI.T.25 . 1374
...`.F.18.F:. G(F);" ..";:. I$."" . 1372
...D.. H(I$,1)."Y" . 630.1.E.. H(I$,1)."
N" . 1385.<.F.. 1374.J.I.. G.1 . ..^.N..
"....";CR$;E$...X.. "YOU GOT";SS;". POI
NTS IN";...... G;". GAMES FOR"...... "AN
AVERAGE OF .";.(SS.G..5);.X.... ".. . P
OINTS PER GAME."... .. E$;".";:....P.C.5
3:. K.1 . 6...Z.. 59409,C:C.113.C:T.TI.+
.... TI.T.10 . 2020.3....:....D
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL