CONCENTRATION
FILE INFORMATION
FILENAME(S): CONCENTRATION
FILE TYPE(S): PRG
FILE SIZE: 13.7K
FIRST SEEN: 2025-12-02 02:02:35
APPEARS ON: 1 disk(s)
FILE HASH
c6685c62819972070157139dd4c52c895fb982b54e4f1ca73d85fe1e0d8962c2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MD1D | CONCENTRATION | PRG | Paladin | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 85 90 EA A9 04 85 91 EA 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 9B 4C 58 E4 78 A9 55 85 90 EA A9 E4 |.....LX.x.U.....|
00000050: 85 91 EA 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A 00 E4 08 23 00 8F 20 2B |UTINE **...#.. +|
000000D0: 2B 2B 20 49 4E 50 55 54 20 53 45 43 54 49 4F 4E |++ INPUT SECTION|
000000E0: 20 2B 2B 2B 00 FC 08 28 00 97 55 4F 2C 30 3A 55 | +++...(..UO,0:U|
000000F0: 52 24 B2 22 22 3A 55 49 24 B2 22 22 00 0C 09 2A |R$."":UI$.""...*|
00000100: 00 8B 55 4C B2 30 A7 55 4C B2 38 30 00 16 09 2D |..UL.0.UL.80...-|
00000110: 00 97 55 43 2C 30 00 2A 09 32 00 A1 55 49 24 3A |..UC,0.*.2..UI$:|
00000120: 8B 55 49 24 B2 22 22 A7 35 30 00 54 09 37 00 8B |.UI$."".50.T.7..|
00000130: 55 49 24 B2 C7 28 31 33 29 AF C3 28 55 52 24 29 |UI$..(13)..(UR$)|
00000140: B1 B2 31 A7 97 55 43 2C 31 3A 99 22 20 9D 22 3B |..1..UC,1:." .";|
00000150: 3A 89 38 35 00 67 09 3C 00 8B 55 49 24 B2 C7 28 |:.85.g.<..UI$..(|
00000160: 32 30 29 A7 31 30 35 00 7B 09 3E 00 8B 20 C3 28 |20).105.{.>.. .(|
00000170: 55 52 24 29 B2 B1 55 4C A7 35 30 00 A0 09 41 00 |UR$)..UL.50...A.|
00000180: 8D 31 32 30 3A 8F 20 43 48 45 43 4B 20 46 4F 52 |.120:. CHECK FOR|
00000190: 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 | VALID CHARACTER|
000001A0: 00 B0 09 46 00 55 52 24 B2 55 52 24 AA 55 49 24 |...F.UR$.UR$.UI$|
000001B0: 00 BA 09 4B 00 99 55 49 24 3B 00 C2 09 50 00 89 |...K..UI$;...P..|
000001C0: 35 30 00 E7 09 55 00 8F 20 2B 2B 2B 20 43 48 45 |50...U.. +++ CHE|
000001D0: 43 4B 20 46 4F 52 20 48 45 4C 50 20 52 45 51 55 |CK FOR HELP REQU|
000001E0: 45 53 54 20 2B 2B 2B 00 0F 0A 5A 00 8B 55 52 24 |EST +++...Z..UR$|
000001F0: B2 55 58 24 A7 31 39 35 3A 8F 20 45 58 49 54 20 |.UX$.195:. EXIT |
00000200: 54 4F 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 00 |TO HELP ROUTINE.|
00000210: 1E 0A 5F 00 8B 55 46 B2 31 A7 8D 32 34 30 00 2B |.._..UF.1..240.+|
00000220: 0A 64 00 55 46 B2 30 3A 99 3A 8E 00 44 0A 66 00 |.d.UF.0:.:..D.f.|
00000230: 8F 20 2B 2B 20 43 48 45 43 4B 20 44 45 4C 45 54 |. ++ CHECK DELET|
00000240: 45 20 2B 2B 00 55 0A 69 00 8B C3 28 55 52 24 29 |E ++.U.i...(UR$)|
00000250: B3 31 A7 35 30 00 6D 0A 6E 00 55 52 24 B2 C8 28 |.1.50.m.n.UR$..(|
00000260: 55 52 24 2C C3 28 55 52 24 29 AB 31 29 00 7F 0A |UR$,.(UR$).1)...|
00000270: 73 00 99 22 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 |s..". ..";:.50.|
00000280: A6 0A 78 00 8F 20 2B 2B 20 43 48 45 43 4B 20 46 |..x.. ++ CHECK F|
00000290: 4F 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 |OR VALID CHARACT|
000002A0: 45 52 53 20 2B 2B 00 B8 0A 7D 00 8B C3 28 55 53 |ERS ++...}...(US|
000002B0: 24 29 B2 30 A7 31 35 30 00 C8 0A 7F 00 55 53 24 |$).0.150.....US$|
000002C0: B2 55 53 24 AA 55 58 24 00 D9 0A 82 00 81 55 53 |.US$.UX$......US|
000002D0: B2 31 A4 C3 28 55 53 24 29 00 F0 0A 87 00 8B 55 |.1..(US$)......U|
000002E0: 49 24 B2 CA 28 55 53 24 2C 55 53 2C 31 29 A7 8E |I$..(US$,US,1)..|
000002F0: 00 F6 0A 8C 00 82 00 03 0B 91 00 55 49 24 B2 22 |...........UI$."|
00000300: 22 3A 8E 00 1E 0B 96 00 8F 20 2A 2A 20 53 54 41 |":....... ** STA|
00000310: 4E 44 41 52 44 20 49 4E 50 55 54 20 2A 2A 00 2F |NDARD INPUT **./|
00000320: 0B 98 00 8B C6 28 55 49 24 29 B2 34 36 A7 8E 00 |.....(UI$).46...|
00000330: 40 0B 9B 00 8B 55 49 24 B2 C7 28 33 32 29 A7 8E |@....UI$..(32)..|
00000340: 00 5D 0B A0 00 8B C6 28 55 49 24 29 B3 34 38 B0 |.].....(UI$).48.|
00000350: C6 28 55 49 24 29 B1 35 37 A7 31 37 30 00 63 0B |.(UI$).57.170.c.|
00000360: A5 00 8E 00 80 0B AA 00 8B C6 28 55 49 24 29 B3 |..........(UI$).|
00000370: 36 35 B0 C6 28 55 49 24 29 B1 39 30 A7 31 38 30 |65..(UI$).90.180|
00000380: 00 86 0B AF 00 8E 00 AA 0B B4 00 8B C6 28 55 49 |.............(UI|
00000390: 24 29 B3 31 39 33 B0 C6 28 55 49 24 29 B1 32 31 |$).193..(UI$).21|
000003A0: 38 A7 55 49 24 B2 22 22 3A 8E 00 CD 0B B9 00 8B |8.UI$."":.......|
000003B0: C2 28 55 54 29 B2 55 55 25 A7 55 49 24 B2 C7 28 |.(UT).UU%.UI$..(|
000003C0: C6 28 55 49 24 29 AB 31 32 38 29 3A 8E 00 D3 0B |.(UI$).128):....|
000003D0: BB 00 8E 00 E0 0B BE 00 55 49 24 B2 22 22 3A 8E |........UI$."":.|
000003E0: 00 05 0C C3 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 |.....UF.1:. +++ |
000003F0: 48 45 4C 50 20 52 4F 55 54 49 4E 45 20 45 58 49 |HELP ROUTINE EXI|
00000400: 54 20 2B 2B 2B 00 0E 0C C5 00 8D 32 35 30 00 17 |T +++......250..|
00000410: 0C C8 00 8D 32 34 35 00 36 0C CD 00 81 55 51 B2 |....245.6....UQ.|
00000420: 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 AA |UB.(U2%.256.U1%.|
00000430: 55 33 25 AB 32 29 00 52 0C D2 00 55 51 25 28 55 |U3%.2).R...UQ%(U|
00000440: 51 AB 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 22 |Q.UB)..(UQ):.:."|
00000450: 93 22 00 65 0C D7 00 55 5A B2 31 3A 55 56 25 B2 |.".e...UZ.1:UV%.|
00000460: C2 28 55 54 29 00 6E 0C D8 00 89 33 30 30 00 B2 |.(UT).n....300..|
00000470: 0C D9 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 3A |...UZ.0:US$.UJ$:|
00000480: 55 47 24 B2 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C |UG$.UK$:UP.UJ:UL|
00000490: B2 55 4B 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |.UK:..(50003).0.|
000004A0: 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C |.53281,6:.53280,|
000004B0: 31 34 00 DF 0C DC 00 55 54 24 B2 55 4C 24 3A 97 |14.....UT$.UL$:.|
000004C0: 35 33 32 38 31 2C 31 3A 99 22 93 22 3B 3A 97 35 |53281,1:.".";:.5|
000004D0: 33 32 38 31 2C 36 3A 97 55 54 2C 55 56 25 3A 00 |3281,6:.UT,UV%:.|
000004E0: FE 0C DD 00 81 55 51 B2 55 42 A4 28 55 32 25 AC |.....UQ.UB.(U2%.|
000004F0: 32 35 36 AA 55 31 25 AA 55 33 25 AB 33 29 00 13 |256.U1%.U3%.3)..|
00000500: 0D E1 00 97 55 51 2C 55 51 25 28 55 51 AB 55 42 |....UQ,UQ%(UQ.UB|
00000510: 29 3A 82 00 1F 0D E6 00 97 55 31 2C 55 31 25 00 |):.......U1,U1%.|
00000520: 2B 0D E8 00 97 55 32 2C 55 32 25 00 37 0D E9 00 |+....U2,U2%.7...|
00000530: 97 55 34 2C 55 34 25 00 45 0D EA 00 97 55 33 2C |.U4,U4%.E....U3,|
00000540: 55 33 25 AB 31 00 4D 0D EB 00 89 33 35 00 7F 0D |U3%.1.M....35...|
00000550: F0 00 55 44 25 B2 28 28 55 32 25 AC 32 35 36 AA |..UD%.((U2%.256.|
00000560: 55 31 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 3A |U1%.U3%).UB).40:|
00000570: 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E 00 |..(UD$,UD%.1):..|
00000580: BA 0D F5 00 99 C8 28 55 44 24 2C 32 34 29 3B 22 |......(UD$,24);"|
00000590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005A0: 20 20 20 20 20 20 12 20 48 45 4C 50 20 43 4F 4D | . HELP COM|
000005B0: 49 4E 47 20 92 20 20 22 3A 8E 00 E6 0D FA 00 55 |ING . ":......U|
000005C0: 31 25 B2 C2 28 55 31 29 3A 55 32 25 B2 C2 28 55 |1%..(U1):U2%..(U|
000005D0: 32 29 3A 55 33 25 B2 C2 28 55 33 29 3A 55 34 25 |2):U3%..(U3):U4%|
000005E0: B2 C2 28 55 34 29 00 0E 0E FB 00 55 4A 24 B2 55 |..(U4).....UJ$.U|
000005F0: 53 24 3A 55 4B 24 B2 55 47 24 3A 55 4C 24 B2 55 |S$:UK$.UG$:UL$.U|
00000600: 54 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 00 14 |T$:UJ.UP:UK.UL..|
00000610: 0E FF 00 8E 00 25 0E 2C 01 8F 20 2A 2A 20 4D 45 |.....%.,.. ** ME|
00000620: 4E 55 20 2A 2A 00 2B 0E 2D 01 3A 00 5A 0E 2E 01 |NU **.+.-.:.Z...|
00000630: 99 22 93 22 3A 97 55 54 2C 55 55 25 3A 8B C2 28 |.".":.UT,UU%:..(|
00000640: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00000650: 39 3A 97 35 33 32 38 30 2C 38 00 60 0E 2F 01 3A |9:.53280,8.`./.:|
00000660: 00 7D 0E 31 01 99 22 13 20 20 20 20 20 20 20 20 |.}.1..". |
00000670: 20 20 20 20 20 20 20 20 4D 45 4E 55 22 00 AC 0E | MENU"...|
00000680: 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |6.." -----------|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 CF 0E 3B |-----------"...;|
000006B0: 01 99 22 11 11 20 20 20 20 20 20 20 31 2E 20 20 |..".. 1. |
000006C0: 20 43 4F 4E 43 45 4E 54 52 41 54 49 4F 4E 22 00 | CONCENTRATION".|
000006D0: F9 0E 40 01 99 22 11 11 20 20 20 20 20 20 20 32 |..@..".. 2|
000006E0: 2E 20 20 20 53 54 55 44 45 4E 54 20 49 4E 53 54 |. STUDENT INST|
000006F0: 52 55 43 54 49 4F 4E 53 22 00 23 0F 45 01 99 22 |RUCTIONS".#.E.."|
00000700: 11 11 20 20 20 20 20 20 20 33 2E 20 20 20 54 45 |.. 3. TE|
00000710: 41 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F |ACHER INSTRUCTIO|
00000720: 4E 53 22 00 50 0F 4A 01 99 22 11 11 20 20 20 20 |NS".P.J..".. |
00000730: 20 20 20 34 2E 20 20 20 4D 4F 44 49 46 49 43 41 | 4. MODIFICA|
00000740: 54 49 4F 4E 20 4F 46 20 50 52 4F 47 52 41 4D 22 |TION OF PROGRAM"|
00000750: 00 6C 0F 4F 01 99 22 11 11 20 20 20 20 20 20 20 |.l.O..".. |
00000760: 35 2E 20 20 20 51 55 49 54 11 11 22 00 9B 0F 54 |5. QUIT.."...T|
00000770: 01 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.." ------------|
00000780: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000790: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 C6 0F 59 01 |----------"...Y.|
000007A0: 99 22 11 11 20 20 20 20 20 20 20 50 52 45 53 53 |.".. PRESS|
000007B0: 20 41 20 4E 55 4D 42 45 52 20 4B 45 59 20 28 31 | A NUMBER KEY (1|
000007C0: 2D 35 29 20 22 3B 00 EF 0F 5E 01 55 4C B2 31 3A |-5) ";...^.UL.1:|
000007D0: 55 53 24 B2 22 31 32 33 34 35 22 3A 8D 33 35 3A |US$."12345":.35:|
000007E0: 8F 20 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 00 |. INPUT ROUTINE.|
000007F0: 01 10 5F 01 8B C3 28 55 52 24 29 B1 31 A7 33 30 |.._...(UR$).1.30|
00000800: 30 00 0C 10 60 01 55 53 24 B2 22 22 00 2D 10 63 |0...`.US$."".-.c|
00000810: 01 91 C5 28 55 52 24 29 8D 31 30 30 30 2C 34 30 |...(UR$).1000,40|
00000820: 30 2C 35 30 30 2C 36 30 30 2C 33 39 36 00 36 10 |0,500,600,396.6.|
00000830: 68 01 89 33 30 30 00 5D 10 8B 01 8F 20 2A 2A 20 |h..300.].... ** |
00000840: 52 45 2D 45 4E 41 42 4C 45 20 53 54 4F 50 20 4B |RE-ENABLE STOP K|
00000850: 45 59 20 41 4E 44 20 45 4E 44 20 2A 2A 00 8C 10 |EY AND END **...|
00000860: 8C 01 8B C2 28 35 30 30 30 33 29 B3 B1 31 AF C2 |....(50003)..1..|
00000870: 28 35 30 30 30 33 29 B3 B1 31 36 30 AF C2 28 35 |(50003)..160..(5|
00000880: 30 30 30 33 29 B3 B1 30 A7 33 39 39 00 B6 10 8D |0003)..0.399....|
00000890: 01 9E 55 55 AA 37 31 3A 8B C2 28 35 30 30 30 33 |..UU.71:..(50003|
000008A0: 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 |).0..53281,6:.53|
000008B0: 32 38 30 2C 31 34 00 C7 10 8E 01 99 22 9A 93 22 |280,14......".."|
000008C0: 3A 89 36 30 35 30 30 00 D2 10 8F 01 8D 38 37 35 |:.60500......875|
000008D0: 3A 8E 00 F3 10 90 01 8F 20 2A 2A 20 53 54 55 44 |:....... ** STUD|
000008E0: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS|
000008F0: 20 2A 2A 00 22 11 95 01 99 22 93 22 3A 97 55 54 | **."....".":.UT|
00000900: 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 |,UL%:..(50003).0|
00000910: A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 |..53281,0:.53280|
00000920: 2C 30 00 58 11 9A 01 55 54 24 B2 22 20 C3 CF CE |,0.X...UT$." ...|
00000930: C3 C5 CE D4 D2 C1 D4 C9 CF CE 22 3A 55 50 B2 30 |..........":UP.0|
00000940: 3A 55 47 24 B2 22 D3 54 55 44 45 4E 54 20 C9 4E |:UG$.".TUDENT .N|
00000950: 53 54 22 3A 8D 38 35 30 00 84 11 9B 01 99 22 11 |ST":.850......".|
00000960: 20 20 20 20 D4 48 45 20 C3 CF CE C3 C5 CE D4 D2 | .HE ........|
00000970: C1 D4 C9 CF CE A0 42 4F 41 52 44 20 57 49 4C 4C |......BOARD WILL|
00000980: 20 42 45 22 00 B1 11 9C 01 99 22 11 20 44 49 53 | BE"......". DIS|
00000990: 50 4C 41 59 45 44 20 57 49 54 48 20 32 30 20 53 |PLAYED WITH 20 S|
000009A0: 45 43 54 49 4F 4E 53 2E 20 20 C2 45 48 49 4E 44 |ECTIONS. .EHIND|
000009B0: 22 00 D8 11 9D 01 99 22 11 20 45 41 43 48 20 50 |"......". EACH P|
000009C0: 41 4E 45 4C 20 49 53 20 41 20 57 4F 52 44 2E 20 |ANEL IS A WORD. |
000009D0: D7 48 45 4E 20 59 4F 55 00 01 12 9E 01 99 22 11 |.HEN YOU......".|
000009E0: 20 43 48 4F 4F 53 45 20 41 20 4E 55 4D 42 45 52 | CHOOSE A NUMBER|
000009F0: 20 28 31 2D 32 30 29 20 41 20 57 4F 52 44 20 49 | (1-20) A WORD I|
00000A00: 53 00 2F 12 9F 01 99 22 11 20 52 45 56 45 41 4C |S./....". REVEAL|
00000A10: 45 44 2E 20 20 CF 4E 20 59 4F 55 52 20 53 45 43 |ED. .N YOUR SEC|
00000A20: 4F 4E 44 20 43 48 4F 49 43 45 2C 20 59 4F 55 00 |OND CHOICE, YOU.|
00000A30: 5A 12 A0 01 99 22 11 20 54 52 59 20 54 4F 20 4D |Z....". TRY TO M|
00000A40: 41 4B 45 20 41 20 4D 41 54 43 48 20 42 59 20 46 |AKE A MATCH BY F|
00000A50: 49 4E 44 49 4E 47 20 54 48 45 00 83 12 A1 01 99 |INDING THE......|
00000A60: 22 11 20 53 41 4D 45 20 57 4F 52 44 20 53 4F 4D |". SAME WORD SOM|
00000A70: 45 57 48 45 52 45 20 45 4C 53 45 2E 20 20 D4 48 |EWHERE ELSE. .H|
00000A80: 45 52 45 00 A6 12 A2 01 99 22 11 20 41 52 45 20 |ERE......". ARE |
00000A90: 31 30 20 4D 41 54 43 48 45 53 20 54 4F 20 42 45 |10 MATCHES TO BE|
00000AA0: 20 4D 41 44 45 2E 00 B4 12 A3 01 8D 38 33 35 3A | MADE.......835:|
00000AB0: 8D 38 35 30 00 E0 12 A4 01 99 22 11 20 20 20 20 |.850......". |
00000AC0: 20 D7 48 45 4E 20 59 4F 55 20 48 41 56 45 20 43 | .HEN YOU HAVE C|
00000AD0: 4F 4D 50 4C 45 54 45 44 20 41 4C 4C 20 54 48 45 |OMPLETED ALL THE|
00000AE0: 00 09 13 A5 01 99 22 11 20 4D 41 54 43 48 45 53 |......". MATCHES|
00000AF0: 20 54 48 45 20 57 48 4F 4C 45 20 42 4F 41 52 44 | THE WHOLE BOARD|
00000B00: 20 57 49 4C 4C 20 42 45 22 00 36 13 A7 01 99 22 | WILL BE".6...."|
00000B10: 11 20 44 49 53 50 4C 41 59 45 44 20 41 4E 44 20 |. DISPLAYED AND |
00000B20: 54 48 45 20 47 41 4D 45 20 57 49 4C 4C 20 42 45 |THE GAME WILL BE|
00000B30: 20 4F 56 45 52 2E 00 63 13 A8 01 99 22 11 1D 1D | OVER..c...."...|
00000B40: 1D 1D 1D D9 4F 55 20 4D 41 59 20 48 41 56 45 20 |....OU MAY HAVE |
00000B50: 4F 4E 45 20 4F 52 20 54 57 4F 20 50 4C 41 59 45 |ONE OR TWO PLAYE|
00000B60: 52 53 2E 00 90 13 A9 01 99 22 11 20 D4 48 45 20 |RS.......". .HE |
00000B70: 41 49 4D 20 46 4F 52 20 4F 4E 45 20 49 53 20 54 |AIM FOR ONE IS T|
00000B80: 4F 20 4F 50 45 4E 20 54 48 45 20 42 4F 41 52 44 |O OPEN THE BOARD|
00000B90: 00 BC 13 AA 01 99 22 11 20 57 49 54 48 20 41 53 |......". WITH AS|
00000BA0: 20 46 45 57 20 54 52 49 45 53 20 41 53 20 50 4F | FEW TRIES AS PO|
00000BB0: 53 53 49 42 4C 45 2E 20 20 D4 48 45 00 E8 13 AB |SSIBLE. .HE....|
00000BC0: 01 99 22 11 20 41 49 4D 20 46 4F 52 20 54 57 4F |..". AIM FOR TWO|
00000BD0: 20 50 4C 41 59 45 52 53 20 49 53 20 54 4F 20 4D | PLAYERS IS TO M|
00000BE0: 41 4B 45 20 4D 4F 52 45 00 0C 14 AC 01 99 22 11 |AKE MORE......".|
00000BF0: 20 4D 41 54 43 48 45 53 20 54 48 41 4E 20 59 4F | MATCHES THAN YO|
00000C00: 55 52 20 4F 50 50 4F 4E 45 4E 54 2E 00 15 14 AD |UR OPPONENT.....|
00000C10: 01 8D 38 33 35 00 29 14 EA 01 8B 55 5A B2 31 A7 |..835.)....UZ.1.|
00000C20: 9E 55 50 25 3A 89 32 31 37 00 34 14 F2 01 55 47 |.UP%:.217.4...UG|
00000C30: 24 B2 22 22 00 3A 14 F3 01 8E 00 5B 14 F4 01 8F |$."".:.....[....|
00000C40: 20 2A 2A 20 54 45 41 43 48 45 52 20 49 4E 53 54 | ** TEACHER INST|
00000C50: 52 55 43 54 49 4F 4E 53 20 2A 2A 00 8B 14 F5 01 |RUCTIONS **.....|
00000C60: 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 |.".":.UT,UL%:..(|
00000C70: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00000C80: 32 3A 97 35 33 32 38 30 2C 31 30 00 C1 14 F6 01 |2:.53280,10.....|
00000C90: 55 54 24 B2 22 20 C3 CF CE C3 C5 CE D4 D2 C1 D4 |UT$." ..........|
00000CA0: C9 CF CE 22 3A 55 50 B2 30 3A 55 47 24 B2 22 D4 |...":UP.0:UG$.".|
00000CB0: 45 41 43 48 45 52 20 C9 4E 53 54 22 3A 8D 38 35 |EACHER .NST":.85|
00000CC0: 30 00 EF 14 F7 01 99 22 11 11 20 20 20 20 20 20 |0......".. |
00000CD0: D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 20 4F |.O THE BEST OF O|
00000CE0: 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 |UR KNOWLEDGE,.".|
00000CF0: 18 15 F8 01 99 22 20 20 20 54 48 49 53 20 50 52 |....." THIS PR|
00000D00: 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 48 45 20 |OGRAM IS IN THE |
00000D10: 50 55 42 4C 49 43 11 22 00 44 15 F9 01 99 22 20 |PUBLIC.".D...." |
00000D20: 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 46 20 54 48 | DOMAIN. .F TH|
00000D30: 49 53 20 49 53 20 4E 4F 54 20 54 48 45 20 43 41 |IS IS NOT THE CA|
00000D40: 53 45 11 22 00 61 15 FA 01 99 22 20 20 20 50 4C |SE.".a...." PL|
00000D50: 45 41 53 45 20 43 4F 4E 54 41 43 54 3A 11 11 11 |EASE CONTACT:...|
00000D60: 22 00 8B 15 FB 01 99 22 20 20 20 20 20 20 C3 4F |"......" .O|
00000D70: 4D 4D 4F 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 |MMODORE .USINESS|
00000D80: 20 CD 41 43 48 49 4E 45 53 11 22 00 AE 15 FC 01 | .ACHINES.".....|
00000D90: 99 22 20 20 20 20 20 20 20 20 20 20 33 33 37 30 |." 3370|
00000DA0: 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 2E 00 D2 | .HARMACY .VE...|
00000DB0: 15 FD 01 99 22 20 20 20 20 20 20 20 20 20 20 C1 |...." .|
00000DC0: 47 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 52 49 |GINCOURT, .NTARI|
00000DD0: 4F 22 00 F4 15 FE 01 99 22 20 20 20 20 20 20 20 |O"......" |
00000DE0: 20 20 20 C3 41 4E 41 44 41 20 20 20 CD 31 D7 20 | .ANADA .1. |
00000DF0: 32 CB 34 22 00 14 16 FF 01 99 22 20 20 20 20 20 |2.4"......" |
00000E00: 20 20 20 20 20 28 34 31 36 29 20 34 39 39 2D 34 | (416) 499-4|
00000E10: 32 39 32 22 00 25 16 00 02 8D 20 38 33 35 3A 8D |292".%.... 835:.|
00000E20: 20 38 35 30 3A 00 4F 16 01 02 99 22 20 20 20 20 | 850:.O...." |
00000E30: 20 11 11 D0 52 4F 47 52 41 4D 20 CE 41 4D 45 3A | ...ROGRAM .AME:|
00000E40: 20 C3 4F 4E 43 45 4E 54 52 41 54 49 4F 4E 11 00 | .ONCENTRATION..|
00000E50: 78 16 02 02 99 22 20 20 20 20 20 D7 52 49 54 54 |x...." .RITT|
00000E60: 45 4E 20 C2 59 20 20 3A 20 C6 52 45 44 44 20 C3 |EN .Y : .REDD .|
00000E70: 48 52 49 53 54 49 45 11 00 9C 16 03 02 99 22 20 |HRISTIE......." |
00000E80: 20 20 20 20 D5 50 47 52 41 44 45 44 20 C2 59 20 | .PGRADED .Y |
00000E90: 3A 20 20 20 20 20 20 20 20 20 20 11 00 C7 16 04 |: .....|
00000EA0: 02 99 22 20 20 20 20 20 11 D4 48 49 53 20 50 52 |.." ..HIS PR|
00000EB0: 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E 20 4F |OGRAM WILL RUN O|
00000EC0: 4E 20 41 4E 59 11 11 00 EE 16 05 02 99 22 20 20 |N ANY........" |
00000ED0: 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 A0 32 2E 30 | ......2.0|
00000EE0: 20 D0 C5 D4 20 C3 CF CD D0 D5 D4 C5 D2 11 00 15 | ... ...........|
00000EF0: 17 06 02 99 22 20 20 20 20 20 20 20 20 20 C2 C1 |...." ..|
00000F00: D3 C9 C3 20 34 2E 30 20 D0 C5 D4 A0 C3 CF CD D0 |... 4.0 ........|
00000F10: D5 D4 C5 D2 11 00 37 17 07 02 99 22 20 20 20 20 |......7...." |
00000F20: 20 20 20 20 20 38 30 33 32 20 C3 C2 CD 20 C3 CF | 8032 ... ..|
00000F30: CD D0 D5 D4 C5 D2 11 00 5C 17 08 02 99 22 20 20 |........\...." |
00000F40: 20 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 C5 | .........|
00000F50: 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 6A 17 09 | 64 .........j..|
00000F60: 02 8D 38 33 35 3A 8D 38 35 30 00 98 17 12 02 99 |..835:.850......|
00000F70: 22 11 20 D4 48 49 53 20 47 41 4D 45 20 49 53 20 |". .HIS GAME IS |
00000F80: 44 45 53 49 47 4E 45 44 20 46 4F 52 20 41 4E 59 |DESIGNED FOR ANY|
00000F90: 4F 4E 45 20 57 48 4F 22 00 C8 17 14 02 99 22 11 |ONE WHO"......".|
00000FA0: 20 43 41 4E 20 52 45 41 44 2E 20 20 C9 54 20 49 | CAN READ. .T I|
00000FB0: 53 20 41 4E 20 45 58 45 52 43 49 53 45 20 49 4E |S AN EXERCISE IN|
00000FC0: 20 50 41 59 49 4E 47 22 00 F7 17 16 02 99 22 11 | PAYING"......".|
00000FD0: 20 41 54 54 45 4E 54 49 4F 4E 20 54 4F 20 44 45 | ATTENTION TO DE|
00000FE0: 54 41 49 4C 20 41 4E 44 20 43 4F 4E 43 45 4E 54 |TAIL AND CONCENT|
00000FF0: 52 41 54 49 4E 47 22 00 22 18 18 02 99 22 11 20 |RATING"."....". |
00001000: 4F 4E 20 57 48 41 54 20 59 4F 55 20 53 45 45 20 |ON WHAT YOU SEE |
00001010: 41 4E 44 20 43 41 4E 20 52 45 4D 45 4D 42 45 52 |AND CAN REMEMBER|
00001020: 2E 22 00 4E 18 1A 02 99 22 11 20 D0 4C 41 59 45 |.".N....". .LAYE|
00001030: 52 53 20 43 41 4E 20 52 45 56 45 41 4C 20 53 45 |RS CAN REVEAL SE|
00001040: 43 54 49 4F 4E 53 20 4F 46 20 54 48 45 22 00 7C |CTIONS OF THE".||
00001050: 18 1C 02 99 22 11 20 42 4F 41 52 44 20 46 4F 52 |....". BOARD FOR|
00001060: 20 53 48 4F 52 54 20 50 45 52 49 4F 44 53 20 4F | SHORT PERIODS O|
00001070: 46 20 54 49 4D 45 2C 20 42 55 54 22 00 A9 18 1E |F TIME, BUT"....|
00001080: 02 99 22 11 20 54 48 45 59 20 48 41 56 45 20 54 |..". THEY HAVE T|
00001090: 4F 20 52 45 4D 45 4D 42 45 52 20 57 48 41 54 20 |O REMEMBER WHAT |
000010A0: 54 48 45 59 20 53 41 57 22 00 C9 18 20 02 99 22 |THEY SAW"... .."|
000010B0: 11 20 41 4E 44 20 57 48 45 52 45 20 54 48 45 59 |. AND WHERE THEY|
000010C0: 20 53 41 57 20 49 54 2E 22 00 D2 18 44 02 8D 38 | SAW IT."...D..8|
000010D0: 33 35 00 E6 18 4E 02 8B 55 5A B2 31 A7 9E 55 50 |35...N..UZ.1..UP|
000010E0: 25 3A 89 32 31 37 00 F1 18 56 02 55 47 24 B2 22 |%:.217...V.UG$."|
000010F0: 22 00 F7 18 57 02 8E 00 1D 19 58 02 8F 20 2A 2A |"...W.....X.. **|
00001100: 20 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 43 | PROGRAM MODIFIC|
00001110: 41 54 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 2E 19 |ATION INST **...|
00001120: 59 02 99 22 93 22 3A 97 55 54 2C 55 4C 25 00 63 |Y..".":.UT,UL%.c|
00001130: 19 5D 02 55 54 24 B2 22 20 C3 CF CE C3 C5 CE D4 |.].UT$." .......|
00001140: D2 C1 D4 C9 CF CE 22 3A 55 50 B2 30 3A 55 47 24 |......":UP.0:UG$|
00001150: B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 22 3A 8D |.".ROGRAM .OD":.|
00001160: 38 35 30 00 81 19 97 02 99 22 11 20 CC 49 4E 45 |850......". .INE|
00001170: 20 32 32 30 30 20 48 4F 4C 44 53 20 44 41 54 41 | 2200 HOLDS DATA|
00001180: 2E 00 AC 19 98 02 99 22 11 20 D4 48 45 20 47 41 |.......". .HE GA|
00001190: 4D 45 20 43 41 4E 20 42 45 20 45 41 53 49 4C 59 |ME CAN BE EASILY|
000011A0: 20 43 48 41 4E 47 45 44 20 42 59 22 00 D8 19 99 | CHANGED BY"....|
000011B0: 02 99 22 11 20 4C 49 53 54 49 4E 47 20 41 4E 44 |..". LISTING AND|
000011C0: 20 54 59 50 49 4E 47 20 49 4E 20 31 30 20 44 49 | TYPING IN 10 DI|
000011D0: 46 46 45 52 45 4E 54 22 00 02 1A 9A 02 99 22 11 |FFERENT"......".|
000011E0: 20 57 4F 52 44 53 20 57 48 49 43 48 20 41 52 45 | WORDS WHICH ARE|
000011F0: 20 53 55 49 54 41 42 4C 45 20 46 4F 52 20 54 48 | SUITABLE FOR TH|
00001200: 45 22 00 24 1A 9B 02 99 22 11 20 50 45 4F 50 4C |E".$....". PEOPL|
00001210: 45 20 50 4C 41 59 49 4E 47 20 54 48 45 20 47 41 |E PLAYING THE GA|
00001220: 4D 45 2E 22 00 2D 1A 9E 02 8D 38 33 35 00 41 1A |ME.".-....835.A.|
00001230: B2 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 |...UZ.1..UP%:.21|
00001240: 37 00 4C 1A BA 02 55 47 24 B2 22 22 00 52 1A BB |7.L...UG$."".R..|
00001250: 02 8E 00 77 1A BC 02 8F 20 2A 2A 20 54 4F 20 55 |...w.... ** TO U|
00001260: 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D |SE 8032 LOAD CBM|
00001270: 34 30 33 32 20 2A 2A 00 AD 1A C6 02 99 22 93 11 |4032 **......"..|
00001280: 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E |...BEFORE RUNNIN|
00001290: 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F |G THIS PROGRAM O|
000012A0: 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 E3 1A |N AN 8032 .....|
000012B0: D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 |..." LOAD T|
000012C0: 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 |HE 'CBM 4032' PR|
000012D0: 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 |OGRAM...........|
000012E0: 11 11 22 00 EE 1A DA 02 9E 55 55 AA 37 31 00 F4 |.."......UU.71..|
000012F0: 1A E4 02 80 00 19 1B 1D 03 8F 20 2A 2A 20 54 4F |.......... ** TO|
00001300: 20 55 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 | USE 8032 LOAD C|
00001310: 42 4D 34 30 33 32 20 2A 2A 00 64 1B 1E 03 99 22 |BM4032 **.d...."|
00001320: 93 11 11 11 42 45 46 4F 52 45 20 52 55 4E 4E 49 |....BEFORE RUNNI|
00001330: 4E 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |NG THIS PROGRAM |
00001340: 4F 4E 20 41 4E 20 38 30 33 32 20 20 11 11 4C 4F |ON AN 8032 ..LO|
00001350: 41 44 20 43 42 4D 20 34 30 33 32 20 50 52 4F 47 |AD CBM 4032 PROG|
00001360: 52 41 4D 22 00 70 1B 1F 03 9E 31 30 39 33 3A 80 |RAM".p....1093:.|
00001370: 00 90 1B 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 |... .. ** T I T |
00001380: 4C 20 45 20 20 20 50 20 41 20 47 20 45 20 2A 2A |L E P A G E **|
00001390: 00 C4 1B 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 |...".."....";:.U|
000013A0: 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 |T,UU%:..(50003).|
000013B0: 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 32 |0..53280,14:.532|
000013C0: 38 31 2C 36 00 DA 1B 24 03 81 49 B2 31 A4 33 38 |81,6...$..I.1.38|
000013D0: 3A 99 22 12 A6 92 22 3B 3A 82 00 F2 1B 26 03 81 |:."...";:....&..|
000013E0: 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B |I.1.22:.".....";|
000013F0: 3A 82 00 0A 1C 28 03 81 49 B2 31 A4 33 37 3A 99 |:....(..I.1.37:.|
00001400: 22 9D 9D 12 A6 92 22 3B 3A 82 00 22 1C 2A 03 81 |".....";:..".*..|
00001410: 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B |I.1.22:.".....";|
00001420: 3A 82 00 47 1C 2C 03 99 22 13 11 11 11 11 11 11 |:..G.,..".......|
00001430: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001440: 1D 1D 12 A9 20 20 92 00 69 1C 2E 03 99 22 1D 1D |.... ..i...."..|
00001450: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001460: 12 20 92 20 20 12 20 92 A9 00 8A 1C 30 03 99 22 |. . . .....0.."|
00001470: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001480: 1D 1D 12 20 92 20 20 12 A3 DF 00 A8 1C 32 03 99 |... . ......2..|
00001490: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
000014A0: 1D 1D 1D DF 12 20 20 92 00 D0 1C 34 03 99 22 11 |..... ....4..".|
000014B0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F |.............C O|
000014C0: 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 | M M O D O R E..|
000014D0: 00 F3 1C 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |...6..".........|
000014E0: 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 |......EDUCATIONA|
000014F0: 4C 11 11 00 12 1D 38 03 99 22 1D 1D 1D 1D 1D 1D |L.....8.."......|
00001500: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 |..........SOFTWA|
00001510: 52 45 00 2D 1D 3A 03 8F 20 2A 2A 20 43 4F 4D 4D |RE.-.:.. ** COMM|
00001520: 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 65 1D |ODORE LOGO **.e.|
00001530: 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D |;...(UD$,24);"..|
00001540: 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 |........PRESS SP|
00001550: 41 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 92 |ACE BAR OR WAIT.|
00001560: 22 3A 49 B2 30 00 87 1D 3C 03 A1 41 24 3A 8B 41 |":I.0...<..A$:.A|
00001570: 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 |$.." ".I.I.1:.I.|
00001580: 32 35 30 A7 38 32 38 00 AB 1D 3E 03 54 31 24 B2 |250.828...>.T1$.|
00001590: 22 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 |"":T2$."":T3$.""|
000015A0: 3A 54 34 24 B2 22 22 3A 49 B2 30 00 B4 1D 40 03 |:T4$."":I.0...@.|
000015B0: 89 33 30 30 00 D0 1D 43 03 8F 20 2A 2A 20 53 50 |.300...C.. ** SP|
000015C0: 41 43 45 20 42 41 52 20 50 52 45 53 53 20 2A 2A |ACE BAR PRESS **|
000015D0: 00 0B 1E 48 03 97 55 4F 2C 30 3A 99 C8 28 55 44 |...H..UO,0:..(UD|
000015E0: 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 |$,24);".......PR|
000015F0: 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 4F |ESS SPACE BAR TO|
00001600: 20 43 4F 4E 54 49 4E 55 45 92 22 00 22 1E 4C 03 | CONTINUE.".".L.|
00001610: A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 |.UI$:.UI$.." ".8|
00001620: 34 34 00 28 1E 4E 03 8E 00 48 1E 52 03 8F 20 2A |44.(.N...H.R.. *|
00001630: 2A 20 50 41 47 45 20 44 45 53 49 47 4E 20 52 4F |* PAGE DESIGN RO|
00001640: 55 54 49 4E 45 20 2A 2A 00 54 1E 54 03 55 50 B2 |UTINE **.T.T.UP.|
00001650: 55 50 AA 31 00 7E 1E 57 03 99 22 93 22 C8 28 55 |UP.1.~.W..".".(U|
00001660: 54 24 AA 55 50 24 2C 32 31 29 3B C9 28 55 50 24 |T$.UP$,21);.(UP$|
00001670: AA 55 47 24 AA C4 28 55 50 29 2C 31 38 29 00 AD |.UG$..(UP),18)..|
00001680: 1E 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.\.." ----------|
00001690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000016A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 BC 1E |------------"...|
000016B0: 60 03 8B 55 48 B3 B1 30 A7 38 37 30 00 F0 1E 61 |`..UH..0.870...a|
000016C0: 03 99 C8 28 55 44 24 2C 32 34 29 3B C8 28 55 50 |...(UD$,24);.(UP|
000016D0: 24 2C 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 45 |$,7);"HELP - PRE|
000016E0: 53 53 20 20 20 48 20 3C 52 45 54 55 52 4E 3E 22 |SS H <RETURN>"|
000016F0: 00 02 1F 66 03 97 55 4F 2C 30 3A 99 22 13 11 22 |...f..UO,0:.".."|
00001700: 3A 8E 00 21 1F 6B 03 8F 20 2A 2A 20 50 4C 45 41 |:..!.k.. ** PLEA|
00001710: 53 45 20 57 41 49 54 20 52 45 4D 41 52 4B 20 2A |SE WAIT REMARK *|
00001720: 2A 00 57 1F 70 03 99 C8 28 55 44 24 2C 32 34 29 |*.W.p...(UD$,24)|
00001730: 3B 22 20 20 20 20 20 20 20 20 20 20 20 4F 4E 45 |;" ONE|
00001740: 20 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E | MOMENT PLEASE..|
00001750: 2E 20 20 20 20 20 22 00 5D 1F 75 03 8E 00 7A 1F |. ".].u...z.|
00001760: 84 03 8F 20 2A 2A 20 53 45 54 20 55 50 20 56 41 |... ** SET UP VA|
00001770: 52 49 41 42 4C 45 53 20 2A 2A 00 C5 1F 85 03 55 |RIABLES **.....U|
00001780: 58 24 B2 22 48 22 3A 86 55 51 25 28 31 30 30 30 |X$."H":.UQ%(1000|
00001790: 29 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 |):UB.32768:U1.19|
000017A0: 36 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A |6:U2.197:U3.198:|
000017B0: 55 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 |U4.216:UC.167:UU|
000017C0: B2 31 30 32 34 00 03 20 86 03 55 54 B2 35 39 34 |.1024.. ..UT.594|
000017D0: 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 |68:UU%.12:UL%.14|
000017E0: 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 32 37 |:UP%.1146:UM.327|
000017F0: 36 38 3A 55 4F B2 31 35 38 3A 97 20 35 30 30 30 |68:UO.158:. 5000|
00001800: 33 2C 30 00 46 20 87 03 8B C2 28 35 30 30 30 33 |3,0.F ....(50003|
00001810: 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 |).0.UB.1024:U1.2|
00001820: 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 |09:U2.210:U3.211|
00001830: 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 |:U4.214:UC.204:U|
00001840: 55 B2 32 30 34 38 00 85 20 88 03 8B C2 28 35 30 |U.2048.. ....(50|
00001850: 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A |003).0.UT.53272:|
00001860: 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 |UU%.21:UL%.23:UP|
00001870: 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 34 3A 55 |%.2139:UM.1024:U|
00001880: 4F B2 31 39 38 00 A9 20 89 03 55 44 24 B2 22 13 |O.198.. ..UD$.".|
00001890: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000018A0: 11 11 11 11 11 11 11 11 22 00 DB 20 8A 03 55 50 |........".. ..UP|
000018B0: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
000018C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018D0: 20 20 20 20 20 20 20 20 20 20 22 00 04 21 8B 03 | "..!..|
000018E0: 55 54 24 B2 22 20 C3 CF CE C3 C5 CE D4 D2 C1 D4 |UT$." ..........|
000018F0: C9 CF CE 22 3A 8F 20 50 52 4F 47 52 41 4D 20 54 |...":. PROGRAM T|
00001900: 49 54 4C 45 00 19 21 8C 03 86 41 24 28 32 30 29 |ITLE..!...A$(20)|
00001910: 2C 42 24 28 32 30 29 3A 8E 00 33 21 8E 03 8F 20 |,B$(20):..3!... |
00001920: 2A 2A 20 53 45 54 20 56 41 52 49 41 42 4C 45 53 |** SET VARIABLES|
00001930: 20 2A 2A 00 3C 21 93 03 8D 39 30 30 00 57 21 98 | **.<!...900.W!.|
00001940: 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 4F 52 20 |.. ** CHECK FOR |
00001950: 38 30 33 32 20 2A 2A 00 75 21 9D 03 99 22 93 22 |8032 **.u!..."."|
00001960: 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 45 44 20 |:.".":. SHIFTED |
00001970: 53 50 41 43 45 00 8C 21 A2 03 8B C2 28 55 42 AA |SPACE..!....(UB.|
00001980: 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 A5 21 A3 |40)..96..700..!.|
00001990: 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 43 48 45 |.. ** MEMORY CHE|
000019A0: 43 4B 20 2A 2A 00 B9 21 A4 03 8B 20 B8 28 30 29 |CK **..!... .(0)|
000019B0: B1 32 30 30 30 A7 39 33 37 00 E7 21 A5 03 99 22 |.2000.937..!..."|
000019C0: 93 11 11 05 54 48 49 53 20 4D 41 43 48 49 4E 45 |....THIS MACHINE|
000019D0: 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 20 45 | DOES NOT HAVE E|
000019E0: 4E 4F 55 47 48 11 22 00 0B 22 A6 03 99 22 4D 45 |NOUGH.".."..."ME|
000019F0: 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 49 53 |MORY TO RUN THIS|
00001A00: 20 50 52 4F 47 52 41 4D 20 21 22 00 16 22 A7 03 | PROGRAM !".."..|
00001A10: 9E 55 55 AA 37 31 00 1C 22 A8 03 80 00 36 22 A9 |.UU.71.."....6".|
00001A20: 03 99 22 93 05 22 3A 8B C2 28 35 30 30 30 33 29 |.."..":..(50003)|
00001A30: B2 30 A7 39 36 32 00 65 22 AC 03 8F 20 2A 2A 20 |.0.962.e"... ** |
00001A40: 42 41 53 49 43 20 32 2E 30 20 20 4F 52 20 20 34 |BASIC 2.0 OR 4|
00001A50: 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 53 45 54 |.0 OR C-64 SET|
00001A60: 55 50 20 2A 2A 00 A3 22 AD 03 97 31 30 37 35 2C |UP **.."...1075,|
00001A70: 31 33 33 3A 97 31 30 37 36 2C 31 34 34 3A 97 31 |133:.1076,144:.1|
00001A80: 30 37 37 2C 32 33 34 3A 97 31 30 37 39 2C 34 3A |077,234:.1079,4:|
00001A90: 97 31 30 38 30 2C 31 33 33 3A 97 31 30 38 31 2C |.1080,133:.1081,|
00001AA0: 31 34 35 00 D9 22 AE 03 97 31 30 39 31 2C 31 35 |145.."...1091,15|
00001AB0: 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 31 30 39 |5:.1098,133:.109|
00001AC0: 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 33 34 3A |9,144:.1100,234:|
00001AD0: 97 31 31 30 33 2C 31 33 33 00 FB 22 AF 03 97 31 |.1103,133.."...1|
00001AE0: 31 30 34 2C 31 34 35 3A 97 31 31 30 35 2C 32 33 |104,145:.1105,23|
00001AF0: 34 3A 97 31 30 38 32 2C 32 33 34 00 12 23 B1 03 |4:.1082,234..#..|
00001B00: 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 30 A7 39 |..(50003)..160.9|
00001B10: 35 35 00 41 23 B6 03 97 31 30 39 33 2C 38 38 3A |55.A#...1093,88:|
00001B20: 97 31 30 39 34 2C 32 32 38 3A 97 31 30 39 37 2C |.1094,228:.1097,|
00001B30: 38 35 3A 97 31 31 30 32 2C 32 32 38 3A 89 39 36 |85:.1102,228:.96|
00001B40: 35 00 56 23 BB 03 8B C2 28 35 30 30 30 33 29 B3 |5.V#....(50003).|
00001B50: B1 31 A7 39 39 30 00 85 23 C0 03 97 31 30 39 33 |.1.990..#...1093|
00001B60: 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 3A 97 31 |,49:.1094,230:.1|
00001B70: 30 39 37 2C 34 36 3A 97 31 31 30 32 2C 32 33 30 |097,46:.1102,230|
00001B80: 3A 89 39 36 35 00 BF 23 C2 03 97 32 30 39 39 2C |:.965..#...2099,|
00001B90: 31 34 31 3A 97 32 31 30 30 2C 32 30 3A 97 32 31 |141:.2100,20:.21|
00001BA0: 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A 97 32 31 |01,3:.2103,8:.21|
00001BB0: 30 34 2C 31 34 31 3A 97 32 31 30 35 2C 32 31 00 |04,141:.2105,21.|
00001BC0: FB 23 C3 03 97 32 31 30 36 2C 33 3A 97 32 31 31 |.#...2106,3:.211|
00001BD0: 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 32 3A 97 |5,145:.2117,52:.|
00001BE0: 32 31 31 38 2C 32 33 34 3A 97 32 31 32 31 2C 34 |2118,234:.2121,4|
00001BF0: 39 3A 97 32 31 32 32 2C 31 34 31 00 35 24 C4 03 |9:.2122,141.5$..|
00001C00: 97 32 31 32 33 2C 32 30 3A 97 32 31 32 34 2C 33 |.2123,20:.2124,3|
00001C10: 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 31 32 37 |:.2126,234:.2127|
00001C20: 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 3A 97 32 |,141:.2128,21:.2|
00001C30: 31 32 39 2C 33 00 53 24 C5 03 9E 55 55 AA 34 38 |129,3.S$...UU.48|
00001C40: 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 4F 50 20 |:. DISABLE STOP |
00001C50: 4B 45 59 00 64 24 CA 03 8D 38 30 30 3A 8F 20 54 |KEY.d$...800:. T|
00001C60: 49 54 4C 45 00 74 24 D4 03 89 33 30 30 3A 8F 20 |ITLE.t$...300:. |
00001C70: 4D 45 4E 55 00 A5 24 DE 03 99 22 93 54 48 45 20 |MENU..$...".THE |
00001C80: 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 57 4F 52 |PGM WILL NOT WOR|
00001C90: 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 48 49 4E |K ON THIS MACHIN|
00001CA0: 45 21 22 3A 80 00 DA 24 E8 03 8B 55 5A B2 31 A7 |E!":...$...UZ.1.|
00001CB0: 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 30 3A 8F |.UP%:.UP%:UZ.0:.|
00001CC0: 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 54 41 52 | ** PROGRAM STAR|
00001CD0: 54 53 20 48 45 52 45 20 2A 2A 00 05 25 E9 03 99 |TS HERE **..%...|
00001CE0: 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 30 30 33 |"..";:.:..(50003|
00001CF0: 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 |).0..53281,6:.53|
00001D00: 32 38 30 2C 36 00 2C 25 5E 06 55 50 B2 30 3A 4D |280,6.,%^.UP.0:M|
00001D10: B2 30 3A 4E 4E B2 4F 3A 55 54 24 B2 22 20 43 4F |.0:NN.O:UT$." CO|
00001D20: 4E 43 45 4E 54 52 41 54 49 4F 4E 22 00 5F 25 72 |NCENTRATION"._%r|
00001D30: 06 52 52 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.RR$."..........|
00001D40: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001D50: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 |..............".|
00001D60: 7E 25 7C 06 44 44 24 B2 22 11 11 11 11 11 11 11 |~%|.DD$.".......|
00001D70: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 9D |............."..|
00001D80: 25 86 06 53 54 24 B2 22 13 22 AA C8 28 44 44 24 |%..ST$."."..(DD$|
00001D90: 2C 32 30 29 AA C8 28 52 52 24 2C 34 29 00 A9 25 |,20)..(RR$,4)..%|
00001DA0: FE 06 97 55 54 2C 55 55 25 00 D7 25 12 07 8D 38 |...UT,UU%..%...8|
00001DB0: 35 30 3A 99 22 11 11 20 48 4F 57 20 4D 41 4E 59 |50:.".. HOW MANY|
00001DC0: 20 50 4C 41 59 45 52 53 20 41 52 45 20 54 48 45 | PLAYERS ARE THE|
00001DD0: 52 45 20 3F 20 22 3B 00 F4 25 17 07 55 4C B2 31 |RE ? ";..%..UL.1|
00001DE0: 3A 55 53 24 B2 22 31 32 22 3A 8D 33 35 3A 5A 24 |:US$."12":.35:Z$|
00001DF0: B2 55 52 24 00 06 26 1C 07 8B 5A 24 B2 22 32 22 |.UR$..&...Z$."2"|
00001E00: A7 20 31 39 32 30 00 29 26 6C 07 99 3A 99 3A 99 |. 1920.)&l..:.:.|
00001E10: 22 1D 1D 57 48 41 54 20 49 53 20 59 4F 55 52 20 |"..WHAT IS YOUR |
00001E20: 4E 41 4D 45 20 3F 20 22 3B 00 3E 26 76 07 55 4C |NAME ? ";.>&v.UL|
00001E30: B2 31 35 3A 55 53 24 B2 22 22 3A 8D 33 35 00 50 |.15:US$."":.35.P|
00001E40: 26 7B 07 4E 41 24 B2 55 52 24 3A 89 31 39 36 30 |&{.NA$.UR$:.1960|
00001E50: 00 71 26 80 07 99 22 11 11 11 1D 1D 57 48 4F 20 |.q&...".....WHO |
00001E60: 49 53 20 50 4C 41 59 45 52 20 23 31 20 3F 20 22 |IS PLAYER #1 ? "|
00001E70: 3B 00 86 26 8A 07 55 4C B2 31 35 3A 55 53 24 B2 |;..&..UL.15:US$.|
00001E80: 22 22 3A 8D 33 35 00 92 26 8F 07 4E 4D 24 B2 55 |"":.35..&..NM$.U|
00001E90: 52 24 00 B4 26 94 07 99 3A 99 3A 99 22 1D 1D 57 |R$..&...:.:."..W|
00001EA0: 48 4F 20 49 53 20 50 4C 41 59 45 52 20 23 32 20 |HO IS PLAYER #2 |
00001EB0: 3F 20 22 3B 00 C9 26 9E 07 55 4C B2 31 35 3A 55 |? ";..&..UL.15:U|
00001EC0: 53 24 B2 22 22 3A 8D 33 35 00 D5 26 A3 07 4E 45 |S$."":.35..&..NE|
00001ED0: 24 B2 55 52 24 00 06 27 A8 07 99 22 11 11 11 11 |$.UR$..'..."....|
00001EE0: 11 1D 1D 47 52 45 41 54 21 20 4C 45 54 27 53 20 |...GREAT! LET'S |
00001EF0: 50 4C 41 59 20 12 43 4F 4E 43 45 4E 54 52 41 54 |PLAY .CONCENTRAT|
00001F00: 49 4F 4E 21 92 22 00 0F 27 B2 07 8D 38 33 35 00 |ION!."..'...835.|
00001F10: 24 27 BC 07 8D 38 35 30 3A 8F 50 52 49 4E 54 22 |$'...850:.PRINT"|
00001F20: 91 91 91 22 00 51 27 C6 07 41 24 B2 22 1D 1D 1D |...".Q'..A$."...|
00001F30: 1D B0 C0 C0 C0 C0 C0 B2 C0 C0 C0 C0 C0 B2 C0 C0 |................|
00001F40: C0 C0 C0 B2 C0 C0 C0 C0 C0 B2 C0 C0 C0 C0 C0 AE |................|
00001F50: 22 00 88 27 D0 07 42 24 B2 22 1D 1D 1D 1D DD 12 |"..'..B$."......|
00001F60: 20 20 20 20 20 92 DD 12 20 20 20 20 20 92 DD 12 | ... ...|
00001F70: 20 20 20 20 20 92 DD 12 20 20 20 20 20 92 DD 12 | ... ...|
00001F80: 20 20 20 20 20 92 DD 22 00 C0 27 DA 07 42 50 24 | .."..'..BP$|
00001F90: B2 22 1D 1D 1D 1D DD 12 20 20 31 20 20 92 DD 12 |."...... 1 ...|
00001FA0: 20 20 32 20 20 92 DD 12 20 20 33 20 20 92 DD 12 | 2 ... 3 ...|
00001FB0: 20 20 34 20 20 92 DD 12 20 20 35 20 20 92 DD 22 | 4 ... 5 .."|
00001FC0: 00 F8 27 E4 07 42 51 24 B2 22 1D 1D 1D 1D DD 12 |..'..BQ$."......|
00001FD0: 20 20 36 20 20 92 DD 12 20 20 37 20 20 92 DD 12 | 6 ... 7 ...|
00001FE0: 20 20 38 20 20 92 DD 12 20 20 39 20 20 92 DD 12 | 8 ... 9 ...|
00001FF0: 20 31 30 20 20 92 DD 22 00 30 28 EE 07 42 52 24 | 10 ..".0(..BR$|
00002000: B2 22 1D 1D 1D 1D DD 12 20 31 31 20 20 92 DD 12 |."...... 11 ...|
00002010: 20 31 32 20 20 92 DD 12 20 31 33 20 20 92 DD 12 | 12 ... 13 ...|
00002020: 20 31 34 20 20 92 DD 12 20 31 35 20 20 92 DD 22 | 14 ... 15 .."|
00002030: 00 68 28 F8 07 42 53 24 B2 22 1D 1D 1D 1D DD 12 |.h(..BS$."......|
00002040: 20 31 36 20 20 92 DD 12 20 31 37 20 20 92 DD 12 | 16 ... 17 ...|
00002050: 20 31 38 20 20 92 DD 12 20 31 39 20 20 92 DD 12 | 18 ... 19 ...|
00002060: 20 32 30 20 20 92 DD 22 00 95 28 02 08 43 24 B2 | 20 .."..(..C$.|
00002070: 22 1D 1D 1D 1D AB C0 C0 C0 C0 C0 DB C0 C0 C0 C0 |"...............|
00002080: C0 DB C0 C0 C0 C0 C0 DB C0 C0 C0 C0 C0 DB C0 C0 |................|
00002090: C0 C0 C0 B3 22 00 C2 28 0C 08 44 24 B2 22 1D 1D |...."..(..D$."..|
000020A0: 1D 1D AD C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 B1 C0 |................|
000020B0: C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 |................|
000020C0: BD 22 00 EC 28 16 08 99 41 24 3A 99 42 24 3A 99 |."..(...A$:.B$:.|
000020D0: 42 50 24 3A 99 42 24 3A 99 43 24 3A 99 42 24 3A |BP$:.B$:.C$:.B$:|
000020E0: 99 42 51 24 3A 99 42 24 3A 99 43 24 00 01 29 20 |.BQ$:.B$:.C$..) |
000020F0: 08 99 42 24 3A 99 42 52 24 3A 99 42 24 3A 99 43 |..B$:.BR$:.B$:.C|
00002100: 24 00 16 29 2A 08 99 42 24 3A 99 42 53 24 3A 99 |$..)*..B$:.BS$:.|
00002110: 42 24 3A 99 44 24 00 32 29 34 08 8F 20 53 45 54 |B$:.D$.2)4.. SET|
00002120: 20 44 49 53 50 4C 41 59 53 20 46 4F 52 20 47 41 | DISPLAYS FOR GA|
00002130: 4D 45 00 3B 29 3E 08 8D 38 37 35 00 50 29 3F 08 |ME.;)>..875.P)?.|
00002140: 81 58 B2 31 A4 31 30 3A 87 41 24 28 58 29 3A 82 |.X.1.10:.A$(X):.|
00002150: 00 56 29 48 08 8C 00 6C 29 52 08 81 58 B2 31 31 |.V)H...l)R..X.11|
00002160: A4 32 30 3A 87 41 24 28 58 29 3A 82 00 78 29 5C |.20:.A$(X):..x)\|
00002170: 08 81 5A B2 31 A4 32 30 00 85 29 66 08 4B 24 B2 |..Z.1.20..)f.K$.|
00002180: 41 24 28 5A 29 00 99 29 70 08 4C B2 B5 28 32 30 |A$(Z)..)p.L..(20|
00002190: AC BB 28 54 49 29 AA 31 29 00 A9 29 7A 08 41 24 |..(TI).1)..)z.A$|
000021A0: 28 5A 29 B2 41 24 28 4C 29 00 B6 29 84 08 41 24 |(Z).A$(L)..)..A$|
000021B0: 28 4C 29 B2 4B 24 00 BD 29 8E 08 82 5A 00 EC 29 |(L).K$..)...Z..)|
000021C0: 98 08 83 20 53 41 57 2C 57 41 53 2C 4E 49 50 2C |... SAW,WAS,NIP,|
000021D0: 50 49 4E 2C 54 49 4E 2C 54 48 49 4E 2C 4C 41 50 |PIN,TIN,THIN,LAP|
000021E0: 2C 4C 49 50 2C 50 41 4E 2C 50 41 54 00 F2 29 A2 |,LIP,PAN,PAT..).|
000021F0: 08 8C 00 0B 2A AC 08 8F 20 4F 4E 45 20 4F 52 20 |....*... ONE OR |
00002200: 54 57 4F 20 50 4C 41 59 45 52 53 00 24 2A B6 08 |TWO PLAYERS.$*..|
00002210: 8F 20 4F 4E 45 20 50 4C 41 59 45 52 20 20 28 34 |. ONE PLAYER (4|
00002220: 30 32 30 29 00 3E 2A C0 08 8F 20 54 57 4F 20 50 |020).>*... TWO P|
00002230: 4C 41 59 45 52 53 20 20 28 35 30 30 30 29 00 78 |LAYERS (5000).x|
00002240: 2A CA 08 99 C8 28 55 44 24 2C 32 34 29 3B 22 20 |*....(UD$,24);" |
00002250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002270: 20 20 20 20 20 20 22 3B 00 8A 2A CF 08 8B 20 4E | ";..*... N|
00002280: 41 24 B2 22 22 A7 32 38 32 30 00 99 2A D4 08 81 |A$."".2820..*...|
00002290: 4E B2 31 A4 38 30 30 3A 82 00 D2 2A DE 08 99 22 |N.1.800:...*..."|
000022A0: 13 22 AA C8 28 44 44 24 2C 32 30 29 AA C8 28 52 |."..(DD$,20)..(R|
000022B0: 52 24 2C 34 29 3B 22 46 49 52 53 54 20 43 48 4F |R$,4);"FIRST CHO|
000022C0: 49 43 45 20 20 20 20 20 28 31 2D 32 30 29 3A 20 |ICE (1-20): |
000022D0: 22 3B 00 F0 2A E8 08 55 4C B2 32 3A 55 53 24 B2 |";..*..UL.2:US$.|
000022E0: 22 30 31 32 33 34 35 36 37 38 39 22 3A 8D 33 35 |"0123456789":.35|
000022F0: 00 FD 2A ED 08 41 B2 C5 28 55 52 24 29 00 3C 2B |..*..A..(UR$).<+|
00002300: F2 08 8B 41 B3 31 B0 20 41 B1 32 30 20 A7 99 20 |...A.1. A.20 .. |
00002310: 22 91 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00002320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002330: 20 20 91 91 91 22 3A 89 32 32 37 30 00 6B 2B FC | ...":.2270.k+.|
00002340: 08 99 22 91 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00002350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002360: 20 20 20 20 20 20 20 20 20 20 22 00 76 2B 10 09 | ".v+..|
00002370: 8D 20 33 34 37 30 00 81 2B 1A 09 8D 20 33 35 34 |. 3470..+... 354|
00002380: 30 00 8C 2B 24 09 8D 20 33 37 36 30 00 96 2B 2E |0..+$.. 3760..+.|
00002390: 09 8D 33 39 38 30 00 C5 2B 42 09 99 22 13 22 AA |..3980..+B..".".|
000023A0: C8 28 44 44 24 2C 32 30 29 AA C8 28 52 52 24 2C |.(DD$,20)..(RR$,|
000023B0: 34 29 3B 22 53 45 43 4F 4E 44 20 43 48 4F 49 43 |4);"SECOND CHOIC|
000023C0: 45 3A 20 22 3B 00 E3 2B 4C 09 55 4C B2 32 3A 55 |E: ";..+L.UL.2:U|
000023D0: 53 24 B2 22 30 31 32 33 34 35 36 37 38 39 22 3A |S$."0123456789":|
000023E0: 8D 33 35 00 F0 2B 51 09 42 B2 C5 28 55 52 24 29 |.35..+Q.B..(UR$)|
000023F0: 00 32 2C 53 09 8B 42 B3 31 B0 20 42 B1 32 30 B0 |.2,S..B.1. B.20.|
00002400: 42 B2 41 A7 99 20 22 91 20 20 20 20 20 20 20 20 |B.A.. ". |
00002410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002420: 20 20 20 20 20 20 20 20 91 91 91 22 3A 89 32 33 | ...":.23|
00002430: 37 30 00 66 2C 56 09 99 22 13 22 AA C8 28 44 44 |70.f,V.."."..(DD|
00002440: 24 2C 32 30 29 AA C8 28 52 52 24 2C 34 29 3B 22 |$,20)..(RR$,4);"|
00002450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002460: 20 20 20 20 20 22 00 71 2C 60 09 8D 20 34 30 35 | ".q,`.. 405|
00002470: 30 00 7C 2C 6A 09 8D 20 34 31 39 30 00 87 2C 74 |0.|,j.. 4190..,t|
00002480: 09 8D 20 34 34 31 30 00 91 2C 7E 09 8D 34 31 32 |.. 4410..,~..412|
00002490: 30 00 9D 2C 88 09 4E 4E B2 4E 4E AA 31 00 BE 2C |0..,..NN.NN.1..,|
000024A0: 92 09 8B 41 24 28 41 29 B2 41 24 28 42 29 A7 20 |...A$(A).A$(B). |
000024B0: 41 24 28 41 29 B2 22 22 3A 89 32 34 37 30 00 C8 |A$(A)."":.2470..|
000024C0: 2C 9C 09 89 32 34 38 30 00 D5 2C A6 09 41 24 28 |,...2480..,..A$(|
000024D0: 42 29 B2 22 22 00 11 2D B0 09 8B 20 41 24 28 41 |B).""..-... A$(A|
000024E0: 29 B2 41 24 28 42 29 A7 99 22 13 22 AA C8 28 44 |).A$(B).."."..(D|
000024F0: 44 24 2C 32 30 29 AA C8 28 52 52 24 2C 34 29 3B |D$,20)..(RR$,4);|
00002500: 22 54 48 41 54 27 53 20 41 20 4D 41 54 43 48 21 |"THAT'S A MATCH!|
00002510: 22 00 2A 2D BA 09 8B 20 41 24 28 41 29 B2 41 24 |".*-... A$(A).A$|
00002520: 28 42 29 A7 20 4D B2 4D AA 31 00 48 2D C4 09 8B |(B). M.M.1.H-...|
00002530: 4D B2 31 30 20 A7 20 81 58 B2 31 A4 35 30 30 3A |M.10 . .X.1.500:|
00002540: 82 3A 89 20 32 36 34 30 00 58 2D CE 09 81 58 B2 |.:. 2640.X-...X.|
00002550: 31 A4 33 30 30 30 3A 82 00 72 2D D8 09 8B 20 41 |1.3000:..r-... A|
00002560: 24 28 41 29 B3 B1 41 24 28 42 29 20 A7 20 32 35 |$(A)..A$(B) . 25|
00002570: 34 30 00 7D 2D E2 09 89 20 32 35 38 30 00 8E 2D |40.}-... 2580..-|
00002580: EC 09 8B 41 B3 31 30 A7 8D 20 34 36 33 30 00 9E |...A.10.. 4630..|
00002590: 2D F6 09 8B 41 B1 39 A7 8D 20 34 36 38 30 00 AF |-...A.9.. 4680..|
000025A0: 2D 00 0A 8B 42 B3 31 30 A7 8D 20 34 37 32 30 00 |-...B.10.. 4720.|
000025B0: BF 2D 0A 0A 8B 42 B1 39 A7 8D 20 34 37 36 30 00 |.-...B.9.. 4760.|
000025C0: C9 2D 14 0A 89 32 32 36 30 00 CF 2D 1E 0A 8F 00 |.-...2260..-....|
000025D0: D5 2D 28 0A 8F 00 EE 2D 32 0A 8F 20 50 41 54 43 |.-(....-2.. PATC|
000025E0: 48 20 55 50 20 54 48 45 20 42 4F 41 52 44 00 0C |H UP THE BOARD..|
000025F0: 2E 3C 0A 81 58 B2 31 A4 32 30 30 30 3A 82 20 20 |.<..X.1.2000:. |
00002600: 20 20 3A 8F 20 50 52 4F 47 52 41 4D 00 2D 2E 46 | :. PROGRAM.-.F|
00002610: 0A 89 32 32 36 30 20 20 20 20 20 20 20 20 20 20 |..2260 |
00002620: 20 20 20 3A 8F 20 50 52 4F 47 52 41 4D 00 51 2E | :. PROGRAM.Q.|
00002630: 50 0A 8D 38 33 35 3A 8D 38 35 30 3A 99 22 20 57 |P..835:.850:." W|
00002640: 45 4C 4C 20 44 4F 4E 45 2C 20 22 4E 41 24 22 21 |ELL DONE, "NA$"!|
00002650: 22 00 81 2E 64 0A 99 22 13 11 11 11 11 11 11 20 |"...d.."....... |
00002660: 59 4F 55 20 48 41 56 45 20 4F 50 45 4E 45 44 20 |YOU HAVE OPENED |
00002670: 54 48 45 20 57 48 4F 4C 45 20 42 4F 41 52 44 2E |THE WHOLE BOARD.|
00002680: 22 00 BB 2E 78 0A 99 22 13 11 11 11 11 11 11 11 |"...x.."........|
00002690: 11 20 59 4F 55 20 48 41 44 20 22 3B 4E 4E 3B 22 |. YOU HAD ";NN;"|
000026A0: 20 54 52 49 45 53 20 54 4F 20 4D 41 4B 45 20 31 | TRIES TO MAKE 1|
000026B0: 30 20 4D 41 54 43 48 45 53 2E 22 00 E2 2E 96 0A |0 MATCHES.".....|
000026C0: 99 22 13 11 11 11 11 11 11 11 11 11 11 20 43 41 |."........... CA|
000026D0: 4E 20 59 4F 55 20 42 45 41 54 22 3B 4E 4E 3B 22 |N YOU BEAT";NN;"|
000026E0: 3F 22 00 EC 2E A0 0A 89 20 38 33 35 00 F9 2E F0 |?"...... 835....|
000026F0: 0A 4D B2 30 3A 4E 4E B2 30 00 04 2F FA 0A 89 20 |.M.0:NN.0../... |
00002700: 31 39 38 30 00 16 2F 04 0B 8F 20 54 57 4F 20 50 |1980../... TWO P|
00002710: 4C 41 59 45 52 53 00 26 2F 0E 0B 81 4E B2 31 A4 |LAYERS.&/...N.1.|
00002720: 31 30 30 30 3A 82 00 42 2F 18 0B 58 B2 B5 28 32 |1000:..B/..X..(2|
00002730: AC BB 28 31 29 29 AA 31 3A 54 B2 58 3A 89 32 38 |..(1)).1:T.X:.28|
00002740: 36 30 00 4A 2F 22 0B 58 B2 54 00 68 2F 2C 0B 8B |60.J/".X.T.h/,..|
00002750: 20 58 B2 31 A7 99 22 20 22 3B 53 54 24 3B 4E 4D | X.1.." ";ST$;NM|
00002760: 24 3B 3A 89 32 38 38 30 00 7A 2F 36 0B 99 22 20 |$;:.2880.z/6.." |
00002770: 22 3B 53 54 24 3B 4E 45 24 3B 00 90 2F 40 0B 8F |";ST$;NE$;../@..|
00002780: 46 4F 52 4E 3D 31 54 4F 37 35 30 3A 4E 45 58 54 |FORN=1TO750:NEXT|
00002790: 00 B0 2F 4A 0B 99 22 2C 20 59 4F 55 52 20 43 48 |../J..", YOUR CH|
000027A0: 4F 49 43 45 20 20 28 31 2D 32 30 29 3A 20 22 3B |OICE (1-20): ";|
000027B0: 00 D7 2F 4F 0B 55 4C B2 32 3A 55 53 24 B2 22 30 |../O.UL.2:US$."0|
000027C0: 31 32 33 34 35 36 37 38 39 22 3A 8D 33 35 3A 41 |123456789":.35:A|
000027D0: B2 C5 28 55 52 24 29 00 0C 30 54 0B 42 4C 41 4E |..(UR$)..0T.BLAN|
000027E0: 4B 24 B2 22 91 20 20 20 20 20 20 20 20 20 20 20 |K$.". |
000027F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002800: 20 20 20 20 20 20 20 20 20 20 20 22 00 12 30 5E | "..0^|
00002810: 0B 8F 00 3A 30 68 0B 8B 41 B3 31 B0 20 41 B1 32 |...:0h..A.1. A.2|
00002820: 30 20 A7 99 20 42 4C 41 4E 4B 24 3A 99 22 91 91 |0 .. BLANK$:."..|
00002830: 91 91 22 3A 89 20 32 38 36 30 00 46 30 72 0B 99 |..":. 2860.F0r..|
00002840: 42 4C 41 4E 4B 24 00 55 30 7C 0B 81 4E B2 31 A4 |BLANK$.U0|..N.1.|
00002850: 38 30 30 3A 82 00 60 30 86 0B 8D 20 33 34 37 30 |800:..`0... 3470|
00002860: 00 6B 30 90 0B 8D 20 33 35 34 30 00 76 30 9A 0B |.k0... 3540.v0..|
00002870: 8D 20 33 37 36 30 00 81 30 A4 0B 8D 20 33 39 38 |. 3760..0... 398|
00002880: 30 00 B0 30 AE 0B 99 22 13 22 AA C8 28 44 44 24 |0..0..."."..(DD$|
00002890: 2C 32 30 29 AA C8 28 52 52 24 2C 34 29 3B 22 53 |,20)..(RR$,4);"S|
000028A0: 45 43 4F 4E 44 20 43 48 4F 49 43 45 3A 20 22 3B |ECOND CHOICE: ";|
000028B0: 00 CE 30 B8 0B 55 4C B2 32 3A 55 53 24 B2 22 30 |..0..UL.2:US$."0|
000028C0: 31 32 33 34 35 36 37 38 39 22 3A 8D 33 35 00 DB |123456789":.35..|
000028D0: 30 BD 0B 42 B2 C5 28 55 52 24 29 00 F7 30 C2 0B |0..B..(UR$)..0..|
000028E0: 8B 20 42 20 B3 31 B0 42 B1 32 30 B0 42 B2 41 20 |. B .1.B.20.B.A |
000028F0: 20 A7 20 32 39 39 30 00 04 31 CC 0B 99 20 42 4C | . 2990..1... BL|
00002900: 41 4E 4B 24 00 0E 31 D6 0B 8D 34 30 35 30 00 18 |ANK$..1...4050..|
00002910: 31 E0 0B 8D 34 31 39 30 00 22 31 EA 0B 8D 34 34 |1...4190."1...44|
00002920: 31 30 00 2C 31 F4 0B 8D 34 31 32 30 00 4F 31 FE |10.,1...4120.O1.|
00002930: 0B 8B 41 24 28 41 29 B3 B1 41 24 28 42 29 AF 20 |..A$(A)..A$(B). |
00002940: 54 B2 31 20 A7 20 54 B2 32 3A 89 33 31 32 30 00 |T.1 . T.2:.3120.|
00002950: 6C 31 08 0C 8B 41 24 28 41 29 B3 B1 41 24 28 42 |l1...A$(A)..A$(B|
00002960: 29 AF 20 54 B2 32 20 A7 20 54 B2 31 00 8C 31 12 |). T.2 . T.1..1.|
00002970: 0C 8B 41 24 28 41 29 B2 41 24 28 42 29 A7 41 24 |..A$(A).A$(B).A$|
00002980: 28 41 29 B2 22 22 3A 89 33 31 31 30 00 96 31 1C |(A)."":.3110..1.|
00002990: 0C 89 33 31 32 30 00 A3 31 26 0C 41 24 28 42 29 |..3120..1&.A$(B)|
000029A0: B2 22 22 00 DD 31 30 0C 8B 41 24 28 41 29 B2 41 |.""..10..A$(A).A|
000029B0: 24 28 42 29 A7 99 53 54 24 3A 99 42 4C 41 4E 4B |$(B)..ST$:.BLANK|
000029C0: 24 3A 99 53 54 24 3B 22 54 48 41 54 27 53 20 41 |$:.ST$;"THAT'S A|
000029D0: 20 4D 41 54 43 48 22 3A 89 33 31 34 30 00 E7 31 | MATCH":.3140..1|
000029E0: 3A 0C 89 33 31 36 30 00 F7 31 44 0C 81 58 B2 31 |:..3160..1D..X.1|
000029F0: A4 31 35 30 30 3A 82 00 03 32 4E 0C 99 42 4C 41 |.1500:...2N..BLA|
00002A00: 4E 4B 24 00 20 32 58 0C 8B 41 24 28 41 29 B2 41 |NK$. 2X..A$(A).A|
00002A10: 24 28 42 29 AF 54 B2 31 A7 4D 31 B2 4D 31 AA 31 |$(B).T.1.M1.M1.1|
00002A20: 00 3E 32 62 0C 8B 41 24 28 41 29 B2 41 24 28 42 |.>2b..A$(A).A$(B|
00002A30: 29 20 AF 54 B2 32 A7 4D 32 B2 4D 32 AA 31 00 57 |) .T.2.M2.M2.1.W|
00002A40: 32 6C 0C 8B 4D 31 AA 4D 32 B2 31 30 A7 8D 38 33 |2l..M1.M2.10..83|
00002A50: 35 3A 89 33 32 37 30 00 67 32 76 0C 81 58 B2 31 |5:.3270.g2v..X.1|
00002A60: A4 33 30 30 30 3A 82 00 80 32 80 0C 8B 41 24 28 |.3000:...2...A$(|
00002A70: 41 29 B3 B1 41 24 28 42 29 20 A7 20 33 32 32 30 |A)..A$(B) . 3220|
00002A80: 00 8A 32 8A 0C 89 33 32 36 30 00 9B 32 94 0C 8B |..2...3260..2...|
00002A90: 41 B3 31 30 A7 8D 20 34 36 33 30 00 AC 32 9E 0C |A.10.. 4630..2..|
00002AA0: 8B 41 B1 39 A7 20 8D 20 34 36 38 30 00 BD 32 A8 |.A.9. . 4680..2.|
00002AB0: 0C 8B 42 B3 31 30 A7 8D 20 34 37 32 30 00 CE 32 |..B.10.. 4720..2|
00002AC0: B2 0C 8B 42 B1 39 A7 20 8D 20 34 37 36 30 00 D8 |...B.9. . 4760..|
00002AD0: 32 BC 0C 89 32 38 35 30 00 E7 32 C6 0C 81 58 B2 |2...2850..2...X.|
00002AE0: 31 A4 35 30 30 3A 82 00 F0 32 D0 0C 8D 38 35 30 |1.500:...2...850|
00002AF0: 00 FF 32 DA 0C 81 58 B2 31 A4 35 30 30 3A 82 00 |..2...X.1.500:..|
00002B00: 1F 33 E4 0C 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D |.3..."..........|
00002B10: 1D 12 46 49 4E 41 4C 20 53 43 4F 52 45 92 22 00 |..FINAL SCORE.".|
00002B20: 45 33 F8 0C 99 22 11 11 11 11 22 3B 4E 4D 24 3B |E3..."....";NM$;|
00002B30: 22 20 20 20 20 20 22 3B 4D 31 3B 22 20 4D 41 54 |" ";M1;" MAT|
00002B40: 43 48 45 53 22 00 6B 33 0C 0D 99 22 11 11 11 11 |CHES".k3..."....|
00002B50: 22 3B 4E 45 24 3B 22 20 20 20 20 20 22 3B 4D 32 |";NE$;" ";M2|
00002B60: 3B 22 20 4D 41 54 43 48 45 53 22 00 81 33 20 0D |;" MATCHES"..3 .|
00002B70: 99 22 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 22 |."............."|
00002B80: 3B 00 AD 33 2A 0D 8B 4D 31 B1 4D 32 A7 99 22 20 |;..3*..M1.M2.." |
00002B90: 54 48 45 20 57 49 4E 4E 45 52 20 49 53 20 22 3B |THE WINNER IS ";|
00002BA0: 4E 4D 24 3B 22 21 22 3A 89 33 34 30 30 00 DC 33 |NM$;"!":.3400..3|
00002BB0: 34 0D 8B 4D 31 B2 4D 32 A7 99 22 20 54 48 49 53 |4..M1.M2.." THIS|
00002BC0: 20 47 41 4D 45 20 49 53 20 41 20 53 54 41 4C 45 | GAME IS A STALE|
00002BD0: 4D 41 54 45 21 22 3A 89 33 34 30 30 00 FB 33 3E |MATE!":.3400..3>|
00002BE0: 0D 99 22 20 54 48 45 20 57 49 4E 4E 45 52 20 49 |.." THE WINNER I|
00002BF0: 53 20 22 3B 4E 45 24 3B 22 21 22 00 04 34 48 0D |S ";NE$;"!"..4H.|
00002C00: 8D 38 33 35 00 0A 34 84 0D 8E 00 2E 34 8E 0D 8F |.835..4.....4...|
00002C10: 20 41 4C 49 47 4E 4D 45 4E 54 20 4F 46 20 56 41 | ALIGNMENT OF VA|
00002C20: 52 49 41 42 4C 45 20 53 54 52 49 4E 47 53 00 4C |RIABLE STRINGS.L|
00002C30: 34 98 0D 8B 41 24 28 41 29 B2 22 22 AF 20 4E 41 |4...A$(A)."". NA|
00002C40: 24 B3 B1 22 22 20 A7 20 32 32 37 30 00 70 34 A2 |$.."" . 2270.p4.|
00002C50: 0D 8B 41 24 28 41 29 B2 22 22 AF 4E 41 24 B2 22 |..A$(A)."".NA$."|
00002C60: 22 A7 20 99 42 4C 41 4E 4B 24 3A 89 32 38 36 30 |". .BLANK$:.2860|
00002C70: 00 7D 34 AC 0D 81 20 49 B2 31 A4 32 30 00 92 34 |.}4... I.1.20..4|
00002C80: B6 0D 8B 20 49 B2 41 20 A7 20 47 24 B2 41 24 28 |... I.A . G$.A$(|
00002C90: 49 29 00 9A 34 C0 0D 82 20 49 00 A0 34 CA 0D 8E |I)..4... I..4...|
00002CA0: 00 B4 34 D4 0D 8F 20 43 55 52 53 4F 52 20 56 41 |..4... CURSOR VA|
00002CB0: 4C 55 45 53 00 C4 34 DE 0D 8B 41 B2 31 20 A7 20 |LUES..4...A.1 . |
00002CC0: 52 52 B2 31 00 D4 34 E8 0D 8B 41 B2 32 20 A7 20 |RR.1..4...A.2 . |
00002CD0: 52 52 B2 37 00 E5 34 F2 0D 8B 41 B2 33 20 A7 20 |RR.7..4...A.3 . |
00002CE0: 52 52 B2 31 33 00 F6 34 FC 0D 8B 41 B2 34 20 A7 |RR.13..4...A.4 .|
00002CF0: 20 52 52 B2 31 39 00 07 35 06 0E 8B 41 B2 35 20 | RR.19..5...A.5 |
00002D00: A7 20 52 52 B2 32 35 00 17 35 10 0E 8B 41 B2 36 |. RR.25..5...A.6|
00002D10: 20 A7 20 52 52 B2 31 00 27 35 1A 0E 8B 41 B2 37 | . RR.1.'5...A.7|
00002D20: 20 A7 20 52 52 B2 37 00 38 35 24 0E 8B 41 B2 38 | . RR.7.85$..A.8|
00002D30: 20 A7 20 52 52 B2 31 33 00 49 35 2E 0E 8B 41 B2 | . RR.13.I5...A.|
00002D40: 39 20 A7 20 52 52 B2 31 39 00 5A 35 38 0E 8B 41 |9 . RR.19.Z58..A|
00002D50: B2 31 30 A7 20 52 52 B2 32 35 00 6A 35 42 0E 8B |.10. RR.25.j5B..|
00002D60: 41 B2 31 31 A7 20 52 52 B2 31 00 7A 35 4C 0E 8B |A.11. RR.1.z5L..|
00002D70: 41 B2 31 32 A7 20 52 52 B2 37 00 8B 35 56 0E 8B |A.12. RR.7..5V..|
00002D80: 41 B2 31 33 A7 20 52 52 B2 31 33 00 9C 35 60 0E |A.13. RR.13..5`.|
00002D90: 8B 41 B2 31 34 A7 20 52 52 B2 31 39 00 AD 35 6A |.A.14. RR.19..5j|
00002DA0: 0E 8B 41 B2 31 35 A7 20 52 52 B2 32 35 00 BD 35 |..A.15. RR.25..5|
00002DB0: 74 0E 8B 41 B2 31 36 A7 20 52 52 B2 31 00 CD 35 |t..A.16. RR.1..5|
00002DC0: 7E 0E 8B 41 B2 31 37 A7 20 52 52 B2 37 00 DE 35 |~..A.17. RR.7..5|
00002DD0: 88 0E 8B 41 B2 31 38 A7 20 52 52 B2 31 33 00 EF |...A.18. RR.13..|
00002DE0: 35 92 0E 8B 41 B2 31 39 A7 20 52 52 B2 31 39 00 |5...A.19. RR.19.|
00002DF0: 00 36 9C 0E 8B 41 B2 32 30 A7 20 52 52 B2 32 35 |.6...A.20. RR.25|
00002E00: 00 06 36 A6 0E 8E 00 16 36 B0 0E 8F 20 44 44 20 |..6.....6... DD |
00002E10: 56 41 4C 55 45 53 00 26 36 BA 0E 8B 41 B2 31 20 |VALUES.&6...A.1 |
00002E20: A7 20 44 44 B2 33 00 36 36 C4 0E 8B 41 B2 32 20 |. DD.3.66...A.2 |
00002E30: A7 20 44 44 B2 33 00 46 36 CE 0E 8B 41 B2 33 20 |. DD.3.F6...A.3 |
00002E40: A7 20 44 44 B2 33 00 56 36 D8 0E 8B 41 B2 34 20 |. DD.3.V6...A.4 |
00002E50: A7 20 44 44 B2 33 00 66 36 E2 0E 8B 41 B2 35 20 |. DD.3.f6...A.5 |
00002E60: A7 20 44 44 B2 33 00 76 36 EC 0E 8B 41 B2 36 20 |. DD.3.v6...A.6 |
00002E70: A7 20 44 44 B2 37 00 86 36 F6 0E 8B 41 B2 37 20 |. DD.7..6...A.7 |
00002E80: A7 20 44 44 B2 37 00 96 36 00 0F 8B 41 B2 38 20 |. DD.7..6...A.8 |
00002E90: A7 20 44 44 B2 37 00 A6 36 0A 0F 8B 41 B2 39 20 |. DD.7..6...A.9 |
00002EA0: A7 20 44 44 B2 37 00 B7 36 14 0F 8B 41 B2 31 30 |. DD.7..6...A.10|
00002EB0: 20 A7 20 44 44 B2 37 00 C9 36 1E 0F 8B 41 B2 31 | . DD.7..6...A.1|
00002EC0: 31 20 A7 20 44 44 B2 31 31 00 DB 36 28 0F 8B 41 |1 . DD.11..6(..A|
00002ED0: B2 31 32 20 A7 20 44 44 B2 31 31 00 ED 36 32 0F |.12 . DD.11..62.|
00002EE0: 8B 41 B2 31 33 20 A7 20 44 44 B2 31 31 00 FF 36 |.A.13 . DD.11..6|
00002EF0: 3C 0F 8B 41 B2 31 34 20 A7 20 44 44 B2 31 31 00 |<..A.14 . DD.11.|
00002F00: 11 37 46 0F 8B 41 B2 31 35 20 A7 20 44 44 B2 31 |.7F..A.15 . DD.1|
00002F10: 31 00 23 37 50 0F 8B 41 B2 31 36 20 A7 20 44 44 |1.#7P..A.16 . DD|
00002F20: B2 31 35 00 35 37 5A 0F 8B 41 B2 31 37 20 A7 20 |.15.57Z..A.17 . |
00002F30: 44 44 B2 31 35 00 47 37 64 0F 8B 41 B2 31 38 20 |DD.15.G7d..A.18 |
00002F40: A7 20 44 44 B2 31 35 00 59 37 6E 0F 8B 41 B2 31 |. DD.15.Y7n..A.1|
00002F50: 39 20 A7 20 44 44 B2 31 35 00 6B 37 78 0F 8B 41 |9 . DD.15.k7x..A|
00002F60: B2 32 30 20 A7 20 44 44 B2 31 35 00 71 37 82 0F |.20 . DD.15.q7..|
00002F70: 8E 00 8C 37 8C 0F 8F 20 44 49 53 50 4C 41 59 20 |...7... DISPLAY |
00002F80: 48 49 44 44 45 4E 20 41 24 28 41 29 00 B3 37 96 |HIDDEN A$(A)..7.|
00002F90: 0F 99 22 13 22 AA C8 28 44 44 24 2C 44 44 29 AA |.."."..(DD$,DD).|
00002FA0: C8 28 52 52 24 2C 52 52 AA 34 29 3B 22 20 20 20 |.(RR$,RR.4);" |
00002FB0: 20 20 22 00 CC 37 A0 0F 99 C8 28 52 52 24 2C 52 | "..7....(RR$,R|
00002FC0: 52 AA 34 29 3B 22 20 20 20 20 20 22 00 E5 37 AA |R.4);" "..7.|
00002FD0: 0F 99 C8 28 52 52 24 2C 52 52 AA 34 29 3B 22 20 |...(RR$,RR.4);" |
00002FE0: 20 20 20 20 22 00 0C 38 B4 0F 99 22 13 22 AA C8 | "..8..."."..|
00002FF0: 28 44 44 24 2C 44 44 29 AA C8 28 52 52 24 2C 52 |(DD$,DD)..(RR$,R|
00003000: 52 AA 34 29 3B 22 20 20 20 20 20 22 00 33 38 BE |R.4);" ".38.|
00003010: 0F 99 C8 28 52 52 24 2C 52 52 AA 34 29 3B A6 AB |...(RR$,RR.4);..|
00003020: 28 C3 28 41 24 28 41 29 29 B3 34 29 29 3B 41 24 |(.(A$(A)).4));A$|
00003030: 28 41 29 00 39 38 C8 0F 8E 00 5D 38 D2 0F 8F 20 |(A).98....]8... |
00003040: 41 4C 49 47 4E 4D 45 4E 54 20 4F 46 20 56 41 52 |ALIGNMENT OF VAR|
00003050: 49 41 42 4C 45 20 53 54 52 49 4E 47 53 00 79 38 |IABLE STRINGS.y8|
00003060: DC 0F 8B 41 24 28 42 29 B2 22 22 AF 4E 41 24 B3 |...A$(B)."".NA$.|
00003070: B1 22 22 A7 20 32 33 37 30 00 93 38 E6 0F 8B 41 |."". 2370..8...A|
00003080: 24 28 42 29 B2 22 22 AF 4E 41 24 B2 22 22 A7 32 |$(B)."".NA$."".2|
00003090: 39 39 30 00 A0 38 F0 0F 81 20 49 B2 31 A4 32 30 |990..8... I.1.20|
000030A0: 00 B6 38 FA 0F 8B 20 49 B2 42 20 A7 20 47 32 24 |..8... I.B . G2$|
000030B0: B2 41 24 28 49 29 00 BE 38 04 10 82 20 49 00 C4 |.A$(I)..8... I..|
000030C0: 38 0E 10 8E 00 E6 38 18 10 8F 20 44 49 53 50 4C |8.....8... DISPL|
000030D0: 41 59 20 48 49 44 44 45 4E 20 57 4F 52 44 20 5B |AY HIDDEN WORD [|
000030E0: 41 24 28 42 29 5D 00 0D 39 22 10 99 22 13 22 AA |A$(B)]..9"..".".|
000030F0: C8 28 44 44 24 2C 44 31 29 AA C8 28 52 52 24 2C |.(DD$,D1)..(RR$,|
00003100: 52 31 AA 34 29 3B 22 20 20 20 20 20 22 00 26 39 |R1.4);" ".&9|
00003110: 2C 10 99 C8 28 52 52 24 2C 52 31 AA 34 29 3B 22 |,...(RR$,R1.4);"|
00003120: 20 20 20 20 20 22 00 3F 39 36 10 99 C8 28 52 52 | ".?96...(RR|
00003130: 24 2C 52 31 AA 34 29 3B 22 20 20 20 20 20 22 00 |$,R1.4);" ".|
00003140: 66 39 40 10 99 22 13 22 AA C8 28 44 44 24 2C 44 |f9@.."."..(DD$,D|
00003150: 31 29 AA C8 28 52 52 24 2C 52 31 AA 34 29 3B 22 |1)..(RR$,R1.4);"|
00003160: 20 20 20 20 20 22 00 8D 39 4A 10 99 C8 28 52 52 | "..9J...(RR|
00003170: 24 2C 52 31 AA 34 29 3B A6 AB 28 C3 28 41 24 28 |$,R1.4);..(.(A$(|
00003180: 42 29 29 B3 34 29 29 3B 41 24 28 42 29 00 93 39 |B)).4));A$(B)..9|
00003190: 54 10 8E 00 A7 39 5E 10 8F 20 43 55 52 53 4F 52 |T....9^.. CURSOR|
000031A0: 20 56 41 4C 55 45 53 00 B7 39 68 10 8B 42 B2 31 | VALUES..9h..B.1|
000031B0: 20 A7 20 52 31 B2 31 00 C7 39 72 10 8B 42 B2 32 | . R1.1..9r..B.2|
000031C0: 20 A7 20 52 31 B2 37 00 D8 39 7C 10 8B 42 B2 33 | . R1.7..9|..B.3|
000031D0: 20 A7 20 52 31 B2 31 33 00 E9 39 86 10 8B 42 B2 | . R1.13..9...B.|
000031E0: 34 20 A7 20 52 31 B2 31 39 00 FA 39 90 10 8B 42 |4 . R1.19..9...B|
000031F0: B2 35 20 A7 20 52 31 B2 32 35 00 0A 3A 9A 10 8B |.5 . R1.25..:...|
00003200: 42 B2 36 20 A7 20 52 31 B2 31 00 1A 3A A4 10 8B |B.6 . R1.1..:...|
00003210: 42 B2 37 20 A7 20 52 31 B2 37 00 2B 3A AE 10 8B |B.7 . R1.7.+:...|
00003220: 42 B2 38 20 A7 20 52 31 B2 31 33 00 3C 3A B8 10 |B.8 . R1.13.<:..|
00003230: 8B 42 B2 39 20 A7 20 52 31 B2 31 39 00 4D 3A C2 |.B.9 . R1.19.M:.|
00003240: 10 8B 42 B2 31 30 A7 20 52 31 B2 32 35 00 5D 3A |..B.10. R1.25.]:|
00003250: CC 10 8B 42 B2 31 31 A7 20 52 31 B2 31 00 6D 3A |...B.11. R1.1.m:|
00003260: D6 10 8B 42 B2 31 32 A7 20 52 31 B2 37 00 7E 3A |...B.12. R1.7.~:|
00003270: E0 10 8B 42 B2 31 33 A7 20 52 31 B2 31 33 00 8F |...B.13. R1.13..|
00003280: 3A EA 10 8B 42 B2 31 34 A7 20 52 31 B2 31 39 00 |:...B.14. R1.19.|
00003290: A0 3A F4 10 8B 42 B2 31 35 A7 20 52 31 B2 32 35 |.:...B.15. R1.25|
000032A0: 00 B0 3A FE 10 8B 42 B2 31 36 A7 20 52 31 B2 31 |..:...B.16. R1.1|
000032B0: 00 C0 3A 08 11 8B 42 B2 31 37 A7 20 52 31 B2 37 |..:...B.17. R1.7|
000032C0: 00 D1 3A 12 11 8B 42 B2 31 38 A7 20 52 31 B2 31 |..:...B.18. R1.1|
000032D0: 33 00 E2 3A 1C 11 8B 42 B2 31 39 A7 20 52 31 B2 |3..:...B.19. R1.|
000032E0: 31 39 00 F3 3A 26 11 8B 42 B2 32 30 A7 20 52 31 |19..:&..B.20. R1|
000032F0: B2 32 35 00 F9 3A 30 11 8E 00 09 3B 3A 11 8F 20 |.25..:0....;:.. |
00003300: 44 31 20 56 41 4C 55 45 53 00 19 3B 44 11 8B 42 |D1 VALUES..;D..B|
00003310: B2 31 20 A7 20 44 31 B2 33 00 29 3B 4E 11 8B 42 |.1 . D1.3.);N..B|
00003320: B2 32 20 A7 20 44 31 B2 33 00 39 3B 58 11 8B 42 |.2 . D1.3.9;X..B|
00003330: B2 33 20 A7 20 44 31 B2 33 00 49 3B 62 11 8B 42 |.3 . D1.3.I;b..B|
00003340: B2 34 20 A7 20 44 31 B2 33 00 59 3B 6C 11 8B 42 |.4 . D1.3.Y;l..B|
00003350: B2 35 20 A7 20 44 31 B2 33 00 69 3B 76 11 8B 42 |.5 . D1.3.i;v..B|
00003360: B2 36 20 A7 20 44 31 B2 37 00 79 3B 80 11 8B 42 |.6 . D1.7.y;...B|
00003370: B2 37 20 A7 20 44 31 B2 37 00 89 3B 8A 11 8B 42 |.7 . D1.7..;...B|
00003380: B2 38 20 A7 20 44 31 B2 37 00 99 3B 94 11 8B 42 |.8 . D1.7..;...B|
00003390: B2 39 20 A7 20 44 31 B2 37 00 AA 3B 9E 11 8B 42 |.9 . D1.7..;...B|
000033A0: B2 31 30 20 A7 20 44 31 B2 37 00 BC 3B A8 11 8B |.10 . D1.7..;...|
000033B0: 42 B2 31 31 20 A7 20 44 31 B2 31 31 00 CE 3B B2 |B.11 . D1.11..;.|
000033C0: 11 8B 42 B2 31 32 20 A7 20 44 31 B2 31 31 00 E0 |..B.12 . D1.11..|
000033D0: 3B BC 11 8B 42 B2 31 33 20 A7 20 44 31 B2 31 31 |;...B.13 . D1.11|
000033E0: 00 F2 3B C6 11 8B 42 B2 31 34 20 A7 20 44 31 B2 |..;...B.14 . D1.|
000033F0: 31 31 00 04 3C D0 11 8B 42 B2 31 35 20 A7 20 44 |11..<...B.15 . D|
00003400: 31 B2 31 31 00 16 3C DA 11 8B 42 B2 31 36 20 A7 |1.11..<...B.16 .|
00003410: 20 44 31 B2 31 35 00 28 3C E4 11 8B 42 B2 31 37 | D1.15.(<...B.17|
00003420: 20 A7 20 44 31 B2 31 35 00 3A 3C EE 11 8B 42 B2 | . D1.15.:<...B.|
00003430: 31 38 20 A7 20 44 31 B2 31 35 00 4C 3C F8 11 8B |18 . D1.15.L<...|
00003440: 42 B2 31 39 20 A7 20 44 31 B2 31 35 00 5E 3C 02 |B.19 . D1.15.^<.|
00003450: 12 8B 42 B2 32 30 20 A7 20 44 31 B2 31 35 00 64 |..B.20 . D1.15.d|
00003460: 3C 0C 12 8E 00 85 3C 16 12 8F 20 50 41 54 43 48 |<.....<... PATCH|
00003470: 20 55 50 20 54 48 45 20 42 4F 41 52 44 20 20 30 | UP THE BOARD 0|
00003480: 3C 41 3C 31 30 00 AE 3C 20 12 99 22 13 22 AA C8 |<A<10..< .."."..|
00003490: 28 44 44 24 2C 44 44 29 AA C8 28 52 52 24 2C 52 |(DD$,DD)..(RR$,R|
000034A0: 52 AA 34 29 3B 22 12 20 20 20 20 20 92 22 00 CB |R.4);". ."..|
000034B0: 3C 2A 12 99 C8 28 52 52 24 2C 52 52 AA 34 29 3B |<*...(RR$,RR.4);|
000034C0: 22 12 20 22 41 22 9D 20 20 92 22 00 E6 3C 34 12 |". "A". ."..<4.|
000034D0: 99 C8 28 52 52 24 2C 52 52 AA 34 29 3B 22 12 20 |..(RR$,RR.4);". |
000034E0: 20 20 20 20 92 22 00 EC 3C 3E 12 8E 00 14 3D 48 | ."..<>....=H|
000034F0: 12 99 22 13 22 AA C8 28 44 44 24 2C 44 44 29 AA |.."."..(DD$,DD).|
00003500: C8 28 52 52 24 2C 52 52 AA 34 29 3B 22 12 20 20 |.(RR$,RR.4);". |
00003510: 20 20 20 22 00 30 3D 52 12 99 C8 28 52 52 24 2C | ".0=R...(RR$,|
00003520: 52 52 AA 34 29 3B 22 12 22 41 22 9D 20 20 92 22 |RR.4);"."A". ."|
00003530: 00 4B 3D 5C 12 99 C8 28 52 52 24 2C 52 52 AA 34 |.K=\...(RR$,RR.4|
00003540: 29 3B 22 12 20 20 20 20 20 92 22 00 51 3D 66 12 |);". .".Q=f.|
00003550: 8E 00 7A 3D 70 12 99 22 13 22 AA C8 28 44 44 24 |..z=p.."."..(DD$|
00003560: 2C 44 31 29 AA C8 28 52 52 24 2C 52 31 AA 34 29 |,D1)..(RR$,R1.4)|
00003570: 3B 22 12 20 20 20 20 20 92 22 00 97 3D 7A 12 99 |;". ."..=z..|
00003580: C8 28 52 52 24 2C 52 31 AA 34 29 3B 22 12 20 22 |.(RR$,R1.4);". "|
00003590: 42 22 9D 20 20 92 22 00 B2 3D 84 12 99 C8 28 52 |B". ."..=....(R|
000035A0: 52 24 2C 52 31 AA 34 29 3B 22 12 20 20 20 20 20 |R$,R1.4);". |
000035B0: 92 22 00 B8 3D 8E 12 8E 00 E1 3D 98 12 99 22 13 |."..=.....=...".|
000035C0: 22 AA C8 28 44 44 24 2C 44 31 29 AA C8 28 52 52 |"..(DD$,D1)..(RR|
000035D0: 24 2C 52 31 AA 34 29 3B 22 12 20 20 20 20 20 92 |$,R1.4);". .|
000035E0: 22 00 FD 3D A2 12 99 C8 28 52 52 24 2C 52 31 AA |"..=....(RR$,R1.|
000035F0: 34 29 3B 22 12 22 42 22 9D 20 20 92 22 00 18 3E |4);"."B". ."..>|
00003600: AC 12 99 C8 28 52 52 24 2C 52 31 AA 34 29 3B 22 |....(RR$,R1.4);"|
00003610: 12 20 20 20 20 20 92 22 00 1E 3E B6 12 8E 00 29 |. ."..>....)|
00003620: 3E BA 13 89 20 31 37 39 30 00 36 3E 70 17 41 24 |>... 1790.6>p.A$|
00003630: B2 22 31 32 33 22 00 4A 3E 7A 17 99 A6 31 30 29 |."123".J>z...10)|
00003640: 22 5E 20 20 20 20 20 5E 91 22 00 63 3E 84 17 99 |"^ ^.".c>...|
00003650: A6 31 31 AB 28 C3 28 41 24 29 B3 34 AC 31 29 29 |.11.(.(A$).4.1))|
00003660: 3B 41 24 00 8E 3E 54 EC 99 22 92 93 11 11 11 1D |;A$..>T.."......|
00003670: 05 4C 4F 41 44 22 C7 28 33 34 29 22 43 36 34 2E |.LOAD".(34)"C64.|
00003680: 4D 45 4E 55 22 C7 28 33 34 29 22 2C 38 22 00 C1 |MENU".(34)",8"..|
00003690: 3E 5E EC 99 22 13 22 3A 97 31 39 38 2C 34 3A 97 |>^..".":.198,4:.|
000036A0: 36 33 31 2C 31 33 3A 97 36 33 32 2C 38 32 3A 97 |631,13:.632,82:.|
000036B0: 36 33 33 2C 32 31 33 3A 97 36 33 34 2C 31 33 3A |633,213:.634,13:|
000036C0: 80 00 00 00 |.... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......LX.X.U.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
...#.. +++ INPUT SECTION +++...(..UO,0:U
R$."":UI$.""...*..UL.0.UL.80...-..UC,0.*
.2..UI$:.UI$."".50.T.7..UI$.G(13).C(UR$)
..1..UC,1:." .";:.85.G.<..UI$.G(20).105.
{.>.. C(UR$)..UL.50. .A..120:. CHECK FOR
VALID CHARACTER...F.UR$.UR$.UI$...K..UI
$;.B.P..50...U.. +++ CHECK FOR HELP REQU
EST +++...Z..UR$.UX$.195:. EXIT TO HELP
ROUTINE..._..UF.1..240.+.D.UF.0:.:..D.F.
. ++ CHECK DELETE ++.U.I..C(UR$).1.50.M.
N.UR$.H(UR$,C(UR$).1)..S..". ..";:.50.
..X.. ++ CHECK FOR VALID CHARACTERS ++..
.}..C(US$).0.150.H..US$.US$.UX$.Y....US
.1.C(US$)......UI$.J(US$,US,1)..........
...UI$."":....... ** STANDARD INPUT **./
....F(UI$).46...@....UI$.G(32)...]. ..F(
UI$).48.F(UI$).57.170.C..........F(UI$).
65.F(UI$).90.180............F(UI$).193.F
(UI$).218.UI$."":..M....B(UT).UU%.UI$.G(
F(UI$).128):..S.........UI$."":....C.UF.
1:. +++ HELP ROUTINE EXIT +++...E..250..
.H..245.6.M..UQ.UB.(U2%.256.U1%.U3%.2).R
.R.UQ%(UQ.UB).B(UQ):.:.".".E.W.UZ.1:UV%.
B(UT).N.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:
UP.UJ:UL.UK:.B(50003).0..53281,6:.53280,
14.....UT$.UL$:.53281,1:.".";:.53281,6:.
UT,UV%:......UQ.UB.(U2%.256.U1%.U3%.3)..
....UQ,UQ%(UQ.UB):.......U1,U1%.+....U2,
U2%.7....U4,U4%.E....U3,U3%.1.M....35..
..UD%.((U2%.256.U1%.U3%).UB).40:.H(UD$,U
D%.1):.......H(UD$,24);"
. HELP COMING . ":......U1%.B(U1)
:U2%.B(U2):U3%.B(U3):U4%.B(U4).....UJ$.U
S$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL.......%.,
.. ** MENU **.+.-.:.Z....".":.UT,UU%:.B(
50003).0..53281,9:.53280,8.`./.:.}.1..".
MENU"...6.." -----------
---------------------------".O.;.."..
1. CONCENTRATION"...@..".. 2
. STUDENT INSTRUCTIONS".#.E.."..
3. TEACHER INSTRUCTIONS".P.J.."..
4. MODIFICATION OF PROGRAM".L.O..".
. 5. QUIT.."...T.." ------------
--------------------------".F.Y.."..
PRESS A NUMBER KEY (1-5) ";...^.UL.1:
US$."12345":.35:. INPUT ROUTINE..._..C(U
R$).1.300...`.US$."".-.C..E(UR$).1000,40
0,500,600,396.6.H..300.].... ** RE-ENABL
E STOP KEY AND END **......B(50003)..1.B
(50003)..160.B(50003)..0.399......UU.71:
.B(50003).0..53281,6:.53280,14.G....".."
:.60500.R....875:....... ** STUDENT INST
RUCTIONS **."....".":.UT,UL%:.B(50003).0
..53281,0:.53280,0.X...UT$." CONCENTRATI
ON":UP.0:UG$."STUDENT INST":.850......".
THE CONCENTRATION BOARD WILL BE"....
..". DISPLAYED WITH 20 SECTIONS. BEHIND
".X....". EACH PANEL IS A WORD. WHEN YOU
......". CHOOSE A NUMBER (1-20) A WORD I
S./....". REVEALED. ON YOUR SECOND CHOI
CE, YOU.Z. ..". TRY TO MAKE A MATCH BY F
INDING THE......". SAME WORD SOMEWHERE E
LSE. THERE......". ARE 10 MATCHES TO BE
MADE.......835:.850......". WHEN YO
U HAVE COMPLETED ALL THE......". MATCHES
THE WHOLE BOARD WILL BE".6....". DISPLA
YED AND THE GAME WILL BE OVER..C...."...
...YOU MAY HAVE ONE OR TWO PLAYERS......
.". THE AIM FOR ONE IS TO OPEN THE BOARD
......". WITH AS FEW TRIES AS POSSIBLE.
THE......". AIM FOR TWO PLAYERS IS TO M
AKE MORE......". MATCHES THAN YOUR OPPON
ENT.......835.)....UZ.1..UP%:.217.4...UG
$."".:.....[.... ** TEACHER INSTRUCTIONS
**......".":.UT,UL%:.B(50003).0..53281,
2:.53280,10.A...UT$." CONCENTRATION":UP.
0:UG$."TEACHER INST":.850......"..
TO THE BEST OF OUR KNOWLEDGE,."......"
THIS PROGRAM IS IN THE PUBLIC.".D...."
DOMAIN. IF THIS IS NOT THE CASE.".A..
.." PLEASE CONTACT:..."......" CO
MMODORE BUSINESS MACHINES."......"
3370 PHARMACY AVE..R...." A
GINCOURT, ONTARIO"......" CANAD
A M1W 2K4"......" (416) 499-4
292".%.... 835:. 850:.O...." ..PROGR
AM NAME: CONCENTRATION..X...." WRITT
EN BY : FREDD CHRISTIE......." UPGR
ADED BY : ..G...." .THIS PR
OGRAM WILL RUN ON ANY........" B
ASIC 2.0 PET COMPUTER......." BA
SIC 4.0 PET COMPUTER..7...." 803
2 CBM COMPUTER..\...." COMMODORE
64 COMPUTER.J....835:.850......". THIS
GAME IS DESIGNED FOR ANYONE WHO".H....".
CAN READ. IT IS AN EXERCISE IN PAYING"
......". ATTENTION TO DETAIL AND CONCENT
RATING"."....". ON WHAT YOU SEE AND CAN
REMEMBER.".N....". PLAYERS CAN REVEAL SE
CTIONS OF THE".|....". BOARD FOR SHORT P
ERIODS OF TIME, BUT"......". THEY HAVE T
O REMEMBER WHAT THEY SAW".I. ..". AND WH
ERE THEY SAW IT.".R.D..835...N..UZ.1..UP
%:.217...V.UG$.""...W.....X.. ** PROGRAM
MODIFICATION INST **...Y..".":.UT,UL%.C
.].UT$." CONCENTRATION":UP.0:UG$."PROGRA
M MOD":.850......". LINE 2200 HOLDS DATA
.......". THE GAME CAN BE EASILY CHANGED
BY".X....". LISTING AND TYPING IN 10 DI
FFERENT"......". WORDS WHICH ARE SUITABL
E FOR THE".$....". PEOPLE PLAYING THE GA
ME.".-....835.A....UZ.1..UP%:.217.L...UG
$."".R.....W.... ** TO USE 8032 LOAD CBM
4032 **...F..".....BEFORE RUNNING THIS P
ROGRAM ON AN 8032 .....P.." LOAD T
HE 'CBM 4032' PROGRAM............."...Z.
.UU.71............ ** TO USE 8032 LOAD C
BM4032 **.D...."....BEFORE RUNNING THIS
PROGRAM ON AN 8032 ..LOAD CBM 4032 PROG
RAM".P....1093:.... .. ** T I T L E P
A G E **.D.".."....";:.UT,UU%:.B(50003).
0..53280,14:.53281,6.Z.$..I.1.38:."...";
:....&..I.1.22:.".....";:....(..I.1.37:.
".....";:..".*..I.1.22:.".....";:..G.,..
"........................... ..I...."..
................. . . .....0.."........
........... . ......2.."...............
..... ..P.4.."..............C O M M O D
O R E.....6.."...............EDUCATIONA
L.....8.."................SOFTWARE.-.:..
** COMMODORE LOGO **.E.;..H(UD$,24);"..
........PRESS SPACE BAR OR WAIT.":I.0...
<..A$:.A$.." ".I.I.1:.I.250.828...>.T1$.
"":T2$."":T3$."":T4$."":I.0...@..300.P.C
.. ** SPACE BAR PRESS **...H..UO,0:.H(UD
$,24);".......PRESS SPACE BAR TO CONTINU
E.".".L..UI$:.UI$.." ".844.(.N...H.R.. *
* PAGE DESIGN ROUTINE **.T.T.UP.UP.1.~.W
.."."H(UT$.UP$,21);I(UP$.UG$.D(UP),18)..
.\.." ----------------------------------
----"...`..UH..0.870...A..H(UD$,24);H(UP
$,7);"HELP - PRESS H <RETURN>"...F..UO
,0:."..":..!.K.. ** PLEASE WAIT REMARK *
*.W.P..H(UD$,24);" ONE MOMENT
PLEASE... ".].U...Z.... ** SET UP VA
RIABLES **.E...UX$."H":.UQ%(1000):UB.327
68:U1.196:U2.197:U3.198:U4.216:UC.167:UU
.1024.. ..UT.59468:UU%.12:UL%.14:UP%.114
6:UM.32768:UO.158:. 50003,0.F ...B(50003
).0.UB.1024:U1.209:U2.210:U3.211:U4.214:
UC.204:UU.2048.. ...B(50003).0.UT.53272:
UU%.21:UL%.23:UP%.2139:UM.1024:UO.198..
..UD$.".........................".. ..UP
$."
"..!..UT$." CONCENTRATION":. PROGRAM T
ITLE..!...A$(20),B$(20):..3!... ** SET V
ARIABLES **.<!...900.W!... ** CHECK FOR
8032 **.U!...".":." ":. SHIFTED SPACE..!
...B(UB.40)..96..700..!... ** MEMORY CHE
CK **..!... .(0).2000.937..!..."....THIS
MACHINE DOES NOT HAVE ENOUGH.".."..."ME
MORY TO RUN THIS PROGRAM !".."...UU.71..
"....6"..."..":.B(50003).0.962.E"... **
BASIC 2.0 OR 4.0 OR C-64 SETUP **.."
...1075,133:.1076,144:.1077,234:.1079,4:
.1080,133:.1081,145.Y"...1091,155:.1098,
133:.1099,144:.1100,234:.1103,133.."...1
104,145:.1105,234:.1082,234..#...B(50003
)..160.955.A#...1093,88:.1094,228:.1097,
85:.1102,228:.965.V#...B(50003)..1.990..
#...1093,49:.1094,230:.1097,46:.1102,230
:.965..#B..2099,141:.2100,20:.2101,3:.21
03,8:.2104,141:.2105,21..#C..2106,3:.211
5,145:.2117,52:.2118,234:.2121,49:.2122,
141.5$D..2123,20:.2124,3:.2126,234:.2127
,141:.2128,21:.2129,3.S$E..UU.48:. DISAB
LE STOP KEY.D$J..800:. TITLE.T$T..300:.
MENU..$...".THE PGM WILL NOT WORK ON THI
S MACHINE!":..Z$...UZ.1..UP%:.UP%:UZ.0:.
** PROGRAM STARTS HERE **..%..."..";:.:
.B(50003).0..53281,6:.53280,6.,%^.UP.0:M
.0:NN.O:UT$." CONCENTRATION"._%R.RR$."..
......................................".
~%|.DD$."...................."..%..ST$."
.".H(DD$,20).H(RR$,4)..%...UT,UU%.W%...8
50:.".. HOW MANY PLAYERS ARE THERE ? ";.
.%..UL.1:US$."12":.35:Z$.UR$..&...Z$."2"
. 1920.)&L..:.:."..WHAT IS YOUR NAME ? "
;.>&V.UL.15:US$."":.35.P&{.NA$.UR$:.1960
.Q&...".....WHO IS PLAYER #1 ? ";..&..UL
.15:US$."":.35..&..NM$.UR$..&...:.:."..W
HO IS PLAYER #2 ? ";.I&..UL.15:US$."":.3
5.U&..NE$.UR$..'...".......GREAT! LET'S
PLAY .CONCENTRATION!."..'...835.$'...850
:.PRINT"...".Q'F.A$."...................
................"..'P.B$."...... ...
... ... ... .."..'Z.BP$
."...... 1 ... 2 ... 3 ... 4 ...
5 .."..'..BQ$."...... 6 ... 7 ...
8 ... 9 ... 10 ..".0(..BR$."......
11 ... 12 ... 13 ... 14 ... 15 .."
.H(..BS$."...... 16 ... 17 ... 18 ...
19 ... 20 .."..(..C$."...............
....................".B(..D$."..........
........................."..(...A$:.B$:.
BP$:.B$:.C$:.B$:.BQ$:.B$:.C$..) ..B$:.BR
$:.B$:.C$..)*..B$:.BS$:.B$:.D$.2)4.. SET
DISPLAYS FOR GAME.;)>..875.P)?..X.1.10:
.A$(X):..V)H...L)R..X.11.20:.A$(X):..X)\
..Z.1.20..)F.K$.A$(Z)..)P.L..(20..(TI).1
)..)Z.A$(Z).A$(L)..)..A$(L).K$..)...Z..)
... SAW,WAS,NIP,PIN,TIN,THIN,LAP,LIP,PAN
,PAT..).....*... ONE OR TWO PLAYERS.$*..
. ONE PLAYER (4020).>*... TWO PLAYERS
(5000).X*J..H(UD$,24);"
";..*O.. NA$."".28
20..*T..N.1.800:..R*...".".H(DD$,20).H(R
R$,4);"FIRST CHOICE (1-20): ";..*..U
L.2:US$."0123456789":.35..*..A.E(UR$).<+
...A.1. A.20 .. ".
...":.2270.K+...".
".V+... 3470..
+... 3540..+$.. 3760..+...3980.E+B..".".
H(DD$,20).H(RR$,4);"SECOND CHOICE: ";..+
L.UL.2:US$."0123456789":.35..+Q.B.E(UR$)
.2,S..B.1. B.20.B.A.. ".
...":.2370.F,V..".".H(DD
$,20).H(RR$,4);" ".Q
,`.. 4050.|,J.. 4190..,T.. 4410..,~..412
0..,..NN.NN.1..,...A$(A).A$(B). A$(A).""
:.2470.H,...2480.U,..A$(B).""..-... A$(A
).A$(B)..".".H(DD$,20).H(RR$,4);"THAT'S
A MATCH!".*-... A$(A).A$(B). M.M.1.H-D..
M.10 . .X.1.500:.:. 2640.X-N..X.1.3000:.
.R-X.. A$(A)..A$(B) . 2540.}-... 2580..-
...A.10.. 4630..-...A.9.. 4680..-...B.10
.. 4720..-...B.9.. 4760.I-...2260.O-....
U-(....-2.. PATCH UP THE BOARD...<..X.1.
2000:. :. PROGRAM.-.F..2260
:. PROGRAM.Q.P..835:.850:." WELL DONE
, "NA$"!"...D.."....... YOU HAVE OPENED
THE WHOLE BOARD."...X.."......... YOU HA
D ";NN;" TRIES TO MAKE 10 MATCHES.".....
."........... CAN YOU BEAT";NN;"?"... ..
835.....M.0:NN.0../... 1980../... TWO P
LAYERS.&/...N.1.1000:..B/..X..(2..(1)).1
:T.X:.2860.J/".X.T.H/,.. X.1.." ";ST$;NM
$;:.2880.Z/6.." ";ST$;NE$;../@..FORN=1TO
750:NEXT../J..", YOUR CHOICE (1-20): ";
.W/O.UL.2:US$."0123456789":.35:A.E(UR$).
.0T.BLANK$.".
"..0^...:0H..A.1. A.20 .. BLA
NK$:."....":. 2860.F0R..BLANK$.U0|..N.1.
800:..`0... 3470.K0... 3540.V0... 3760..
0... 3980..0...".".H(DD$,20).H(RR$,4);"S
ECOND CHOICE: ";.N0..UL.2:US$."012345678
9":.35..0..B.E(UR$)..0B.. B .1.B.20.B.A
. 2990..1L.. BLANK$..1V..4050..1...4190
."1...4410.,1...4120.O1...A$(A)..A$(B).
T.1 . T.2:.3120.L1...A$(A)..A$(B). T.2 .
T.1..1...A$(A).A$(B).A$(A)."":.3110..1.
..3120..1&.A$(B).""..10..A$(A).A$(B)..ST
$:.BLANK$:.ST$;"THAT'S A MATCH":.3140..1
:..3160..1D..X.1.1500:...2N..BLANK$. 2X.
.A$(A).A$(B).T.1.M1.M1.1.>2B..A$(A).A$(B
) .T.2.M2.M2.1.W2L..M1.M2.10..835:.3270.
G2V..X.1.3000:...2...A$(A)..A$(B) . 3220
..2...3260..2...A.10.. 4630..2...A.9. .
4680..2...B.10.. 4720.N2...B.9. . 4760.X
2...2850..2F..X.1.500:...2P..850..2Z..X.
1.500:...3..."............FINAL SCORE.".
E3..."....";NM$;" ";M1;" MATCHES".K3
..."....";NE$;" ";M2;" MATCHES"..3 .
.".............";..3*..M1.M2.." THE WINN
ER IS ";NM$;"!":.3400..34..M1.M2.." THIS
GAME IS A STALEMATE!":.3400..3>.." THE
WINNER IS ";NE$;"!"..4H..835..4.....4...
ALIGNMENT OF VARIABLE STRINGS.L4...A$(A
)."". NA$.."" . 2270.P4...A$(A)."".NA$."
". .BLANK$:.2860.}4... I.1.20..4... I.A
. G$.A$(I)..4... I. 4J....4T.. CURSOR VA
LUES.D4...A.1 . RR.1.T4...A.2 . RR.7..4.
..A.3 . RR.13..4...A.4 . RR.19..5...A.5
. RR.25..5...A.6 . RR.1.'5...A.7 . RR.7.
85$..A.8 . RR.13.I5...A.9 . RR.19.Z58..A
.10. RR.25.J5B..A.11. RR.1.Z5L..A.12. RR
.7..5V..A.13. RR.13..5`..A.14. RR.19..5J
..A.15. RR.25..5T..A.16. RR.1.M5~..A.17.
RR.7..5...A.18. RR.13..5...A.19. RR.19.
.6...A.20. RR.25..6.....6... DD VALUES.&
6...A.1 . DD.3.66D..A.2 . DD.3.F6N..A.3
. DD.3.V6X..A.4 . DD.3.F6...A.5 . DD.3.V
6...A.6 . DD.7..6...A.7 . DD.7..6...A.8
. DD.7..6...A.9 . DD.7..6...A.10 . DD.7.
I6...A.11 . DD.11..6(..A.12 . DD.11..62.
.A.13 . DD.11..6<..A.14 . DD.11..7F..A.1
5 . DD.11.#7P..A.16 . DD.15.57Z..A.17 .
DD.15.G7D..A.18 . DD.15.Y7N..A.19 . DD.1
5.K7X..A.20 . DD.15.Q7.....7... DISPLAY
HIDDEN A$(A)..7...".".H(DD$,DD).H(RR$,RR
.4);" ".L7 ..H(RR$,RR.4);" "..7.
..H(RR$,RR.4);" "..8...".".H(DD$,DD)
.H(RR$,RR.4);" ".38...H(RR$,RR.4);..
(C(A$(A)).4));A$(A).98H...]8R.. ALIGNMEN
T OF VARIABLE STRINGS.Y8...A$(B)."".NA$.
."". 2370..8...A$(B)."".NA$."".2990. 8..
. I.1.20..8... I.B . G2$.A$(I)..8... I.D
8.....8... DISPLAY HIDDEN WORD [A$(B)]..
9"..".".H(DD$,D1).H(RR$,R1.4);" ".&9
,..H(RR$,R1.4);" ".?96..H(RR$,R1.4);
" ".F9@..".".H(DD$,D1).H(RR$,R1.4);"
"..9J..H(RR$,R1.4);..(C(A$(B)).4));
A$(B)..9T....9^.. CURSOR VALUES..9H..B.1
. R1.1.G9R..B.2 . R1.7.X9|..B.3 . R1.13
..9...B.4 . R1.19..9...B.5 . R1.25..:...
B.6 . R1.1..:...B.7 . R1.7.+:...B.8 . R1
.13.<:...B.9 . R1.19.M:B..B.10. R1.25.]:
L..B.11. R1.1.M:V..B.12. R1.7.~:...B.13.
R1.13..:...B.14. R1.19. :...B.15. R1.25
..:...B.16. R1.1..:...B.17. R1.7.Q:...B.
18. R1.13..:...B.19. R1.19..:&..B.20. R1
.25..:0....;:.. D1 VALUES..;D..B.1 . D1.
3.);N..B.2 . D1.3.9;X..B.3 . D1.3.I;B..B
.4 . D1.3.Y;L..B.5 . D1.3.I;V..B.6 . D1.
7.Y;...B.7 . D1.7..;...B.8 . D1.7..;...B
.9 . D1.7..;...B.10 . D1.7..;...B.11 . D
1.11.N;...B.12 . D1.11..;...B.13 . D1.11
..;F..B.14 . D1.11..<P..B.15 . D1.11..<Z
..B.16 . D1.15.(<...B.17 . D1.15.:<...B.
18 . D1.15.L<...B.19 . D1.15.^<...B.20 .
D1.15.D<.....<... PATCH UP THE BOARD 0
<A<10..< ..".".H(DD$,DD).H(RR$,RR.4);".
.".K<*..H(RR$,RR.4);". "A". ."..<4.
.H(RR$,RR.4);". ."..<>....=H..".".H(
DD$,DD).H(RR$,RR.4);". ".0=R..H(RR$,
RR.4);"."A". .".K=\..H(RR$,RR.4);".
.".Q=F...Z=P..".".H(DD$,D1).H(RR$,R1.4)
;". ."..=Z..H(RR$,R1.4);". "B". .".
.=...H(RR$,R1.4);". ."..=.....=...".
".H(DD$,D1).H(RR$,R1.4);". ."..=...H
(RR$,R1.4);"."B". ."..>...H(RR$,R1.4);"
. ."..>....)>... 1790.6>P.A$."123".J
>Z...10)"^ ^.".C>....11.(C(A$).4.1))
;A$..>T..".......LOAD"G(34)"C64.MENU"G(3
4)",8".A>^..".":.198,4:.631,13:.632,82:.
633,213:.634,13:....
> CLICK IMAGE PREVIEW FOR FULL MODAL