KRYPTO
FILE INFORMATION
FILENAME(S): KRYPTO
FILE TYPE(S): PRG
FILE SIZE: 4.8K
FIRST SEEN: 2025-11-30 21:07:11
APPEARS ON: 1 disk(s)
FILE HASH
1fa3161d86756018919cb5fa4651ca1e1ebcbc928b21aa49ce8ced6340ce4545
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CURSOR 5 | KRYPTO | PRG | DuncanTwain | 31 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 09 04 0A 00 89 34 30 00 59 04 14 00 53 B2 |.......40.Y...S.|
00000010: 30 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |0:::::::::::::::|
00000020: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00000030: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00000040: 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A 3A |::::::::::::::::|
00000050: 3A 3A 3A 3A 3A 3A 3A 3A 3A 00 5F 04 1E 00 8E 00 |:::::::::._.....|
00000060: 8C 04 28 00 9C 3A 97 35 39 34 36 38 2C 31 32 3A |..(..:.59468,12:|
00000070: 50 47 24 B2 22 4B 52 59 50 54 4F 22 3A 4E 4D 24 |PG$."KRYPTO":NM$|
00000080: B2 22 32 39 22 3A 89 36 30 34 30 30 00 9D 04 2D |."29":.60400...-|
00000090: 00 22 20 47 41 52 59 20 4D 41 52 53 41 00 B6 04 |." GARY MARSA...|
000000A0: 32 00 22 20 33 32 30 20 54 45 52 52 41 43 45 20 |2." 320 TERRACE |
000000B0: 41 50 54 20 32 53 00 CF 04 37 00 22 20 46 4C 55 |APT 2S...7." FLU|
000000C0: 53 48 49 4E 47 2C 20 4D 49 20 34 38 34 33 33 00 |SHING, MI 48433.|
000000D0: D5 04 41 00 22 00 F1 04 46 00 22 20 43 55 52 53 |..A."...F." CURS|
000000E0: 4F 52 20 23 32 39 2C 20 46 45 42 2C 20 31 39 38 |OR #29, FEB, 198|
000000F0: 32 00 17 05 4B 00 22 20 43 4F 50 59 52 49 47 48 |2...K." COPYRIGH|
00000100: 54 28 43 29 31 39 38 32 20 54 48 45 20 43 4F 44 |T(C)1982 THE COD|
00000110: 45 20 57 4F 52 4B 53 00 38 05 50 00 22 20 42 4F |E WORKS.8.P." BO|
00000120: 58 20 35 35 30 2C 20 47 4F 4C 45 54 41 2C 20 43 |X 550, GOLETA, C|
00000130: 41 2E 20 39 33 31 31 36 00 3E 05 55 00 22 00 55 |A. 93116.>.U.".U|
00000140: 05 5A 00 22 20 41 53 20 4F 46 20 32 2D 31 36 2D |.Z." AS OF 2-16-|
00000150: 38 32 20 54 5A 00 9A 05 64 00 86 43 24 28 35 32 |82 TZ...d..C$(52|
00000160: 29 2C 53 43 24 28 35 33 29 2C 4E 24 28 33 29 2C |),SC$(53),N$(3),|
00000170: 48 24 28 33 2C 35 29 2C 48 48 28 33 2C 35 29 2C |H$(3,5),HH(3,5),|
00000180: 57 28 33 29 2C 54 28 33 29 3A 42 50 B2 31 30 33 |W(3),T(3):BP.103|
00000190: 38 3A 58 B2 BB 28 AB 54 49 29 00 BE 05 6E 00 43 |8:X..(.TI)...n.C|
000001A0: 55 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 11 |U$."............|
000001B0: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 FB |............."..|
000001C0: 05 73 00 54 28 31 29 B2 43 52 54 AA 39 AC 57 44 |.s.T(1).CRT.9.WD|
000001D0: AA 33 33 3A 54 28 32 29 B2 43 52 54 AA 39 AC 57 |.33:T(2).CRT.9.W|
000001E0: 44 AA 33 35 3A 54 28 33 29 B2 43 52 54 AA 39 AC |D.35:T(3).CRT.9.|
000001F0: 57 44 AA 33 36 3A 89 31 30 34 30 00 1D 06 78 00 |WD.36:.1040...x.|
00000200: 54 55 B2 30 3A 54 49 24 B2 22 30 30 30 30 30 30 |TU.0:TI$."000000|
00000210: 22 3A 54 4C B2 54 49 AA 31 30 30 30 30 00 3E 06 |":TL.TI.10000.>.|
00000220: 82 00 49 4E 24 B2 22 20 22 3A 5A 54 B2 54 49 3A |..IN$." ":ZT.TI:|
00000230: 5A 43 B2 32 3A 5A 44 24 B2 C7 28 32 30 29 00 52 |ZC.2:ZD$..(20).R|
00000240: 06 8C 00 A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 32 |....Z$:.Z$.."".2|
00000250: 30 30 00 60 06 96 00 8B 54 5A B2 30 A7 31 38 30 |00.`....TZ.0.180|
00000260: 00 86 06 A0 00 81 49 B2 31 A4 33 3A 97 54 28 49 |......I.1.3:.T(I|
00000270: 29 2C C5 28 CA 28 54 49 24 2C 49 AA 33 2C 31 29 |),.(.(TI$,I.3,1)|
00000280: 29 AA 34 38 3A 82 00 A8 06 AA 00 8B 54 49 B1 B2 |).48:.......TI..|
00000290: 54 4C A7 99 22 13 54 49 4D 45 27 53 20 55 50 21 |TL..".TIME'S UP!|
000002A0: 22 3A 54 55 B2 31 3A 8E 00 D8 06 B4 00 8B 5A 54 |":TU.1:.......ZT|
000002B0: B3 B2 54 49 A7 99 CA 28 22 20 A6 22 2C 5A 43 2C |..TI...(" .",ZC,|
000002C0: 31 29 3B 22 9D 22 3B 3A 5A 43 B2 33 AB 5A 43 3A |1);".";:ZC.3.ZC:|
000002D0: 5A 54 B2 54 49 AA 31 35 00 E1 06 BE 00 89 31 34 |ZT.TI.15......14|
000002E0: 30 00 14 07 C8 00 5A B2 C6 28 5A 24 29 3A 5A 4C |0.....Z..(Z$):ZL|
000002F0: B2 C3 28 49 4E 24 29 3A 8B 28 5A AF 31 32 37 29 |..(IN$):.(Z.127)|
00000300: B3 33 32 B0 5A B2 33 34 A7 99 22 20 9D 22 3B 3A |.32.Z.34.." .";:|
00000310: 89 32 34 30 00 44 07 D2 00 8B 46 4C AF 28 5A AF |.240.D....FL.(Z.|
00000320: 31 32 37 29 B1 36 34 AF 28 5A AF 31 32 37 29 B3 |127).64.(Z.127).|
00000330: 39 31 A7 5A 24 B2 C7 28 28 5A AA 31 32 38 29 AF |91.Z$..((Z.128).|
00000340: 32 35 35 29 00 53 07 DC 00 8B 5A 4C B1 34 30 A7 |255).S....ZL.40.|
00000350: 31 34 30 00 6E 07 E6 00 49 4E 24 B2 49 4E 24 AA |140.n...IN$.IN$.|
00000360: 5A 24 3A 99 5A 24 3B 5A 44 24 3B 5A 24 3B 00 8D |Z$:.Z$;ZD$;Z$;..|
00000370: 07 F0 00 8B 5A B2 31 33 A7 49 4E 24 B2 CA 28 49 |....Z.13.IN$..(I|
00000380: 4E 24 2C 32 29 3A 99 43 52 24 3B 3A 8E 00 B7 07 |N$,2):.CR$;:....|
00000390: FA 00 8B 5A B2 32 30 AF 5A 4C B1 31 A7 49 4E 24 |...Z.20.ZL.1.IN$|
000003A0: B2 C8 28 49 4E 24 2C 5A 4C AB 31 29 3A 99 22 9D |..(IN$,ZL.1):.".|
000003B0: 22 3B 3A 89 31 34 30 00 E8 07 04 01 8B 5A B2 31 |";:.140......Z.1|
000003C0: 34 31 A7 5A 24 B2 C7 28 AB 32 30 AC 28 5A 4C B1 |41.Z$..(.20.(ZL.|
000003D0: 31 29 29 3A 81 5A B2 32 A4 5A 4C 3A 99 5A 24 3B |1)):.Z.2.ZL:.Z$;|
000003E0: 3A 82 5A 3A 89 31 33 30 00 F1 07 0E 01 89 31 34 |:.Z:.130......14|
000003F0: 30 00 29 08 18 01 99 22 93 53 48 55 46 46 4C 49 |0.)....".SHUFFLI|
00000400: 4E 47 2E 2E 2E 22 3A 81 49 B2 31 A4 35 32 3A 43 |NG...":.I.1.52:C|
00000410: 24 28 49 29 B2 C9 28 C4 28 B5 28 28 49 AB 31 29 |$(I)..(.(.((I.1)|
00000420: AD 32 29 29 2C 32 29 3A 82 00 67 08 22 01 44 B2 |.2)),2):..g.".D.|
00000430: 35 33 3A 81 49 B2 31 A4 35 32 3A 44 B2 44 AB 31 |53:.I.1.52:D.D.1|
00000440: 3A 58 B2 B5 28 44 AC BB 28 31 29 AA 31 29 3A 53 |:X..(D..(1).1):S|
00000450: 43 24 28 49 29 B2 43 24 28 58 29 3A 43 24 28 58 |C$(I).C$(X):C$(X|
00000460: 29 B2 43 24 28 44 29 00 6F 08 2C 01 82 3A 8E 00 |).C$(D).o.,..:..|
00000470: 9D 08 36 01 99 22 93 11 11 48 4F 57 20 4D 41 4E |..6.."...HOW MAN|
00000480: 59 20 50 4C 41 59 45 52 53 20 28 31 2D 33 29 3F |Y PLAYERS (1-3)?|
00000490: 20 22 3B 3A 54 5A B2 30 3A 8D 31 32 30 00 BA 08 | ";:TZ.0:.120...|
000004A0: 40 01 4E 50 B2 C5 28 49 4E 24 29 3A 8B 4E 50 B3 |@.NP..(IN$):.NP.|
000004B0: 31 B0 4E 50 B1 33 A7 33 31 30 00 E9 08 54 01 81 |1.NP.3.310...T..|
000004C0: 49 B2 31 A4 4E 50 3A 99 22 11 50 4C 41 59 45 52 |I.1.NP:.".PLAYER|
000004D0: 20 23 22 3B C7 28 34 38 AA 49 29 3B 22 27 53 20 | #";.(48.I);"'S |
000004E0: 4E 41 4D 45 20 3F 20 22 3B 00 0E 09 5E 01 54 5A |NAME ? ";...^.TZ|
000004F0: B2 30 3A 8D 31 32 30 3A 8B 49 4E 24 B2 22 22 A7 |.0:.120:.IN$."".|
00000500: 49 B2 49 AB 31 3A 99 22 91 91 91 22 3A 82 00 39 |I.I.1:."...":..9|
00000510: 09 63 01 4E 24 28 49 29 B2 49 4E 24 3A 8B C3 28 |.c.N$(I).IN$:..(|
00000520: 4E 24 28 49 29 29 B1 37 A7 4E 24 28 49 29 B2 C8 |N$(I)).7.N$(I)..|
00000530: 28 4E 24 28 49 29 2C 37 29 00 41 09 68 01 82 3A |(N$(I),7).A.h..:|
00000540: 8E 00 7D 09 72 01 45 52 B2 30 3A 4C B2 30 3A 52 |..}.r.ER.0:L.0:R|
00000550: B2 30 3A 4C 53 B2 C3 28 53 24 29 3A 8B 4C 53 B3 |.0:LS..(S$):.LS.|
00000560: 39 A7 45 52 24 B2 22 13 12 45 52 52 4F 52 21 92 |9.ER$."..ERROR!.|
00000570: 20 20 20 20 20 22 3A 45 52 B2 31 3A 8E 00 94 09 | ":ER.1:....|
00000580: 7C 01 81 54 B2 31 A4 35 3A 48 48 28 50 2C 54 29 ||..T.1.5:HH(P,T)|
00000590: B2 30 3A 82 00 C0 09 86 01 81 54 B2 31 A4 4C 53 |.0:.......T.1.LS|
000005A0: 3A 4D B2 C6 28 CA 28 53 24 2C 54 2C 31 29 29 3A |:M..(.(S$,T,1)):|
000005B0: 8B 4D B2 34 30 A7 4C B2 4C AA 31 3A 89 34 34 30 |.M.40.L.L.1:.440|
000005C0: 00 D5 09 90 01 8B 4D B2 34 31 A7 52 B2 52 AA 31 |......M.41.R.R.1|
000005D0: 3A 89 34 34 30 00 ED 09 9A 01 8B 4D B2 34 32 B0 |:.440......M.42.|
000005E0: 4D B2 34 33 B0 4D B2 34 35 A7 34 35 30 00 00 0A |M.43.M.45.450...|
000005F0: A4 01 8B 4D B1 34 36 AF 4D B3 35 38 A7 34 35 30 |...M.46.M.58.450|
00000600: 00 30 0A AE 01 45 52 24 B2 22 13 12 49 4C 4C 45 |.0...ER$."..ILLE|
00000610: 47 41 4C 20 43 48 41 52 41 43 54 45 52 3A 20 22 |GAL CHARACTER: "|
00000620: AA C7 28 4D 29 AA 22 21 22 3A 45 52 B2 31 3A 8E |..(M)."!":ER.1:.|
00000630: 00 3D 0A B8 01 8B 52 B1 4C A7 34 36 30 00 44 0A |.=....R.L.460.D.|
00000640: C2 01 82 54 00 70 0A CC 01 8B 4C B3 B1 52 A7 45 |...T.p....L..R.E|
00000650: 52 24 B2 22 13 12 50 41 52 45 4E 54 48 45 53 45 |R$."..PARENTHESE|
00000660: 53 20 45 52 52 4F 52 21 22 3A 45 52 B2 31 3A 8E |S ERROR!":ER.1:.|
00000670: 00 A5 0A D6 01 53 39 B2 C6 28 C8 28 53 24 2C 31 |.....S9..(.(S$,1|
00000680: 29 29 3A 8B 53 39 B2 34 31 B0 53 39 B2 34 32 B0 |)):.S9.41.S9.42.|
00000690: 53 39 B2 34 33 B0 53 39 B2 34 35 B0 53 39 B2 34 |S9.43.S9.45.S9.4|
000006A0: 37 A7 35 39 30 00 D4 0A E0 01 81 54 B2 31 A4 4C |7.590......T.1.L|
000006B0: 53 AB 31 3A 4D B2 C6 28 CA 28 53 24 2C 54 2C 31 |S.1:M..(.(S$,T,1|
000006C0: 29 29 3A 4D 31 B2 C6 28 CA 28 53 24 2C 54 AA 31 |)):M1..(.(S$,T.1|
000006D0: 2C 31 29 29 00 02 0B EA 01 8B 4D B2 34 30 AF 28 |,1))......M.40.(|
000006E0: 4D 31 B2 34 31 B0 4D 31 B2 34 33 B0 4D 31 B2 34 |M1.41.M1.43.M1.4|
000006F0: 35 B0 4D 31 B2 34 32 B0 4D 31 B2 34 37 29 A7 35 |5.M1.42.M1.47).5|
00000700: 39 30 00 26 0B F4 01 8B 4D B2 34 31 AF 28 4D 31 |90.&....M.41.(M1|
00000710: B2 34 30 B0 28 4D 31 B1 34 37 AF 4D 31 B3 35 38 |.40.(M1.47.M1.58|
00000720: 29 29 A7 35 39 30 00 54 0B FE 01 8B 4D B2 34 33 |)).590.T....M.43|
00000730: AF 28 4D 31 B2 34 31 B0 4D 31 B2 34 33 B0 4D 31 |.(M1.41.M1.43.M1|
00000740: B2 34 35 B0 4D 31 B2 34 32 B0 4D 31 B2 34 37 29 |.45.M1.42.M1.47)|
00000750: A7 35 39 30 00 82 0B 08 02 8B 4D B2 34 35 AF 28 |.590......M.45.(|
00000760: 4D 31 B2 34 31 B0 4D 31 B2 34 33 B0 4D 31 B2 34 |M1.41.M1.43.M1.4|
00000770: 35 B0 4D 31 B2 34 32 B0 4D 31 B2 34 37 29 A7 35 |5.M1.42.M1.47).5|
00000780: 39 30 00 B0 0B 12 02 8B 4D B2 34 32 AF 28 4D 31 |90......M.42.(M1|
00000790: B2 34 31 B0 4D 31 B2 34 33 B0 4D 31 B2 34 35 B0 |.41.M1.43.M1.45.|
000007A0: 4D 31 B2 34 32 B0 4D 31 B2 34 37 29 A7 35 39 30 |M1.42.M1.47).590|
000007B0: 00 DE 0B 1C 02 8B 4D B2 34 37 AF 28 4D 31 B2 34 |......M.47.(M1.4|
000007C0: 31 B0 4D 31 B2 34 33 B0 4D 31 B2 34 35 B0 4D 31 |1.M1.43.M1.45.M1|
000007D0: B2 34 32 B0 4D 31 B2 34 37 29 A7 35 39 30 00 F9 |.42.M1.47).590..|
000007E0: 0B 26 02 8B 28 4D B1 34 37 AF 4D B3 35 38 29 AF |.&..(M.47.M.58).|
000007F0: 4D 31 B2 34 30 A7 35 39 30 00 00 0C 30 02 82 54 |M1.40.590...0..T|
00000800: 00 35 0C 3A 02 53 39 B2 C6 28 C9 28 53 24 2C 31 |.5.:.S9..(.(S$,1|
00000810: 29 29 3A 8B 53 39 B2 34 30 B0 53 39 B2 34 33 B0 |)):.S9.40.S9.43.|
00000820: 53 39 B2 34 35 B0 53 39 B2 34 32 B0 53 39 B2 34 |S9.45.S9.42.S9.4|
00000830: 37 A7 35 39 30 00 3E 0C 44 02 89 36 30 30 00 5F |7.590.>.D..600._|
00000840: 0C 4E 02 45 52 24 B2 22 13 12 53 59 4E 54 41 58 |.N.ER$."..SYNTAX|
00000850: 20 45 52 52 4F 52 21 22 3A 45 52 B2 31 3A 8E 00 | ERROR!":ER.1:..|
00000860: 89 0C 58 02 4E 48 B2 30 3A 81 54 B2 31 A4 4C 53 |..X.NH.0:.T.1.LS|
00000870: 3A 4D B2 C6 28 CA 28 53 24 2C 54 2C 31 29 29 3A |:M..(.(S$,T,1)):|
00000880: 8B 4D B3 34 38 A7 36 39 30 00 9F 0C 62 02 56 B2 |.M.48.690...b.V.|
00000890: 4D AB 34 38 3A 8B 54 B1 B2 4C 53 A7 36 36 30 00 |M.48:.T..LS.660.|
000008A0: C0 0C 6C 02 4D 31 B2 C6 28 CA 28 53 24 2C 54 AA |..l.M1..(.(S$,T.|
000008B0: 31 2C 31 29 29 3A 8B 4D 31 B3 34 38 A7 36 34 30 |1,1)):.M1.48.640|
000008C0: 00 D9 0C 76 02 56 B2 31 30 AC 56 AA 28 4D 31 AB |...v.V.10.V.(M1.|
000008D0: 34 38 29 3A 54 B2 54 AA 31 00 E8 0C 80 02 8B 54 |48):T.T.1......T|
000008E0: B1 B2 4C 53 A7 36 36 30 00 06 0D 8A 02 8B 56 B1 |..LS.660......V.|
000008F0: 39 AF C5 28 CA 28 53 24 2C 54 AA 31 2C 31 29 29 |9..(.(S$,T.1,1))|
00000900: B1 30 A7 37 30 30 00 1E 0D 94 02 81 55 B2 31 A4 |.0.700......U.1.|
00000910: 35 3A 8B 48 48 28 50 2C 55 29 A7 36 38 30 00 48 |5:.HH(P,U).680.H|
00000920: 0D 9E 02 8B 56 B2 C5 28 48 24 28 50 2C 55 29 29 |....V..(H$(P,U))|
00000930: A7 4E 48 B2 4E 48 AA 31 3A 48 48 28 50 2C 55 29 |.NH.NH.1:HH(P,U)|
00000940: B2 AB 31 3A 89 36 39 30 00 54 0D A8 02 82 55 3A |..1:.690.T....U:|
00000950: 89 37 30 30 00 63 0D B2 02 82 54 3A 8B 4E 48 B2 |.700.c....T:.NH.|
00000960: 35 A7 8E 00 96 0D BC 02 45 52 24 B2 22 13 12 54 |5.......ER$."..T|
00000970: 48 45 22 AA C4 28 56 29 AA 22 20 43 41 52 44 20 |HE"..(V)." CARD |
00000980: 49 53 20 4E 4F 54 20 49 4E 20 48 41 4E 44 22 3A |IS NOT IN HAND":|
00000990: 45 52 B2 31 3A 8E 00 C8 0D C6 02 43 B2 31 3A 81 |ER.1:......C.1:.|
000009A0: 4A B2 31 A4 35 3A 81 49 B2 31 A4 4E 50 3A 48 24 |J.1.5:.I.1.NP:H$|
000009B0: 28 49 2C 4A 29 B2 53 43 24 28 43 29 3A 43 B2 43 |(I,J).SC$(C):C.C|
000009C0: AA 31 3A 82 3A 82 3A 8E 00 FE 0D D0 02 81 4A B2 |.1:.:.:.......J.|
000009D0: 31 A4 35 3A 99 22 B0 C0 C0 AE 11 9D 9D 9D 9D DD |1.5:."..........|
000009E0: 22 3B 48 24 28 49 2C 4A 29 3B 22 DD 11 9D 9D 9D |";H$(I,J);".....|
000009F0: 9D AD C0 C0 BD 1D 91 91 22 3B 3A 82 3A 8E 00 33 |........";:.:..3|
00000A00: 0E DA 02 81 49 B2 31 A4 4E 50 3A 99 C8 28 43 55 |....I.1.NP:..(CU|
00000A10: 24 2C 39 AA 34 AC 49 29 3B A3 38 AB C3 28 4E 24 |$,9.4.I);.8..(N$|
00000A20: 28 49 29 29 29 22 12 11 22 4E 24 28 49 29 22 92 |(I)))".."N$(I)".|
00000A30: 91 22 3B 00 4F 0E E4 02 99 A3 39 29 3B 3A 8D 37 |.";.O.....9);:.7|
00000A40: 32 30 3A 8B 4E 50 B2 31 A7 99 3A 89 37 36 30 00 |20:.NP.1..:.760.|
00000A50: 64 0E EE 02 99 22 11 57 4F 4E 11 9D 9D 9D 22 3B |d....".WON....";|
00000A60: 57 28 49 29 00 6C 0E F8 02 82 3A 8E 00 7E 0E 02 |W(I).l....:..~..|
00000A70: 03 99 22 13 22 3B 3A 81 41 B2 31 A4 4C 4E 00 B1 |..".";:.A.1.LN..|
00000A80: 0E 0C 03 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
00000A90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000AA0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 3A | ":.:|
00000AB0: 8E 00 D1 0E 16 03 99 22 93 11 11 11 11 11 11 22 |......."......."|
00000AC0: 3B 3A 81 49 B2 31 A4 33 39 3A 99 22 A8 22 3B 3A |;:.I.1.39:.".";:|
00000AD0: 82 00 EB 0E 20 03 81 49 B2 31 A4 35 AA 34 AC 4E |.... ..I.1.5.4.N|
00000AE0: 50 3A 99 22 11 9D A6 22 3B 3A 82 00 08 0F 2A 03 |P:."...";:....*.|
00000AF0: 81 49 B2 31 A4 33 37 3A 99 22 9D 9D A8 22 3B 3A |.I.1.37:."...";:|
00000B00: 82 3A 99 22 9D 9D 22 3B 00 22 0F 34 03 81 49 B2 |.:."..";.".4..I.|
00000B10: 31 A4 35 AA 34 AC 4E 50 3A 99 22 A6 91 9D 22 3B |1.5.4.NP:."...";|
00000B20: 3A 82 00 41 0F 3E 03 81 49 B2 31 A4 4E 50 3A 99 |:..A.>..I.1.NP:.|
00000B30: C8 28 43 55 24 2C 38 AA 34 AC 49 29 3B 22 1D 22 |.(CU$,8.4.I);"."|
00000B40: 3B 00 72 0F 48 03 99 22 A8 A8 A8 A8 A8 A8 A8 A8 |;.r.H.."........|
00000B50: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 |................|
00000B60: A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 A8 22 3A 82 |.............":.|
00000B70: 3A 8E 00 AC 0F 52 03 54 41 24 B2 22 AC A2 A2 BB |:....R.TA$."....|
00000B80: 11 9D 9D 9D 9D 12 A1 22 AA 53 43 24 28 43 29 AA |.......".SC$(C).|
00000B90: 22 92 A1 11 9D 9D 9D 9D BC 12 A2 A2 92 BE 22 3A |".............":|
00000BA0: 54 41 B2 C5 28 53 43 24 28 43 29 29 00 D5 0F 5C |TA..(SC$(C))...\|
00000BB0: 03 54 42 24 B2 22 B0 C0 C0 AE 11 9D 9D 9D 9D DD |.TB$."..........|
00000BC0: 22 AA 53 43 24 28 43 29 AA 22 DD 11 9D 9D 9D 9D |".SC$(C)."......|
00000BD0: AD C0 C0 BD 22 00 11 10 66 03 99 22 13 11 11 11 |...."...f.."....|
00000BE0: 11 11 11 11 22 3B A3 31 34 29 22 A6 11 9D A6 11 |....";.14)".....|
00000BF0: 9D A6 11 9D A6 11 9D A6 91 91 91 91 22 3B A3 32 |............";.2|
00000C00: 36 29 22 A6 11 9D A6 11 9D A6 11 9D A6 11 9D A6 |6)".............|
00000C10: 22 00 47 10 70 03 99 C8 28 43 55 24 2C 31 30 29 |".G.p...(CU$,10)|
00000C20: 3B A3 32 29 22 54 41 52 47 45 54 22 3B A3 31 36 |;.2)"TARGET";.16|
00000C30: 29 22 44 45 43 4B 22 3B A3 32 38 29 22 54 49 4D |)"DECK";.28)"TIM|
00000C40: 45 20 30 3A 30 30 22 00 6E 10 7A 03 81 49 B2 31 |E 0:00".n.z..I.1|
00000C50: A4 35 3A 99 C8 28 43 55 24 2C 39 29 3B A3 39 29 |.5:..(CU$,9);.9)|
00000C60: 54 42 24 3A 81 54 B2 31 A4 32 30 30 3A 82 00 92 |TB$:.T.1.200:...|
00000C70: 10 84 03 99 C8 28 43 55 24 2C 39 29 3B A3 39 29 |.....(CU$,9);.9)|
00000C80: 54 41 24 3A 81 54 B2 31 A4 32 30 30 3A 82 54 3A |TA$:.T.1.200:.T:|
00000C90: 82 49 00 CE 10 8E 03 43 B2 43 AA 31 3A 99 C8 28 |.I.....C.C.1:..(|
00000CA0: 43 55 24 2C 39 29 3B A3 32 31 29 3B 22 B0 C0 C0 |CU$,9);.21);"...|
00000CB0: AE 11 9D 9D 9D 9D DD 22 3B 53 43 24 28 43 29 3B |.......";SC$(C);|
00000CC0: 22 DD 11 9D 9D 9D 9D AD C0 C0 BD 22 3A 8E 00 10 |"..........":...|
00000CD0: 11 98 03 99 22 13 11 11 11 11 44 49 53 43 41 52 |....".....DISCAR|
00000CE0: 44 20 57 48 49 43 48 20 43 41 52 44 3F 20 20 20 |D WHICH CARD? |
00000CF0: 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 54 | .......";:T|
00000D00: 5A B2 30 3A 8D 31 32 30 3A 44 43 24 B2 49 4E 24 |Z.0:.120:DC$.IN$|
00000D10: 00 54 11 9D 03 8B 49 4E 24 B2 22 30 22 A7 99 22 |.T....IN$."0".."|
00000D20: 91 91 22 43 52 24 22 20 20 20 20 20 20 20 20 20 |.."CR$" |
00000D30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000D40: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 89 | ":.|
00000D50: 31 30 38 30 00 7B 11 A2 03 81 54 B2 31 A4 35 3A |1080.{....T.1.5:|
00000D60: 8B C5 28 48 24 28 50 2C 54 29 29 B2 C5 28 44 43 |..(H$(P,T))..(DC|
00000D70: 24 29 A7 44 B2 54 3A 89 39 35 30 00 86 11 AC 03 |$).D.T:.950.....|
00000D80: 82 3A 89 39 32 30 00 A5 11 B6 03 48 24 28 50 2C |.:.920.....H$(P,|
00000D90: 44 29 B2 53 43 24 28 43 29 3A 8D 39 31 30 3A 8D |D).SC$(C):.910:.|
00000DA0: 37 33 30 3A 8E 00 C7 11 C0 03 97 42 50 AA 31 2C |730:.......BP.1,|
00000DB0: 34 38 3A 81 58 B2 32 A4 37 33 3A 97 42 50 AA 58 |48:.X.2.73:.BP.X|
00000DC0: 2C 35 38 3A 82 3A 8E 00 F6 11 CA 03 8D 39 36 30 |,58:.:.......960|
00000DD0: 3A 81 58 B2 31 A4 C3 28 53 24 29 3A 4D B2 C6 28 |:.X.1..(S$):M..(|
00000DE0: CA 28 53 24 2C 58 2C 31 29 29 3A 8B 4D B2 34 33 |.(S$,X,1)):.M.43|
00000DF0: A7 4D B2 31 37 30 00 06 12 D4 03 8B 4D B2 34 35 |.M.170......M.45|
00000E00: A7 4D B2 31 37 31 00 16 12 DE 03 8B 4D B2 34 32 |.M.171......M.42|
00000E10: A7 4D B2 31 37 32 00 26 12 E8 03 8B 4D B2 34 37 |.M.172.&....M.47|
00000E20: A7 4D B2 31 37 33 00 36 12 F2 03 97 42 50 AA 58 |.M.173.6....BP.X|
00000E30: 2C 4D 3A 82 3A 8E 00 51 12 FC 03 81 58 B2 31 A4 |,M:.:..Q....X.1.|
00000E40: 33 3A 99 45 52 24 3A 81 59 B2 31 A4 37 35 30 3A |3:.ER$:.Y.1.750:|
00000E50: 82 00 83 12 06 04 99 22 13 20 20 20 20 20 20 20 |.......". |
00000E60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000E70: 20 20 20 22 3A 81 59 B2 31 A4 32 35 30 3A 82 3A | ":.Y.1.250:.:|
00000E80: 82 3A 8E 00 9D 12 10 04 81 49 B2 31 A4 4E 50 3A |.:.......I.1.NP:|
00000E90: 57 28 49 29 B2 30 3A 82 3A 8D 33 31 30 00 BA 12 |W(I).0:.:.310...|
00000EA0: 1A 04 8D 32 38 30 3A 8D 37 31 30 3A 8D 37 39 30 |...280:.710:.790|
00000EB0: 3A 8D 37 33 30 3A 8D 38 35 30 00 D0 12 24 04 81 |:.730:.850...$..|
00000EC0: 50 B2 31 A4 4E 50 3A 4C 4E B2 36 3A 8D 37 37 30 |P.1.NP:LN.6:.770|
00000ED0: 00 F6 12 2E 04 8B 4E 50 B1 31 A7 99 22 13 11 11 |......NP.1.."...|
00000EE0: 49 54 27 53 20 22 3B 4E 24 28 50 29 22 27 53 20 |IT'S ";N$(P)"'S |
00000EF0: 54 55 52 4E 2E 22 00 1F 13 38 04 99 22 13 11 11 |TURN."...8.."...|
00000F00: 11 11 59 4F 55 52 20 50 4C 41 59 3F 20 22 3B 3A |..YOUR PLAY? ";:|
00000F10: 54 5A B2 31 3A 8B 4E 50 B2 31 A7 54 5A B2 30 00 |TZ.1:.NP.1.TZ.0.|
00000F20: 3F 13 42 04 8D 31 32 30 3A 8B 54 55 A7 81 44 4C |?.B..120:.TU..DL|
00000F30: B2 31 A4 32 30 30 30 3A 82 3A 89 31 31 39 30 00 |.1.2000:.:.1190.|
00000F40: 5D 13 4C 04 53 24 B2 49 4E 24 3A 8B 53 24 B2 22 |].L.S$.IN$:.S$."|
00000F50: 43 22 A7 8D 39 32 30 3A 89 31 31 39 30 00 6E 13 |C"..920:.1190.n.|
00000F60: 56 04 8B 53 24 B2 22 51 22 A7 31 32 32 30 00 A1 |V..S$."Q".1220..|
00000F70: 13 60 04 99 22 13 43 48 45 43 4B 49 4E 47 2E 2E |.`..".CHECKING..|
00000F80: 2E 22 3A 8D 33 37 30 3A 8B 45 52 A7 8D 31 30 32 |.":.370:.ER..102|
00000F90: 30 3A 4C 4E B2 35 3A 8D 37 37 30 3A 89 31 30 37 |0:LN.5:.770:.107|
00000FA0: 30 00 AF 13 6A 04 4C 4E B2 35 3A 8D 37 37 30 00 |0...j.LN.5:.770.|
00000FB0: D8 13 74 04 99 22 13 22 3B 53 24 3B 22 20 3D 22 |..t..".";S$;" ="|
00000FC0: 3B 3A 8D 39 37 30 3A 8D 32 30 3A 99 53 3A 8B 53 |;:.970:.20:.S:.S|
00000FD0: B2 54 41 A7 31 31 37 30 00 05 14 7E 04 99 22 13 |.TA.1170...~..".|
00000FE0: 11 11 53 4F 52 52 59 2C 20 22 3B 4E 24 28 50 29 |..SORRY, ";N$(P)|
00000FF0: 3B 22 2C 20 54 48 41 54 27 53 20 49 4E 43 4F 52 |;", THAT'S INCOR|
00001000: 52 45 43 54 2E 00 1C 14 88 04 81 44 4C B2 31 A4 |RECT.......DL.1.|
00001010: 35 30 30 30 3A 82 3A 89 31 31 39 30 00 32 14 92 |5000:.:.1190.2..|
00001020: 04 99 22 13 11 11 59 4F 55 20 47 4F 54 20 49 54 |.."...YOU GOT IT|
00001030: 21 22 00 67 14 9C 04 99 22 43 4F 4E 47 52 41 54 |!".g...."CONGRAT|
00001040: 55 4C 41 54 49 4F 4E 53 2C 20 22 3B 4E 24 28 50 |ULATIONS, ";N$(P|
00001050: 29 3B 22 21 22 3A 57 28 50 29 B2 57 28 50 29 AA |);"!":W(P).W(P).|
00001060: 31 3A 89 31 32 30 30 00 74 14 A6 04 82 50 3A 89 |1:.1200.t....P:.|
00001070: 31 30 36 30 00 9C 14 B0 04 99 22 11 57 41 4E 54 |1060......".WANT|
00001080: 20 54 4F 20 50 4C 41 59 20 41 47 41 49 4E 3F 20 | TO PLAY AGAIN? |
00001090: 22 3B 3A 54 5A B2 30 3A 8D 31 32 30 00 BA 14 BA |";:TZ.0:.120....|
000010A0: 04 8B 49 4E 24 B2 22 22 B0 C8 28 49 4E 24 2C 31 |..IN$.""..(IN$,1|
000010B0: 29 B2 22 59 22 A7 31 32 38 30 00 CE 14 C4 04 99 |)."Y".1280......|
000010C0: 22 93 22 3A 8B 4E 50 B2 31 A7 31 32 37 30 00 F5 |".":.NP.1.1270..|
000010D0: 14 CE 04 81 58 B2 31 A4 4E 50 AB 31 3A 81 59 B2 |....X.1.NP.1:.Y.|
000010E0: 58 A4 4E 50 3A 8B 57 28 58 29 B1 B2 57 28 59 29 |X.NP:.W(X)..W(Y)|
000010F0: A7 31 32 35 30 00 2F 15 D8 04 54 B2 57 28 58 29 |.1250./...T.W(X)|
00001100: 3A 54 24 B2 4E 24 28 58 29 3A 57 28 58 29 B2 57 |:T$.N$(X):W(X).W|
00001110: 28 59 29 3A 4E 24 28 58 29 B2 4E 24 28 59 29 3A |(Y):N$(X).N$(Y):|
00001120: 57 28 59 29 B2 54 3A 4E 24 28 59 29 B2 54 24 00 |W(Y).T:N$(Y).T$.|
00001130: 37 15 E2 04 82 3A 82 00 6A 15 EC 04 99 22 11 11 |7....:..j...."..|
00001140: 46 49 4E 41 4C 20 53 54 41 4E 44 49 4E 47 53 11 |FINAL STANDINGS.|
00001150: 11 22 3A 81 49 B2 31 A4 4E 50 3A 99 4E 24 28 49 |.":.I.1.NP:.N$(I|
00001160: 29 2C 57 28 49 29 3A 99 3A 82 00 75 15 F6 04 8D |),W(I):.:..u....|
00001170: 39 36 30 3A 80 00 84 15 00 05 8B 4E 50 B2 31 A7 |960:.......NP.1.|
00001180: 31 30 35 30 00 A0 15 0A 05 54 24 B2 4E 24 28 31 |1050.....T$.N$(1|
00001190: 29 3A 54 B2 57 28 31 29 3A 81 49 B2 32 A4 4E 50 |):T.W(1):.I.2.NP|
000011A0: 00 D8 15 14 05 4E 24 28 49 AB 31 29 B2 4E 24 28 |.....N$(I.1).N$(|
000011B0: 49 29 3A 57 28 49 AB 31 29 B2 57 28 49 29 3A 82 |I):W(I.1).W(I):.|
000011C0: 3A 4E 24 28 4E 50 29 B2 54 24 3A 57 28 4E 50 29 |:N$(NP).T$:W(NP)|
000011D0: B2 54 3A 89 31 30 35 30 00 F0 15 F0 EB 43 52 54 |.T:.1050.....CRT|
000011E0: B2 33 32 37 36 38 3A 43 52 24 B2 C7 28 31 33 29 |.32768:CR$..(13)|
000011F0: 00 22 16 FA EB 57 44 B2 34 30 3A 97 43 52 54 2C |."...WD.40:.CRT,|
00001200: 39 36 3A 8B C2 28 43 52 54 AA 31 30 32 34 29 B3 |96:..(CRT.1024).|
00001210: B1 39 36 A7 57 44 B2 38 30 3A 99 C7 28 31 34 32 |.96.WD.80:..(142|
00001220: 29 3B 00 58 16 FF EB 8B 57 44 B2 38 30 A7 99 22 |);.X....WD.80.."|
00001230: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001240: 11 11 11 11 11 11 11 11 11 11 22 3B A3 33 39 29 |..........";.39)|
00001250: 3B C7 28 31 34 33 29 3B 00 84 16 30 F2 99 22 93 |;.(143);...0..".|
00001260: 11 11 22 3B A3 31 35 AB C3 28 50 47 24 29 29 3B |..";.15..(PG$));|
00001270: 50 47 24 3B 22 20 20 42 59 20 47 41 52 59 20 4D |PG$;" BY GARY M|
00001280: 41 52 53 41 00 B4 16 3A F2 99 22 11 20 20 20 20 |ARSA...:..". |
00001290: 20 43 55 52 53 4F 52 20 23 22 3B 4E 4D 24 3B 22 | CURSOR #";NM$;"|
000012A0: 20 20 43 4F 50 59 52 49 47 48 54 20 28 43 29 20 | COPYRIGHT (C) |
000012B0: 31 39 38 32 00 CB 16 44 F2 81 49 B2 31 A4 31 30 |1982...D..I.1.10|
000012C0: 3A 99 22 C0 C0 C0 C0 22 3B 3A 82 00 F6 16 4E F2 |:."....";:....N.|
000012D0: 99 22 11 47 49 56 45 4E 20 54 48 45 20 41 4E 53 |.".GIVEN THE ANS|
000012E0: 57 45 52 2C 20 46 49 4E 44 20 54 48 45 20 50 52 |WER, FIND THE PR|
000012F0: 4F 42 4C 45 4D 21 00 17 17 58 F2 99 22 11 11 11 |OBLEM!...X.."...|
00001300: 50 52 45 53 53 20 12 52 45 54 55 52 4E 92 20 54 |PRESS .RETURN. T|
00001310: 4F 20 42 45 47 49 4E 00 2C 17 62 F2 A1 54 24 3A |O BEGIN.,.b..T$:|
00001320: 8B 54 24 B2 22 22 A7 36 32 30 35 30 00 44 17 6C |.T$."".62050.D.l|
00001330: F2 99 22 93 22 3A 43 52 24 B2 C7 28 31 33 29 3A |..".":CR$..(13):|
00001340: 89 31 30 30 00 00 00 |.100... |
.......40.Y...S.0:::::::::::::::::::::::
::::::::::::::::::::::::::::::::::::::::
:::::::::._.......(..:.59468,12:PG$."KRY
PTO":NM$."29":.60400...-." GARY MARSA...
2." 320 TERRACE APT 2S.O.7." FLUSHING, M
I 48433.U.A."...F." CURSOR #29, FEB, 198
2...K." COPYRIGHT(C)1982 THE CODE WORKS.
8.P." BOX 550, GOLETA, CA. 93116.>.U.".U
.Z." AS OF 2-16-82 TZ...D..C$(52),SC$(53
),N$(3),H$(3,5),HH(3,5),W(3),T(3):BP.103
8:X..(.TI)...N.CU$."....................
....."...S.T(1).CRT.9.WD.33:T(2).CRT.9.W
D.35:T(3).CRT.9.WD.36:.1040...X.TU.0:TI$
."000000":TL.TI.10000.>...IN$." ":ZT.TI:
ZC.2:ZD$.G(20).R....Z$:.Z$.."".200.`....
TZ.0.180... ..I.1.3:.T(I),E(J(TI$,I.3,1)
).48:.......TI..TL..".TIME'S UP!":TU.1:.
.X....ZT..TI..J(" .",ZC,1);".";:ZC.3.ZC:
ZT.TI.15......140...H.Z.F(Z$):ZL.C(IN$):
.(Z.127).32.Z.34.." .";:.240.D.R..FL.(Z.
127).64.(Z.127).91.Z$.G((Z.128).255).S..
..ZL.40.140.N...IN$.IN$.Z$:.Z$;ZD$;Z$;..
....Z.13.IN$.J(IN$,2):.CR$;:.......Z.20.
ZL.1.IN$.H(IN$,ZL.1):.".";:.140......Z.1
41.Z$.G(.20.(ZL.1)):.Z.2.ZL:.Z$;:.Z:.130
......140.)....".SHUFFLING...":.I.1.52:C
$(I).I(D(.((I.1).2)),2):..G.".D.53:.I.1.
52:D.D.1:X..(D..(1).1):SC$(I).C$(X):C$(X
).C$(D).O.,..:....6.."...HOW MANY PLAYER
S (1-3)? ";:TZ.0:.120...@.NP.E(IN$):.NP.
1.NP.3.310...T..I.1.NP:.".PLAYER #";G(48
.I);"'S NAME ? ";...^.TZ.0:.120:.IN$."".
I.I.1:."...":..9.C.N$(I).IN$:.C(N$(I)).7
.N$(I).H(N$(I),7).A.H..:..}.R.ER.0:L.0:R
.0:LS.C(S$):.LS.9.ER$."..ERROR!. ":E
R.1:....|..T.1.5:HH(P,T).0:.......T.1.LS
:M.F(J(S$,T,1)):.M.40.L.L.1:.440.U....M.
41.R.R.1:.440......M.42.M.43.M.45.450...
...M.46.M.58.450.0...ER$."..ILLEGAL CHAR
ACTER: ".G(M)."!":ER.1:..=....R.L.460.D.
B..T.P.L..L..R.ER$."..PARENTHESES ERROR!
":ER.1:....V.S9.F(H(S$,1)):.S9.41.S9.42.
S9.43.S9.45.S9.47.590.T....T.1.LS.1:M.F(
J(S$,T,1)):M1.F(J(S$,T.1,1))......M.40.(
M1.41.M1.43.M1.45.M1.42.M1.47).590.&....
M.41.(M1.40.(M1.47.M1.58)).590.T....M.43
.(M1.41.M1.43.M1.45.M1.42.M1.47).590....
..M.45.(M1.41.M1.43.M1.45.M1.42.M1.47).5
90......M.42.(M1.41.M1.43.M1.45.M1.42.M1
.47).590......M.47.(M1.41.M1.43.M1.45.M1
.42.M1.47).590...&..(M.47.M.58).M1.40.59
0...0..T.5.:.S9.F(I(S$,1)):.S9.40.S9.43.
S9.45.S9.42.S9.47.590.>.D..600._.N.ER$."
..SYNTAX ERROR!":ER.1:....X.NH.0:.T.1.LS
:M.F(J(S$,T,1)):.M.48.690...B.V.M.48:.T.
.LS.660...L.M1.F(J(S$,T.1,1)):.M1.48.640
.Y.V.V.10.V.(M1.48):T.T.1......T..LS.660
......V.9.E(J(S$,T.1,1)).0.700......U.1.
5:.HH(P,U).680.H....V.E(H$(P,U)).NH.NH.1
:HH(P,U)..1:.690.T....U:.700.C....T:.NH.
5.......ER$."..THE".D(V)." CARD IS NOT I
N HAND":ER.1:..H.F.C.1:.J.1.5:.I.1.NP:H$
(I,J).SC$(C):C.C.1:.:.:....P..J.1.5:."..
........";H$(I,J);".............";:.:..3
.Z..I.1.NP:.H(CU$,9.4.I);.8.C(N$(I)))"..
"N$(I)"..";.O.....9);:.720:.NP.1..:.760.
D....".WON....";W(I).L....:..~....".";:.
A.1.LN......"
":.:..Q....".......";:.I.1.3
9:.".";:.... ..I.1.5.4.NP:."...";:....*.
.I.1.37:."...";:.:."..";.".4..I.1.5.4.NP
:."...";:..A.>..I.1.NP:.H(CU$,8.4.I);"."
;.R.H.."................................
.....":.:....R.TA$."...........".SC$(C).
".............":TA.E(SC$(C)).U.\.TB$."..
........".SC$(C).".........."...F.."....
....";.14)".................";.26)".....
........".G.P..H(CU$,10);.2)"TARGET";.16
)"DECK";.28)"TIME 0:00".N.Z..I.1.5:.H(CU
$,9);.9)TB$:.T.1.200:.......H(CU$,9);.9)
TA$:.T.1.200:.T:.I.N...C.C.1:.H(CU$,9);.
21);"..........";SC$(C);"..........":...
....".....DISCARD WHICH CARD? ...
....";:TZ.0:.120:DC$.IN$.T....IN$."0".."
.."CR$"
":.1080.{....T.1.5:.E(H$(P,T)).E(DC
$).D.T:.950......:.920.....H$(P,D).SC$(C
):.910:.730:..G....BP.1,48:.X.2.73:.BP.X
,58:.:....J..960:.X.1.C(S$):M.F(J(S$,X,1
)):.M.43.M.170...T..M.45.M.171......M.42
.M.172.&....M.47.M.173.6....BP.X,M:.:..Q
....X.1.3:.ER$:.Y.1.750:.......".
":.Y.1.250:.:.:......
.I.1.NP:W(I).0:.:.310......280:.710:.790
:.730:.850.P.$..P.1.NP:LN.6:.770......NP
.1.."...IT'S ";N$(P)"'S TURN."...8.."...
..YOUR PLAY? ";:TZ.1:.NP.1.TZ.0.?.B..120
:.TU..DL.1.2000:.:.1190.].L.S$.IN$:.S$."
C"..920:.1190.N.V..S$."Q".1220...`..".CH
ECKING...":.370:.ER..1020:LN.5:.770:.107
0...J.LN.5:.770.X.T..".";S$;" =";:.970:.
20:.S:.S.TA.1170...~.."...SORRY, ";N$(P)
;", THAT'S INCORRECT.......DL.1.5000:.:.
1190.2...."...YOU GOT IT!".G...."CONGRAT
ULATIONS, ";N$(P);"!":W(P).W(P).1:.1200.
T....P:.1060......".WANT TO PLAY AGAIN?
";:TZ.0:.120......IN$."".H(IN$,1)."Y".12
80.N.D..".":.NP.1.1270...N..X.1.NP.1:.Y.
X.NP:.W(X)..W(Y).1250./.X.T.W(X):T$.N$(X
):W(X).W(Y):N$(X).N$(Y):W(Y).T:N$(Y).T$.
7....:..J...."..FINAL STANDINGS..":.I.1.
NP:.N$(I),W(I):.:..U....960:.......NP.1.
1050. ...T$.N$(1):T.W(1):.I.2.NP.X...N$(
I.1).N$(I):W(I.1).W(I):.:N$(NP).T$:W(NP)
.T:.1050.....CRT.32768:CR$.G(13)."...WD.
40:.CRT,96:.B(CRT.1024)..96.WD.80:.G(142
);.X....WD.80.."........................
..";.39);G(143);...0.."...";.15.C(PG$));
PG$;" BY GARY MARSA...:..". CURSOR
#";NM$;" COPYRIGHT (C) 1982.K.D..I.1.10
:."....";:....N..".GIVEN THE ANSWER, FIN
D THE PROBLEM!...X.."...PRESS .RETURN. T
O BEGIN.,.B..T$:.T$."".62050.D.L..".":CR
$.G(13):.100...
> CLICK IMAGE PREVIEW FOR FULL MODAL