YATHEE
FILE INFORMATION
FILENAME(S): YATHEE
FILE TYPE(S): PRG
FILE SIZE: 5.6K
FIRST SEEN: 2025-11-30 19:36:58
APPEARS ON: 1 disk(s)
FILE HASH
5d69287b1902168f8fc113178f8704a058db3c302e1b04e97876e2478b3e6f66
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 21 A SOREN | YATHEE | PRG | Curtcool, Bo | 1 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 01 00 8F 20 2A 2A 2A 20 59 41 54 5A |....... *** YATZ| 00000010: 45 45 20 42 59 20 50 45 54 45 20 52 4F 57 45 00 |EE BY PETE ROWE.| 00000020: 42 08 02 00 8F 20 20 20 20 20 53 55 42 4D 49 54 |B.... SUBMIT| 00000030: 54 45 44 20 42 59 20 45 44 20 48 45 52 53 54 45 |TED BY ED HERSTE| 00000040: 49 4E 00 48 08 03 00 8F 00 61 08 04 00 8F 20 2A |IN.H.....a.... *| 00000050: 2A 2A 20 50 45 54 20 55 53 45 52 20 47 52 4F 55 |** PET USER GROU| 00000060: 50 00 7D 08 05 00 8F 20 20 20 20 20 53 4F 46 54 |P.}.... SOFT| 00000070: 57 41 52 45 20 45 58 43 48 41 4E 47 45 00 92 08 |WARE EXCHANGE...| 00000080: 06 00 8F 20 20 20 20 20 50 4F 20 42 4F 58 20 33 |... PO BOX 3| 00000090: 37 31 00 B6 08 07 00 8F 20 20 20 20 20 4D 4F 4E |71...... MON| 000000A0: 54 47 4F 4D 45 52 59 56 49 4C 4C 45 2C 20 50 41 |TGOMERYVILLE, PA| 000000B0: 20 31 38 39 33 36 00 BC 08 08 00 8F 00 E2 08 0A | 18936..........| 000000C0: 00 8F 2A 2A 2A 2A 2A 2A 20 59 41 48 54 5A 45 45 |..****** YAHTZEE| 000000D0: 20 2A 2A 2A 20 50 2E 52 4F 57 45 20 2A 2A 2A 2A | *** P.ROWE ****| 000000E0: 2A 2A 00 08 09 14 00 8F 2A 2A 20 43 4F 50 59 52 |**......** COPYR| 000000F0: 49 47 48 54 20 31 39 37 38 2C 20 52 45 47 45 4E |IGHT 1978, REGEN| 00000100: 54 53 20 4F 46 20 2A 2A 00 2E 09 1E 00 8F 2A 55 |TS OF **......*U| 00000110: 4E 49 56 45 52 53 49 54 59 20 4F 46 20 43 41 4C |NIVERSITY OF CAL| 00000120: 49 46 2E 2C 20 42 45 52 4B 45 4C 45 59 2A 00 54 |IF., BERKELEY*.T| 00000130: 09 28 00 8F 2A 2A 2A 20 4C 41 57 52 45 4E 43 45 |.(..*** LAWRENCE| 00000140: 20 48 41 4C 4C 20 4F 46 20 53 43 49 45 4E 43 45 | HALL OF SCIENCE| 00000150: 20 2A 2A 2A 00 7C 09 32 00 99 20 22 93 05 11 11 | ***.|.2.. "....| 00000160: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00000170: 57 45 4C 43 4F 4D 45 20 54 4F 22 3B 00 9E 09 3C |WELCOME TO";...<| 00000180: 00 99 20 22 11 11 11 11 11 9D 9D 9D 9D 9D 9D 9D |.. "............| 00000190: 9D 9D 9D AC A2 A2 A2 A2 A2 A2 A2 BB 22 3B 00 BD |............";..| 000001A0: 09 46 00 99 20 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 11 |.F.. "..........| 000001B0: 12 A1 59 41 48 54 5A 45 45 92 A1 22 3B 00 DB 09 |..YAHTZEE..";...| 000001C0: 50 00 99 20 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 11 BC |P.. "...........| 000001D0: 12 A2 A2 A2 A2 A2 A2 A2 92 BE 22 00 01 0A 55 00 |.........."...U.| 000001E0: 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 46 4F 52 |."...........FOR| 000001F0: 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 20 42 59 | COMMODORE 64 BY| 00000200: 22 00 28 0A 56 00 99 22 11 11 1D 1D 1D 1D 1D 1D |".(.V.."........| 00000210: 1D 1D 1D 48 45 4E 52 49 4B 20 53 4B 52 55 42 42 |...HENRIK SKRUBB| 00000220: 45 4C 54 52 41 4E 47 22 00 52 0A 5A 00 53 24 B2 |ELTRANG".R.Z.S$.| 00000230: 22 31 32 33 34 35 36 54 46 48 53 4C 45 59 22 3A |"123456TFHSLEY":| 00000240: 46 B2 30 3A 47 B2 30 3A 53 53 B2 30 3A 45 24 B2 |F.0:G.0:SS.0:E$.| 00000250: 22 22 00 6D 0A 5F 00 81 20 49 B2 31 20 A4 20 33 |"".m._.. I.1 . 3| 00000260: 39 3A 45 24 B2 45 24 AA 22 20 22 3A 82 00 88 0A |9:E$.E$." ":....| 00000270: 64 00 4C 24 B2 22 13 11 11 11 11 11 11 11 11 11 |d.L$."..........| 00000280: 11 11 11 11 1D 1D 1D 22 00 AB 0A 69 00 41 24 28 |......."...i.A$(| 00000290: 30 29 B2 22 A6 A6 A6 9D 9D 9D 11 A6 A6 A6 9D 9D |0)."............| 000002A0: 9D 11 A6 A6 A6 9D 9D 9D 91 91 22 00 CE 0A 6E 00 |.........."...n.| 000002B0: 41 24 28 31 29 B2 22 20 20 20 9D 9D 9D 11 20 D1 |A$(1)." .... .| 000002C0: 20 9D 9D 9D 11 20 20 20 9D 9D 9D 91 91 22 00 F1 | .... ....."..| 000002D0: 0A 73 00 41 24 28 32 29 B2 22 D1 20 20 9D 9D 9D |.s.A$(2).". ...| 000002E0: 11 20 20 20 9D 9D 9D 11 20 20 D1 9D 9D 9D 91 91 |. .... ......| 000002F0: 22 00 14 0B 78 00 41 24 28 33 29 B2 22 D1 20 20 |"...x.A$(3).". | 00000300: 9D 9D 9D 11 20 D1 20 FD 9D 9D 11 20 20 D1 9D 9D |.... . .... ...| 00000310: 9D 91 91 22 00 37 0B 7D 00 41 24 28 34 29 B2 22 |...".7.}.A$(4)."| 00000320: D1 20 D1 9D 9D 9D 11 20 20 20 9D 9D 9D 11 D1 20 |. ..... ..... | 00000330: D1 9D 9D 9D 91 91 22 00 5A 0B 82 00 41 24 28 35 |......".Z...A$(5| 00000340: 29 B2 22 D1 20 D1 9D 9D 9D 11 20 D1 20 9D 9D 9D |).". ..... . ...| 00000350: 11 D1 20 D1 9D 9D 9D 91 91 22 00 7D 0B 87 00 41 |.. ......".}...A| 00000360: 24 28 36 29 B2 22 D1 D1 D1 9D 9D 9D 11 20 20 20 |$(6)."....... | 00000370: 9D 9D 9D 11 D1 D1 D1 9D 9D 9D 91 91 22 00 A1 0B |............"...| 00000380: 8C 00 42 24 B2 22 B0 C0 C0 C0 AE 9D 11 DD 9D 11 |..B$."..........| 00000390: DD 9D 11 DD 9D 11 BD 9D 9D C0 9D 9D C0 9D 9D C0 |................| 000003A0: 22 00 C3 0B 91 00 42 24 B2 42 24 AA 22 9D 9D AD |".....B$.B$."...| 000003B0: 9D 91 DD 9D 91 DD 9D 91 DD 9D 91 22 3A 53 54 24 |...........":ST$| 000003C0: B2 22 22 00 EB 0B 96 00 43 24 B2 22 22 3A 81 20 |."".....C$."":. | 000003D0: 49 B2 31 20 A4 20 36 3A 43 24 B2 43 24 AA 22 12 |I.1 . 6:C$.C$.".| 000003E0: 20 20 20 20 20 92 20 20 22 3A 82 00 05 0C 9B 00 | . ":......| 000003F0: 43 24 B2 C8 28 43 24 2C 35 32 29 3A 43 52 24 B2 |C$..(C$,52):CR$.| 00000400: C7 28 31 33 29 00 2A 0C A0 00 44 24 B2 22 9D CF |.(13).*...D$."..| 00000410: A3 A3 A3 D0 9D 11 A7 9D 11 BA 9D 9D A4 9D 9D A4 |................| 00000420: 9D 9D A4 9D 9D CC 9D 91 A5 22 00 36 0C AA 00 86 |.........".6....| 00000430: 20 53 28 31 33 29 00 6A 0C C8 00 99 20 22 11 11 | S(13).j.... "..| 00000440: 11 11 22 3B 43 52 24 3B 22 1D 1D 1D 1D 1D 1D 1D |..";CR$;".......| 00000450: 1D 43 41 52 45 20 46 4F 52 20 49 4E 53 54 52 55 |.CARE FOR INSTRU| 00000460: 43 54 49 4F 4E 53 3F 20 22 3B 00 88 0C D2 00 46 |CTIONS? ";.....F| 00000470: B2 31 38 AB 46 3A 99 20 C7 28 46 29 3B 22 20 92 |.18.F:. .(F);" .| 00000480: 9D 22 3B 3A 54 B2 54 49 00 A9 0C DC 00 A1 20 49 |.";:T.TI...... I| 00000490: 24 3A 8B 20 49 24 B2 22 22 20 AF 20 54 49 AB 54 |$:. I$."" . TI.T| 000004A0: B3 32 35 20 A7 20 32 32 30 00 BC 0C E6 00 8B 20 |.25 . 220...... | 000004B0: 49 24 B2 22 4E 22 20 A7 20 36 33 30 00 D0 0C F0 |I$."N" . 630....| 000004C0: 00 8B 20 49 24 B3 B1 22 59 22 20 A7 20 32 31 30 |.. I$.."Y" . 210| 000004D0: 00 01 0D FA 00 99 20 22 93 20 20 20 54 48 49 53 |...... ". THIS| 000004E0: 20 49 53 20 41 20 47 41 4D 45 20 4F 46 20 43 48 | IS A GAME OF CH| 000004F0: 41 4E 43 45 20 50 4C 41 59 45 44 20 57 49 54 48 |ANCE PLAYED WITH| 00000500: 22 00 2F 0D 04 01 99 20 22 35 20 44 49 43 45 2E |"./.... "5 DICE.| 00000510: 20 20 54 48 45 20 4F 42 4A 45 43 54 20 49 53 20 | THE OBJECT IS | 00000520: 54 4F 20 47 45 54 20 41 53 20 4D 41 4E 59 22 00 |TO GET AS MANY".| 00000530: 5E 0D 0E 01 99 20 22 50 4F 49 4E 54 53 20 41 53 |^.... "POINTS AS| 00000540: 20 50 4F 53 53 49 42 4C 45 2E 20 20 4F 4E 45 20 | POSSIBLE. ONE | 00000550: 47 41 4D 45 20 43 4F 4E 53 49 53 54 53 22 00 8B |GAME CONSISTS"..| 00000560: 0D 18 01 99 20 22 4F 46 20 31 33 20 54 55 52 4E |.... "OF 13 TURN| 00000570: 53 2E 20 20 45 41 43 48 20 54 55 52 4E 20 59 4F |S. EACH TURN YO| 00000580: 55 20 4D 41 59 20 52 4F 4C 4C 22 00 B0 0D 22 01 |U MAY ROLL"...".| 00000590: B2 20 22 54 48 45 20 44 49 43 45 20 55 50 20 54 |. "THE DICE UP T| 000005A0: 4F 20 54 48 52 45 45 20 54 49 4D 45 53 2E 11 22 |O THREE TIMES.."| 000005B0: 00 DE 0D 2C 01 99 20 22 20 20 20 41 46 54 45 52 |...,.. " AFTER| 000005C0: 20 45 41 43 48 20 52 4F 4C 4C 20 28 45 58 43 45 | EACH ROLL (EXCE| 000005D0: 50 54 20 54 48 45 20 4C 41 53 54 29 2C 22 00 0E |PT THE LAST),"..| 000005E0: 0E 36 01 99 20 22 59 4F 55 20 4D 41 59 20 45 4C |.6.. "YOU MAY EL| 000005F0: 45 43 54 20 54 4F 20 4B 45 45 50 20 41 4E 59 20 |ECT TO KEEP ANY | 00000600: 4F 52 20 41 4C 4C 20 4F 46 20 54 48 45 22 00 3B |OR ALL OF THE".;| 00000610: 0E 40 01 99 20 22 44 49 43 45 20 41 53 20 54 48 |.@.. "DICE AS TH| 00000620: 45 59 20 41 52 45 2E 20 20 54 48 45 20 4F 4E 45 |EY ARE. THE ONE| 00000630: 53 20 54 48 41 54 20 41 52 45 22 00 77 0E 4A 01 |S THAT ARE".w.J.| 00000640: 99 20 22 4E 4F 54 20 4B 45 50 54 20 41 52 45 20 |. "NOT KEPT ARE | 00000650: 52 4F 4C 4C 45 44 20 41 47 41 49 4E 2E 20 20 46 |ROLLED AGAIN. F| 00000660: 4F 52 20 45 58 41 4D 50 4C 45 3A 22 3B 4C 24 3B |OR EXAMPLE:";L$;| 00000670: 22 11 11 11 11 22 3B 00 97 0E 54 01 81 20 49 B2 |"....";...T.. I.| 00000680: 31 20 A4 20 35 3A 99 20 42 24 3B 22 1D 1D 1D 1D |1 . 5:. B$;"....| 00000690: 1D 1D 1D 22 3B 3A 82 00 BE 0E 5E 01 48 28 31 29 |...";:....^.H(1)| 000006A0: B2 35 3A 48 28 32 29 B2 32 3A 48 28 33 29 B2 33 |.5:H(2).2:H(3).3| 000006B0: 3A 48 28 34 29 B2 33 3A 48 28 35 29 B2 31 00 E6 |:H(4).3:H(5).1..| 000006C0: 0E 68 01 99 4C 24 3B 22 11 11 11 11 11 1D 22 3B |.h..L$;"......";| 000006D0: 3A 81 20 49 B2 31 20 A4 20 35 3A 99 20 41 24 28 |:. I.1 . 5:. A$(| 000006E0: 48 28 49 29 29 3B 00 14 0F 72 01 99 20 22 1D 1D |H(I));...r.. "..| 000006F0: 1D 1D 1D 1D 1D 22 3B 3A 82 3A 99 20 22 11 11 11 |.....";:.:. "...| 00000700: 11 1D 1D 1D 1D 4B 45 45 50 3F 20 33 33 91 22 3A |.....KEEP? 33.":| 00000710: 54 B2 54 49 00 29 0F 7C 01 8B 20 54 49 AB 54 B3 |T.TI.).|.. TI.T.| 00000720: 32 34 30 20 A7 20 33 38 30 00 4E 0F 90 01 99 20 |240 . 380.N.... | 00000730: 22 91 91 91 91 91 91 91 91 91 91 91 91 4D 45 41 |"............MEA| 00000740: 4E 53 20 54 48 41 54 20 59 4F 55 20 22 3B 00 76 |NS THAT YOU ";.v| 00000750: 0F 9A 01 99 20 22 52 4F 4C 4C 45 44 20 41 20 20 |.... "ROLLED A | 00000760: 20 20 12 35 92 20 12 32 92 20 12 33 92 20 12 33 | .5. .2. .3. .3| 00000770: 92 20 12 31 92 22 00 A6 0F A4 01 99 20 22 41 4E |. .1."...... "AN| 00000780: 44 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 4B 45 |D YOU WANT TO KE| 00000790: 45 50 20 54 48 45 20 54 57 4F 20 12 33 92 27 53 |EP THE TWO .3.'S| 000007A0: 2C 20 41 4E 44 22 00 CA 0F AE 01 99 20 22 52 4F |, AND"...... "RO| 000007B0: 4C 4C 20 54 48 45 20 12 35 92 20 12 32 92 20 12 |LL THE .5. .2. .| 000007C0: 31 92 20 41 47 41 49 4E 2E 22 00 F7 0F B8 01 99 |1. AGAIN."......| 000007D0: 20 22 11 1D 1D 1D 1D 1D 1D 1D 1D 50 52 45 53 53 | ".........PRESS| 000007E0: 20 12 52 45 54 55 52 4E 92 20 54 4F 20 43 4F 4E | .RETURN. TO CON| 000007F0: 54 49 4E 55 45 22 3B 00 0E 10 C2 01 A1 20 49 24 |TINUE";...... I$| 00000800: 3A 8B 20 49 24 B2 22 22 20 A7 20 34 35 30 00 41 |:. I$."" . 450.A| 00000810: 10 CC 01 99 20 22 93 20 20 20 41 46 54 45 52 20 |.... ". AFTER | 00000820: 54 48 45 20 52 4F 4C 4C 49 4E 47 2C 20 59 4F 55 |THE ROLLING, YOU| 00000830: 20 53 43 4F 52 45 20 54 48 45 20 46 49 56 45 22 | SCORE THE FIVE"| 00000840: 3B 00 73 10 D6 01 99 20 22 44 49 43 45 20 49 4E |;.s.... "DICE IN| 00000850: 20 4F 4E 45 20 4F 46 20 54 48 45 20 31 33 20 53 | ONE OF THE 13 S| 00000860: 43 4F 52 49 4E 47 20 43 41 54 45 47 4F 52 49 45 |CORING CATEGORIE| 00000870: 53 22 3B 00 A1 10 E0 01 99 20 22 28 4F 4E 45 20 |S";...... "(ONE | 00000880: 43 41 54 45 47 4F 52 59 20 46 4F 52 20 45 41 43 |CATEGORY FOR EAC| 00000890: 48 20 54 55 52 4E 29 2E 20 20 41 54 20 54 48 45 |H TURN). AT THE| 000008A0: 22 00 D3 10 EA 01 99 20 22 45 4E 44 20 4F 46 20 |"...... "END OF | 000008B0: 54 48 45 20 47 41 4D 45 2C 20 54 48 45 20 31 33 |THE GAME, THE 13| 000008C0: 20 53 43 4F 52 45 53 20 41 52 45 20 41 44 44 45 | SCORES ARE ADDE| 000008D0: 44 22 3B 00 FE 10 F4 01 99 20 22 54 4F 20 47 49 |D";...... "TO GI| 000008E0: 56 45 20 54 48 45 20 54 4F 54 41 4C 20 28 50 4C |VE THE TOTAL (PL| 000008F0: 55 53 20 42 4F 4E 55 53 45 53 29 2E 11 22 00 1E |US BONUSES).."..| 00000900: 11 FE 01 99 20 22 54 48 45 20 31 33 20 43 41 54 |.... "THE 13 CAT| 00000910: 45 47 4F 52 49 45 53 20 41 52 45 3A 11 22 00 4F |EGORIES ARE:.".O| 00000920: 11 08 02 99 20 22 31 20 2D 20 4F 4E 45 53 22 3B |.... "1 - ONES";| 00000930: 43 52 24 3B 22 32 20 2D 20 54 57 4F 53 22 3B 43 |CR$;"2 - TWOS";C| 00000940: 52 24 3B 22 33 20 2D 20 54 48 52 45 45 53 22 00 |R$;"3 - THREES".| 00000950: 81 11 12 02 99 20 22 34 20 2D 20 46 4F 55 52 53 |..... "4 - FOURS| 00000960: 22 3B 43 52 24 3B 22 35 20 2D 20 46 49 56 45 53 |";CR$;"5 - FIVES| 00000970: 22 3B 43 52 24 3B 22 36 20 2D 20 53 49 58 45 53 |";CR$;"6 - SIXES| 00000980: 22 00 B0 11 1C 02 99 20 22 11 54 20 2D 20 54 48 |"...... ".T - TH| 00000990: 52 45 45 20 4F 46 20 41 20 4B 49 4E 44 20 28 53 |REE OF A KIND (S| 000009A0: 43 4F 52 45 53 20 41 4C 4C 20 44 49 43 45 29 22 |CORES ALL DICE)"| 000009B0: 00 DB 11 26 02 99 20 22 46 20 2D 20 46 4F 55 52 |...&.. "F - FOUR| 000009C0: 20 4F 46 20 41 20 4B 49 4E 44 20 28 53 41 4D 45 | OF A KIND (SAME| 000009D0: 20 41 53 20 41 42 4F 56 45 29 22 00 FE 11 30 02 | AS ABOVE)"...0.| 000009E0: 99 20 22 48 20 2D 20 46 55 4C 4C 20 48 4F 55 53 |. "H - FULL HOUS| 000009F0: 45 20 28 53 43 4F 52 45 53 20 32 35 29 22 00 30 |E (SCORES 25)".0| 00000A00: 12 3A 02 99 20 22 53 20 2D 20 53 4D 41 4C 4C 20 |.:.. "S - SMALL | 00000A10: 53 54 52 41 49 47 48 54 28 34 20 49 4E 20 41 20 |STRAIGHT(4 IN A | 00000A20: 52 4F 57 29 20 53 43 4F 52 45 53 20 33 30 22 3B |ROW) SCORES 30";| 00000A30: 00 62 12 44 02 99 20 22 4C 20 2D 20 4C 4F 4E 47 |.b.D.. "L - LONG| 00000A40: 20 53 54 52 41 49 47 48 54 20 28 35 20 49 4E 20 | STRAIGHT (5 IN | 00000A50: 41 20 52 4F 57 29 20 53 43 4F 52 45 53 20 34 30 |A ROW) SCORES 40| 00000A60: 22 3B 00 92 12 4E 02 99 20 22 45 20 2D 20 45 58 |";...N.. "E - EX| 00000A70: 54 52 41 20 4F 52 20 43 48 41 4E 43 45 20 28 53 |TRA OR CHANCE (S| 00000A80: 43 4F 52 45 53 20 54 4F 54 41 4C 20 44 49 43 45 |CORES TOTAL DICE| 00000A90: 29 22 00 BE 12 58 02 99 20 22 59 20 2D 20 59 41 |)"...X.. "Y - YA| 00000AA0: 48 54 5A 45 45 20 28 35 20 4F 46 20 41 20 4B 49 |HTZEE (5 OF A KI| 00000AB0: 4E 44 29 20 53 43 4F 52 45 53 20 35 30 22 00 EF |ND) SCORES 50"..| 00000AC0: 12 62 02 99 20 22 11 1D 1D 1D 1D 1D 1D 50 52 45 |.b.. ".......PRE| 00000AD0: 53 53 20 12 52 45 54 55 52 4E 92 20 54 4F 20 53 |SS .RETURN. TO S| 00000AE0: 54 41 52 54 20 54 48 45 20 47 41 4D 45 22 3B 00 |TART THE GAME";.| 00000AF0: 06 13 6C 02 A1 20 49 24 3A 8B 20 49 24 B2 22 22 |..l.. I$:. I$.""| 00000B00: 20 A7 20 36 32 30 00 1E 13 76 02 99 20 22 93 22 | . 620...v.. "."| 00000B10: 3B 43 24 3B 3A 81 20 49 B2 31 20 A4 20 36 00 3F |;C$;:. I.1 . 6.?| 00000B20: 13 80 02 99 20 22 12 20 22 3B CA 28 53 24 2C 49 |.... ". ";.(S$,I| 00000B30: 2C 31 29 3B 22 27 53 20 92 20 20 22 3B 3A 82 00 |,1);"'S . ";:..| 00000B40: 5F 13 8A 02 99 20 22 9D 9D 22 3B 43 24 3A 99 20 |_.... "..";C$:. | 00000B50: 43 24 3B 22 12 54 48 52 45 45 92 20 20 22 3B 00 |C$;".THREE. ";.| 00000B60: 8B 13 94 02 99 20 22 12 46 4F 55 52 20 92 20 20 |..... ".FOUR . | 00000B70: 12 48 4F 55 53 45 92 20 20 12 53 4D 41 4C 4C 92 |.HOUSE. .SMALL.| 00000B80: 20 20 12 4C 4F 4E 47 20 92 22 3B 00 A0 13 9E 02 | .LONG .";.....| 00000B90: 99 20 22 20 20 12 45 58 54 52 41 92 22 3B 43 24 |. " .EXTRA.";C$| 00000BA0: 00 BF 13 A8 02 99 20 A6 31 36 29 3B 22 12 20 20 |...... .16);". | 00000BB0: 20 20 20 20 20 11 9D 9D 9D 9D 9D 9D 9D 22 3B 00 | ........";.| 00000BC0: E6 13 B2 02 99 20 22 59 41 48 54 5A 45 45 11 9D |..... "YAHTZEE..| 00000BD0: 9D 9D 9D 9D 9D 9D 20 20 20 20 20 20 20 22 3B 43 |...... ";C| 00000BE0: 52 24 3B 4C 24 3B 00 06 14 B7 02 81 20 49 B2 31 |R$;L$;...... I.1| 00000BF0: 20 A4 20 35 3A 99 20 42 24 3B 22 1D 1D 1D 1D 1D | . 5:. B$;".....| 00000C00: 1D 1D 22 3B 3A 82 00 29 14 BC 02 81 20 49 B2 31 |..";:..).... I.1| 00000C10: 20 A4 20 31 33 3A 53 28 49 29 B2 AB 31 3A 82 3A | . 13:S(I)..1:.:| 00000C20: 51 B2 30 3A 47 B2 47 AA 31 00 46 14 C6 02 81 20 |Q.0:G.G.1.F.... | 00000C30: 49 B2 31 20 A4 20 31 33 3A 4C B2 31 3A 81 20 4A |I.1 . 13:L.1:. J| 00000C40: B2 31 20 A4 20 33 00 67 14 D0 02 81 20 4B B2 4C |.1 . 3.g.... K.L| 00000C50: 20 A4 20 35 3A 48 28 4B 29 B2 B5 28 36 AC BB 28 | . 5:H(K)..(6..(| 00000C60: 31 29 AA 31 29 3A 82 00 80 14 DA 02 99 20 4C 24 |1).1):....... L$| 00000C70: 3B 22 11 1D 22 3B 3A 81 20 4B B2 31 20 A4 20 35 |;"..";:. K.1 . 5| 00000C80: 00 96 14 E4 02 8B 20 4B B1 B2 4C 20 A7 20 99 20 |...... K..L . . | 00000C90: 41 24 28 30 29 3B 00 BE 14 E6 02 99 20 41 24 28 |A$(0);...... A$(| 00000CA0: 48 28 4B 29 29 3B 22 1D 1D 1D 1D 1D 1D 1D 22 3B |H(K));".......";| 00000CB0: 3A 82 3A 8B 20 4A B2 33 20 A7 20 39 32 30 00 D5 |:.:. J.3 . 920..| 00000CC0: 14 E8 02 A1 20 49 24 3A 8B 20 49 24 B3 B1 22 22 |.... I$:. I$..""| 00000CD0: A7 20 37 34 34 00 E6 14 EE 02 99 20 4C 24 3B 22 |. 744...... L$;"| 00000CE0: 11 11 11 11 11 22 00 FD 14 F8 02 99 20 22 1D 1D |....."...... "..| 00000CF0: 1D 4B 45 45 50 3F 20 22 3B 3A 4B B2 30 00 1B 15 |.KEEP? ";:K.0...| 00000D00: 02 03 46 B2 31 38 AB 46 3A 99 20 C7 28 46 29 3B |..F.18.F:. .(F);| 00000D10: 22 20 92 9D 22 3B 3A 54 B2 54 49 00 3C 15 0C 03 |" ..";:T.TI.<...| 00000D20: A1 20 49 24 3A 8B 20 49 24 B2 22 22 20 AF 20 54 |. I$:. I$."" . T| 00000D30: 49 AB 54 B3 32 35 20 A7 20 37 38 30 00 6E 15 16 |I.T.25 . 780.n..| 00000D40: 03 8B 20 49 24 B1 22 2F 22 20 AF 20 49 24 B3 22 |.. I$."/" . I$."| 00000D50: 37 22 20 A7 20 99 20 49 24 3B 3A 4B B2 4B AA 31 |7" . . I$;:K.K.1| 00000D60: 3A 49 28 4B 29 B2 C6 28 49 24 29 AB 34 38 00 81 |:I(K)..(I$).48..| 00000D70: 15 20 03 8B 20 49 24 B2 22 41 22 20 A7 20 39 31 |. .. I$."A" . 91| 00000D80: 35 00 A7 15 25 03 8B 20 49 24 B2 C7 28 32 30 29 |5...%.. I$..(20)| 00000D90: 20 AF 20 4B B1 30 20 A7 20 4B B2 4B AB 31 3A 99 | . K.0 . K.K.1:.| 00000DA0: 20 22 20 9D 9D 22 3B 00 BB 15 2A 03 8B 20 49 24 | " ..";...*.. I$| 00000DB0: B3 B1 43 52 24 20 A7 20 37 37 30 00 D1 15 2F 03 |..CR$ . 770.../.| 00000DC0: 8B 20 4B B2 30 20 A7 20 4C B2 31 3A 89 20 39 31 |. K.0 . L.1:. 91| 00000DD0: 30 00 E9 15 34 03 81 20 4C B2 31 20 A4 20 4B 3A |0...4.. L.1 . K:| 00000DE0: 81 20 4D B2 4C 20 A4 20 35 00 FF 15 3E 03 8B 20 |. M.L . 5...>.. | 00000DF0: 49 28 4C 29 B2 48 28 4D 29 20 A7 20 38 35 30 00 |I(L).H(M) . 850.| 00000E00: 0B 16 48 03 82 3A 89 20 38 36 30 00 2D 16 52 03 |..H..:. 860.-.R.| 00000E10: 48 28 4D 29 B2 48 28 4C 29 3A 48 28 4C 29 B2 49 |H(M).H(L):H(L).I| 00000E20: 28 4C 29 3A 82 20 4C 3A 89 20 38 39 30 00 41 16 |(L):. L:. 890.A.| 00000E30: 5C 03 99 20 22 20 20 3F 3F 3F 91 22 3A 54 B2 54 |\.. " ???.":T.T| 00000E40: 49 00 55 16 66 03 8B 20 54 49 AB 54 B3 33 30 20 |I.U.f.. TI.T.30 | 00000E50: A7 20 38 37 30 00 68 16 70 03 99 20 45 24 3B 22 |. 870.h.p.. E$;"| 00000E60: 91 22 3A 89 20 37 36 30 00 86 16 7A 03 99 20 22 |.":. 760...z.. "| 00000E70: 91 22 3B 43 52 24 3B 45 24 3A 8B 20 4B B3 B1 35 |.";CR$;E$:. K..5| 00000E80: 20 A7 20 39 31 30 00 C0 16 84 03 99 20 43 52 24 | . 910...... CR$| 00000E90: 3B 22 20 59 4F 55 20 43 41 4E 20 50 52 45 53 53 |;" YOU CAN PRESS| 00000EA0: 20 12 41 92 20 54 4F 20 4B 45 45 50 20 41 4C 4C | .A. TO KEEP ALL| 00000EB0: 20 54 48 45 20 44 49 43 45 91 22 3A 54 B2 54 49 | THE DICE.":T.TI| 00000EC0: 00 D5 16 86 03 8B 20 54 49 AB 54 B3 31 32 30 20 |...... TI.T.120 | 00000ED0: A7 20 39 30 32 00 E4 16 88 03 99 20 45 24 3A 89 |. 902...... E$:.| 00000EE0: 20 39 32 30 00 EC 16 8E 03 82 20 4A 00 03 17 93 | 920...... J....| 00000EF0: 03 99 20 22 9D 9D 9D 9D 9D 9D 20 20 20 20 20 20 |.. "...... | 00000F00: 20 22 3B 00 14 17 98 03 8B 20 49 B3 31 33 20 A7 | ";...... I.13 .| 00000F10: 20 39 35 30 00 32 17 A2 03 81 20 41 B2 31 20 A4 | 950.2.... A.1 .| 00000F20: 20 31 33 3A 8B 20 53 28 41 29 B3 B1 AB 31 20 A7 | 13:. S(A)...1 .| 00000F30: 20 82 00 3D 17 AC 03 89 20 31 30 33 30 00 4E 17 | ..=.... 1030.N.| 00000F40: B6 03 99 20 4C 24 3B 22 11 11 11 11 11 22 00 64 |... L$;".....".d| 00000F50: 17 C0 03 99 20 A6 32 35 29 3B 22 53 43 4F 52 45 |.... .25);"SCORE| 00000F60: 3F 20 22 3B 00 82 17 CA 03 46 B2 31 38 AB 46 3A |? ";.....F.18.F:| 00000F70: 99 20 C7 28 46 29 3B 22 20 92 9D 22 3B 3A 54 B2 |. .(F);" ..";:T.| 00000F80: 54 49 00 A3 17 D4 03 A1 20 49 24 3A 8B 20 49 24 |TI...... I$:. I$| 00000F90: B2 22 22 20 AF 20 54 49 AB 54 B3 32 35 20 A7 20 |."" . TI.T.25 . | 00000FA0: 39 38 30 00 C8 17 DE 03 81 20 41 B2 31 20 A4 20 |980...... A.1 . | 00000FB0: 31 33 3A 8B 20 49 24 B2 CA 28 53 24 2C 41 2C 31 |13:. I$..(S$,A,1| 00000FC0: 29 20 A7 20 31 30 31 30 00 D4 17 E8 03 82 3A 89 |) . 1010......:.| 00000FD0: 20 39 37 30 00 E9 17 F2 03 8B 20 53 28 41 29 B2 | 970...... S(A).| 00000FE0: AB 31 20 A7 20 31 30 32 38 00 22 18 FC 03 99 20 |.1 . 1028.".... | 00000FF0: 43 52 24 3B 22 11 59 4F 55 20 4D 41 59 20 55 53 |CR$;".YOU MAY US| 00001000: 45 20 4F 4E 45 20 53 43 4F 52 49 4E 47 20 43 41 |E ONE SCORING CA| 00001010: 54 45 47 4F 52 59 20 4F 4E 43 45 91 22 3A 54 B2 |TEGORY ONCE.":T.| 00001020: 54 49 00 38 18 FE 03 8B 20 54 49 AB 54 B3 31 32 |TI.8.... TI.T.12| 00001030: 30 20 A7 20 31 30 32 32 00 4C 18 00 04 99 20 45 |0 . 1022.L.... E| 00001040: 24 3B 22 91 22 3B 3A 89 20 39 35 30 00 65 18 04 |$;".";:. 950.e..| 00001050: 04 99 20 22 9D 9D 9D 9D 9D 9D 9D 20 20 20 20 20 |.. "....... | 00001060: 20 20 20 22 3B 00 83 18 06 04 53 28 41 29 B2 30 | ";.....S(A).0| 00001070: 3A 81 20 4A B2 31 20 A4 20 36 3A 4D 28 4A 29 B2 |:. J.1 . 6:M(J).| 00001080: 30 3A 82 00 A5 18 10 04 81 20 4A B2 31 20 A4 20 |0:....... J.1 . | 00001090: 35 3A 4D 28 48 28 4A 29 29 B2 4D 28 48 28 4A 29 |5:M(H(J)).M(H(J)| 000010A0: 29 AA 31 3A 82 00 C4 18 1A 04 8B 20 41 B3 37 20 |).1:....... A.7 | 000010B0: A7 20 53 28 41 29 B2 41 AC 4D 28 41 29 3A 89 20 |. S(A).A.M(A):. | 000010C0: 31 31 39 30 00 F3 18 24 04 91 20 41 AB 36 20 89 |1190...$.. A.6 .| 000010D0: 20 31 30 37 30 2C 31 30 37 30 2C 31 30 39 30 2C | 1070,1070,1090,| 000010E0: 31 31 31 30 2C 31 31 31 30 2C 31 31 38 30 2C 31 |1110,1110,1180,1| 000010F0: 31 36 30 00 12 19 2E 04 81 4A B2 31 20 A4 20 36 |160......J.1 . 6| 00001100: 3A 8B 20 4D 28 4A 29 B1 41 AB 35 20 A7 20 31 31 |:. M(J).A.5 . 11| 00001110: 38 30 00 1F 19 38 04 82 3A 89 20 31 31 39 30 00 |80...8..:. 1190.| 00001120: 46 19 42 04 81 20 4A B2 31 20 A4 20 36 3A 8B 20 |F.B.. J.1 . 6:. | 00001130: 4D 28 4A 29 B2 31 20 B0 20 4D 28 4A 29 B2 34 20 |M(J).1 . M(J).4 | 00001140: A7 20 31 31 39 30 00 5B 19 4C 04 82 3A 53 28 39 |. 1190.[.L..:S(9| 00001150: 29 B2 32 35 3A 89 20 31 31 39 30 00 7D 19 56 04 |).25:. 1190.}.V.| 00001160: 43 B2 30 3A 81 20 4A B2 31 20 A4 20 36 3A 8B 20 |C.0:. J.1 . 6:. | 00001170: 4D 28 4A 29 B2 35 20 A7 20 31 31 35 30 00 96 19 |M(J).5 . 1150...| 00001180: 60 04 43 B2 43 AA 31 3A 8B 20 4D 28 4A 29 B2 30 |`.C.C.1:. M(J).0| 00001190: 20 A7 20 43 B2 30 00 A9 19 6A 04 8B 20 43 B2 41 | . C.0...j.. C.A| 000011A0: AB 36 20 A7 20 31 31 35 30 00 B6 19 74 04 82 3A |.6 . 1150...t..:| 000011B0: 89 20 31 31 39 30 00 CE 19 7E 04 53 28 41 29 B2 |. 1190...~.S(A).| 000011C0: 31 30 AC 41 AB 37 30 3A 89 20 31 31 39 30 00 F0 |10.A.70:. 1190..| 000011D0: 19 88 04 81 20 4A B2 32 20 A4 20 35 3A 8B 20 48 |.... J.2 . 5:. H| 000011E0: 28 4A 29 B3 B1 48 28 31 29 20 A7 20 31 31 39 30 |(J)..H(1) . 1190| 000011F0: 00 0D 1A 92 04 82 3A 53 28 31 33 29 B2 35 30 3A |......:S(13).50:| 00001200: 8D 20 32 30 30 30 3A 89 20 31 31 39 30 00 2F 1A |. 2000:. 1190./.| 00001210: 9C 04 53 28 41 29 B2 48 28 31 29 AA 48 28 32 29 |..S(A).H(1).H(2)| 00001220: AA 48 28 33 29 AA 48 28 34 29 AA 48 28 35 29 00 |.H(3).H(4).H(5).| 00001230: 4D 1A A6 04 8B 20 41 B2 31 33 20 B0 20 53 28 31 |M.... A.13 . S(1| 00001240: 33 29 B3 B1 35 30 20 A7 20 31 32 32 30 00 6F 1A |3)..50 . 1220.o.| 00001250: B0 04 81 20 4A B2 32 20 A4 20 35 3A 8B 20 48 28 |... J.2 . 5:. H(| 00001260: 4A 29 B3 B1 48 28 31 29 20 A7 20 31 32 32 30 00 |J)..H(1) . 1220.| 00001270: A6 1A BA 04 82 3A 51 B2 51 AA 31 30 30 3A 99 20 |.....:Q.Q.100:. | 00001280: 43 52 24 3B 22 11 20 20 20 31 30 30 20 50 4F 49 |CR$;". 100 POI| 00001290: 4E 54 20 42 4F 4E 55 53 91 22 3A 8D 20 32 30 30 |NT BONUS.":. 200| 000012A0: 30 3A 54 B2 54 49 00 BB 1A BC 04 8B 20 54 49 AB |0:T.TI...... TI.| 000012B0: 54 B3 38 30 20 A7 20 31 32 31 32 00 C4 1A BE 04 |T.80 . 1212.....| 000012C0: 99 20 45 24 00 F3 1A C4 04 49 24 B2 C4 28 53 28 |. E$.....I$..(S(| 000012D0: 41 29 29 AA 22 20 22 3A 8B 20 53 28 41 29 B1 39 |A))." ":. S(A).9| 000012E0: 20 A7 20 49 24 B2 C9 28 49 24 2C C3 28 49 24 29 | . I$..(I$,.(I$)| 000012F0: AB 31 29 00 1A 1B CE 04 99 20 22 13 22 3B 3A 4A |.1)...... ".";:J| 00001300: B2 41 3A 8B 20 41 B1 36 20 A7 20 99 20 22 11 11 |.A:. A.6 . . "..| 00001310: 11 11 22 3B 3A 4A B2 41 AB 36 00 3F 1B D8 04 8B |..";:J.A.6.?....| 00001320: 20 41 B3 B1 31 33 20 A7 20 99 20 A6 37 AC 4A AB | A..13 . . .7.J.| 00001330: 36 29 3B 44 24 3B 49 24 3A 89 20 31 32 37 30 00 |6);D$;I$:. 1270.| 00001340: 5F 1B E2 04 99 20 22 11 11 11 11 22 3B A6 31 36 |_.... "....";.16| 00001350: 29 3B 22 CF A3 A3 A3 A3 A3 D0 9D 11 A7 22 3B 00 |);"..........";.| 00001360: 88 1B EC 04 99 20 22 9D 11 BA 9D 9D A4 9D 9D A4 |..... ".........| 00001370: 9D 9D A4 9D 9D A4 9D 9D A4 9D 9D CC 9D 91 A5 20 |............... | 00001380: 22 3B 49 24 3B 22 20 22 00 90 1B F6 04 82 20 49 |";I$;" "...... I| 00001390: 00 98 1B 13 05 54 B2 30 00 A3 1B 14 05 81 4C B2 |.....T.0......L.| 000013A0: 31 A4 36 00 B0 1B 15 05 54 B2 54 AA 53 28 4C 29 |1.6.....T.T.S(L)| 000013B0: 00 B7 1B 16 05 82 4C 00 E5 1B 1E 05 99 20 4C 24 |......L...... L$| 000013C0: 3B 22 11 11 11 11 22 3B 43 52 24 3B 22 54 4F 50 |;"....";CR$;"TOP| 000013D0: 20 48 41 4C 46 20 3D 22 3B 54 3B 22 9D 20 50 4F | HALF =";T;". PO| 000013E0: 49 4E 54 53 22 00 12 1C 28 05 8B 20 54 B1 36 32 |INTS"...(.. T.62| 000013F0: 20 A7 20 54 B2 54 AA 33 35 3A 99 20 22 50 4C 55 | . T.T.35:. "PLU| 00001400: 53 20 33 35 20 42 4F 4E 55 53 20 50 4F 49 4E 54 |S 35 BONUS POINT| 00001410: 53 22 00 3F 1C 32 05 55 B2 53 28 37 29 AA 53 28 |S".?.2.U.S(7).S(| 00001420: 38 29 AA 53 28 39 29 AA 53 28 31 30 29 AA 53 28 |8).S(9).S(10).S(| 00001430: 31 31 29 AA 53 28 31 32 29 AA 53 28 31 33 29 00 |11).S(12).S(13).| 00001440: 62 1C 3C 05 99 20 22 42 4F 54 54 4F 4D 20 48 41 |b.<.. "BOTTOM HA| 00001450: 4C 46 20 3D 22 3B 55 3B 22 9D 20 50 4F 49 4E 54 |LF =";U;". POINT| 00001460: 53 22 00 8A 1C 46 05 8B 20 51 B1 30 20 A7 20 99 |S"...F.. Q.0 . .| 00001470: 20 22 50 4C 55 53 22 3B 51 3B 22 9D 20 42 4F 4E | "PLUS";Q;". BON| 00001480: 55 53 20 50 4F 49 4E 54 53 22 00 B0 1C 50 05 99 |US POINTS"...P..| 00001490: 20 22 54 4F 54 41 4C 20 3D 20 12 22 3B 54 AA 55 | "TOTAL = .";T.U| 000014A0: AA 51 3B 22 9D 12 20 92 20 50 4F 49 4E 54 53 22 |.Q;".. . POINTS"| 000014B0: 00 C0 1C 55 05 53 53 B2 53 53 AA 54 AA 55 AA 51 |...U.SS.SS.T.U.Q| 000014C0: 00 D9 1C 5A 05 99 20 22 11 41 4E 4F 54 48 45 52 |...Z.. ".ANOTHER| 000014D0: 20 47 41 4D 45 3F 20 22 3B 00 E2 1C 5C 05 54 B2 | GAME? ";...\.T.| 000014E0: 54 49 00 04 1D 5E 05 A1 20 49 24 3A 8B 20 49 24 |TI...^.. I$:. I$| 000014F0: B2 22 22 20 AF 20 54 49 AB 54 B3 32 35 20 A7 20 |."" . TI.T.25 . | 00001500: 31 33 37 34 00 2C 1D 60 05 46 B2 31 38 AB 46 3A |1374.,.`.F.18.F:| 00001510: 99 20 C7 28 46 29 3B 22 20 92 9D 22 3B 3A 8B 20 |. .(F);" ..";:. | 00001520: 49 24 B2 22 22 20 A7 20 31 33 37 32 00 44 1D 64 |I$."" . 1372.D.d| 00001530: 05 8B 20 C8 28 49 24 2C 31 29 B2 22 59 22 20 A7 |.. .(I$,1)."Y" .| 00001540: 20 36 33 30 00 52 1D 69 05 8B 20 47 B2 31 20 A7 | 630.R.i.. G.1 .| 00001550: 20 80 00 66 1D 6E 05 99 20 22 91 91 91 91 22 3B | ..f.n.. "....";| 00001560: 43 52 24 3B 45 24 00 88 1D 78 05 99 20 22 59 4F |CR$;E$...x.. "YO| 00001570: 55 20 47 4F 54 22 3B 53 53 3B 22 9D 20 50 4F 49 |U GOT";SS;". POI| 00001580: 4E 54 53 20 49 4E 22 3B 00 9E 1D 82 05 99 20 47 |NTS IN";...... G| 00001590: 3B 22 9D 20 47 41 4D 45 53 20 46 4F 52 22 00 C2 |;". GAMES FOR"..| 000015A0: 1D 8C 05 99 20 22 41 4E 20 41 56 45 52 41 47 45 |.... "AN AVERAGE| 000015B0: 20 4F 46 20 12 22 3B B5 28 53 53 AD 47 AA 2E 35 | OF .";.(SS.G..5| 000015C0: 29 3B 00 E0 1D 96 05 99 20 22 9D 12 20 92 20 50 |);...... ".. . P| 000015D0: 4F 49 4E 54 53 20 50 45 52 20 47 41 4D 45 2E 22 |OINTS PER GAME."| 000015E0: 00 F0 1D A0 05 99 20 45 24 3B 22 91 22 3B 3A 80 |...... E$;".";:.| 000015F0: 00 03 1E D0 07 43 B2 35 33 3A 81 20 4B B2 31 20 |.....C.53:. K.1 | 00001600: A4 20 36 00 14 1E DA 07 43 B2 31 31 33 AB 43 3A |. 6.....C.113.C:| 00001610: 54 B2 54 49 00 29 1E E4 07 8B 20 54 49 AB 54 B3 |T.TI.).... TI.T.| 00001620: 31 30 20 A7 20 32 30 32 30 00 31 1E EE 07 82 3A |10 . 2020.1....:| 00001630: 8E 00 00 00 20 |.... |
....... *** YATZEE BY PETE ROWE.B.... SUBMITTED BY ED HERSTEIN.H.....A.... * ** PET USER GROUP.}.... SOFTWARE EXC HANGE...... PO BOX 371...... MON TGOMERYVILLE, PA 18936............****** YAHTZEE *** P.ROWE ******......** COPYR IGHT 1978, REGENTS OF **......*UNIVERSIT Y OF CALIF., BERKELEY*.T.(..*** LAWRENCE HALL OF SCIENCE ***.|.2.. "............ ........WELCOME TO";...<.. "............ ............";...F.. "............YAHTZE E..";...P.. "....................."...U. ."...........FOR COMMODORE 64 BY".(.V.." ...........HENRIK SKRUBBELTRANG".R.Z.S$. "123456TFHSLEY":F.0:G.0:SS.0:E$."".M._.. I.1 . 39:E$.E$." ":....D.L$.".......... ......."...I.A$(0).".................... ..".N.N.A$(1)." .... Q .... .....".. .S.A$(2)."Q .... .... Q....."...X.A$ (3)."Q .... Q .... Q.....".7.}.A$(4)." Q Q.... ....Q Q.....".Z...A$(5)."Q Q.. .. Q ....Q Q.....".}...A$(6)."QQQ.... ....QQQ.....".....B$.".................. ........".C...B$.B$."..............":ST$ ."".....C$."":. I.1 . 6:C$.C$.". . ":......C$.H(C$,52):CR$.G(13).*. .D$.".O ...P.................L...".6.... S(13).J .H.. "....";CR$;"........CARE FOR INSTRU CTIONS? ";...R.F.18.F:. G(F);" ..";:T.TI ...... I$:. I$."" . TI.T.25 . 220...... I$."N" . 630.P.... I$.."Y" . 210...... " . THIS IS A GAME OF CHANCE PLAYED WITH "./.... "5 DICE. THE OBJECT IS TO GET A S MANY".^.... "POINTS AS POSSIBLE. ONE GAME CONSISTS"...... "OF 13 TURNS. EACH TURN YOU MAY ROLL"...".. "THE DICE UP T O THREE TIMES.."...,.. " AFTER EACH RO LL (EXCEPT THE LAST),"...6.. "YOU MAY EL ECT TO KEEP ANY OR ALL OF THE".;.@.. "DI CE AS THEY ARE. THE ONES THAT ARE".W.J. . "NOT KEPT ARE ROLLED AGAIN. FOR EXAMP LE:";L$;"....";...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.. ".......";:.:. "........KEE P? 33.":T.TI.).|.. TI.T.240 . 380.N.... "............MEANS THAT YOU ";.V.... "RO LLED A .5. .2. .3. .3. .1."...... "AN D YOU WANT TO KEEP THE TWO .3.'S, AND".J .... "ROLL THE .5. .2. .1. AGAIN."...... ".........PRESS .RETURN. TO CONTINUE";. ..B.. I$:. I$."" . 450.A.L.. ". AFTER THE ROLLING, YOU SCORE THE FIVE";.S.V.. "DICE IN ONE OF THE 13 SCORING CATEGORIE S";...... "(ONE CATEGORY FOR EACH TURN). AT THE".S.... "END OF THE GAME, THE 13 SCORES ARE ADDED";...... "TO GIVE THE T OTAL (PLUS BONUSES).."...... "THE 13 CAT EGORIES ARE:.".O.... "1 - ONES";CR$;"2 - TWOS";CR$;"3 - THREES"...... "4 - FOURS ";CR$;"5 - FIVES";CR$;"6 - SIXES"...... ".T - THREE OF A KIND (SCORES ALL DICE)" ...&.. "F - FOUR OF A KIND (SAME AS ABOV E)"...0.. "H - FULL HOUSE (SCORES 25)".0 .:.. "S - SMALL STRAIGHT(4 IN A ROW) SCO RES 30";.B.D.. "L - LONG STRAIGHT (5 IN A ROW) SCORES 40";...N.. "E - EXTRA OR C HANCE (SCORES TOTAL DICE)"...X.. "Y - YA HTZEE (5 OF A KIND) SCORES 50"...B.. ".. .....PRESS .RETURN. TO START THE GAME";. ..L.. I$:. I$."" . 620...V.. ".";C$;:. I .1 . 6.?.... ". ";J(S$,I,1);"'S . ";:.. _.... "..";C$:. C$;".THREE. ";...... ". FOUR . .HOUSE. .SMALL. .LONG .";. ... . " .EXTRA.";C$...... .16);". ... .....";...... "YAHTZEE........ ";C R$;L$;...... I.1 . 5:. B$;".......";:..) .... I.1 . 13:S(I)..1:.:Q.0:G.G.1.F.F.. I.1 . 13:L.1:. J.1 . 3.G.P.. K.L . 5:H(K )..(6..(1).1):....Z.. L$;"..";:. K.1 . 5 ...... K..L . . A$(0);...... A$(H(K));". ......";:.:. J.3 . 920.U.... I$:. I$.."" . 744...... L$;"....."...... "...KEEP? " ;:K.0.....F.18.F:. G(F);" ..";:T.TI.<... . I$:. I$."" . TI.T.25 . 780.N.... I$."/ " . I$."7" . . I$;:K.K.1:I(K).F(I$).48.. . .. I$."A" . 915...%.. I$.G(20) . K.0 . K.K.1:. " ..";...*.. I$..CR$ . 770.Q./. . 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.A.\.. " ? ??.":T.TI.U.F.. TI.T.30 . 870.H.P.. E$;" .":. 760...Z.. ".";CR$;E$:. K..5 . 910.. .... CR$;" YOU CAN PRESS .A. TO KEEP ALL THE DICE.":T.TI.U.... TI.T.120 . 902... ... E$:. 920...... J...... "...... ";...... I.13 . 950.2.... A.1 . 13:. S( A)...1 . ..=.... 1030.N.... L$;".....".D .... .25);"SCORE? ";...J.F.18.F:. G(F);" ..";:T.TI...T.. I$:. I$."" . TI.T.25 . 980.H.... A.1 . 13:. I$.J(S$,A,1) . 1010 .T....:. 970...... S(A)..1 . 1028.".... CR$;".YOU MAY USE ONE SCORING CATEGORY O NCE.":T.TI.8.... TI.T.120 . 1022.L.... E $;".";:. 950.E.... "....... ";... ..S(A).0:. J.1 . 6:M(J).0:....... J.1 . 5:M(H(J)).M(H(J)).1:..D.... 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.F.B.. J.1 . 6:. M(J).1 . M(J).4 . 1190.[.L..:S(9).25:. 1 190.}.V.C.0:. J.1 . 6:. M(J).5 . 1150... `.C.C.1:. M(J).0 . C.0...J.. C.A.6 . 115 0...T..:. 1190.N.~.S(A).10.A.70:. 1190.. .... 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).M.... A.13 . S(13)..50 . 1220.O.... J.2 . 5:. H(J)..H(1) . 1220. .....:Q.Q.100:. CR$;". 100 POINT BONUS .":. 2000:T.TI...... TI.T.80 . 1212.D... . E$...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._.... "....";.16);"O.....P...";. ..... "....................L... ";I$;" " ...... I.....T.0......L.1.6.....T.T.S(L) ......L...... L$;"....";CR$;"TOP HALF =" ;T;". POINTS"...(.. T.62 . T.T.35:. "PLU S 35 BONUS POINTS".?.2.U.S(7).S(8).S(9). S(10).S(11).S(12).S(13).B.<.. "BOTTOM HA LF =";U;". POINTS"...F.. Q.0 . . "PLUS"; Q;". BONUS POINTS"...P.. "TOTAL = .";T.U .Q;".. . POINTS"...U.SS.SS.T.U.Q.Y.Z.. " .ANOTHER GAME? ";...\.T.TI...^.. I$:. I$ ."" . TI.T.25 . 1374.,.`.F.18.F:. G(F);" ..";:. I$."" . 1372.D.D.. H(I$,1)."Y" . 630.R.I.. G.1 . ..F.N.. "....";CR$;E$.. .X.. "YOU GOT";SS;". POINTS IN";...... G ;". GAMES FOR".B.... "AN AVERAGE OF .";. (SS.G..5);...... ".. . POINTS PER GAME." ... .. E$;".";:....P.C.53:. K.1 . 6...Z. C.113.C:T.TI.).... TI.T.10 . 2020.1....: ....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL