_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

SHAPE MATCH

FILE INFORMATION

FILENAME(S): SHAPE MATCH

FILE TYPE(S): PRG

FILE SIZE: 4.4K

FIRST SEEN: 2025-11-30 18:07:04

APPEARS ON: 2 disk(s)

FILE HASH

62fd1846c89497683e5e3b269ec1db199b3d2c0559a04506691cf9ec2897ce56

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
GAZETTE JUNE 84 SHAPE MATCH PRG Xii 25 5 DOWNLOAD FILE
C64 SPEL 90 2 SHAPE MATCH PRG DuncanTwain 3 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 28 08 32 00 8F 20  2A 2A 20 20 20 20 20 20  |..(.2.. **      |
00000010: 20 20 20 20 20 49 4E 49  54 49 41 4C 49 5A 45 20  |     INITIALIZE |
00000020: 20 20 20 20 20 20 2A 2A  00 38 08 34 00 86 20 43  |      **.8.4.. C|
00000030: 4C 28 32 30 2C 34 30 29  00 75 08 35 00 99 22 93  |L(20,40).u.5..".|
00000040: 1F 22 3A 9E 36 35 35 31  37 3A 57 49 B2 C2 28 37  |.":.65517:WI..(7|
00000050: 38 31 29 3A 8B 57 49 B2  32 32 A7 57 49 B2 30 3A  |81):.WI.22.WI.0:|
00000060: 97 33 36 38 37 39 2C 32  33 38 3A 53 53 B2 32 3A  |.36879,238:SS.2:|
00000070: 50 48 B2 2E 35 00 98 08  36 00 8B 20 57 49 B2 30  |PH..5...6.. WI.0|
00000080: A7 41 41 24 B2 22 56 49  43 22 3A 42 42 24 B2 22  |.AA$."VIC":BB$."|
00000090: 56 49 43 22 3A 89 36 30  00 BF 08 37 00 97 35 33  |VIC":.60...7..53|
000000A0: 32 38 30 2C 31 3A 97 35  33 32 38 31 2C 31 35 3A  |280,1:.53281,15:|
000000B0: 53 53 B2 31 32 3A 57 49  B2 38 3A 50 48 B2 31 00  |SS.12:WI.8:PH.1.|
000000C0: EC 08 39 00 41 41 24 B2  22 36 34 11 9D 9D 9D 9D  |..9.AA$."64.....|
000000D0: 9D 9D 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 9D 9D 9D 9D  |................|
000000E0: 9D 9D 22 3A 42 42 24 B2  22 36 34 22 00 2B 09 3C  |..":BB$."64".+.<|
000000F0: 00 8B 20 57 49 B2 30 20  A7 20 43 4C 28 34 2C 31  |.. WI.0 . CL(4,1|
00000100: 38 29 B2 31 3A 43 4C 28  34 2C 33 31 29 B2 32 3A  |8).1:CL(4,31).2:|
00000110: 43 4C 28 31 30 2C 31 38  29 B2 33 3A 43 4C 28 31  |CL(10,18).3:CL(1|
00000120: 30 2C 33 31 29 B2 34 3A  89 38 30 00 51 09 3F 00  |0,31).4:.80.Q.?.|
00000130: 81 41 B2 36 A4 31 32 A9  36 3A 81 42 B2 31 37 A4  |.A.6.12.6:.B.17.|
00000140: 33 33 A9 31 36 3A 53 B2  36 34 36 3A 97 53 2C 53  |33.16:S.646:.S,S|
00000150: 53 00 6A 09 46 00 54 B2  54 AA 31 3A 43 4C 28 41  |S.j.F.T.T.1:CL(A|
00000160: 2C 42 29 B2 54 3A 82 42  2C 41 00 8F 09 50 00 99  |,B).T:.B,A...P..|
00000170: 22 11 11 11 11 11 11 22  3B 3A 99 A3 57 49 AA 35  |"......";:..WI.5|
00000180: 29 22 90 53 48 41 50 45  20 4D 41 54 43 48 22 00  |)".SHAPE MATCH".|
00000190: B1 09 BE 00 8D 33 30 30  30 3A 8F 20 2A 2A 20 20  |.....3000:. **  |
000001A0: 49 4E 53 54 52 55 43 54  49 4F 4E 53 20 20 20 2A  |INSTRUCTIONS   *|
000001B0: 2A 00 CF 09 C8 00 8D 31  30 30 30 3A 8F 20 2A 2A  |*......1000:. **|
000001C0: 20 50 52 49 4E 54 20 42  4F 41 52 44 20 2A 2A 00  | PRINT BOARD **.|
000001D0: DF 09 D2 00 81 54 B2 31  A4 31 30 30 30 3A 82 00  |.....T.1.1000:..|
000001E0: 05 0A 2C 01 8F 20 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..,.. **********|
000001F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000200: 2A 2A 2A 2A 2A 00 2B 0A  2E 01 8F 20 2A 2A 20 20  |*****.+.... **  |
00000210: 20 20 20 20 20 20 53 45  4C 45 43 54 20 53 48 41  |      SELECT SHA|
00000220: 50 45 53 20 20 20 20 20  20 2A 2A 00 51 0A 31 01  |PES      **.Q.1.|
00000230: 8F 20 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |. **************|
00000240: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000250: 2A 00 5E 0A 32 01 4B B2  BB 28 AB 54 49 29 00 7A  |*.^.2.K..(.TI).z|
00000260: 0A 36 01 4B B2 B5 28 BB  28 30 29 AC 34 29 AA 31  |.6.K..(.(0).4).1|
00000270: 3A 8B 4B B2 4B 4B A7 33  31 30 00 80 0A 40 01 8F  |:.K.KK.310...@..|
00000280: 00 B6 0A 54 01 81 54 B2  31 A4 33 3A 8D 32 30 30  |...T..T.1.3:.200|
00000290: 30 3A 42 4F 24 B2 53 48  24 28 54 29 3A 41 B2 34  |0:BO$.SH$(T):A.4|
000002A0: AA 54 3A 42 B2 31 38 3A  99 22 13 22 3A 8D 31 31  |.T:B.18:.".":.11|
000002B0: 37 30 3A 82 20 54 00 D8  0A 59 01 8D 31 31 38 30  |70:. T...Y..1180|
000002C0: 3A 8F 20 2A 2A 20 20 20  20 20 20 44 45 4C 41 59  |:. **      DELAY|
000002D0: 20 20 20 20 20 20 2A 2A  00 0A 0B 5C 01 8B 57 49  |      **...\..WI|
000002E0: B2 30 A7 81 54 B2 31 A4  33 3A 8D 32 31 30 30 3A  |.0..T.1.3:.2100:|
000002F0: 42 4F 24 B2 53 48 24 28  54 29 3A 41 B2 34 AA 54  |BO$.SH$(T):A.4.T|
00000300: 3A 42 B2 33 32 3A 99 22  13 22 00 22 0B 5D 01 8B  |:B.32:.".".".]..|
00000310: 57 49 B2 30 A7 8D 31 31  37 30 3A 82 54 3A 89 33  |WI.0..1170:.T:.3|
00000320: 35 35 00 58 0B 5E 01 81  54 B2 31 A4 33 3A 8D 32  |55.X.^..T.1.3:.2|
00000330: 31 30 30 3A 42 4F 24 B2  53 48 24 28 54 29 3A 41  |100:BO$.SH$(T):A|
00000340: B2 34 AA 54 3A 42 B2 32  38 3A 99 22 13 22 3A 8D  |.4.T:B.28:.".":.|
00000350: 31 31 37 30 3A 82 20 54  00 62 0B 63 01 8D 31 31  |1170:. T.b.c..11|
00000360: 38 30 00 99 0B 68 01 81  54 B2 31 A4 33 3A 8D 32  |80...h..T.1.3:.2|
00000370: 32 30 30 3A 42 4F 24 B2  53 48 24 28 54 29 3A 41  |200:BO$.SH$(T):A|
00000380: B2 31 30 AA 54 3A 42 B2  31 38 3A 99 22 13 22 3A  |.10.T:B.18:.".":|
00000390: 8D 31 31 37 30 3A 82 20  54 00 A3 0B 6D 01 8D 31  |.1170:. T...m..1|
000003A0: 31 38 30 00 DA 0B 72 01  81 54 B2 31 A4 33 3A 8D  |180...r..T.1.3:.|
000003B0: 32 33 30 30 3A 42 4F 24  B2 53 48 24 28 54 29 3A  |2300:BO$.SH$(T):|
000003C0: 41 B2 31 30 AA 54 3A 42  B2 32 38 3A 99 22 13 22  |A.10.T:B.28:."."|
000003D0: 3A 8D 31 31 37 30 3A 82  20 54 00 E4 0B 77 01 8D  |:.1170:. T...w..|
000003E0: 31 31 38 30 00 EF 0B 7C  01 81 54 B2 31 A4 33 00  |1180...|..T.1.3.|
000003F0: 0A 0C 7F 01 91 4B 8D 32  30 30 30 2C 32 31 30 30  |.....K.2000,2100|
00000400: 2C 32 32 30 30 2C 32 33  30 30 00 38 0C 81 01 42  |,2200,2300.8...B|
00000410: 4F 24 B2 53 48 24 28 54  29 3A 41 B2 20 38 AA 54  |O$.SH$(T):A. 8.T|
00000420: 3A 42 B2 33 3A 99 22 13  22 3A 8D 31 31 37 30 3A  |:B.3:.".":.1170:|
00000430: 82 20 54 3A 4B 4B B2 4B  00 3E 0C F4 01 8F 00 48  |. T:KK.K.>.....H|
00000440: 0C 26 02 8F 20 45 4E 44  00 6E 0C 58 02 8F 20 2A  |.&.. END.n.X.. *|
00000450: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000460: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 94  |**************..|
00000470: 0C 5A 02 8F 20 2A 2A 20  20 20 20 20 20 20 20 20  |.Z.. **         |
00000480: 20 4D 4F 56 45 20 43 55  52 53 4F 52 20 20 20 20  | MOVE CURSOR    |
00000490: 20 20 2A 2A 00 BA 0C 5C  02 8F 20 2A 2A 2A 2A 2A  |  **...\.. *****|
000004A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000004B0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 D0 0C 5D 02 99  |**********...]..|
000004C0: 22 13 22 3A 43 B2 31 3A  81 4E 54 B2 31 A4 31 30  |".":C.1:.NT.1.10|
000004D0: 00 0A 0D 62 02 81 54 B2  31 A4 31 35 3A 42 4F 24  |...b..T.1.15:BO$|
000004E0: B2 C7 28 36 33 29 3A 8B  54 AD 32 B2 B5 28 54 AD  |..(63):.T.2..(T.|
000004F0: 32 29 A7 20 42 4F 24 B2  C7 28 31 38 29 AA C7 28  |2). BO$..(18)..(|
00000500: 36 33 29 AA C7 28 31 34  36 29 00 2C 0D 65 02 8B  |63)..(146).,.e..|
00000510: 20 57 49 B2 30 A7 20 91  20 43 20 89 20 36 36 30  | WI.0. . C . 660|
00000520: 2C 36 37 33 2C 36 38 33  2C 36 38 37 00 44 0D 67  |,673,683,687.D.g|
00000530: 02 91 43 20 89 36 37 30  2C 36 37 35 2C 36 38 30  |..C .670,675,680|
00000540: 2C 36 38 35 00 6E 0D 6C  02 8D 31 31 37 30 3A 99  |,685.n.l..1170:.|
00000550: 22 13 22 3A 81 54 54 B2  31 A4 20 37 35 3A 20 20  |".":.TT.1. 75:  |
00000560: 20 20 20 20 20 20 82 54  54 3A 89 37 30 30 00 76  |      .TT:.700.v|
00000570: 0D 71 02 82 20 54 00 AB  0D 76 02 42 4F 24 B2 C7  |.q.. T...v.BO$..|
00000580: 28 33 32 29 3A 8D 31 31  37 30 3A 99 22 13 22 3A  |(32):.1170:.".":|
00000590: 20 20 20 20 20 20 20 20  81 54 54 B2 31 A4 20 37  |        .TT.1. 7|
000005A0: 35 3A 82 54 54 3A 43 B2  43 AA 31 00 B8 0D 80 02  |5:.TT:C.C.1.....|
000005B0: 8B 43 B1 34 A7 43 B2 31  00 D6 0D 8A 02 82 4E 54  |.C.4.C.1......NT|
000005C0: 3A 89 36 30 30 3A 8F 20  2A 2A 20 20 52 45 50 45  |:.600:. **  REPE|
000005D0: 41 54 20 20 2A 2A 00 EC  0D 94 02 41 B2 34 3A 42  |AT  **.....A.4:B|
000005E0: B2 31 38 3A 4C B2 31 3A  89 36 32 30 00 02 0E 9E  |.18:L.1:.620....|
000005F0: 02 41 B2 36 3A 42 B2 31  37 3A 4C B2 31 3A 89 36  |.A.6:B.17:L.1:.6|
00000600: 32 30 00 19 0E A1 02 41  B2 31 30 3A 42 B2 31 38  |20.....A.10:B.18|
00000610: 3A 4C B2 32 3A 89 36 32  30 00 30 0E A3 02 41 B2  |:L.2:.620.0...A.|
00000620: 31 32 3A 42 B2 31 37 3A  4C B2 32 3A 89 36 32 30  |12:B.17:L.2:.620|
00000630: 00 46 0E A8 02 41 B2 36  3A 42 B2 33 33 3A 4C B2  |.F...A.6:B.33:L.|
00000640: 33 3A 89 36 32 30 00 5C  0E AB 02 41 B2 34 3A 42  |3:.620.\...A.4:B|
00000650: B2 33 31 3A 4C B2 33 3A  89 36 32 30 00 73 0E AD  |.31:L.3:.620.s..|
00000660: 02 41 B2 31 32 3A 42 B2  33 33 3A 4C B2 34 3A 89  |.A.12:B.33:L.4:.|
00000670: 36 32 30 00 8A 0E AF 02  41 B2 31 30 3A 42 B2 33  |620.....A.10:B.3|
00000680: 31 3A 4C B2 34 3A 89 36  32 30 00 B0 0E BC 02 8F  |1:L.4:.620......|
00000690: 20 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  | ***************|
000006A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000006B0: 00 D6 0E BE 02 8F 20 2A  2A 20 20 20 20 20 43 48  |...... **     CH|
000006C0: 45 43 4B 20 46 4F 52 20  52 45 53 50 4F 4E 53 45  |ECK FOR RESPONSE|
000006D0: 20 20 20 20 2A 2A 00 FC  0E C0 02 8F 20 2A 2A 2A  |    **...... ***|
000006E0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000006F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 00 10 0F C6  |************....|
00000700: 02 A1 41 24 3A 8B 41 24  B2 22 22 A7 20 36 32 35  |..A$:.A$."". 625|
00000710: 00 25 0F CB 02 8B 20 41  24 B2 22 51 22 A7 20 99  |.%.... A$."Q". .|
00000720: 22 93 22 3A 80 00 43 0F  D0 02 8B 43 4C 28 41 2C  |".":..C....CL(A,|
00000730: 42 29 B2 4B 20 A7 38 30  30 3A 8F 20 43 4F 52 52  |B).K .800:. CORR|
00000740: 45 43 54 00 5F 0F E4 02  89 38 35 30 3A 20 8F 20  |ECT._....850: . |
00000750: 2A 2A 20 20 57 52 4F 4E  47 20 20 20 20 2A 2A 00  |**  WRONG    **.|
00000760: 85 0F 20 03 8F 20 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.. .. **********|
00000770: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000780: 2A 2A 2A 2A 2A 00 AB 0F  22 03 8F 20 2A 2A 20 20  |*****...".. **  |
00000790: 20 20 20 20 20 20 20 43  4F 52 52 45 43 54 20 41  |       CORRECT A|
000007A0: 4E 53 57 45 52 20 20 20  20 2A 2A 00 D1 0F 24 03  |NSWER    **...$.|
000007B0: 8F 20 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |. **************|
000007C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000007D0: 2A 00 00 10 2A 03 42 4F  24 B2 22 12 05 59 45 53  |*...*.BO$."..YES|
000007E0: 21 20 54 48 41 54 27 53  20 52 49 47 48 54 21 22  |! THAT'S RIGHT!"|
000007F0: 3A 41 B2 31 38 3A 8D 31  31 37 34 3A 99 22 13 22  |:A.18:.1174:."."|
00000800: 00 2F 10 34 03 42 4F 24  B2 22 98 12 90 20 50 52  |./.4.BO$."... PR|
00000810: 45 53 53 20 41 4E 59 20  4B 45 59 20 05 92 22 3A  |ESS ANY KEY ..":|
00000820: 41 B2 32 30 3A 8D 31 31  37 34 3A 99 22 13 22 00  |A.20:.1174:.".".|
00000830: 42 10 39 03 A1 41 24 3A  8B 41 24 B2 22 22 A7 38  |B.9..A$:.A$."".8|
00000840: 32 35 00 87 10 3E 03 81  41 B2 31 A4 32 33 3A 42  |25...>..A.1.23:B|
00000850: 4F 24 B2 22 20 20 20 20  20 20 20 20 20 20 20 20  |O$."            |
00000860: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000870: 20 20 20 20 20 20 20 20  20 20 20 20 22 3A 42 B2  |            ":B.|
00000880: 30 3A 8D 31 31 37 30 00  92 10 43 03 99 22 13 22  |0:.1170...C.."."|
00000890: 3A 82 00 B4 10 48 03 89  32 30 30 3A 8F 20 2A 2A  |:....H..200:. **|
000008A0: 20 20 52 45 2D 50 52 49  4E 54 20 42 4F 41 52 44  |  RE-PRINT BOARD|
000008B0: 20 20 2A 2A 00 DA 10 52  03 8F 20 2A 2A 2A 2A 2A  |  **...R.. *****|
000008C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000008D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 00 11 54 03 8F  |**********...T..|
000008E0: 20 2A 2A 20 20 20 20 20  20 20 20 20 20 20 57 52  | **           WR|
000008F0: 4F 4E 47 20 41 4E 53 57  45 52 20 20 20 20 2A 2A  |ONG ANSWER    **|
00000900: 00 26 11 56 03 8F 20 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.&.V.. *********|
00000910: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000920: 2A 2A 2A 2A 2A 2A 00 3F  11 57 03 42 4F 24 B2 C7  |******.?.W.BO$..|
00000930: 28 33 32 29 3A 8D 31 31  37 30 3A 99 22 13 22 00  |(32):.1170:.".".|
00000940: 7F 11 5C 03 42 4F 24 B2  22 12 98 90 53 4F 52 52  |..\.BO$."...SORR|
00000950: 59 2E 2E 2E 54 52 59 20  41 47 41 49 4E 2E 2E 2E  |Y...TRY AGAIN...|
00000960: 05 92 22 3A 20 20 20 20  20 20 20 41 B2 31 38 3A  |..":       A.18:|
00000970: 42 B2 31 30 3A 8D 31 31  37 34 3A 99 22 13 22 00  |B.10:.1174:.".".|
00000980: 8F 11 61 03 81 57 B2 31  A4 31 30 30 30 3A 82 00  |..a..W.1.1000:..|
00000990: CB 11 66 03 42 4F 24 B2  22 20 20 20 20 20 20 20  |..f.BO$."       |
000009A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
000009B0: 3A 41 B2 31 38 3A 20 20  20 20 20 20 42 B2 31 30  |:A.18:      B.10|
000009C0: 3A 8D 31 31 37 34 3A 99  22 13 22 00 DE 11 6B 03  |:.1174:."."...k.|
000009D0: 43 B2 43 AA 31 3A 8B 43  B1 34 A7 43 B2 31 00 E8  |C.C.1:.C.4.C.1..|
000009E0: 11 70 03 89 20 36 32 35  00 0E 12 E7 03 8F 20 20  |.p.. 625......  |
000009F0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000A00: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 00 18  |**************..|
00000A10: 12 E8 03 99 22 93 1F 22  00 53 12 F7 03 8B 57 49  |...."..".S....WI|
00000A20: B2 30 A7 42 4F 24 B2 22  20 12 B0 C0 C0 C0 C0 C0  |.0.BO$." .......|
00000A30: B2 C0 C0 C0 C0 C0 AE 22  3A 41 B2 33 3A 42 B2 31  |.......":A.3:B.1|
00000A40: 35 3A 8D 20 31 31 37 30  3A 99 22 13 22 3A 89 31  |5:. 1170:.".":.1|
00000A50: 30 33 30 00 89 12 FC 03  41 B2 33 3A 42 B2 31 35  |030.....A.3:B.15|
00000A60: 3A 42 4F 24 B2 22 12 B0  C0 C0 C0 C0 C0 C0 C0 C0  |:BO$."..........|
00000A70: C0 B2 C0 C0 C0 C0 C0 C0  C0 C0 C0 AE 92 22 3A 8D  |.............":.|
00000A80: 31 31 37 30 3A 99 22 13  22 00 8F 12 01 04 8F 00  |1170:.".".......|
00000A90: A5 12 06 04 81 54 B2 31  A4 35 3A 41 B2 33 AA 54  |.....T.1.5:A.3.T|
00000AA0: 3A 42 B2 31 35 00 DC 12  0B 04 8B 20 57 49 B2 30  |:B.15...... WI.0|
00000AB0: A7 42 4F 24 B2 22 20 12  DD 92 20 20 20 20 20 12  |.BO$." ...     .|
00000AC0: DD 92 20 20 20 20 20 12  DD 92 22 3A 8D 31 31 37  |..     ...":.117|
00000AD0: 30 3A 99 22 13 22 3A 89  31 30 34 35 00 0D 13 10  |0:.".":.1045....|
00000AE0: 04 42 4F 24 B2 22 12 C2  92 20 20 20 20 20 20 20  |.BO$."...       |
00000AF0: 20 20 12 C2 92 20 20 20  20 20 20 20 20 20 12 C2  |  ...         ..|
00000B00: 92 22 3A 8D 31 31 37 30  3A 99 22 13 22 00 15 13  |.":.1170:."."...|
00000B10: 15 04 82 20 54 00 50 13  17 04 8B 57 49 B2 30 A7  |... T.P....WI.0.|
00000B20: 41 B2 39 3A 42 B2 31 35  3A 42 4F 24 B2 22 20 12  |A.9:B.15:BO$." .|
00000B30: AB C0 C0 C0 C0 C0 DB C0  C0 C0 C0 C0 B3 92 22 3A  |..............":|
00000B40: 8D 31 31 37 30 3A 99 22  13 22 3A 89 31 30 36 30  |.1170:.".":.1060|
00000B50: 00 86 13 1A 04 41 B2 39  3A 42 B2 31 35 3A 42 4F  |.....A.9:B.15:BO|
00000B60: 24 B2 22 12 AB C0 C0 C0  C0 C0 C0 C0 C0 C0 DB C0  |$.".............|
00000B70: C0 C0 C0 C0 C0 C0 C0 C0  B3 92 22 3A 8D 31 31 37  |..........":.117|
00000B80: 30 3A 99 22 13 22 00 9C  13 24 04 81 54 B2 31 A4  |0:."."...$..T.1.|
00000B90: 35 3A 41 B2 39 AA 54 3A  42 B2 31 35 00 D2 13 29  |5:A.9.T:B.15...)|
00000BA0: 04 8B 57 49 B2 30 A7 42  4F 24 B2 22 20 12 DD 92  |..WI.0.BO$." ...|
00000BB0: 20 20 20 20 20 12 DD 92  20 20 20 20 20 12 DD 92  |     ...     ...|
00000BC0: 22 3A 8D 31 31 37 30 3A  99 22 13 22 3A 89 31 30  |":.1170:.".":.10|
00000BD0: 37 33 00 03 14 2E 04 42  4F 24 B2 22 12 C2 92 20  |73.....BO$."... |
00000BE0: 20 20 20 20 20 20 20 20  12 C2 92 20 20 20 20 20  |        ...     |
00000BF0: 20 20 20 20 12 C2 92 22  3A 8D 31 31 37 30 3A 99  |    ...":.1170:.|
00000C00: 22 13 22 00 0A 14 31 04  82 54 00 46 14 36 04 41  |"."...1..T.F.6.A|
00000C10: B2 31 35 3A 42 B2 31 35  3A 8B 57 49 B2 30 A7 42  |.15:B.15:.WI.0.B|
00000C20: 4F 24 B2 22 20 12 AD C0  C0 C0 C0 C0 B1 C0 C0 C0  |O$." ...........|
00000C30: C0 C0 BD 92 22 3A 8D 31  31 37 30 3A 99 22 13 22  |....":.1170:."."|
00000C40: 3A 89 31 30 39 30 00 73  14 38 04 42 4F 24 B2 22  |:.1090.s.8.BO$."|
00000C50: 12 AD C0 C0 C0 C0 C0 C0  C0 C0 C0 B1 C0 C0 C0 C0  |................|
00000C60: C0 C0 C0 C0 C0 BD 92 22  3A 8D 31 31 37 30 3A 99  |.......":.1170:.|
00000C70: 22 13 22 00 93 14 42 04  42 4F 24 B2 54 24 3A 41  |"."...B.BO$.T$:A|
00000C80: B2 32 30 3A 42 B2 31 33  3A 8D 31 31 37 30 3A 99  |.20:B.13:.1170:.|
00000C90: 22 13 22 00 B3 14 45 04  99 A3 57 49 29 22 20 20  |"."...E...WI)"  |
00000CA0: 54 59 50 45 20 28 51 29  20 54 4F 20 51 55 49 54  |TYPE (Q) TO QUIT|
00000CB0: 2E 13 22 00 B9 14 47 04  8E 00 DE 14 4C 04 8F 20  |.."...G.....L.. |
00000CC0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000CD0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2B 2A 2A 2A 00 03  |**********+***..|
00000CE0: 15 56 04 8F 20 2A 2A 20  20 20 20 20 20 20 20 20  |.V.. **         |
00000CF0: 20 20 50 52 49 4E 54 20  20 20 20 20 20 20 20 20  |  PRINT         |
00000D00: 20 2A 2A 00 28 15 57 04  8F 20 2A 2A 2A 2A 2A 2A  | **.(.W.. ******|
00000D10: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000D20: 2A 2A 2A 2A 2A 2A 2A 2A  00 48 15 92 04 81 49 B2  |********.H....I.|
00000D30: 31 A4 41 3A 99 22 11 22  3B 3A 82 3A 99 A3 42 AC  |1.A:.".";:.:..B.|
00000D40: 50 48 29 42 4F 24 3A 8E  00 66 15 96 04 81 49 B2  |PH)BO$:..f....I.|
00000D50: 31 A4 41 3A 99 22 11 22  3B 3A 82 3A 99 A3 57 49  |1.A:.".";:.:..WI|
00000D60: 29 42 4F 24 3A 8E 00 6C  15 97 04 8F 00 7D 15 9C  |)BO$:..l.....}..|
00000D70: 04 81 58 B2 31 A4 35 30  30 3A 82 3A 8E 00 83 15  |..X.1.500:.:....|
00000D80: D0 07 8F 00 97 15 DF 07  53 48 24 28 31 29 B2 22  |........SH$(1)."|
00000D90: 1C 20 12 B8 B8 B8 22 00  AA 15 E4 07 53 48 24 28  |. ....".....SH$(|
00000DA0: 32 29 B2 22 20 12 20 20  20 22 00 C0 15 E9 07 53  |2)." .   ".....S|
00000DB0: 48 24 28 33 29 B2 22 20  12 20 20 20 05 22 3A 8E  |H$(3)." .   .":.|
00000DC0: 00 C6 15 34 08 8F 00 D9  15 43 08 53 48 24 28 31  |...4.....C.SH$(1|
00000DD0: 29 B2 22 9C 12 1D 20 1D  22 00 EB 15 48 08 53 48  |)."... ."...H.SH|
00000DE0: 24 28 32 29 B2 22 12 20  20 20 22 00 00 16 4D 08  |$(2).".   "...M.|
00000DF0: 53 48 24 28 33 29 B2 22  12 1D 20 1D 05 22 3A 8E  |SH$(3).".. ..":.|
00000E00: 00 06 16 98 08 8F 00 1A  16 A7 08 53 48 24 28 31  |...........SH$(1|
00000E10: 29 B2 22 90 12 1D 1D 1D  A9 22 00 2D 16 AC 08 53  |)."......".-...S|
00000E20: 48 24 28 32 29 B2 22 12  1D 1D A9 20 22 00 43 16  |H$(2).".... ".C.|
00000E30: B1 08 53 48 24 28 33 29  B2 22 12 1D A9 20 20 05  |..SH$(3)."...  .|
00000E40: 22 3A 8E 00 49 16 FC 08  8F 00 5E 16 0B 09 53 48  |":..I.....^...SH|
00000E50: 24 28 31 29 B2 22 1F 12  1D 1D A9 DF 1D 22 00 72  |$(1).".......".r|
00000E60: 16 10 09 53 48 24 28 32  29 B2 22 12 1D A9 20 20  |...SH$(2)."...  |
00000E70: DF 22 00 8F 16 15 09 8B  57 49 B2 38 A7 53 48 24  |."......WI.8.SH$|
00000E80: 28 33 29 B2 22 12 A9 20  20 20 20 DF 22 3A 8E 00  |(3)."..    .":..|
00000E90: 9F 16 1A 09 53 48 24 28  33 29 B2 22 22 3A 8E 00  |....SH$(3)."":..|
00000EA0: CA 16 B8 0B 99 22 11 11  11 11 22 3B 3A 99 A3 57  |....."....";:..W|
00000EB0: 49 29 22 20 20 49 4E 53  54 52 55 43 54 49 4F 4E  |I)"  INSTRUCTION|
00000EC0: 53 20 28 59 2F 4E 29 20  3F 22 00 DE 16 CC 0B A1  |S (Y/N) ?"......|
00000ED0: 41 24 3A 8B 41 24 B2 22  22 A7 33 30 32 30 00 EF  |A$:.A$."".3020..|
00000EE0: 16 D6 0B 8B 41 24 B2 22  4E 22 A7 33 32 30 30 00  |....A$."N".3200.|
00000EF0: 07 17 E0 0B 8B 41 24 B2  22 59 22 A7 99 22 93 22  |.....A$."Y".."."|
00000F00: 3A 89 20 33 31 30 30 00  11 17 EA 0B 89 33 30 32  |:. 3100......302|
00000F10: 30 00 51 17 1C 0C 99 A3  57 49 29 22 49 4E 20 53  |0.Q.....WI)"IN S|
00000F20: 48 41 50 45 20 4D 41 54  43 48 2C 54 48 45 20 22  |HAPE MATCH,THE "|
00000F30: 41 41 24 3B 3A 99 A3 57  49 29 22 57 49 4C 4C 20  |AA$;:..WI)"WILL |
00000F40: 50 52 49 4E 54 20 41 20  53 48 41 50 45 20 4F 4E  |PRINT A SHAPE ON|
00000F50: 22 00 8C 17 26 0C 99 A3  57 49 29 22 54 48 45 20  |"...&...WI)"THE |
00000F60: 4C 45 46 54 20 53 49 44  45 20 4F 46 20 54 48 45  |LEFT SIDE OF THE|
00000F70: 22 3A 99 A3 57 49 29 22  53 43 52 45 45 4E 2E 20  |":..WI)"SCREEN. |
00000F80: 54 48 45 20 53 54 55 44  45 4E 54 22 00 C8 17 2B  |THE STUDENT"...+|
00000F90: 0C 99 A3 57 49 29 22 57  49 4C 4C 20 46 49 4E 44  |...WI)"WILL FIND|
00000FA0: 20 34 20 44 49 46 46 45  52 45 4E 54 22 3A 99 A3  | 4 DIFFERENT":..|
00000FB0: 57 49 29 22 53 48 41 50  45 53 20 4F 4E 20 54 48  |WI)"SHAPES ON TH|
00000FC0: 45 20 52 49 47 48 54 22  00 00 18 30 0C 99 A3 57  |E RIGHT"...0...W|
00000FD0: 49 29 22 53 49 44 45 20  4F 46 20 54 48 45 20 53  |I)"SIDE OF THE S|
00000FE0: 43 52 45 45 4E 2C 22 3A  99 A3 57 49 29 22 4F 4E  |CREEN,":..WI)"ON|
00000FF0: 45 20 4F 46 20 57 48 49  43 48 20 57 49 4C 4C 22  |E OF WHICH WILL"|
00001000: 00 2F 18 3A 0C 99 A3 57  49 29 22 4D 41 54 43 48  |./.:...WI)"MATCH|
00001010: 20 54 48 45 20 53 48 41  50 45 20 4F 4E 22 3A 99  | THE SHAPE ON":.|
00001020: A3 57 49 29 22 54 48 45  20 4C 45 46 54 2E 22 00  |.WI)"THE LEFT.".|
00001030: 66 18 44 0C 99 A3 57 49  29 22 57 48 45 4E 20 54  |f.D...WI)"WHEN T|
00001040: 48 45 20 12 3F 92 20 49  53 22 3A 99 A3 57 49 29  |HE .?. IS":..WI)|
00001050: 22 4E 45 58 54 20 54 4F  20 54 48 45 20 53 48 41  |"NEXT TO THE SHA|
00001060: 50 45 20 48 45 22 00 9E  18 4E 0C 99 A3 57 49 29  |PE HE"...N...WI)|
00001070: 22 4F 52 20 53 48 45 20  54 48 49 4E 4B 53 20 49  |"OR SHE THINKS I|
00001080: 53 22 3A 99 A3 57 49 29  22 43 4F 52 52 45 43 54  |S":..WI)"CORRECT|
00001090: 2C 20 54 48 45 20 53 54  55 44 45 4E 54 22 00 BF  |, THE STUDENT"..|
000010A0: 18 53 0C 99 A3 57 49 29  22 53 48 4F 55 4C 44 20  |.S...WI)"SHOULD |
000010B0: 50 52 45 53 53 20 41 4E  59 20 4B 45 59 2E 22 00  |PRESS ANY KEY.".|
000010C0: E4 18 54 0C 99 A3 57 49  29 22 54 48 45 20 22 3B  |..T...WI)"THE ";|
000010D0: 42 42 24 3B 22 20 57 49  4C 4C 20 45 56 41 4C 55  |BB$;" WILL EVALU|
000010E0: 41 54 45 22 00 1E 19 58  0C 99 A3 57 49 29 22 54  |ATE"...X...WI)"T|
000010F0: 48 45 20 41 4E 53 57 45  52 20 41 4E 44 20 4C 45  |HE ANSWER AND LE|
00001100: 54 22 3A 99 A3 57 49 29  22 54 48 45 20 53 54 55  |T":..WI)"THE STU|
00001110: 44 45 4E 54 20 4B 4E 4F  57 20 48 4F 57 22 00 56  |DENT KNOW HOW".V|
00001120: 19 5D 0C 99 A3 57 49 29  22 48 45 20 44 49 44 2E  |.]...WI)"HE DID.|
00001130: 20 54 59 50 45 20 12 51  92 20 54 4F 22 3A 99 A3  | TYPE .Q. TO":..|
00001140: 57 49 29 22 45 4E 44 20  54 48 45 20 50 52 4F 47  |WI)"END THE PROG|
00001150: 52 41 4D 2E 11 22 00 78  19 76 0C 99 A3 57 49 29  |RAM..".x.v...WI)|
00001160: 22 50 52 45 53 53 20 41  4E 59 20 4B 45 59 20 54  |"PRESS ANY KEY T|
00001170: 4F 20 50 4C 41 59 22 3B  00 8C 19 7B 0C A1 41 24  |O PLAY";...{..A$|
00001180: 3A 8B 41 24 B2 22 22 A7  33 31 39 35 00 9C 19 7C  |:.A$."".3195...||
00001190: 0C 99 22 93 05 22 C7 28  31 34 32 29 00 A2 19 80  |.."..".(142)....|
000011A0: 0C 8E 00 00 00                                    |.....           |
..(.2.. **           INITIALIZE       **
.8.4.. CL(20,40).U.5.."..":.65517:WI.B(7
81):.WI.22.WI.0:.36879,238:SS.2:PH..5...
6.. WI.0.AA$."VIC":BB$."VIC":.60...7..53
280,1:.53281,15:SS.12:WI.8:PH.1...9.AA$.
"64.......................":BB$."64".+.<
.. WI.0 . CL(4,18).1:CL(4,31).2:CL(10,18
).3:CL(10,31).4:.80.Q.?..A.6.12.6:.B.17.
33.16:S.646:.S,SS.J.F.T.T.1:CL(A,B).T:.B
,A...P.."......";:..WI.5)".SHAPE MATCH".
.....3000:. **  INSTRUCTIONS   **.O.H..1
000:. ** PRINT BOARD **...R..T.1.1000:..
..,.. *******************************.+.
... **        SELECT SHAPES      **.Q.1.
. *******************************.^.2.K.
.(.TI).Z.6.K..(.(0).4).1:.K.KK.310...@..
...T..T.1.3:.2000:BO$.SH$(T):A.4.T:B.18:
.".":.1170:. T.X.Y..1180:. **      DELAY
      **...\..WI.0..T.1.3:.2100:BO$.SH$(
T):A.4.T:B.32:.".".".]..WI.0..1170:.T:.3
55.X.^..T.1.3:.2100:BO$.SH$(T):A.4.T:B.2
8:.".":.1170:. T.B.C..1180...H..T.1.3:.2
200:BO$.SH$(T):A.10.T:B.18:.".":.1170:. 
T...M..1180.Z.R..T.1.3:.2300:BO$.SH$(T):
A.10.T:B.28:.".":.1170:. T...W..1180...|
..T.1.3.....K.2000,2100,2200,2300.8...B
O$.SH$(T):A. 8.T:B.3:.".":.1170:. T:KK.K
.>.....H.&.. END.N.X.. *****************
**************...Z.. **          MOVE CU
RSOR      **...\.. *********************
**********.P.]..".":C.1:.NT.1.10...B..T.
1.15:BO$.G(63):.T.2..(T.2). BO$.G(18).G(
63).G(146).,.E.. WI.0. . C . 660,673,683
,687.D.G..C .670,675,680,685.N.L..1170:.
".":.TT.1. 75:        .TT:.700.V.Q.. T..
.V.BO$.G(32):.1170:.".":        .TT.1. 7
5:.TT:C.C.1......C.4.C.1.V....NT:.600:. 
**  REPEAT  **.....A.4:B.18:L.1:.620....
.A.6:B.17:L.1:.620.....A.10:B.18:L.2:.62
0.0...A.12:B.17:L.2:.620.F...A.6:B.33:L.
3:.620.\...A.4:B.31:L.3:.620.S...A.12:B.
33:L.4:.620.....A.10:B.31:L.4:.620......
 *******************************.V.... *
*     CHECK FOR RESPONSE    **...... ***
****************************...F..A$:.A$
."". 625.%.K.. A$."Q". .".":..C.P..CL(A,
B).K .800:. CORRECT._....850: . **  WRON
G    **... .. **************************
*****...".. **         CORRECT ANSWER   
 **.Q.$.. ******************************
*...*.BO$."..YES! THAT'S RIGHT!":A.18:.1
174:."."./.4.BO$."... PRESS ANY KEY ..":
A.20:.1174:.".".B.9..A$:.A$."".825...>..
A.1.23:BO$."                            
            ":B.0:.1170...C..".":....H..
200:. **  RE-PRINT BOARD  **.Z.R.. *****
**************************...T.. **     
      WRONG ANSWER    **.&.V.. *********
**********************.?.W.BO$.G(32):.11
70:."."..\.BO$."...SORRY...TRY AGAIN...
..":       A.18:B.10:.1174:."."...A..W.1
.1000:..K.F.BO$."                      "
:A.18:      B.10:.1174:."."...K.C.C.1:.C
.4.C.1...P.. 625......  ****************
**************......"..".S....WI.0.BO$."
 ..............":A.3:B.15:. 1170:.".":.1
030.....A.3:B.15:BO$."..................
.....":.1170:."."............T.1.5:A.3.T
:B.15...... WI.0.BO$." ...     ...     .
..":.1170:.".":.1045.....BO$.".B.       
  .B.         .B.":.1170:."."...... T.P.
...WI.0.A.9:B.15:BO$." ...............":
.1170:.".":.1060.....A.9:B.15:BO$.".....
..................":.1170:."."...$..T.1.
5:A.9.T:B.15.R.)..WI.0.BO$." ...     ...
     ...":.1170:.".":.1073.....BO$.".B. 
        .B.         .B.":.1170:."."...1.
.T.F.6.A.15:B.15:.WI.0.BO$." ...........
....":.1170:.".":.1090.S.8.BO$."........
...............":.1170:."."...B.BO$.T$:A
.20:B.13:.1170:."."...E...WI)"  TYPE (Q)
 TO QUIT.."...G.....L.. ****************
**********+***...V.. **           PRINT 
         **.(.W.. **********************
********.H....I.1.A:.".";:.:..B.PH)BO$:.
.F....I.1.A:.".";:.:..WI)BO$:..L.....}..
..X.1.500:.:....P.......SH$(1).". ....".
....SH$(2)." .   ".....SH$(3)." .   .":.
.F.4...Y.C.SH$(1)."... ."...H.SH$(2).". 
  "...M.SH$(3).".. ..":............SH$(1
)."......".-...SH$(2).".... ".C...SH$(3)
."...  .":..I.....^...SH$(1).".......".R
...SH$(2)."...  ."......WI.8.SH$(3).".. 
   .":......SH$(3)."":..J...."....";:..W
I)"  INSTRUCTIONS (Y/N) ?"...L..A$:.A$."
".3020...V..A$."N".3200......A$."Y".."."
:. 3100......3020.Q.....WI)"IN SHAPE MAT
CH,THE "AA$;:..WI)"WILL PRINT A SHAPE ON
"...&...WI)"THE LEFT SIDE OF THE":..WI)"
SCREEN. THE STUDENT".H.+...WI)"WILL FIND
 4 DIFFERENT":..WI)"SHAPES ON THE RIGHT"
...0...WI)"SIDE OF THE SCREEN,":..WI)"ON
E OF WHICH WILL"./.:...WI)"MATCH THE SHA
PE ON":..WI)"THE LEFT.".F.D...WI)"WHEN T
HE .?. IS":..WI)"NEXT TO THE SHAPE HE"..
.N...WI)"OR SHE THINKS IS":..WI)"CORRECT
, THE STUDENT"...S...WI)"SHOULD PRESS AN
Y KEY."...T...WI)"THE ";BB$;" WILL EVALU
ATE"...X...WI)"THE ANSWER AND LET":..WI)
"THE STUDENT KNOW HOW".V.]...WI)"HE DID.
 TYPE .Q. TO":..WI)"END THE PROGRAM..".X
.V...WI)"PRESS ANY KEY TO PLAY";...{..A$
:.A$."".3195...|..".."G(142).........
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL