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

BEGIN CORNER/VIC

FILE INFORMATION

FILENAME(S): BEGIN CORNER/VIC

FILE TYPE(S): PRG

FILE SIZE: 2.5K

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

APPEARS ON: 2 disk(s)

FILE HASH

65532ecfac2fcc23caae8db97b004006642e75f5abf8ef1710494d7b8495e02e

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
GAZETTE JULY84 BEGIN CORNER/VIC PRG Xii 26 1 DOWNLOAD FILE
JULY TEST BEGIN CORNER/VIC PRG Sailor, Ganheden 26 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 19 08 01 00 8F 20  51 55 49 4C 54 20 53 51  |....... QUILT SQ|
00000010: 55 41 52 45 53 20 56 49  43 00 21 08 02 00 89 31  |UARES VIC.!....1|
00000020: 35 00 44 08 03 00 97 31  39 38 2C 30 3A 97 56 2C  |5.D....198,0:.V,|
00000030: 32 33 31 3A 81 44 B2 31  A4 35 30 3A 82 3A 97 56  |231:.D.1.50:.:.V|
00000040: 2C 30 3A 8E 00 6E 08 04  00 97 41 2C 33 32 3A 97  |,0:..n....A,32:.|
00000050: 41 AA 31 2C 33 32 3A 97  41 AA 32 32 2C 33 32 3A  |A.1,32:.A.22,32:|
00000060: 97 41 AA 32 33 2C 33 32  3A 50 B2 31 3A 8E 00 98  |.A.23,32:P.1:...|
00000070: 08 05 00 97 41 2C 31 36  30 3A 97 41 AA 31 2C 31  |....A,160:.A.1,1|
00000080: 36 30 3A 97 41 AA 32 32  2C 31 36 30 3A 97 41 AA  |60:.A.22,160:.A.|
00000090: 32 33 2C 31 36 30 3A 8E  00 C1 08 06 00 97 41 2C  |23,160:.......A,|
000000A0: 33 32 3A 97 41 AA 31 2C  32 33 33 3A 97 41 AA 32  |32:.A.1,233:.A.2|
000000B0: 32 2C 32 33 33 3A 97 41  AA 32 33 2C 31 36 30 3A  |2,233:.A.23,160:|
000000C0: 8E 00 EA 08 07 00 97 41  2C 31 36 30 3A 97 41 AA  |.......A,160:.A.|
000000D0: 31 2C 31 30 35 3A 97 41  AA 32 32 2C 31 30 35 3A  |1,105:.A.22,105:|
000000E0: 97 41 AA 32 33 2C 33 32  3A 8E 00 13 09 08 00 97  |.A.23,32:.......|
000000F0: 41 2C 32 32 33 3A 97 41  AA 31 2C 33 32 3A 97 41  |A,223:.A.1,32:.A|
00000100: AA 32 32 2C 31 36 30 3A  97 41 AA 32 33 2C 32 32  |.22,160:.A.23,22|
00000110: 33 3A 8E 00 3A 09 09 00  97 41 2C 39 35 3A 97 41  |3:..:....A,95:.A|
00000120: AA 31 2C 31 36 30 3A 97  41 AA 32 32 2C 33 32 3A  |.1,160:.A.22,32:|
00000130: 97 41 AA 32 33 2C 39 35  3A 8E 00 68 09 0A 00 41  |.A.23,95:..h...A|
00000140: 31 B2 C2 28 41 29 3A 41  32 B2 C2 28 41 AA 31 29  |1..(A):A2..(A.1)|
00000150: 3A 41 33 B2 C2 28 41 AA  32 32 29 3A 41 34 B2 C2  |:A3..(A.22):A4..|
00000160: 28 41 AA 32 33 29 3A 8E  00 8E 09 0B 00 97 41 2C  |(A.23):.......A,|
00000170: 41 31 3A 97 41 AA 31 2C  41 32 3A 97 41 AA 32 32  |A1:.A.1,A2:.A.22|
00000180: 2C 41 33 3A 97 41 AA 32  33 2C 41 34 3A 8E 00 B5  |,A3:.A.23,A4:...|
00000190: 09 0C 00 97 41 2C 37 39  3A 97 41 AA 31 2C 38 30  |....A,79:.A.1,80|
000001A0: 3A 97 41 AA 32 32 2C 37  36 3A 97 41 AA 32 33 2C  |:.A.22,76:.A.23,|
000001B0: 31 32 32 3A 8E 00 DF 09  0D 00 97 41 AA 4D 2C 50  |122:.......A.M,P|
000001C0: 3A 97 41 AA 31 AA 4D 2C  50 3A 97 41 AA 32 32 AA  |:.A.1.M,P:.A.22.|
000001D0: 4D 2C 50 3A 97 41 AA 32  33 AA 4D 2C 50 3A 8E 00  |M,P:.A.23.M,P:..|
000001E0: FB 09 0E 00 81 49 B2 38  30 35 34 A4 38 31 31 38  |.....I.8054.8118|
000001F0: 3A 97 49 2C 33 32 3A 82  49 3A 8E 00 16 0A 0F 00  |:.I,32:.I:......|
00000200: 99 22 93 11 1D 1D 1D 1D  51 55 49 4C 54 20 53 51  |."......QUILT SQ|
00000210: 55 41 52 45 53 22 00 33  0A 10 00 86 53 28 31 36  |UARES".3....S(16|
00000220: 29 2C 51 28 31 36 29 2C  52 28 31 36 29 2C 51 51  |),Q(16),R(16),QQ|
00000230: 28 33 29 00 7C 0A 11 00  99 22 11 55 53 45 20 46  |(3).|....".USE F|
00000240: 31 20 54 4F 20 4D 4F 56  45 20 54 4F 20 54 48 45  |1 TO MOVE TO THE|
00000250: 20 51 55 49 4C 54 20 53  51 55 41 52 45 20 44 45  | QUILT SQUARE DE|
00000260: 53 49 52 45 44 2C 20 54  48 45 4E 20 50 52 45 53  |SIRED, THEN PRES|
00000270: 53 20 3C 52 45 54 55 52  4E 3E 2E 22 00 A3 0A 12  |S <RETURN>."....|
00000280: 00 99 22 11 46 49 4C 4C  20 49 4E 20 54 48 45 20  |..".FILL IN THE |
00000290: 53 41 4D 50 4C 45 20 20  20 20 53 51 55 41 52 45  |SAMPLE    SQUARE|
000002A0: 53 2E 22 00 C1 0A 13 00  81 49 B2 31 A4 31 36 3A  |S."......I.1.16:|
000002B0: 87 53 28 49 29 2C 51 28  49 29 2C 52 28 49 29 3A  |.S(I),Q(I),R(I):|
000002C0: 82 00 FD 0A 14 00 83 37  38 36 34 2C 37 37 30 33  |.......7864,7703|
000002D0: 2C 37 39 2C 37 38 36 36  2C 37 37 30 35 2C 31 36  |,79,7866,7705,16|
000002E0: 30 2C 37 38 36 38 2C 37  37 30 37 2C 32 33 33 2C  |0,7868,7707,233,|
000002F0: 37 38 37 30 2C 37 37 35  31 2C 31 30 35 00 39 0B  |7870,7751,105.9.|
00000300: 15 00 83 37 39 30 38 2C  37 37 30 39 2C 32 32 33  |...7908,7709,223|
00000310: 2C 37 39 31 30 2C 37 37  35 33 2C 39 35 2C 37 39  |,7910,7753,95,79|
00000320: 31 32 2C 37 37 31 31 2C  31 36 30 2C 37 39 31 34  |12,7711,160,7914|
00000330: 2C 37 37 31 33 2C 32 33  33 00 75 0B 16 00 83 37  |,7713,233.u....7|
00000340: 39 35 32 2C 37 37 35 37  2C 31 30 35 2C 37 39 35  |952,7757,105,795|
00000350: 34 2C 37 37 31 35 2C 32  32 33 2C 37 39 35 36 2C  |4,7715,223,7956,|
00000360: 37 37 35 39 2C 39 35 2C  37 39 35 38 2C 37 37 31  |7759,95,7958,771|
00000370: 37 2C 31 36 30 00 B1 0B  17 00 83 37 39 39 36 2C  |7,160......7996,|
00000380: 37 37 31 39 2C 32 33 33  2C 37 39 39 38 2C 37 37  |7719,233,7998,77|
00000390: 36 33 2C 31 30 35 2C 38  30 30 30 2C 37 37 32 31  |63,105,8000,7721|
000003A0: 2C 32 32 33 2C 38 30 30  32 2C 37 37 36 35 2C 39  |,223,8002,7765,9|
000003B0: 35 00 E9 0B 18 00 51 51  28 31 29 B2 36 3A 51 51  |5.....QQ(1).6:QQ|
000003C0: 28 32 29 B2 31 31 3A 51  51 28 33 29 B2 31 36 3A  |(2).11:QQ(3).16:|
000003D0: 97 33 36 38 37 38 2C 31  35 3A 56 B2 33 36 38 37  |.36878,15:V.3687|
000003E0: 36 3A 4D B2 33 30 37 32  30 00 09 0C 19 00 41 24  |6:M.30720.....A$|
000003F0: B2 22 CF D0 CF D0 CF D0  CF D0 22 3A 42 24 B2 22  |."........":B$."|
00000400: CC BA CC BA CC BA CC BA  22 00 4D 0C 1A 00 99 22  |........".M...."|
00000410: 11 4F 4E 45 20 43 4F 4C  4F 52 20 49 53 20 57 48  |.ONE COLOR IS WH|
00000420: 49 54 45 2E 20 20 20 48  4F 57 20 4D 41 4E 59 20  |ITE.   HOW MANY |
00000430: 4F 54 48 45 52 20 43 4F  4C 4F 52 53 2C 20 31 2C  |OTHER COLORS, 1,|
00000440: 20 32 2C 20 4F 52 20 33  3F 22 3A 8D 33 00 5F 0C  | 2, OR 3?":.3._.|
00000450: 1B 00 A1 45 24 3A 8B 45  24 B2 22 22 A7 32 37 00  |...E$:.E$."".27.|
00000460: 75 0C 1C 00 8B 45 24 B3  22 31 22 B0 45 24 B1 22  |u....E$."1".E$."|
00000470: 33 22 A7 32 37 00 81 0C  1D 00 4E B2 C5 28 45 24  |3".27.....N..(E$|
00000480: 29 00 8C 0C 1E 00 81 49  B2 31 A4 4E 00 A4 0C 1F  |)......I.1.N....|
00000490: 00 99 22 11 11 43 48 4F  4F 53 45 20 43 4F 4C 4F  |.."..CHOOSE COLO|
000004A0: 52 22 3B 49 00 D6 0C 20  00 99 22 20 12 90 20 92  |R";I... .." .. .|
000004B0: 20 20 12 1C 20 92 20 20  12 9F 20 92 20 20 12 9C  |  .. .  .. .  ..|
000004C0: 20 92 20 20 12 1E 20 92  20 20 12 1F 20 92 20 20  | .  .. .  .. .  |
000004D0: 12 9E 20 92 1F 22 00 F5  0C 21 00 99 22 20 31 20  |.. .."...!.." 1 |
000004E0: 20 32 20 20 33 20 20 34  20 20 35 20 20 36 20 20  | 2  3  4  5  6  |
000004F0: 37 22 3A 8D 33 00 07 0D  22 00 A1 45 24 3A 8B 45  |7":.3..."..E$:.E|
00000500: 24 B2 22 22 A7 33 34 00  1D 0D 23 00 8B 45 24 B3  |$."".34...#..E$.|
00000510: 22 31 22 B0 45 24 B1 22  37 22 A7 33 34 00 3B 0D  |"1".E$."7".34.;.|
00000520: 24 00 43 28 49 29 B2 C5  28 45 24 29 3A 99 A3 33  |$.C(I)..(E$):..3|
00000530: AC 43 28 49 29 AB 32 29  22 5E 22 00 4E 0D 25 00  |.C(I).2)"^".N.%.|
00000540: 8B 43 28 49 29 B2 31 A7  43 28 49 29 B2 30 00 55  |.C(I).1.C(I).0.U|
00000550: 0D 26 00 82 49 00 65 0D  27 00 99 22 93 11 11 11  |.&..I.e.'.."....|
00000560: 11 11 11 11 22 00 81 0D  28 00 81 49 B2 31 A4 34  |...."...(..I.1.4|
00000570: 3A 99 A3 38 29 41 24 3A  99 A3 38 29 42 24 3A 82  |:..8)A$:..8)B$:.|
00000580: 49 00 BF 0D 29 00 97 37  37 30 33 2C 37 39 3A 97  |I...)..7703,79:.|
00000590: 37 37 30 34 2C 31 30 31  3A 97 37 37 32 35 2C 39  |7704,101:.7725,9|
000005A0: 39 3A 97 37 37 30 33 AA  4D 2C 30 3A 97 37 37 30  |9:.7703.M,0:.770|
000005B0: 34 AA 4D 2C 30 3A 97 37  37 32 35 AA 4D 2C 30 00  |4.M,0:.7725.M,0.|
000005C0: DC 0D 2A 00 81 49 B2 32  A4 51 51 28 4E 29 3A 97  |..*..I.2.QQ(N):.|
000005D0: 51 28 49 29 2C 52 28 49  29 3A 82 49 00 F7 0D 2B  |Q(I),R(I):.I...+|
000005E0: 00 81 49 B2 32 A4 36 3A  97 51 28 49 29 AA 4D 2C  |..I.2.6:.Q(I).M,|
000005F0: 43 28 31 29 3A 82 49 00  13 0E 2C 00 81 49 B2 37  |C(1):.I...,..I.7|
00000600: A4 31 31 3A 97 51 28 49  29 AA 4D 2C 43 28 32 29  |.11:.Q(I).M,C(2)|
00000610: 3A 82 49 00 30 0E 2D 00  81 49 B2 31 32 A4 31 36  |:.I.0.-..I.12.16|
00000620: 3A 97 51 28 49 29 AA 4D  2C 43 28 33 29 3A 82 49  |:.Q(I).M,C(3):.I|
00000630: 00 48 0E 2E 00 81 54 B2  31 A4 31 36 3A 8D 33 3A  |.H....T.1.16:.3:|
00000640: 97 53 28 54 29 2C 36 33  00 6F 0E 2F 00 81 49 B2  |.S(T),63.o./..I.|
00000650: 31 A4 51 51 28 4E 29 3A  8D 33 3A 50 B2 C2 28 51  |1.QQ(N):.3:P..(Q|
00000660: 28 49 29 AA 4D 29 3A 8B  49 B2 31 A7 50 B2 31 00  |(I).M):.I.1.P.1.|
00000670: 87 0E 30 00 97 51 28 49  29 2C 33 32 3A 97 51 28  |..0..Q(I),32:.Q(|
00000680: 49 29 2C 52 28 49 29 00  99 0E 31 00 A1 45 24 3A  |I),R(I)...1..E$:|
00000690: 8B 45 24 B2 22 22 A7 34  38 00 AA 0E 32 00 8B C6  |.E$."".48...2...|
000006A0: 28 45 24 29 B2 31 33 A7  35 33 00 BA 0E 33 00 8B  |(E$).13.53...3..|
000006B0: 45 24 B3 B1 22 85 22 A7  34 38 00 C5 0E 34 00 82  |E$..".".48...4..|
000006C0: 49 3A 89 34 37 00 F4 0E  35 00 41 B2 53 28 54 29  |I:.47...5.A.S(T)|
000006D0: 3A 91 49 20 8D 34 2C 35  2C 36 2C 37 2C 38 2C 39  |:.I .4,5,6,7,8,9|
000006E0: 2C 35 2C 36 2C 37 2C 38  2C 39 2C 35 2C 36 2C 37  |,5,6,7,8,9,5,6,7|
000006F0: 2C 38 2C 39 00 FF 0E 36  00 8D 31 33 3A 82 54 00  |,8,9...6..13:.T.|
00000700: 32 0F 37 00 99 22 11 11  50 52 45 53 53 20 46 31  |2.7.."..PRESS F1|
00000710: 2D 2D 43 48 41 4E 47 45  22 3A 99 A3 36 29 22 46  |--CHANGE":..6)"F|
00000720: 37 2D 2D 50 52 49 4E 54  20 51 55 49 4C 54 22 3A  |7--PRINT QUILT":|
00000730: 8D 33 00 45 0F 38 00 A1  45 24 3A 8B 45 24 B2 22  |.3.E.8..E$:.E$."|
00000740: 88 22 A7 37 34 00 55 0F  39 00 8B 45 24 B3 B1 22  |.".74.U.9..E$.."|
00000750: 85 22 A7 35 36 00 5D 0F  3A 00 8D 31 34 00 8E 0F  |.".56.].:..14...|
00000760: 3B 00 99 22 91 91 50 52  45 53 53 20 46 37 2D 2D  |;.."..PRESS F7--|
00000770: 4E 4F 20 43 48 41 4E 47  45 22 3A 99 A3 36 29 22  |NO CHANGE":..6)"|
00000780: 46 31 2D 2D 43 48 41 4E  47 45 22 3A 8D 33 00 BE  |F1--CHANGE":.3..|
00000790: 0F 3C 00 81 54 B2 31 A4  31 36 3A 41 B2 53 28 54  |.<..T.1.16:A.S(T|
000007A0: 29 3A 8D 31 30 3A 8D 33  3A 50 B2 C2 28 41 AA 4D  |):.10:.3:P..(A.M|
000007B0: 29 3A 8B 50 B2 31 A7 50  B2 30 3A 8D 31 33 00 CA  |):.P.1.P.0:.13..|
000007C0: 0F 3D 00 8D 31 32 3A 8D  31 31 00 E2 0F 3E 00 A1  |.=..12:.11...>..|
000007D0: 45 24 3A 8B 45 24 B2 22  88 22 A7 8D 31 31 3A 89  |E$:.E$."."..11:.|
000007E0: 37 33 00 F2 0F 3F 00 8B  45 24 B3 B1 22 85 22 A7  |73...?..E$..".".|
000007F0: 36 31 00 FA 0F 40 00 8D  31 32 00 18 10 41 00 81  |61...@..12...A..|
00000800: 49 B2 31 A4 51 51 28 4E  29 3A 8D 33 3A 50 B2 C2  |I.1.QQ(N):.3:P..|
00000810: 28 51 28 49 29 AA 4D 29  00 30 10 42 00 97 51 28  |(Q(I).M).0.B..Q(|
00000820: 49 29 2C 33 32 3A 97 51  28 49 29 2C 52 28 49 29  |I),32:.Q(I),R(I)|
00000830: 00 42 10 43 00 A1 45 24  3A 8B 45 24 B2 22 22 A7  |.B.C..E$:.E$."".|
00000840: 36 36 00 53 10 44 00 8B  C6 28 45 24 29 B2 31 33  |66.S.D...(E$).13|
00000850: A7 37 31 00 63 10 45 00  8B 45 24 B3 B1 22 85 22  |.71.c.E..E$.."."|
00000860: A7 36 36 00 6E 10 46 00  82 49 3A 89 36 35 00 9D  |.66.n.F..I:.65..|
00000870: 10 47 00 41 B2 53 28 54  29 3A 91 49 20 8D 34 2C  |.G.A.S(T):.I .4,|
00000880: 35 2C 36 2C 37 2C 38 2C  39 2C 35 2C 36 2C 37 2C  |5,6,7,8,9,5,6,7,|
00000890: 38 2C 39 2C 35 2C 36 2C  37 2C 38 2C 39 00 A5 10  |8,9,5,6,7,8,9...|
000008A0: 48 00 8D 31 33 00 BD 10  49 00 82 54 3A 8D 31 34  |H..13...I..T:.14|
000008B0: 3A 99 22 91 91 91 91 91  22 3A 89 35 35 00 DD 10  |:.".....":.55...|
000008C0: 4A 00 81 54 B2 31 A4 31  36 3A 41 B2 53 28 54 29  |J..T.1.16:A.S(T)|
000008D0: 3A 50 B2 C2 28 41 AA 4D  29 3A 8D 31 30 00 07 11  |:P..(A.M):.10...|
000008E0: 4B 00 41 B2 53 28 54 29  AB 31 38 34 3A 8D 31 31  |K.A.S(T).184:.11|
000008F0: 3A 8D 31 33 3A 41 B2 53  28 54 29 AB 31 37 36 3A  |:.13:A.S(T).176:|
00000900: 8D 31 31 3A 8D 31 33 00  1C 11 4C 00 41 B2 53 28  |.11:.13...L.A.S(|
00000910: 54 29 AB 38 3A 8D 31 31  3A 8D 31 33 00 23 11 4D  |T).8:.11:.13.#.M|
00000920: 00 82 54 00 43 11 4E 00  81 54 B2 31 A4 31 32 3A  |..T.C.N..T.1.12:|
00000930: 41 B2 53 28 54 29 3A 50  B2 C2 28 41 AA 4D 29 3A  |A.S(T):P..(A.M):|
00000940: 8D 31 30 00 6D 11 4F 00  41 B2 53 28 54 29 AA 31  |.10.m.O.A.S(T).1|
00000950: 36 38 3A 8D 31 31 3A 8D  31 33 3A 41 B2 53 28 54  |68:.11:.13:A.S(T|
00000960: 29 AA 31 37 36 3A 8D 31  31 3A 8D 31 33 00 74 11  |).176:.11:.13.t.|
00000970: 50 00 82 54 00 94 11 51  00 81 54 B2 31 A4 31 36  |P..T...Q..T.1.16|
00000980: 3A 41 B2 53 28 54 29 3A  50 B2 C2 28 41 AA 4D 29  |:A.S(T):P..(A.M)|
00000990: 3A 8D 31 30 00 A7 11 52  00 8B 54 AD 34 B2 B5 28  |:.10...R..T.4..(|
000009A0: 54 AD 34 29 A7 38 36 00  CF 11 53 00 41 B2 53 28  |T.4).86...S.A.S(|
000009B0: 54 29 AB 31 36 38 3A 8D  31 31 3A 8D 31 33 3A 41  |T).168:.11:.13:A|
000009C0: B2 53 28 54 29 AA 38 3A  8D 31 31 3A 8D 31 33 00  |.S(T).8:.11:.13.|
000009D0: E7 11 54 00 41 B2 53 28  54 29 AA 31 38 34 3A 8B  |..T.A.S(T).184:.|
000009E0: 54 B1 31 32 A7 38 36 00  F3 11 55 00 8D 31 31 3A  |T.12.86...U..11:|
000009F0: 8D 31 33 00 FA 11 56 00  82 54 00 16 12 57 00 99  |.13...V..T...W..|
00000A00: 22 13 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |"...............|
00000A10: 11 11 11 11 11 22 00 1C  12 58 00 80 00 00 00     |....."...X..... |
....... QUILT SQUARES VIC.!....15.D....1
98,0:.V,231:.D.1.50:.:.V,0:..N....A,32:.
A.1,32:.A.22,32:.A.23,32:P.1:.......A,16
0:.A.1,160:.A.22,160:.A.23,160:..A....A,
32:.A.1,233:.A.22,233:.A.23,160:.......A
,160:.A.1,105:.A.22,105:.A.23,32:.......
A,223:.A.1,32:.A.22,160:.A.23,223:..:...
.A,95:.A.1,160:.A.22,32:.A.23,95:..H...A
1.B(A):A2.B(A.1):A3.B(A.22):A4.B(A.23):.
......A,A1:.A.1,A2:.A.22,A3:.A.23,A4:...
....A,79:.A.1,80:.A.22,76:.A.23,122:....
...A.M,P:.A.1.M,P:.A.22.M,P:.A.23.M,P:..
.....I.8054.8118:.I,32:.I:......."......
QUILT SQUARES".3....S(16),Q(16),R(16),QQ
(3).|....".USE F1 TO MOVE TO THE QUILT S
QUARE DESIRED, THEN PRESS <RETURN>."....
..".FILL IN THE SAMPLE    SQUARES.".A...
.I.1.16:.S(I),Q(I),R(I):.......7864,7703
,79,7866,7705,160,7868,7707,233,7870,775
1,105.9....7908,7709,223,7910,7753,95,79
12,7711,160,7914,7713,233.U....7952,7757
,105,7954,7715,223,7956,7759,95,7958,771
7,160......7996,7719,233,7998,7763,105,8
000,7721,223,8002,7765,95.....QQ(1).6:QQ
(2).11:QQ(3).16:.36878,15:V.36876:M.3072
0.....A$."OPOPOPOP":B$."L.L.L.L.".M...."
.ONE COLOR IS WHITE.   HOW MANY OTHER CO
LORS, 1, 2, OR 3?":.3._....E$:.E$."".27.
U....E$."1".E$."3".27.....N.E(E$)......I
.1.N......"..CHOOSE COLOR";I.V. .." .. .
  .. .  .. .  .. .  .. .  .. .  .. .."..
.!.." 1  2  3  4  5  6  7":.3..."..E$:.E
$."".34...#..E$."1".E$."7".34.;.$.C(I).E
(E$):..3.C(I).2)"^".N.%..C(I).1.C(I).0.U
.&..I.E.'.."........"...(..I.1.4:..8)A$:
..8)B$:.I...)..7703,79:.7704,101:.7725,9
9:.7703.M,0:.7704.M,0:.7725.M,0...*..I.2
.QQ(N):.Q(I),R(I):.I...+..I.2.6:.Q(I).M,
C(1):.I...,..I.7.11:.Q(I).M,C(2):.I.0.-.
.I.12.16:.Q(I).M,C(3):.I.H....T.1.16:.3:
.S(T),63.O./..I.1.QQ(N):.3:P.B(Q(I).M):.
I.1.P.1...0..Q(I),32:.Q(I),R(I)...1..E$:
.E$."".48...2..F(E$).13.53...3..E$..".".
48.E.4..I:.47...5.A.S(T):.I .4,5,6,7,8,9
,5,6,7,8,9,5,6,7,8,9...6..13:.T.2.7.."..
PRESS F1--CHANGE":..6)"F7--PRINT QUILT":
.3.E.8..E$:.E$.".".74.U.9..E$..".".56.].
:..14...;.."..PRESS F7--NO CHANGE":..6)"
F1--CHANGE":.3...<..T.1.16:A.S(T):.10:.3
:P.B(A.M):.P.1.P.0:.13.J.=..12:.11...>..
E$:.E$."."..11:.73...?..E$..".".61...@..
12...A..I.1.QQ(N):.3:P.B(Q(I).M).0.B..Q(
I),32:.Q(I),R(I).B.C..E$:.E$."".66.S.D..
F(E$).13.71.C.E..E$..".".66.N.F..I:.65..
.G.A.S(T):.I .4,5,6,7,8,9,5,6,7,8,9,5,6,
7,8,9...H..13...I..T:.14:.".....":.55...
J..T.1.16:A.S(T):P.B(A.M):.10...K.A.S(T)
.184:.11:.13:A.S(T).176:.11:.13...L.A.S(
T).8:.11:.13.#.M..T.C.N..T.1.12:A.S(T):P
.B(A.M):.10.M.O.A.S(T).168:.11:.13:A.S(T
).176:.11:.13.T.P..T...Q..T.1.16:A.S(T):
P.B(A.M):.10...R..T.4..(T.4).86.O.S.A.S(
T).168:.11:.13:A.S(T).8:.11:.13...T.A.S(
T).184:.T.12.86...U..11:.13...V..T...W..
"...................."...X.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL