YATZEY

00000000: 01 08 17 08 00 00 9C 3A  97 35 39 34 36 38 2C 31  |.......:.59468,1|
00000010: 34 3A 50 4B B2 31 32 00  44 08 01 00 8F 20 59 41  |4:PK.12.D.... YA|
00000020: 48 54 5A 45 45 20 43 4F  50 59 52 49 47 48 54 20  |HTZEE COPYRIGHT |
00000030: 28 43 29 20 31 39 37 39  20 47 4C 45 4E 20 46 49  |(C) 1979 GLEN FI|
00000040: 53 48 45 52 00 61 08 02  00 8F 20 43 55 52 53 4F  |SHER.a.... CURSO|
00000050: 52 20 23 39 2C 20 41 50  52 49 4C 2C 20 31 39 37  |R #9, APRIL, 197|
00000060: 39 00 82 08 03 00 8F 20  42 4F 58 20 35 35 30 2C  |9...... BOX 550,|
00000070: 20 47 4F 4C 45 54 41 2C  20 43 41 2E 20 39 33 30  | GOLETA, CA. 930|
00000080: 31 37 00 88 08 04 00 3A  00 A9 08 5A 00 50 47 24  |17.....:...Z.PG$|
00000090: B2 22 59 41 48 54 5A 45  45 22 3A 4E 4D 24 B2 22  |."YAHTZEE":NM$."|
000000A0: 39 22 3A 8D 36 32 30 30  30 00 DA 08 64 00 86 44  |9":.62000...d..D|
000000B0: 49 28 35 29 2C 44 49 24  28 36 2C 36 29 2C 54 28  |I(5),DI$(6,6),T(|
000000C0: 35 29 2C 53 43 28 34 2C  31 33 29 2C 54 4C 28 34  |5),SC(4,13),TL(4|
000000D0: 2C 33 29 2C 4E 4D 24 28  34 29 00 FB 08 6E 00 81  |,3),NM$(4)...n..|
000000E0: 49 B2 31 A4 36 3A 81 4A  B2 31 A4 36 3A 87 44 49  |I.1.6:.J.1.6:.DI|
000000F0: 24 28 49 2C 4A 29 3A 82  4A 2C 49 00 24 09 78 00  |$(I,J):.J,I.$.x.|
00000100: 83 22 20 20 20 22 2C 22  20 20 D1 22 2C 22 D1 20  |."   ","  .",". |
00000110: 20 22 2C 22 D1 20 D1 22  2C 22 D1 20 D1 22 2C 22  | ",". .",". .","|
00000120: D1 D1 D1 22 00 4D 09 79  00 83 22 20 D1 20 22 2C  |...".M.y.." . ",|
00000130: 22 20 20 20 22 2C 22 20  D1 20 22 2C 22 20 20 20  |"   "," . ","   |
00000140: 22 2C 22 20 D1 20 22 2C  22 20 20 20 22 00 76 09  |"," . ","   ".v.|
00000150: 7A 00 83 22 20 20 20 22  2C 22 D1 20 20 22 2C 22  |z.."   ",".  ","|
00000160: 20 20 D1 22 2C 22 D1 20  D1 22 2C 22 D1 A0 D1 22  |  .",". .","..."|
00000170: 2C 22 D1 D1 D1 22 00 9F  09 7B 00 83 22 20 20 20  |,"..."...{.."   |
00000180: 22 2C 22 D1 20 20 22 2C  22 20 20 D1 22 2C 22 D1  |",".  ","  .",".|
00000190: 20 D1 22 2C 22 D1 20 D1  22 2C 22 D1 20 D1 22 00  | .",". .",". .".|
000001A0: C8 09 7C 00 83 22 20 D1  20 22 2C 22 20 20 20 22  |..|.." . ","   "|
000001B0: 2C 22 20 D1 20 22 2C 22  20 20 20 22 2C 22 20 D1  |," . ","   "," .|
000001C0: 20 22 2C 22 D1 20 D1 22  00 F1 09 7D 00 83 22 20  | ",". ."...}.." |
000001D0: 20 20 22 2C 22 20 20 D1  22 2C 22 D1 20 20 22 2C  |  ","  .",".  ",|
000001E0: 22 D1 20 D1 22 2C 22 D1  A0 D1 22 2C 22 D1 20 D1  |". .","...",". .|
000001F0: 22 00 04 0A 82 00 44 4E  24 B2 22 13 11 11 11 11  |".....DN$.".....|
00000200: 11 11 11 22 00 28 0A C8  00 99 22 48 4F 57 20 4D  |...".(...."HOW M|
00000210: 41 4E 59 20 50 4C 41 59  45 52 53 3F 20 22 3B 3A  |ANY PLAYERS? ";:|
00000220: 8D 36 30 30 30 30 3A 99  00 66 0A D2 00 4E 50 B2  |.60000:..f...NP.|
00000230: C5 28 49 4E 24 29 3A 8B  4E 50 B3 31 B0 4E 50 B1  |.(IN$):.NP.1.NP.|
00000240: 34 A7 99 22 4F 4E 45 20  54 4F 20 46 4F 55 52 20  |4.."ONE TO FOUR |
00000250: 50 4C 41 59 45 52 53 2C  20 50 4C 45 41 53 45 2E  |PLAYERS, PLEASE.|
00000260: 22 3A 89 32 30 30 00 A7  0A DC 00 99 22 11 45 4E  |":.200......".EN|
00000270: 54 45 52 20 54 48 45 49  52 20 4E 41 4D 45 53 2C  |TER THEIR NAMES,|
00000280: 20 50 4C 45 41 53 45 2E  22 3A 99 22 28 46 49 56  | PLEASE.":."(FIV|
00000290: 45 20 4C 45 54 54 45 52  53 20 4C 4F 4E 47 2C 20  |E LETTERS LONG, |
000002A0: 4D 41 58 2E 29 11 22 00  D9 0A F0 00 81 49 B2 31  |MAX.)."......I.1|
000002B0: A4 4E 50 3A 99 22 50 4C  41 59 45 52 22 3B 49 3B  |.NP:."PLAYER";I;|
000002C0: 22 3A 20 22 3B 3A 8D 36  30 30 30 30 3A 4E 4D 24  |": ";:.60000:NM$|
000002D0: 28 49 29 B2 49 4E 24 3A  99 00 F7 0A FA 00 54 4C  |(I).IN$:......TL|
000002E0: 28 49 2C 30 29 B2 39 AA  36 AC 49 AA 35 AB C3 28  |(I,0).9.6.I.5..(|
000002F0: 49 4E 24 29 3A 82 49 00  2E 0B 2C 01 81 49 B2 31  |IN$):.I...,..I.1|
00000300: A4 34 3A 81 4A B2 31 A4  31 33 3A 53 43 28 49 2C  |.4:.J.1.13:SC(I,|
00000310: 4A 29 B2 AB 31 3A 82 4A  3A 81 4A B2 31 A4 33 3A  |J)..1:.J:.J.1.3:|
00000320: 54 4C 28 49 2C 4A 29 B2  30 3A 82 4A 2C 49 00 3C  |TL(I,J).0:.J,I.<|
00000330: 0B 20 03 50 4C B2 30 3A  52 44 B2 31 00 51 0B 84  |. .PL.0:RD.1.Q..|
00000340: 03 8D 31 30 30 30 30 3A  99 44 4E 24 3B 22 91 22  |..10000:.DN$;"."|
00000350: 3B 00 76 0B 98 03 81 49  B2 31 A4 4E 50 3A 99 A3  |;.v....I.1.NP:..|
00000360: 54 4C 28 49 2C 30 29 29  3B 4E 4D 24 28 49 29 3B  |TL(I,0));NM$(I);|
00000370: 22 91 22 3A 82 49 00 91  0B DC 05 81 49 B2 31 A4  |".":.I......I.1.|
00000380: 35 3A 44 49 28 49 29 B2  30 3A 82 49 3A 52 4C B2  |5:DI(I).0:.I:RL.|
00000390: 30 00 BD 0B F0 05 50 4C  B2 50 4C AA 31 3A 8B 50  |0.....PL.PL.1:.P|
000003A0: 4C B1 4E 50 A7 50 4C B2  31 3A 52 44 B2 52 44 AA  |L.NP.PL.1:RD.RD.|
000003B0: 31 3A 8B 52 44 B1 31 33  A7 35 30 30 30 00 C8 0B  |1:.RD.13.5000...|
000003C0: FA 05 8D 31 31 30 30 30  00 F1 0B 04 06 99 44 4E  |...11000......DN|
000003D0: 24 3B 22 91 12 52 4F 55  4E 44 22 3B 52 44 3B A3  |$;"..ROUND";RD;.|
000003E0: 54 4C 28 50 4C 2C 30 29  29 3B 4E 4D 24 28 50 4C  |TL(PL,0));NM$(PL|
000003F0: 29 00 16 0C D0 07 50 52  24 B2 22 3F 20 22 3A 8D  |).....PR$."? ":.|
00000400: 39 31 30 30 3A 8B 52 4C  B2 30 A7 49 4E 24 B2 22  |9100:.RL.0.IN$."|
00000410: 30 30 30 30 30 22 00 27  0C DA 07 8B 49 4E 24 B2  |00000".'....IN$.|
00000420: 22 22 A7 32 30 30 30 00  59 0C E4 07 8B C8 28 49  |"".2000.Y.....(I|
00000430: 4E 24 2C 31 29 B2 22 5A  22 A7 5A 45 52 B2 31 3A  |N$,1)."Z".ZER.1:|
00000440: 49 4E 24 B2 CA 28 49 4E  24 2C 32 29 3A 8B 49 4E  |IN$..(IN$,2):.IN|
00000450: 24 B2 22 22 A7 32 30 30  30 00 71 0C EE 07 4E B2  |$."".2000.q...N.|
00000460: 31 3A 41 B2 31 3A 81 49  B2 31 A4 C3 28 49 4E 24  |1:A.1:.I.1..(IN$|
00000470: 29 00 96 0C F8 07 54 24  B2 CA 28 49 4E 24 2C 49  |).....T$..(IN$,I|
00000480: 2C 31 29 3A 8B 54 24 B3  22 41 22 B0 54 24 B1 22  |,1):.T$."A".T$."|
00000490: 4D 22 A7 41 B2 30 00 AD  0C 02 08 8B 54 24 B3 22  |M".A.0......T$."|
000004A0: 30 22 B0 54 24 B1 22 36  22 A7 4E B2 30 00 B4 0C  |0".T$."6".N.0...|
000004B0: 0C 08 82 49 00 C0 0C 16  08 8B 41 A7 33 30 30 30  |...I......A.3000|
000004C0: 00 CE 0C 20 08 8B 4E B2  30 A7 32 30 30 30 00 03  |... ..N.0.2000..|
000004D0: 0D 2A 08 52 4C B2 52 4C  AA 31 3A 8B 52 4C B1 33  |.*.RL.RL.1:.RL.3|
000004E0: A7 50 52 24 B2 22 4E 4F  20 4D 4F 52 45 20 52 4F  |.PR$."NO MORE RO|
000004F0: 4C 4C 53 20 41 4C 4C 4F  57 45 44 2E 22 3A 89 33  |LLS ALLOWED.":.3|
00000500: 35 30 30 00 23 0D 34 08  81 49 B2 31 A4 C3 28 49  |500.#.4..I.1..(I|
00000510: 4E 24 29 3A 54 B2 C5 28  CA 28 49 4E 24 2C 49 2C  |N$):T..(.(IN$,I,|
00000520: 31 29 29 00 49 0D 39 08  81 4A B2 31 A4 35 3A 8B  |1)).I.9..J.1.5:.|
00000530: 44 49 28 4A 29 B2 54 A7  44 49 28 4A 29 B2 30 3A  |DI(J).T.DI(J).0:|
00000540: 4E B2 30 3A 89 32 31 31  35 00 50 0D 3E 08 82 4A  |N.0:.2115.P.>..J|
00000550: 00 68 0D 43 08 82 49 3A  8B 4E A7 52 4C B2 52 4C  |.h.C..I:.N.RL.RL|
00000560: AB 31 3A 89 33 35 30 30  00 7E 0D 45 08 99 22 13  |.1:.3500.~.E..".|
00000570: 11 12 52 4F 4C 4C 9D 9D  9D 11 22 3B 52 4C 00 9C  |..ROLL....";RL..|
00000580: 0D 48 08 8D 39 30 30 30  3A 8D 38 30 30 30 3A 52  |.H..9000:.8000:R|
00000590: 56 24 B2 22 12 22 3A 99  44 4E 24 3B 00 CA 0D 5C  |V$.".":.DN$;...\|
000005A0: 08 81 49 B2 31 A4 36 3A  53 43 B2 53 43 28 30 2C  |..I.1.6:SC.SC(0,|
000005B0: 49 29 3A 8B 53 43 28 50  4C 2C 49 29 B3 30 A7 8D  |I):.SC(PL,I).0..|
000005C0: 32 35 30 30 3A 99 22 91  22 3B 00 D7 0D 66 08 99  |2500:.".";...f..|
000005D0: 3A 82 49 3A 99 3A 99 00  06 0E 70 08 81 49 B2 37  |:.I:.:....p..I.7|
000005E0: A4 31 33 3A 53 43 B2 53  43 28 30 2C 49 29 3A 8B  |.13:SC.SC(0,I):.|
000005F0: 53 43 28 50 4C 2C 49 29  B3 30 A7 8D 32 35 30 30  |SC(PL,I).0..2500|
00000600: 3A 99 22 91 22 3B 00 15  0E 7A 08 99 3A 82 49 3A  |:.".";...z..:.I:|
00000610: 89 32 30 30 30 00 3B 0E  C4 09 99 A3 31 31 AA 36  |.2000.;.....11.6|
00000620: AC 50 4C 29 3B 52 56 24  3B C9 28 22 20 20 20 22  |.PL);RV$;.("   "|
00000630: AA C4 28 53 43 29 2C 33  29 3A 8E 00 52 0E CE 09  |..(SC),3):..R...|
00000640: 99 A3 31 31 AA 36 AC 50  4C 29 3B 22 20 20 3A 22  |..11.6.PL);"  :"|
00000650: 3A 8E 00 75 0E B8 0B 52  56 24 B2 22 22 3A 54 B2  |:..u...RV$."":T.|
00000660: C6 28 49 4E 24 29 AB 36  34 3A 41 44 44 B2 53 43  |.(IN$).64:ADD.SC|
00000670: 28 30 2C 54 29 00 9E 0E  BD 0B 8B 54 B2 31 32 AF  |(0,T)......T.12.|
00000680: 41 44 44 B1 30 AF 53 43  28 50 4C 2C 54 29 B1 30  |ADD.0.SC(PL,T).0|
00000690: A7 41 44 44 B2 31 30 30  3A 89 33 31 30 30 00 D4  |.ADD.100:.3100..|
000006A0: 0E C2 0B 8B 53 43 28 50  4C 2C 54 29 B1 B2 30 A7  |....SC(PL,T)..0.|
000006B0: 50 52 24 B2 22 59 4F 55  27 56 45 20 41 4C 52 45  |PR$."YOU'VE ALRE|
000006C0: 41 44 59 20 54 41 4B 45  4E 20 49 54 2E 22 3A 89  |ADY TAKEN IT.":.|
000006D0: 33 35 30 30 00 EA 0E CC  0B 8B 41 44 44 B1 30 B0  |3500......ADD.0.|
000006E0: 5A 45 52 B2 31 A7 33 31  30 30 00 0B 0F D6 0B 50  |ZER.1.3100.....P|
000006F0: 52 24 B2 22 52 45 41 4C  4C 59 20 5A 45 52 4F 20  |R$."REALLY ZERO |
00000700: 49 54 3F 20 22 3A 8D 39  31 30 30 00 23 0F E0 0B  |IT? ":.9100.#...|
00000710: 8B C8 28 49 4E 24 2C 31  29 B3 B1 22 59 22 A7 32  |..(IN$,1).."Y".2|
00000720: 30 30 30 00 36 0F 1C 0C  58 B2 54 3A 8B 54 B1 36  |000.6...X.T:.T.6|
00000730: A7 58 B2 58 AA 32 00 51  0F 21 0C 8B 53 43 28 50  |.X.X.2.Q.!..SC(P|
00000740: 4C 2C 54 29 B3 30 A7 53  43 28 50 4C 2C 54 29 B2  |L,T).0.SC(PL,T).|
00000750: 30 00 74 0F 26 0C 99 3A  99 44 4E 24 3B C8 28 22  |0.t.&..:.DN$;.("|
00000760: 92 11 11 11 11 11 11 11  11 11 11 11 11 11 11 22  |..............."|
00000770: 2C 58 29 3B 00 9B 0F 30  0C 52 56 24 B2 22 22 3A  |,X);...0.RV$."":|
00000780: 53 43 B2 41 44 44 AA 53  43 28 50 4C 2C 54 29 3A  |SC.ADD.SC(PL,T):|
00000790: 53 43 28 50 4C 2C 54 29  B2 53 43 00 AF 0F 3A 0C  |SC(PL,T).SC...:.|
000007A0: 8D 32 35 30 30 3A 8B 54  B1 36 A7 33 33 30 30 00  |.2500:.T.6.3300.|
000007B0: C5 0F 80 0C 99 C8 28 22  11 11 11 11 11 11 22 2C  |......("......",|
000007C0: 37 AB 54 29 3B 00 E9 0F  8A 0C 58 B2 54 4C 28 50  |7.T);.....X.TL(P|
000007D0: 4C 2C 31 29 3A 53 43 B2  58 AA 41 44 44 3A 54 4C  |L,1):SC.X.ADD:TL|
000007E0: 28 50 4C 2C 31 29 B2 53  43 00 FE 0F 94 0C 8B 58  |(PL,1).SC......X|
000007F0: B1 36 32 B0 53 43 B3 36  33 A7 33 32 35 30 00 2B  |.62.SC.63.3250.+|
00000800: 10 9E 0C 58 B2 53 43 3A  53 43 B2 33 35 3A 58 B2  |...X.SC:SC.35:X.|
00000810: 58 AA 53 43 3A 99 22 91  22 3B 3A 8D 32 35 30 30  |X.SC:.".";:.2500|
00000820: 3A 54 4C 28 50 4C 2C 31  29 B2 58 00 49 10 A8 0C  |:TL(PL,1).X.I...|
00000830: 54 4C 28 50 4C 2C 33 29  B2 54 4C 28 50 4C 2C 33  |TL(PL,3).TL(PL,3|
00000840: 29 AA 53 43 3A 53 43 B2  58 00 66 10 B2 0C 8D 32  |).SC:SC.X.f....2|
00000850: 35 30 30 3A 99 22 11 11  11 11 11 11 11 11 22 3B  |500:."........";|
00000860: 3A 89 33 34 30 30 00 77  10 BC 0C 99 22 11 11 11  |:.3400.w...."...|
00000870: 11 11 11 11 11 22 3B 00  81 10 C6 0C 89 33 34 30  |.....";......340|
00000880: 30 00 9A 10 E4 0C 99 C8  28 22 92 11 11 11 11 11  |0.......("......|
00000890: 11 11 22 2C 31 34 AB 54  29 3B 00 C0 10 EE 0C 53  |..",14.T);.....S|
000008A0: 43 B2 54 4C 28 50 4C 2C  32 29 AA 41 44 44 3A 54  |C.TL(PL,2).ADD:T|
000008B0: 4C 28 50 4C 2C 32 29 B2  53 43 3A 8D 32 35 30 30  |L(PL,2).SC:.2500|
000008C0: 00 ED 10 48 0D 53 43 B2  54 4C 28 50 4C 2C 33 29  |...H.SC.TL(PL,3)|
000008D0: AA 41 44 44 3A 54 4C 28  50 4C 2C 33 29 B2 53 43  |.ADD:TL(PL,3).SC|
000008E0: 3A 52 56 24 B2 22 22 3A  8D 32 35 30 30 00 16 11  |:RV$."":.2500...|
000008F0: 7A 0D 99 44 4E 24 3B 3A  81 49 B2 31 A4 36 3A 8B  |z..DN$;:.I.1.6:.|
00000900: 53 43 28 50 4C 2C 49 29  B3 30 A7 8D 32 35 31 30  |SC(PL,I).0..2510|
00000910: 3A 99 22 91 22 3B 00 1F  11 7F 0D 99 3A 82 49 00  |:.".";......:.I.|
00000920: 48 11 84 0D 99 22 11 22  3A 81 49 B2 37 A4 31 33  |H....".":.I.7.13|
00000930: 3A 8B 53 43 28 50 4C 2C  49 29 B3 30 A7 8D 32 35  |:.SC(PL,I).0..25|
00000940: 31 30 3A 99 22 91 22 3B  00 51 11 89 0D 99 3A 82  |10:.".";.Q....:.|
00000950: 49 00 77 11 8E 0D 99 44  4E 24 3B 22 91 22 3B A3  |I.w....DN$;".";.|
00000960: 54 4C 28 50 4C 2C 30 29  29 3B 4E 4D 24 28 50 4C  |TL(PL,0));NM$(PL|
00000970: 29 3A 89 31 35 30 30 00  9C 11 AC 0D 99 44 4E 24  |):.1500......DN$|
00000980: 3B 22 91 91 22 3B 50 52  24 3A 81 49 B2 31 A4 31  |;"..";PR$:.I.1.1|
00000990: 30 30 30 3A 82 49 3A 89  32 30 30 30 00 BC 11 88  |000:.I:.2000....|
000009A0: 13 54 4D B2 54 49 AA 33  30 30 3A 81 49 B2 31 A4  |.TM.TI.300:.I.1.|
000009B0: 4E 50 3A 81 4A B2 31 A4  4E 50 AB 31 00 D8 11 92  |NP:.J.1.NP.1....|
000009C0: 13 8B 54 4C 28 4A 2C 33  29 B1 54 4C 28 4A AA 31  |..TL(J,3).TL(J.1|
000009D0: 2C 33 29 A7 35 30 34 30  00 04 12 9C 13 54 B2 54  |,3).5040.....T.T|
000009E0: 4C 28 4A 2C 33 29 3A 54  4C 28 4A 2C 33 29 B2 54  |L(J,3):TL(J,3).T|
000009F0: 4C 28 4A AA 31 2C 33 29  3A 54 4C 28 4A AA 31 2C  |L(J.1,3):TL(J.1,|
00000A00: 33 29 B2 54 00 2E 12 A6  13 54 24 B2 4E 4D 24 28  |3).T.....T$.NM$(|
00000A10: 4A 29 3A 4E 4D 24 28 4A  29 B2 4E 4D 24 28 4A AA  |J):NM$(J).NM$(J.|
00000A20: 31 29 3A 4E 4D 24 28 4A  AA 31 29 B2 54 24 00 37  |1):NM$(J.1).T$.7|
00000A30: 12 B0 13 82 4A 2C 49 00  47 12 BA 13 8B 54 49 B3  |....J,I.G....TI.|
00000A40: 54 4D A7 35 30 35 30 00  62 12 C4 13 99 22 93 11  |TM.5050.b...."..|
00000A50: 46 49 4E 41 4C 20 53 54  41 4E 44 49 4E 47 53 3A  |FINAL STANDINGS:|
00000A60: 11 22 00 85 12 CE 13 81  49 B2 31 A4 4E 50 3A 99  |."......I.1.NP:.|
00000A70: 54 4C 28 49 2C 33 29 3B  A3 35 29 3B 4E 4D 24 28  |TL(I,3);.5);NM$(|
00000A80: 49 29 3A 82 49 00 A2 12  EC 13 99 22 11 50 4C 41  |I):.I......".PLA|
00000A90: 59 20 41 47 41 49 4E 3F  20 22 3B 3A 8D 36 30 30  |Y AGAIN? ";:.600|
00000AA0: 30 30 00 B9 12 F6 13 8B  C8 28 49 4E 24 2C 31 29  |00.......(IN$,1)|
00000AB0: B3 B1 22 4E 22 A7 33 30  30 00 C1 12 00 14 99 3A  |.."N".300......:|
00000AC0: 80 00 D5 12 58 1B A1 54  24 3A 8B 54 24 B2 22 22  |....X..T$:.T$.""|
00000AD0: A7 37 30 30 30 00 DB 12  62 1B 8E 00 FF 12 40 1F  |.7000...b.....@.|
00000AE0: 81 49 B2 31 A4 31 33 3A  53 43 28 30 2C 49 29 B2  |.I.1.13:SC(0,I).|
00000AF0: 30 3A 82 49 3A 43 54 B2  30 3A 53 55 4D B2 30 00  |0:.I:CT.0:SUM.0.|
00000B00: 29 13 4A 1F 81 49 B2 31  A4 35 3A 54 B2 44 49 28  |).J..I.1.5:T.DI(|
00000B10: 49 29 3A 58 B2 53 43 28  30 2C 54 29 3A 8B 58 B2  |I):X.SC(0,T):.X.|
00000B20: 30 A7 43 54 B2 43 54 AA  31 00 53 13 54 1F 53 43  |0.CT.CT.1.S.T.SC|
00000B30: 28 30 2C 54 29 B2 58 AA  31 3A 53 55 4D B2 53 55  |(0,T).X.1:SUM.SU|
00000B40: 4D AA 54 3A 82 49 3A 53  43 28 30 2C 31 33 29 B2  |M.T:.I:SC(0,13).|
00000B50: 53 55 4D 00 74 13 72 1F  91 43 54 89 38 31 30 30  |SUM.t.r..CT.8100|
00000B60: 2C 38 32 30 30 2C 38 31  35 30 2C 38 33 30 30 2C  |,8200,8150,8300,|
00000B70: 38 34 30 30 00 A2 13 A4  1F 53 43 28 30 2C 31 32  |8400.....SC(0,12|
00000B80: 29 B2 35 30 3A 53 43 28  30 2C 38 29 B2 53 55 4D  |).50:SC(0,8).SUM|
00000B90: 3A 53 43 28 30 2C 37 29  B2 53 55 4D 3A 89 38 35  |:SC(0,7).SUM:.85|
00000BA0: 30 30 00 C4 13 D6 1F 81  49 B2 31 A4 36 3A 8B 53  |00......I.1.6:.S|
00000BB0: 43 28 30 2C 49 29 B2 33  A7 53 43 28 30 2C 37 29  |C(0,I).3.SC(0,7)|
00000BC0: B2 53 55 4D 00 D1 13 E0  1F 82 49 3A 89 38 35 30  |.SUM......I:.850|
00000BD0: 30 00 F4 13 08 20 43 54  B2 30 3A 81 49 B2 31 A4  |0.... CT.0:.I.1.|
00000BE0: 36 3A 8B 53 43 28 30 2C  49 29 B2 31 A7 43 54 B2  |6:.SC(0,I).1.CT.|
00000BF0: 43 54 AA 31 00 07 14 1C  20 82 49 3A 53 43 28 30  |CT.1.... .I:SC(0|
00000C00: 2C 37 29 B2 53 55 4D 00  1C 14 30 20 8B 43 54 B2  |,7).SUM...0 .CT.|
00000C10: 30 A7 53 43 28 30 2C 39  29 B2 32 35 00 32 14 3A  |0.SC(0,9).25.2.:|
00000C20: 20 8B 43 54 B2 31 A7 53  43 28 30 2C 38 29 B2 53  | .CT.1.SC(0,8).S|
00000C30: 55 4D 00 3C 14 44 20 89  38 35 30 30 00 51 14 6C  |UM.<.D .8500.Q.l|
00000C40: 20 4D 4E B2 37 3A 4D 58  B2 30 3A 81 49 B2 31 A4  | MN.7:MX.0:.I.1.|
00000C50: 36 00 65 14 76 20 8B 53  43 28 30 2C 49 29 B2 30  |6.e.v .SC(0,I).0|
00000C60: A7 38 33 34 30 00 74 14  80 20 8B 49 B3 4D 4E A7  |.8340.t.. .I.MN.|
00000C70: 4D 4E B2 49 00 83 14 8A  20 8B 49 B1 4D 58 A7 4D  |MN.I.... .I.MX.M|
00000C80: 58 B2 49 00 8A 14 94 20  82 49 00 A3 14 9E 20 8B  |X.I.... .I.... .|
00000C90: 4D 58 AB 4D 4E B2 33 A7  53 43 28 30 2C 31 30 29  |MX.MN.3.SC(0,10)|
00000CA0: B2 33 30 00 AD 14 A8 20  89 38 35 30 30 00 E4 14  |.30.... .8500...|
00000CB0: D0 20 8B 53 43 28 30 2C  31 29 B2 30 B0 53 43 28  |. .SC(0,1).0.SC(|
00000CC0: 30 2C 36 29 B2 30 A7 53  43 28 30 2C 31 31 29 B2  |0,6).0.SC(0,11).|
00000CD0: 34 30 3A 53 43 28 30 2C  31 30 29 B2 33 30 3A 89  |40:SC(0,10).30:.|
00000CE0: 38 35 30 30 00 0F 15 DA  20 8B 53 43 28 30 2C 32  |8500.... .SC(0,2|
00000CF0: 29 B2 30 B0 53 43 28 30  2C 35 29 B2 30 A7 53 43  |).0.SC(0,5).0.SC|
00000D00: 28 30 2C 31 30 29 B2 33  30 3A 89 38 35 30 30 00  |(0,10).30:.8500.|
00000D10: 19 15 E4 20 89 38 35 30  30 00 28 15 EE 20 8B 49  |... .8500.(.. .I|
00000D20: B1 4D 58 A7 4D 58 B2 49  00 2F 15 F8 20 82 49 00  |.MX.MX.I./.. .I.|
00000D30: 54 15 02 21 8B 4D 58 AB  4D 4E B2 34 A7 53 43 28  |T..!.MX.MN.4.SC(|
00000D40: 30 2C 31 30 29 B2 33 30  3A 53 43 28 30 2C 31 31  |0,10).30:SC(0,11|
00000D50: 29 B2 34 30 00 74 15 34  21 81 49 B2 31 A4 36 3A  |).40.t.4!.I.1.6:|
00000D60: 53 43 28 30 2C 49 29 B2  53 43 28 30 2C 49 29 AC  |SC(0,I).SC(0,I).|
00000D70: 49 3A 82 49 00 7A 15 3E  21 8E 00 84 15 28 23 99  |I:.I.z.>!....(#.|
00000D80: 22 13 22 3B 00 AF 15 32  23 81 49 B2 31 A4 33 3A  |".";...2#.I.1.3:|
00000D90: 99 3A 81 4A B2 31 A4 35  3A 8B 44 49 28 4A 29 B2  |.:.J.1.5:.DI(J).|
00000DA0: 30 A7 99 A3 37 AC 4A 29  3B 22 20 20 20 22 3B 00  |0...7.J);"   ";.|
00000DB0: BF 15 3C 23 82 4A 2C 49  3A 81 49 B2 31 A4 35 00  |..<#.J,I:.I.1.5.|
00000DC0: 03 16 46 23 8B 44 49 28  49 29 B2 30 A7 51 B2 B5  |..F#.DI(I).0.Q..|
00000DD0: 28 BB 28 31 29 AC 36 AA  31 29 3A 54 28 49 29 B2  |(.(1).6.1):T(I).|
00000DE0: 33 AC 28 BB 28 31 29 B1  2E 35 29 AA 33 3A 43 54  |3.(.(1)..5).3:CT|
00000DF0: 28 51 29 B2 43 54 28 51  29 AA 31 3A 44 49 28 49  |(Q).CT(Q).1:DI(I|
00000E00: 29 B2 51 00 0A 16 50 23  82 49 00 1D 16 5A 23 99  |).Q...P#.I...Z#.|
00000E10: 22 13 22 3B 3A 81 49 B2  31 A4 33 3A 99 00 47 16  |".";:.I.1.3:..G.|
00000E20: 64 23 81 4A B2 31 A4 35  3A 99 A3 37 AC 4A 29 3B  |d#.J.1.5:..7.J);|
00000E30: 44 49 24 28 49 AA 54 28  4A 29 2C 44 49 28 4A 29  |DI$(I.T(J),DI(J)|
00000E40: 29 3B 3A 82 4A 2C 49 00  4F 16 6E 23 99 3A 8E 00  |);:.J,I.O.n#.:..|
00000E50: 8B 16 8C 23 99 44 4E 24  3B 22 91 91 20 20 20 20  |...#.DN$;"..    |
00000E60: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000E70: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000E80: 20 20 20 91 22 3A 99 50  52 24 3B 00 98 16 96 23  |   .":.PR$;....#|
00000E90: 8D 36 30 30 30 30 3A 8E  00 A8 16 10 27 99 22 93  |.60000:.....'.".|
00000EA0: 22 3A 8D 31 31 30 30 30  00 D9 16 24 27 54 24 B2  |":.11000...$'T$.|
00000EB0: 22 3D 3D 54 4F 54 41 4C  3D 3D 3D 3D 3D 3D 3D 3D  |"==TOTAL========|
00000EC0: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000ED0: 3D 3D 3D 3D 3D 3D 3D 3D  22 00 01 17 2E 27 99 44  |========"....'.D|
00000EE0: 4E 24 3B 22 41 3A 41 43  45 53 22 3A 99 22 42 3A  |N$;"A:ACES":."B:|
00000EF0: 54 57 4F 53 22 3A 99 22  43 3A 54 48 52 45 45 53  |TWOS":."C:THREES|
00000F00: 22 00 26 17 38 27 99 22  44 3A 46 4F 55 52 53 22  |".&.8'."D:FOURS"|
00000F10: 3A 99 22 45 3A 46 49 56  45 53 22 3A 99 22 46 3A  |:."E:FIVES":."F:|
00000F20: 53 49 58 45 53 22 00 3E  17 42 27 99 22 20 20 3E  |SIXES".>.B'."  >|
00000F30: 3D 36 33 20 42 4F 4E 55  53 22 3A 99 54 24 00 74  |=63 BONUS":.T$.t|
00000F40: 17 4C 27 99 22 47 3A 33  20 4F 46 20 41 20 4B 49  |.L'."G:3 OF A KI|
00000F50: 4E 44 22 3A 99 22 48 3A  34 20 4F 46 20 41 20 4B  |ND":."H:4 OF A K|
00000F60: 49 4E 44 22 3A 99 22 49  3A 46 55 4C 4C 20 48 4F  |IND":."I:FULL HO|
00000F70: 55 53 45 22 00 A0 17 56  27 99 22 4A 3A 53 4D 41  |USE"...V'."J:SMA|
00000F80: 4C 4C 20 53 54 52 41 49  47 48 54 22 3A 99 22 4B  |LL STRAIGHT":."K|
00000F90: 3A 4C 41 52 47 45 20 53  54 52 41 49 47 48 54 22  |:LARGE STRAIGHT"|
00000FA0: 00 BD 17 60 27 99 22 4C  3A 59 41 48 54 5A 45 45  |...`'."L:YAHTZEE|
00000FB0: 22 3A 99 22 4D 3A 43 48  41 4E 43 45 22 00 D6 17  |":."M:CHANCE"...|
00000FC0: 6A 27 99 54 24 3A 99 22  20 20 47 52 41 4E 44 20  |j'.T$:."  GRAND |
00000FD0: 54 4F 54 41 4C 22 00 DC  17 74 27 8E 00 11 18 F8  |TOTAL"...t'.....|
00000FE0: 2A 54 24 B2 22 20 20 D5  C0 C0 C0 C9 22 3A 55 24  |*T$."  .....":U$|
00000FF0: B2 22 1D 1D DD 20 20 20  DD 22 3A 56 24 B2 22 20  |."...   .":V$." |
00001000: 20 CA C0 C0 C0 CB 22 3A  53 24 B2 22 1D 1D 1D 1D  | .....":S$."....|
00001010: 22 00 33 18 02 2B 99 22  13 22 3B 53 24 3B 54 24  |".3..+.".";S$;T$|
00001020: 3B 54 24 3B 54 24 3B 54  24 3B 54 24 3A 81 49 B2  |;T$;T$;T$;T$:.I.|
00001030: 31 A4 33 00 66 18 0C 2B  99 53 24 3B 55 24 3B 55  |1.3.f..+.S$;U$;U|
00001040: 24 3B 55 24 3B 55 24 3B  55 24 3A 82 49 3A 99 53  |$;U$;U$;U$:.I:.S|
00001050: 24 3B 56 24 3B 56 24 3B  56 24 3B 56 24 3B 56 24  |$;V$;V$;V$;V$;V$|
00001060: 3B 22 91 91 91 22 00 87  18 20 2B 99 22 13 11 12  |;"..."... +."...|
00001070: 20 20 20 20 9D 9D 9D 9D  11 20 20 20 20 9D 9D 9D  |    .....    ...|
00001080: 9D 11 20 20 20 20 22 00  8D 18 2A 2B 8E 00 AE 18  |..    "...*+....|
00001090: 60 EA 49 4E 24 B2 22 20  22 3A 5A 54 B2 54 49 3A  |`.IN$." ":ZT.TI:|
000010A0: 5A 43 B2 32 3A 5A 44 24  B2 C7 28 32 30 29 00 C4  |ZC.2:ZD$..(20)..|
000010B0: 18 6A EA A1 5A 24 3A 8B  5A 24 B3 B1 22 22 A7 36  |.j..Z$:.Z$.."".6|
000010C0: 30 30 37 30 00 F4 18 74  EA 8B 5A 54 B3 B2 54 49  |0070...t..ZT..TI|
000010D0: A7 99 CA 28 22 20 A6 22  2C 5A 43 2C 31 29 3B 22  |...(" .",ZC,1);"|
000010E0: 9D 22 3B 3A 5A 43 B2 33  AB 5A 43 3A 5A 54 B2 54  |.";:ZC.3.ZC:ZT.T|
000010F0: 49 AA 31 35 00 FF 18 7E  EA 89 36 30 30 31 30 00  |I.15...~..60010.|
00001100: 2F 19 A6 EA 5A B2 C6 28  5A 24 29 3A 5A 4C B2 C3  |/...Z..(Z$):ZL..|
00001110: 28 49 4E 24 29 3A 8B 28  5A AF 31 32 37 29 B3 33  |(IN$):.(Z.127).3|
00001120: 32 A7 99 22 20 9D 22 3B  3A 89 36 30 31 31 30 00  |2.." .";:.60110.|
00001130: 5F 19 B0 EA 8B 46 4C AF  28 5A AF 31 32 37 29 B1  |_....FL.(Z.127).|
00001140: 36 34 AF 28 5A AF 31 32  37 29 B3 39 31 A7 5A 24  |64.(Z.127).91.Z$|
00001150: B2 C7 28 28 5A AA 31 32  38 29 AF 32 35 35 29 00  |..((Z.128).255).|
00001160: 71 19 BA EA 8B 5A 4C B1  32 35 34 A7 36 30 30 31  |q....ZL.254.6001|
00001170: 30 00 8C 19 C4 EA 49 4E  24 B2 49 4E 24 AA 5A 24  |0.....IN$.IN$.Z$|
00001180: 3A 99 5A 24 3B 5A 44 24  3B 5A 24 3B 00 AB 19 CE  |:.Z$;ZD$;Z$;....|
00001190: EA 8B 5A B2 31 33 A7 49  4E 24 B2 CA 28 49 4E 24  |..Z.13.IN$..(IN$|
000011A0: 2C 32 29 3A 99 43 52 24  3B 3A 8E 00 D7 19 D8 EA  |,2):.CR$;:......|
000011B0: 8B 5A B2 32 30 AF 5A 4C  B1 31 A7 49 4E 24 B2 C8  |.Z.20.ZL.1.IN$..|
000011C0: 28 49 4E 24 2C 5A 4C AB  31 29 3A 99 22 9D 22 3B  |(IN$,ZL.1):.".";|
000011D0: 3A 89 36 30 30 31 30 00  0A 1A E2 EA 8B 5A B2 31  |:.60010......Z.1|
000011E0: 34 31 A7 5A 24 B2 C7 28  AB 32 30 AC 28 5A 4C B1  |41.Z$..(.20.(ZL.|
000011F0: 31 29 29 3A 81 5A B2 32  A4 5A 4C 3A 99 5A 24 3B  |1)):.Z.2.ZL:.Z$;|
00001200: 3A 82 5A 3A 89 36 30 30  30 30 00 15 1A EC EA 89  |:.Z:.60000......|
00001210: 36 30 30 31 30 00 25 1A  28 EB 8B 50 4E B2 30 A7  |60010.%.(..PN.0.|
00001220: 36 30 32 35 30 00 41 1A  32 EB 99 22 11 50 52 45  |60250.A.2..".PRE|
00001230: 53 53 20 12 52 45 54 55  52 4E 92 20 54 4F 20 22  |SS .RETURN. TO "|
00001240: 3B 00 5E 1A 3C EB 8B 50  4E B2 4C 50 A7 99 22 42  |;.^.<..PN.LP.."B|
00001250: 45 47 49 4E 3A 22 3B 3A  89 36 30 32 34 30 00 70  |EGIN:";:.60240.p|
00001260: 1A 46 EB 99 22 43 4F 4E  54 49 4E 4F 55 3A 22 3B  |.F.."CONTINOU:";|
00001270: 00 85 1A 50 EB A1 54 24  3A 8B 54 24 B2 22 22 A7  |...P..T$:.T$."".|
00001280: 36 30 32 34 30 00 A7 1A  5A EB 8B 50 4E B2 4C 50  |60240...Z..PN.LP|
00001290: A7 97 35 39 34 36 38 2C  50 4B 3A 9C 3A 99 22 93  |..59468,PK:.:.".|
000012A0: 22 3B 3A 89 31 30 30 00  EA 1A 64 EB 50 4E B2 50  |";:.100...d.PN.P|
000012B0: 4E AA 31 3A 99 22 93 22  3B 50 47 24 3B 22 20 2D  |N.1:.".";PG$;" -|
000012C0: 20 43 55 52 53 4F 52 20  23 22 3B 4E 4D 24 3B 22  | CURSOR #";NM$;"|
000012D0: 20 20 28 43 29 20 31 39  37 39 20 20 20 20 50 41  |  (C) 1979    PA|
000012E0: 47 45 22 3B 50 4E 3B 22  11 22 00 F0 1A 6E EB 8E  |GE";PN;"."...n..|
000012F0: 00 25 1B 30 F2 99 22 93  11 22 3B 50 47 24 3B 22  |.%.0.."..";PG$;"|
00001300: 20 2D 20 43 55 52 53 4F  52 20 23 22 3B 4E 4D 24  | - CURSOR #";NM$|
00001310: 3B 22 20 43 4F 50 59 52  49 47 48 54 20 28 43 29  |;" COPYRIGHT (C)|
00001320: 20 31 39 37 39 00 40 1B  3A F2 99 22 11 54 48 45  | 1979.@.:..".THE|
00001330: 20 47 41 4D 45 20 4F 46  20 59 41 48 54 5A 45 45  | GAME OF YAHTZEE|
00001340: 00 63 1B 44 F2 99 22 11  11 57 41 4E 54 20 44 49  |.c.D.."..WANT DI|
00001350: 52 45 43 54 49 4F 4E 53  3F 20 22 3B 3A 8D 36 30  |RECTIONS? ";:.60|
00001360: 30 30 30 00 7B 1B 4E F2  8B C8 28 49 4E 24 2C 31  |000.{.N...(IN$,1|
00001370: 29 B2 22 59 22 A7 36 32  31 30 30 00 95 1B 58 F2  |)."Y".62100...X.|
00001380: 99 22 93 22 3A 97 35 39  34 36 38 2C 50 4B 3A 9C  |.".":.59468,PK:.|
00001390: 3A 89 31 30 30 00 A5 1B  94 F2 4C 50 B2 32 3A 8D  |:.100.....LP.2:.|
000013A0: 36 30 32 30 30 00 BE 1B  9E F2 99 22 44 49 43 45  |60200......"DICE|
000013B0: 20 43 4F 4D 42 49 4E 41  54 49 4F 4E 53 3A 00 EA  | COMBINATIONS:..|
000013C0: 1B A8 F2 99 22 11 12 41  43 45 53 92 20 54 48 52  |...."..ACES. THR|
000013D0: 55 20 12 53 49 58 45 53  92 3A 20 4F 4E 45 20 4D  |U .SIXES.: ONE M|
000013E0: 4F 52 45 20 4F 46 20 54  48 45 00 13 1C B2 F2 99  |ORE OF THE......|
000013F0: 22 41 50 50 52 4F 50 52  49 41 54 45 20 4E 55 4D  |"APPROPRIATE NUM|
00001400: 42 45 52 20 28 45 2E 47  2E 20 4F 4E 45 20 34 2C  |BER (E.G. ONE 4,|
00001410: 20 4F 52 00 3F 1C BC F2  99 22 54 48 52 45 45 20  | OR.?...."THREE |
00001420: 32 27 53 29 2E 20 57 4F  52 54 48 20 54 48 45 A0  |2'S). WORTH THE.|
00001430: 53 55 4D A0 4F 46 20 54  48 45 A0 44 49 43 45 00  |SUM.OF THE.DICE.|
00001440: 6C 1C C6 F2 99 22 4F 46  A0 54 48 41 54 20 4E 55  |l...."OF.THAT NU|
00001450: 4D 42 45 52 20 28 33 20  33 20 34 20 35 20 33 20  |MBER (3 3 4 5 3 |
00001460: 49 53 20 57 4F 52 54 48  20 39 29 2E 00 9A 1C D0  |IS WORTH 9).....|
00001470: F2 99 22 11 54 48 52 45  45 A0 4F 46 20 41 A0 4B  |..".THREE.OF A.K|
00001480: 49 4E 44 3A 20 41 4E 59  20 54 48 52 45 45 20 44  |IND: ANY THREE D|
00001490: 49 43 45 20 4F 46 A0 54  48 45 00 C7 1C DA F2 99  |ICE OF.THE......|
000014A0: 22 53 41 4D 45 A0 4E 55  4D 42 45 52 2E 20 57 4F  |"SAME.NUMBER. WO|
000014B0: 52 54 48 20 54 48 45 A0  53 55 4D A0 4F 46 A0 41  |RTH THE.SUM.OF.A|
000014C0: 4C 4C 20 46 49 56 45 00  D3 1C E4 F2 99 22 44 49  |LL FIVE......"DI|
000014D0: 43 45 2E 00 FF 1C EE F2  99 22 11 46 4F 55 52 20  |CE.......".FOUR |
000014E0: 4F 46 20 41 20 4B 49 4E  44 3A 20 41 4E 59 20 46  |OF A KIND: ANY F|
000014F0: 4F 55 52 20 44 49 43 45  A0 4F 46 A0 54 48 45 00  |OUR DICE.OF.THE.|
00001500: 2C 1D F8 F2 99 22 53 41  4D 45 20 4E 55 4D 42 45  |,...."SAME NUMBE|
00001510: 52 2E 20 41 4C 53 4F 20  57 4F 52 54 48 A0 54 48  |R. ALSO WORTH.TH|
00001520: 45 A0 53 55 4D A0 4F 46  20 41 4C 4C 00 3E 1D 02  |E.SUM.OF ALL.>..|
00001530: F3 99 22 46 49 56 45 20  44 49 43 45 2E 22 00 6A  |.."FIVE DICE.".j|
00001540: 1D 0C F3 99 22 11 46 55  4C 4C 20 48 4F 55 53 45  |....".FULL HOUSE|
00001550: 3A 20 54 48 52 45 45 A0  4F 46 20 4F 4E 45 20 4E  |: THREE.OF ONE N|
00001560: 55 4D 42 45 52 2C 20 54  57 4F 00 8D 1D 16 F3 99  |UMBER, TWO......|
00001570: 22 4F 46 A0 41 4E 4F 54  48 45 52 2E 20 57 4F 52  |"OF.ANOTHER. WOR|
00001580: 54 48 A0 32 35 20 50 4F  49 4E 54 53 2E 00 98 1D  |TH.25 POINTS....|
00001590: 20 F3 8D 36 30 32 30 30  00 C5 1D 2A F3 99 22 53  | ..60200...*.."S|
000015A0: 4D 41 4C 4C 20 53 54 52  41 49 47 48 54 3A 20 41  |MALL STRAIGHT: A|
000015B0: 20 52 55 4E 20 4F 46 20  46 4F 55 52 20 44 49 43  | RUN OF FOUR DIC|
000015C0: 45 2C 20 41 53 00 F0 1D  34 F3 99 22 32 20 33 20  |E, AS...4.."2 3 |
000015D0: 34 20 35 20 4F 52 20 32  20 34 20 31 20 33 2E 20  |4 5 OR 2 4 1 3. |
000015E0: 57 4F 52 54 48 A0 33 30  20 50 4F 49 4E 54 53 2E  |WORTH.30 POINTS.|
000015F0: 00 1F 1E 3E F3 99 22 11  4C 41 52 47 45 20 53 54  |...>..".LARGE ST|
00001600: 52 41 49 47 48 54 3A 20  41 20 52 55 4E 20 4F 46  |RAIGHT: A RUN OF|
00001610: 20 41 4C 4C 20 46 49 56  45 20 44 49 43 45 2E 00  | ALL FIVE DICE..|
00001620: 36 1E 48 F3 99 22 57 4F  52 54 48 A0 34 30 20 50  |6.H.."WORTH.40 P|
00001630: 4F 49 4E 54 53 2E 00 60  1E 52 F3 99 22 11 59 41  |OINTS..`.R..".YA|
00001640: 48 54 5A 45 45 3A 20 41  4C 4C A0 46 49 56 45 A0  |HTZEE: ALL.FIVE.|
00001650: 44 49 43 45 A0 4F 46 A0  54 48 45 A0 53 41 4D 45  |DICE.OF.THE.SAME|
00001660: 00 8E 1E 5C F3 99 22 4E  55 4D 42 45 52 2E 20 57  |...\.."NUMBER. W|
00001670: 4F 52 54 48 A0 35 30 20  46 4F 52 A0 54 48 45 20  |ORTH.50 FOR.THE |
00001680: 46 49 52 53 54 A0 4F 4E  45 2C 20 41 4E 44 00 B1  |FIRST.ONE, AND..|
00001690: 1E 66 F3 99 22 31 30 30  20 46 4F 52 A0 45 41 43  |.f.."100 FOR.EAC|
000016A0: 48 A0 4F 4E 45 A0 54 48  45 52 45 41 46 54 45 52  |H.ONE.THEREAFTER|
000016B0: 2E 00 DF 1E 70 F3 99 22  11 43 48 41 4E 43 45 3A  |....p..".CHANCE:|
000016C0: 20 41 4E 59 54 48 49 4E  47 A0 41 54 A0 41 4C 4C  | ANYTHING.AT.ALL|
000016D0: 2E 20 57 4F 52 54 48 A0  54 48 45 20 53 55 4D 00  |. WORTH.THE SUM.|
000016E0: F3 1E 7A F3 99 22 4F 46  A0 54 48 45 A0 44 49 43  |..z.."OF.THE.DIC|
000016F0: 45 2E 22 00 20 1F 84 F3  99 22 11 54 4F 20 52 4F  |E.". ....".TO RO|
00001700: 4C 4C A0 54 48 45 A0 44  49 43 45 2C 20 54 59 50  |LL.THE.DICE, TYP|
00001710: 45 A0 54 48 45 A0 4E 55  4D 42 45 52 53 A0 4F 4E  |E.THE.NUMBERS.ON|
00001720: 00 4B 1F 8E F3 99 22 54  48 45 A0 44 49 43 45 A0  |.K...."THE.DICE.|
00001730: 54 4F A0 52 4F 4C 4C 2E  20 54 4F A0 53 43 4F 52  |TO.ROLL. TO.SCOR|
00001740: 45 2C 20 54 59 50 45 20  54 48 45 00 6D 1F 98 F3  |E, TYPE THE.m...|
00001750: 99 22 4C 45 54 54 45 52  20 4F 46 20 54 48 45 20  |."LETTER OF THE |
00001760: 43 4F 4D 42 49 4E 41 54  49 4F 4E 2E 22 00 93 1F  |COMBINATION."...|
00001770: 9D F3 99 22 54 4F A0 5A  45 52 4F A0 41 A0 43 4F  |..."TO.ZERO.A.CO|
00001780: 4D 42 49 4E 41 54 49 4F  4E 2C 20 54 59 50 45 A0  |MBINATION, TYPE.|
00001790: 41 A0 5A 00 B1 1F 9E F3  99 22 46 4F 4C 4C 4F 57  |A.Z......"FOLLOW|
000017A0: 45 44 A0 42 59 A0 54 48  45 A0 4C 45 54 54 45 52  |ED.BY.THE.LETTER|
000017B0: 2E 00 BC 1F A2 F3 8D 36  30 32 30 30 00 00 00 57  |.......60200...W|
000017C0: 10 35 00 35                                       |.5.5            |

.......:.59468,14:PK.12.D.... YAHTZEE CO
PYRIGHT (C) 1979 GLEN FISHER.A.... CURSO
R #9, APRIL, 1979...... BOX 550, GOLETA,
 CA. 93017.....:...Z.PG$."YAHTZEE":NM$."
9":.62000.Z.D..DI(5),DI$(6,6),T(5),SC(4,
13),TL(4,3),NM$(4)...N..I.1.6:.J.1.6:.DI
$(I,J):.J,I.$.X.."   ","  Q","Q  ","Q Q"
,"Q Q","QQQ".M.Y.." Q ","   "," Q ","   
"," Q ","   ".V.Z.."   ","Q  ","  Q","Q 
Q","Q Q","QQQ"...{.."   ","Q  ","  Q","Q
 Q","Q Q","Q Q".H.|.." Q ","   "," Q ","
   "," Q ","Q Q"...}.."   ","  Q","Q  ",
"Q Q","Q Q","Q Q".....DN$."........".(.H
.."HOW MANY PLAYERS? ";:.60000:..F.R.NP.
E(IN$):.NP.1.NP.4.."ONE TO FOUR PLAYERS,
 PLEASE.":.200......".ENTER THEIR NAMES,
 PLEASE.":."(FIVE LETTERS LONG, MAX.).".
Y....I.1.NP:."PLAYER";I;": ";:.60000:NM$
(I).IN$:......TL(I,0).9.6.I.5.C(IN$):.I.
..,..I.1.4:.J.1.13:SC(I,J)..1:.J:.J.1.3:
TL(I,J).0:.J,I.<. .PL.0:RD.1.Q....10000:
.DN$;".";.V....I.1.NP:..TL(I,0));NM$(I);
".":.I......I.1.5:DI(I).0:.I:RL.0.....PL
.PL.1:.PL.NP.PL.1:RD.RD.1:.RD.13.5000.H.
...11000......DN$;"..ROUND";RD;.TL(PL,0)
);NM$(PL)...P.PR$."? ":.9100:.RL.0.IN$."
00000".'.Z..IN$."".2000.Y....H(IN$,1)."Z
".ZER.1:IN$.J(IN$,2):.IN$."".2000.Q...N.
1:A.1:.I.1.C(IN$).....T$.J(IN$,I,1):.T$.
"A".T$."M".A.0......T$."0".T$."6".N.0...
...I......A.3000.N. ..N.0.2000...*.RL.RL
.1:.RL.3.PR$."NO MORE ROLLS ALLOWED.":.3
500.#.4..I.1.C(IN$):T.E(J(IN$,I,1)).I.9.
.J.1.5:.DI(J).T.DI(J).0:N.0:.2115.P.>..J
.H.C..I:.N.RL.RL.1:.3500.~.E.."...ROLL..
..";RL...H..9000:.8000:RV$.".":.DN$;.J.\
..I.1.6:SC.SC(0,I):.SC(PL,I).0..2500:.".
";.W.F..:.I:.:....P..I.7.13:SC.SC(0,I):.
SC(PL,I).0..2500:.".";...Z..:.I:.2000.;.
D...11.6.PL);RV$;I("   ".D(SC),3):..R.N.
..11.6.PL);"  :":..U...RV$."":T.F(IN$).6
4:ADD.SC(0,T)......T.12.ADD.0.SC(PL,T).0
.ADD.100:.3100.T.B..SC(PL,T)..0.PR$."YOU
'VE ALREADY TAKEN IT.":.3500...L..ADD.0.
ZER.1.3100...V.PR$."REALLY ZERO IT? ":.9
100.#....H(IN$,1).."Y".2000.6...X.T:.T.6
.X.X.2.Q.!..SC(PL,T).0.SC(PL,T).0.T.&..:
.DN$;H("...............",X);...0.RV$."":
SC.ADD.SC(PL,T):SC(PL,T).SC...:..2500:.T
.6.3300.E....H("......",7.T);.....X.TL(P
L,1):SC.X.ADD:TL(PL,1).SC......X.62.SC.6
3.3250.+...X.SC:SC.35:X.X.SC:.".";:.2500
:TL(PL,1).X.I...TL(PL,3).TL(PL,3).SC:SC.
X.F....2500:."........";:.3400.W...."...
.....";...F..3400......H("........",14.T
);.....SC.TL(PL,2).ADD:TL(PL,2).SC:.2500
...H.SC.TL(PL,3).ADD:TL(PL,3).SC:RV$."":
.2500...Z..DN$;:.I.1.6:.SC(PL,I).0..2510
:.".";.....:.I.H....".":.I.7.13:.SC(PL,
I).0..2510:.".";.Q....:.I.W....DN$;".";.
TL(PL,0));NM$(PL):.1500......DN$;"..";PR
$:.I.1.1000:.I:.2000.....TM.TI.300:.I.1.
NP:.J.1.NP.1.X....TL(J,3).TL(J.1,3).5040
.....T.TL(J,3):TL(J,3).TL(J.1,3):TL(J.1,
3).T.....T$.NM$(J):NM$(J).NM$(J.1):NM$(J
.1).T$.7....J,I.G....TI.TM.5050.B.D.."..
FINAL STANDINGS:."...N..I.1.NP:.TL(I,3);
.5);NM$(I):.I......".PLAY AGAIN? ";:.600
00......H(IN$,1).."N".300.A....:..U.X..T
$:.T$."".7000...B.....@..I.1.13:SC(0,I).
0:.I:CT.0:SUM.0.).J..I.1.5:T.DI(I):X.SC(
0,T):.X.0.CT.CT.1.S.T.SC(0,T).X.1:SUM.SU
M.T:.I:SC(0,13).SUM.T.R..CT.8100,8200,81
50,8300,8400.....SC(0,12).50:SC(0,8).SUM
:SC(0,7).SUM:.8500.D.V..I.1.6:.SC(0,I).3
.SC(0,7).SUM.Q....I:.8500.... CT.0:.I.1.
6:.SC(0,I).1.CT.CT.1.... .I:SC(0,7).SUM.
..0 .CT.0.SC(0,9).25.2.: .CT.1.SC(0,8).S
UM.<.D .8500.Q.L MN.7:MX.0:.I.1.6.E.V .S
C(0,I).0.8340.T.. .I.MN.MN.I.... .I.MX.M
X.I.... .I.... .MX.MN.3.SC(0,10).30.... 
.8500...P .SC(0,1).0.SC(0,6).0.SC(0,11).
40:SC(0,10).30:.8500...Z .SC(0,2).0.SC(0
,5).0.SC(0,10).30:.8500.... .8500.(.. .I
.MX.MX.I./.. .I.T..!.MX.MN.4.SC(0,10).30
:SC(0,11).40.T.4!.I.1.6:SC(0,I).SC(0,I).
I:.I.Z.>!....(#.".";...2#.I.1.3:.:.J.1.5
:.DI(J).0...7.J);"   ";...<#.J,I:.I.1.5.
..F#.DI(I).0.Q..(.(1).6.1):T(I).3.(.(1).
.5).3:CT(Q).CT(Q).1:DI(I).Q...P#.I...Z#.
".";:.I.1.3:..G.D#.J.1.5:..7.J);DI$(I.T(
J),DI(J));:.J,I.O.N#.:.....#.DN$;"..    
                                   .":.P
R$;....#.60000:.....'.".":.11000.Y.$'T$.
"==TOTAL================================
"....'.DN$;"A:ACES":."B:TWOS":."C:THREES
".&.8'."D:FOURS":."E:FIVES":."F:SIXES".>
.B'."  >=63 BONUS":.T$.T.L'."G:3 OF A KI
ND":."H:4 OF A KIND":."I:FULL HOUSE". .V
'."J:SMALL STRAIGHT":."K:LARGE STRAIGHT"
...`'."L:YAHTZEE":."M:CHANCE".V.J'.T$:."
  GRAND TOTAL"...T'.....*T$."  U...I":U$
."...   .":V$."  J...K":S$."....".3..+."
.";S$;T$;T$;T$;T$;T$:.I.1.3.F..+.S$;U$;U
$;U$;U$;U$:.I:.S$;V$;V$;V$;V$;V$;"..."..
. +."...    .....    .....    "...*+....
`.IN$." ":ZT.TI:ZC.2:ZD$.G(20).D.J..Z$:.
Z$.."".60070...T..ZT..TI..J(" .",ZC,1);"
.";:ZC.3.ZC:ZT.TI.15...~..60010./...Z.F(
Z$):ZL.C(IN$):.(Z.127).32.." .";:.60110.
_....FL.(Z.127).64.(Z.127).91.Z$.G((Z.12
8).255).Q....ZL.254.60010...D.IN$.IN$.Z$
:.Z$;ZD$;Z$;...N..Z.13.IN$.J(IN$,2):.CR$
;:..W.X..Z.20.ZL.1.IN$.H(IN$,ZL.1):.".";
:.60010......Z.141.Z$.G(.20.(ZL.1)):.Z.2
.ZL:.Z$;:.Z:.60000......60010.%.(..PN.0.
60250.A.2..".PRESS .RETURN. TO ";.^.<..P
N.LP.."BEGIN:";:.60240.P.F.."CONTINOU:";
...P..T$:.T$."".60240...Z..PN.LP..59468,
PK:.:.".";:.100...D.PN.PN.1:.".";PG$;" -
 CURSOR #";NM$;"  (C) 1979    PAGE";PN;"
."...N...%.0.."..";PG$;" - CURSOR #";NM$
;" COPYRIGHT (C) 1979.@.:..".THE GAME OF
 YAHTZEE.C.D.."..WANT DIRECTIONS? ";:.60
000.{.N..H(IN$,1)."Y".62100...X..".":.59
468,PK:.:.100.....LP.2:.60200......"DICE
 COMBINATIONS:......"..ACES. THRU .SIXES
.: ONE MORE OF THE......"APPROPRIATE NUM
BER (E.G. ONE 4, OR.?...."THREE 2'S). WO
RTH THE SUM OF THE DICE.L.F.."OF THAT NU
MBER (3 3 4 5 3 IS WORTH 9)....P..".THRE
E OF A KIND: ANY THREE DICE OF THE.G.Z..
"SAME NUMBER. WORTH THE SUM OF ALL FIVE.
S...."DICE.......".FOUR OF A KIND: ANY F
OUR DICE OF THE.,...."SAME NUMBER. ALSO 
WORTH THE SUM OF ALL.>...."FIVE DICE.".J
....".FULL HOUSE: THREE OF ONE NUMBER, T
WO......"OF ANOTHER. WORTH 25 POINTS....
 ..60200.E.*.."SMALL STRAIGHT: A RUN OF 
FOUR DICE, AS...4.."2 3 4 5 OR 2 4 1 3. 
WORTH 30 POINTS....>..".LARGE STRAIGHT: 
A RUN OF ALL FIVE DICE..6.H.."WORTH 40 P
OINTS..`.R..".YAHTZEE: ALL FIVE DICE OF 
THE SAME...\.."NUMBER. WORTH 50 FOR THE 
FIRST ONE, AND...F.."100 FOR EACH ONE TH
EREAFTER....P..".CHANCE: ANYTHING AT ALL
. WORTH THE SUM...Z.."OF THE DICE.". ...
.".TO ROLL THE DICE, TYPE THE NUMBERS ON
.K...."THE DICE TO ROLL. TO SCORE, TYPE 
THE.M...."LETTER OF THE COMBINATION."...
..."TO ZERO A COMBINATION, TYPE A Z.....
."FOLLOWED BY THE LETTER.......60200...W
.5.5

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL