QUILT
FILE INFORMATION
FILENAME(S): QUILT
FILE TYPE(S): PRG
FILE SIZE: 10.6K
FIRST SEEN: 2025-12-01 19:06:51
APPEARS ON: 1 disk(s)
FILE HASH
39bf1f9cc71a1a90c7179d73e049919bc34e30fbae2ac1871dce9cddb408fa1a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 107 S 3 | QUILT | PRG | Icebreaker | 4 | 20 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 64 00 8F 20 43 4F 50 59 52 49 47 48 |..$.d.. COPYRIGH|
00000010: 54 20 4D 41 55 52 49 43 45 20 4A 4F 4E 45 53 20 |T MAURICE JONES |
00000020: 31 39 39 32 00 4C 08 6E 00 97 35 36 2C 35 36 3A |1992.L.n..56,56:|
00000030: 97 35 31 2C 30 3A 9C 3A 44 56 B2 C2 28 31 38 36 |.51,0:.:DV..(186|
00000040: 29 3A 8B 44 56 B3 38 A7 44 56 B2 38 00 6B 08 78 |):.DV.8.DV.8.k.x|
00000050: 00 86 49 2C 58 2C 59 2C 4A 2C 4B 2C 4D 2C 4D 54 |..I,X,Y,J,K,M,MT|
00000060: 2C 44 56 2C 45 2C 4A 31 2C 4B 31 00 8F 08 82 00 |,DV,E,J1,K1.....|
00000070: 9E 35 32 34 38 30 2C C7 28 31 33 29 AA 22 91 11 |.52480,.(13)."..|
00000080: 9D 1D 22 2C 32 30 2C 32 30 2C 32 30 2C 32 30 00 |..",20,20,20,20.|
00000090: CA 08 8C 00 99 C7 28 31 34 29 3B C7 28 38 29 3A |......(14);.(8):|
000000A0: 4D 54 B2 33 36 38 36 34 3A 42 4F 58 B2 4D 54 AA |MT.36864:BOX.MT.|
000000B0: 31 35 3A 43 45 B2 4D 54 AA 32 37 3A 43 4D B2 4D |15:CE.MT.27:CM.M|
000000C0: 54 3A 4D 45 B2 43 4D AA 34 38 00 D4 08 96 00 89 |T:ME.CM.48......|
000000D0: 31 35 31 30 00 E2 08 A0 00 8F 20 43 48 4F 49 43 |1510...... CHOIC|
000000E0: 45 2A 00 EB 08 AA 00 8D 32 32 30 00 0C 09 B4 00 |E*......220.....|
000000F0: 81 49 B2 31 A4 C3 28 43 48 24 29 3A 8B 41 24 B2 |.I.1..(CH$):.A$.|
00000100: CA 28 43 48 24 2C 49 2C 31 29 A7 8E 00 17 09 BE |.(CH$,I,1)......|
00000110: 00 82 3A 89 31 37 30 00 2D 09 C8 00 8F 20 41 4E |..:.170.-.... AN|
00000120: 59 20 4B 45 59 2D 47 45 54 20 41 24 2A 00 6E 09 |Y KEY-GET A$*.n.|
00000130: D2 00 58 B2 30 3A 59 B2 32 34 3A 8D 32 34 30 3A |..X.0:Y.24:.240:|
00000140: 99 22 92 9F 20 20 20 20 20 20 20 20 20 20 20 50 |.".. P|
00000150: 4C 45 41 53 45 20 50 52 45 53 53 20 41 20 4B 45 |LEASE PRESS A KE|
00000160: 59 20 20 20 20 20 20 20 20 20 91 91 91 22 00 83 |Y ..."..|
00000170: 09 DC 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 32 |....A$:.A$."".22|
00000180: 30 3A 8E 00 93 09 E6 00 8F 20 50 52 49 4E 54 20 |0:....... PRINT |
00000190: 41 54 2A 00 AE 09 F0 00 97 32 31 31 2C 58 3A 97 |AT*......211,X:.|
000001A0: 32 31 34 2C 59 3A 9E 35 38 37 33 32 3A 8E 00 C3 |214,Y:.58732:...|
000001B0: 09 FA 00 8F 20 53 45 4C 45 43 54 20 53 51 55 41 |.... SELECT SQUA|
000001C0: 52 45 53 00 E3 09 04 01 58 B2 35 3A 59 B2 33 3A |RES.....X.5:Y.3:|
000001D0: 8D 32 34 30 3A 99 22 9E 92 5E 22 3A 4B B2 31 3A |.240:."..^":K.1:|
000001E0: 4A B2 30 00 14 0A 0E 01 43 48 24 B2 C7 28 31 33 |J.0.....CH$..(13|
000001F0: 29 AA 22 91 11 9D 1D 22 3A 8D 31 37 30 3A 91 49 |)."....":.170:.I|
00000200: 89 32 38 30 2C 32 39 30 2C 33 31 30 2C 33 33 30 |.280,290,310,330|
00000210: 2C 33 35 30 00 2B 0A 18 01 51 28 4D 29 B2 34 AC |,350.+...Q(M).4.|
00000220: 4A AA 4B 3A 99 22 20 20 22 3A 8E 00 38 0A 22 01 |J.K:." ":..8.".|
00000230: 8B 4A B2 30 A7 32 37 30 00 5F 0A 2C 01 99 22 20 |.J.0.270._.,.." |
00000240: 20 22 3A 59 B2 59 AB 33 3A 8D 32 34 30 3A 99 22 | ":Y.Y.3:.240:."|
00000250: 92 9E 5E 22 3A 4A B2 4A AB 31 3A 89 32 37 30 00 |..^":J.J.1:.270.|
00000260: 6C 0A 36 01 8B 4A B2 36 A7 32 37 30 00 93 0A 40 |l.6..J.6.270...@|
00000270: 01 99 22 20 20 22 3A 59 B2 59 AA 33 3A 8D 32 34 |.." ":Y.Y.3:.24|
00000280: 30 3A 99 22 92 9E 5E 22 3A 4A B2 4A AA 31 3A 89 |0:."..^":J.J.1:.|
00000290: 32 37 30 00 A0 0A 4A 01 8B 4B B2 31 A7 32 37 30 |270...J..K.1.270|
000002A0: 00 C7 0A 54 01 99 22 20 20 22 3A 58 B2 58 AB 32 |...T.." ":X.X.2|
000002B0: 3A 8D 32 34 30 3A 99 22 92 9E 5E 22 3A 4B B2 4B |:.240:."..^":K.K|
000002C0: AB 31 3A 89 32 37 30 00 D4 0A 5E 01 8B 4B B2 34 |.1:.270...^..K.4|
000002D0: A7 32 37 30 00 FB 0A 68 01 99 22 20 20 22 3A 58 |.270...h.." ":X|
000002E0: B2 58 AA 32 3A 8D 32 34 30 3A 99 22 92 9E 5E 22 |.X.2:.240:."..^"|
000002F0: 3A 4B B2 4B AA 31 3A 89 32 37 30 00 0A 0B 72 01 |:K.K.1:.270...r.|
00000300: 8F 20 53 54 41 52 54 20 55 50 00 40 0B 7C 01 86 |. START UP.@.|..|
00000310: 51 31 24 28 37 2C 34 29 2C 43 4C 28 31 34 29 2C |Q1$(7,4),CL(14),|
00000320: 51 28 31 36 29 2C 42 24 28 37 2C 34 29 2C 58 28 |Q(16),B$(7,4),X(|
00000330: 31 36 29 2C 59 28 31 36 29 2C 43 43 28 31 34 29 |16),Y(16),CC(14)|
00000340: 00 78 0B 86 01 51 31 24 28 32 2C 31 29 B2 22 A3 |.x...Q1$(2,1).".|
00000350: 22 3A 51 31 24 28 32 2C 32 29 B2 22 A4 22 3A 51 |":Q1$(2,2).".":Q|
00000360: 31 24 28 32 2C 33 29 B2 22 A5 22 3A 51 31 24 28 |1$(2,3).".":Q1$(|
00000370: 32 2C 34 29 B2 22 A6 22 00 B4 0B 90 01 51 31 24 |2,4).".".....Q1$|
00000380: 28 33 2C 31 29 B2 22 12 23 22 3A 51 31 24 28 33 |(3,1).".#":Q1$(3|
00000390: 2C 32 29 B2 22 12 24 22 3A 51 31 24 28 33 2C 33 |,2).".$":Q1$(3,3|
000003A0: 29 B2 22 12 25 22 3A 51 31 24 28 33 2C 34 29 B2 |).".%":Q1$(3,4).|
000003B0: 22 12 26 22 00 F0 0B 9A 01 51 31 24 28 35 2C 31 |".&".....Q1$(5,1|
000003C0: 29 B2 22 12 A3 22 3A 51 31 24 28 35 2C 32 29 B2 |)."..":Q1$(5,2).|
000003D0: 22 12 A4 22 3A 51 31 24 28 35 2C 33 29 B2 22 12 |"..":Q1$(5,3).".|
000003E0: A5 22 3A 51 31 24 28 35 2C 34 29 B2 22 12 A6 22 |.":Q1$(5,4).".."|
000003F0: 00 2B 0C A4 01 51 31 24 28 31 2C 31 29 B2 22 27 |.+...Q1$(1,1)."'|
00000400: 22 3A 51 31 24 28 31 2C 32 29 B2 22 92 A0 22 3A |":Q1$(1,2)."..":|
00000410: 51 31 24 28 31 2C 33 29 B2 22 12 20 22 3A 51 31 |Q1$(1,3).". ":Q1|
00000420: 24 28 31 2C 34 29 B2 22 12 A0 22 00 77 0C AE 01 |$(1,4)."..".w...|
00000430: 42 24 28 32 2C 31 29 B2 22 A3 27 11 9D 9D A0 A3 |B$(2,1).".'.....|
00000440: 22 3A 42 24 28 32 2C 32 29 B2 22 A4 A0 11 9D 9D |":B$(2,2).".....|
00000450: 27 A4 22 3A 42 24 28 32 2C 33 29 B2 22 A0 A5 11 |'.":B$(2,3)."...|
00000460: 9D 9D A5 27 22 3A 42 24 28 32 2C 34 29 B2 22 27 |...'":B$(2,4)."'|
00000470: A6 11 9D 9D A6 A0 22 00 C7 0C B8 01 42 24 28 33 |......".....B$(3|
00000480: 2C 31 29 B2 22 12 23 27 11 9D 9D 20 23 22 3A 42 |,1).".#'... #":B|
00000490: 24 28 33 2C 32 29 B2 22 12 24 20 11 9D 9D 27 24 |$(3,2).".$ ...'$|
000004A0: 22 3A 42 24 28 33 2C 33 29 B2 22 12 20 25 11 9D |":B$(3,3).". %..|
000004B0: 9D 25 27 22 3A 42 24 28 33 2C 34 29 B2 22 12 27 |.%'":B$(3,4).".'|
000004C0: 26 11 9D 9D 26 20 22 00 17 0D C2 01 42 24 28 35 |&...& ".....B$(5|
000004D0: 2C 31 29 B2 22 12 A3 27 11 9D 9D A0 A3 22 3A 42 |,1)."..'.....":B|
000004E0: 24 28 35 2C 32 29 B2 22 12 A4 A0 11 9D 9D 27 A4 |$(5,2)."......'.|
000004F0: 22 3A 42 24 28 35 2C 33 29 B2 22 12 A0 A5 11 9D |":B$(5,3).".....|
00000500: 9D A5 27 22 3A 42 24 28 35 2C 34 29 B2 22 12 27 |..'":B$(5,4).".'|
00000510: A6 11 9D 9D A6 A0 22 00 65 0D CC 01 42 24 28 31 |......".e...B$(1|
00000520: 2C 31 29 B2 22 27 27 11 9D 9D 27 27 22 3A 42 24 |,1)."''...''":B$|
00000530: 28 31 2C 32 29 B2 22 A0 A0 11 9D 9D A0 A0 22 3A |(1,2).".......":|
00000540: 42 24 28 31 2C 33 29 B2 22 12 20 20 11 9D 9D 20 |B$(1,3).". ... |
00000550: 20 22 3A 42 24 28 31 2C 34 29 B2 22 12 A0 A0 11 | ":B$(1,4)."....|
00000560: 9D 9D A0 A0 22 00 91 0D D6 01 81 49 B2 31 A4 31 |...."......I.1.1|
00000570: 32 3A 43 4C 28 49 29 B2 49 AB 31 3A 82 3A 43 4C |2:CL(I).I.1:.:CL|
00000580: 28 31 33 29 B2 31 33 3A 43 4C 28 31 34 29 B2 31 |(13).13:CL(14).1|
00000590: 34 00 DC 0D E0 01 42 20 24 28 34 2C 31 29 B2 42 |4.....B $(4,1).B|
000005A0: 20 24 28 33 2C 31 29 3A 42 20 24 28 34 2C 32 29 | $(3,1):B $(4,2)|
000005B0: B2 42 20 24 28 33 2C 32 29 3A 42 20 24 28 34 2C |.B $(3,2):B $(4,|
000005C0: 33 29 B2 42 24 28 33 2C 33 29 3A 42 20 24 28 34 |3).B$(3,3):B $(4|
000005D0: 2C 34 29 B2 42 20 24 28 33 2C 34 29 00 20 0E EA |,4).B $(3,4). ..|
000005E0: 01 42 24 28 36 2C 31 29 B2 42 24 28 35 2C 31 29 |.B$(6,1).B$(5,1)|
000005F0: 3A 42 24 28 36 2C 32 29 B2 42 24 28 35 2C 32 29 |:B$(6,2).B$(5,2)|
00000600: 3A 42 24 28 36 2C 33 29 B2 42 24 28 35 2C 33 29 |:B$(6,3).B$(5,3)|
00000610: 3A 42 24 28 36 2C 34 29 B2 42 24 28 35 2C 34 29 |:B$(6,4).B$(5,4)|
00000620: 00 64 0E F4 01 42 24 28 37 2C 31 29 B2 42 24 28 |.d...B$(7,1).B$(|
00000630: 35 2C 31 29 3A 42 24 28 37 2C 32 29 B2 42 24 28 |5,1):B$(7,2).B$(|
00000640: 35 2C 32 29 3A 42 24 28 37 2C 33 29 B2 42 24 28 |5,2):B$(7,3).B$(|
00000650: 35 2C 33 29 3A 42 24 28 37 2C 34 29 B2 42 24 28 |5,3):B$(7,4).B$(|
00000660: 35 2C 34 29 00 9F 0E FE 01 4B B2 32 33 3A 81 49 |5,4).....K.23:.I|
00000670: B2 31 A4 34 3A 58 28 49 29 B2 4B 3A 58 28 49 AA |.1.4:X(I).K:X(I.|
00000680: 34 29 B2 4B 3A 58 28 49 AA 38 29 B2 4B 3A 58 28 |4).K:X(I.8).K:X(|
00000690: 49 AA 31 32 29 B2 4B 3A 4B B2 4B AA 32 3A 82 00 |I.12).K:K.K.2:..|
000006A0: D8 0E 08 02 81 49 B2 31 A4 34 3A 59 28 49 29 B2 |.....I.1.4:Y(I).|
000006B0: 35 3A 82 3A 81 49 B2 35 A4 38 3A 59 28 49 29 B2 |5:.:.I.5.8:Y(I).|
000006C0: 37 3A 82 3A 20 20 20 20 81 49 B2 39 A4 31 32 3A |7:.: .I.9.12:|
000006D0: 59 28 49 29 B2 39 3A 82 00 EF 0E 12 02 81 49 B2 |Y(I).9:.......I.|
000006E0: 31 33 A4 31 36 3A 59 28 49 29 B2 31 31 3A 82 00 |13.16:Y(I).11:..|
000006F0: 1D 0F 1C 02 96 A5 4A 28 58 29 B2 B5 28 28 58 AB |......J(X)..((X.|
00000700: 31 29 AD 34 29 3A 96 A5 4B 28 58 29 B2 58 AB 34 |1).4):..K(X).X.4|
00000710: AC 28 B5 28 28 58 AB 31 29 AD 34 29 29 00 69 0F |.(.((X.1).4)).i.|
00000720: 26 02 51 31 24 28 34 2C 31 29 B2 51 31 24 28 33 |&.Q1$(4,1).Q1$(3|
00000730: 2C 31 29 3A 51 31 24 28 34 2C 32 29 B2 51 31 24 |,1):Q1$(4,2).Q1$|
00000740: 28 33 2C 32 29 3A 51 31 24 28 34 2C 33 29 B2 51 |(3,2):Q1$(4,3).Q|
00000750: 31 24 28 33 2C 33 29 3A 51 31 24 28 34 2C 34 29 |1$(3,3):Q1$(4,4)|
00000760: B2 51 31 24 28 33 2C 34 29 00 B5 0F 30 02 51 31 |.Q1$(3,4)...0.Q1|
00000770: 24 28 36 2C 31 29 B2 51 31 24 28 35 2C 31 29 3A |$(6,1).Q1$(5,1):|
00000780: 51 31 24 28 36 2C 32 29 B2 51 31 24 28 35 2C 32 |Q1$(6,2).Q1$(5,2|
00000790: 29 3A 51 31 24 28 36 2C 33 29 B2 51 31 24 28 35 |):Q1$(6,3).Q1$(5|
000007A0: 2C 33 29 3A 51 31 24 28 36 2C 34 29 B2 51 31 24 |,3):Q1$(6,4).Q1$|
000007B0: 28 35 2C 34 29 00 01 10 3A 02 51 31 24 28 37 2C |(5,4)...:.Q1$(7,|
000007C0: 31 29 B2 51 31 24 28 35 2C 31 29 3A 51 31 24 28 |1).Q1$(5,1):Q1$(|
000007D0: 37 2C 32 29 B2 51 31 24 28 35 2C 32 29 3A 51 31 |7,2).Q1$(5,2):Q1|
000007E0: 24 28 37 2C 33 29 B2 51 31 24 28 35 2C 33 29 3A |$(7,3).Q1$(5,3):|
000007F0: 51 31 24 28 37 2C 34 29 B2 51 31 24 28 35 2C 34 |Q1$(7,4).Q1$(5,4|
00000800: 29 00 1D 10 44 02 4E 52 28 32 29 B2 31 3A 4E 52 |)...D.NR(2).1:NR|
00000810: 28 33 29 B2 33 3A 4E 52 28 34 29 B2 36 00 32 10 |(3).3:NR(4).6.2.|
00000820: 4E 02 81 49 B2 31 A4 31 34 3A 87 43 43 28 49 29 |N..I.1.14:.CC(I)|
00000830: 3A 82 00 6A 10 58 02 83 31 34 34 2C 35 2C 32 38 |:..j.X..144,5,28|
00000840: 2C 31 35 39 2C 31 35 36 2C 33 30 2C 33 31 2C 31 |,159,156,30,31,1|
00000850: 35 38 2C 31 32 39 2C 31 34 39 2C 31 35 30 2C 31 |58,129,149,150,1|
00000860: 35 31 2C 31 35 33 2C 31 35 34 00 8C 10 62 02 8F |51,153,154...b..|
00000870: 20 4E 45 58 54 20 33 20 4C 49 4E 45 53 20 44 45 | NEXT 3 LINES DE|
00000880: 46 49 4E 45 20 41 20 51 55 49 4C 54 00 C0 10 6C |FINE A QUILT...l|
00000890: 02 83 34 2C 33 2C 31 34 2C 31 34 2C 33 2C 36 2C |..4,3,14,14,3,6,|
000008A0: 32 2C 33 2C 32 2C 39 2C 31 31 2C 38 2C 37 2C 31 |2,3,2,9,11,8,7,1|
000008B0: 32 2C 31 30 2C 32 2C 33 2C 32 2C 35 2C 33 2C 33 |2,10,2,3,2,5,3,3|
000008C0: 00 EB 10 76 02 81 49 B2 31 A4 34 3A 87 43 4F 28 |...v..I.1.4:.CO(|
000008D0: 49 29 3A 82 3A 20 20 20 81 49 B2 31 A4 31 36 3A |I):.: .I.1.16:|
000008E0: 87 51 28 49 29 3A 82 3A 87 4E 43 00 34 11 80 02 |.Q(I):.:.NC.4...|
000008F0: 81 4A B2 30 A4 32 3A 50 4F 28 4A 29 B2 43 4F 28 |.J.0.2:PO(J).CO(|
00000900: 31 29 3A 82 3A 50 4F 28 33 29 B2 43 4F 28 32 29 |1):.:PO(3).CO(2)|
00000910: 3A 50 4F 28 34 29 B2 43 4F 28 31 29 3A 50 4F 28 |:PO(4).CO(1):PO(|
00000920: 35 29 B2 43 4F 28 32 29 3A 50 4F 28 36 29 B2 43 |5).CO(2):PO(6).C|
00000930: 4F 28 33 29 00 3A 11 8A 02 8E 00 57 11 94 02 8F |O(3).:.....W....|
00000940: 20 50 52 49 4E 54 20 50 4F 53 53 49 42 4C 45 20 | PRINT POSSIBLE |
00000950: 53 51 55 41 52 45 53 00 7D 11 9E 02 9E 42 4F 58 |SQUARES.}....BOX|
00000960: 2C 34 2C 31 32 2C 32 2C 32 32 2C 33 32 2C 31 35 |,4,12,2,22,32,15|
00000970: 3A 58 B2 34 3A 59 B2 32 3A 8D 32 34 30 00 BA 11 |:X.4:Y.2:.240...|
00000980: A8 02 81 4A B2 31 A4 4E 52 28 4E 43 29 AA 31 3A |...J.1.NR(NC).1:|
00000990: 97 36 34 36 2C 50 4F 28 4A AB 31 29 3A 99 22 1D |.646,PO(J.1):.".|
000009A0: 22 3B 20 3A 81 49 B2 31 A4 34 3A 99 51 31 24 28 |"; :.I.1.4:.Q1$(|
000009B0: 4A 2C 49 29 3B 22 92 1D 22 3B 00 C0 11 B2 02 82 |J,I);"..";......|
000009C0: 00 D1 11 BC 02 59 B2 59 AA 33 3A 8D 32 34 30 3A |.....Y.Y.3:.240:|
000009D0: 82 00 D7 11 C6 02 8E 00 F1 11 D0 02 8F 20 20 43 |............. C|
000009E0: 4F 4C 4F 52 53 2D 4D 4F 56 45 20 43 55 52 53 4F |OLORS-MOVE CURSO|
000009F0: 52 00 10 12 DA 02 58 B2 36 3A 59 B2 34 3A 8D 32 |R.....X.6:Y.4:.2|
00000A00: 34 30 3A 99 22 9E 5E 22 3A 4B B2 31 3A 4A B2 30 |40:.".^":K.1:J.0|
00000A10: 00 4A 12 E4 02 43 48 24 B2 C7 28 31 33 29 AA 22 |.J...CH$..(13)."|
00000A20: 91 11 9D 1D 44 22 20 20 20 3A 8D 31 37 30 3A 91 |....D" :.170:.|
00000A30: 49 89 37 35 30 2C 37 36 30 2C 37 38 30 2C 38 30 |I.750,760,780,80|
00000A40: 30 2C 38 32 30 2C 31 31 30 30 00 66 12 EE 02 43 |0,820,1100.f...C|
00000A50: 4F 28 4D 29 B2 43 4C 28 32 AC 4A AA 4B 29 3A 99 |O(M).CL(2.J.K):.|
00000A60: 22 20 20 22 3A 8E 00 73 12 F8 02 8B 4A B2 30 A7 |" ":..s....J.0.|
00000A70: 37 34 30 00 98 12 02 03 99 22 20 20 22 3A 59 B2 |740......" ":Y.|
00000A80: 59 AB 33 3A 8D 32 34 30 3A 99 22 5E 22 3A 4A B2 |Y.3:.240:."^":J.|
00000A90: 4A AB 31 3A 89 37 34 30 00 A5 12 0C 03 8B 4A B2 |J.1:.740......J.|
00000AA0: 36 A7 37 34 30 00 CA 12 16 03 99 22 20 20 22 3A |6.740......" ":|
00000AB0: 59 B2 59 AA 33 3A 8D 32 34 30 3A 99 22 5E 22 3A |Y.Y.3:.240:."^":|
00000AC0: 4A B2 4A AA 31 3A 89 37 34 30 00 D7 12 20 03 8B |J.J.1:.740... ..|
00000AD0: 4B B2 31 A7 37 34 30 00 FA 12 2A 03 99 22 20 20 |K.1.740...*.." |
00000AE0: 22 3A 58 B2 58 AB 34 3A 8D 32 34 30 3A 99 22 5E |":X.X.4:.240:."^|
00000AF0: 22 3A 4B B2 31 3A 89 37 34 30 00 07 13 34 03 8B |":K.1:.740...4..|
00000B00: 4B B2 32 A7 37 34 30 00 2A 13 3E 03 99 22 20 20 |K.2.740.*.>.." |
00000B10: 22 3A 58 B2 58 AA 34 3A 8D 32 34 30 3A 99 22 5E |":X.X.4:.240:."^|
00000B20: 22 3A 4B B2 32 3A 89 37 34 30 00 37 13 48 03 8F |":K.2:.740.7.H..|
00000B30: 20 53 43 52 45 45 4E 00 51 13 52 03 99 22 93 22 | SCREEN.Q.R.."."|
00000B40: 3A 97 35 33 32 37 32 2C 33 31 3A 97 31 39 38 2C |:.53272,31:.198,|
00000B50: 30 00 7C 13 5C 03 97 35 33 32 36 35 2C C2 28 35 |0.|.\..53265,.(5|
00000B60: 33 32 36 35 29 B0 36 34 3A 97 35 33 32 38 31 2C |3265).64:.53281,|
00000B70: 31 35 3A 97 35 33 32 38 30 2C 30 39 00 BD 13 66 |15:.53280,09...f|
00000B80: 03 9E 42 4F 58 2C 30 2C 33 39 2C 30 2C 32 34 2C |..BOX,0,39,0,24,|
00000B90: 30 2C 30 38 3A 9E 42 4F 58 2C 33 2C 31 33 2C 31 |0,08:.BOX,3,13,1|
00000BA0: 2C 32 33 2C 33 32 2C 31 35 3A 9E 42 4F 58 2C 33 |,23,32,15:.BOX,3|
00000BB0: 2C 33 2C 31 2C 32 33 2C 36 33 2C 30 38 00 03 14 |,3,1,23,63,08...|
00000BC0: 70 03 9E 42 4F 58 2C 31 33 2C 31 33 2C 31 2C 32 |p..BOX,13,13,1,2|
00000BD0: 33 2C 36 31 2C 30 38 3A 9E 42 4F 58 2C 32 31 2C |3,61,08:.BOX,21,|
00000BE0: 33 32 2C 33 2C 31 34 2C 33 32 2C 31 35 3A 9E 42 |32,3,14,32,15:.B|
00000BF0: 4F 58 2C 32 31 2C 32 31 2C 33 2C 31 34 2C 36 33 |OX,21,21,3,14,63|
00000C00: 2C 30 38 00 4B 14 7A 03 9E 42 4F 58 2C 33 32 2C |,08.K.z..BOX,32,|
00000C10: 33 32 2C 33 2C 31 34 2C 36 31 2C 30 38 3A 9E 42 |32,3,14,61,08:.B|
00000C20: 4F 58 2C 31 38 2C 33 35 2C 31 37 2C 32 31 2C 33 |OX,18,35,17,21,3|
00000C30: 32 2C 31 35 3A 9E 42 4F 58 2C 31 38 2C 33 35 2C |2,15:.BOX,18,35,|
00000C40: 31 37 2C 31 37 2C 36 30 2C 30 38 00 67 14 84 03 |17,17,60,08.g...|
00000C50: 9E 42 4F 58 2C 31 38 2C 33 35 2C 32 31 2C 32 31 |.BOX,18,35,21,21|
00000C60: 2C 36 32 2C 30 38 3A 00 92 14 8E 03 97 36 34 36 |,62,08:......646|
00000C70: 2C 38 3A 58 B2 31 38 3A 59 B2 31 37 3A 8D 32 34 |,8:X.18:Y.17:.24|
00000C80: 30 3A 99 22 5B 11 9D 3F 11 9D 3F 11 9D 3F 11 9D |0:."[..?..?..?..|
00000C90: 2A 22 00 BD 14 98 03 97 36 34 36 2C 38 3A 58 B2 |*"......646,8:X.|
00000CA0: 33 35 3A 59 B2 31 37 3A 8D 32 34 30 3A 99 22 5D |35:Y.17:.240:."]|
00000CB0: 11 9D 3D 11 9D 3D 11 9D 3D 11 9D 2B 22 00 DF 14 |..=..=..=..+"...|
00000CC0: A2 03 58 B2 30 33 3A 59 B2 32 33 3A 8D 32 34 30 |..X.03:Y.23:.240|
00000CD0: 3A 99 22 2A 3E 3E 3E 3E 3E 3E 3E 3E 3E 2B 22 00 |:."*>>>>>>>>>+".|
00000CE0: 07 15 AC 03 58 B2 30 33 3A 59 B2 31 3A 8D 32 34 |....X.03:Y.1:.24|
00000CF0: 30 3A 97 36 34 36 2C 30 38 3A 99 22 5B 3C 3C 3C |0:.646,08:."[<<<|
00000D00: 3C 3C 3C 3C 3C 3C 5D 00 30 15 B6 03 58 B2 32 31 |<<<<<<].0...X.21|
00000D10: 3A 59 B2 33 3A 8D 32 34 30 3A 97 36 34 36 2C 30 |:Y.3:.240:.646,0|
00000D20: 38 3A 99 22 5B 3C 3C 3C 3C 3C 3C 3C 3C 3C 3C 5D |8:."[<<<<<<<<<<]|
00000D30: 00 53 15 C0 03 58 B2 32 31 3A 59 B2 31 34 3A 8D |.S...X.21:Y.14:.|
00000D40: 32 34 30 3A 99 22 2A 3E 3E 3E 3E 3E 3E 3E 3E 3E |240:."*>>>>>>>>>|
00000D50: 3E 2B 22 00 59 15 CA 03 8E 00 73 15 D4 03 8F 20 |>+".Y.....s.... |
00000D60: 50 52 49 4E 54 20 43 4F 4C 4F 52 20 53 51 55 41 |PRINT COLOR SQUA|
00000D70: 52 45 53 00 AD 15 DE 03 58 B2 36 3A 59 B2 33 3A |RES.....X.6:Y.3:|
00000D80: 8D 32 34 30 3A 81 4A B2 30 A4 20 36 3A 81 49 B2 |.240:.J.0. 6:.I.|
00000D90: 31 A4 32 3A 97 36 34 36 2C 43 4C 28 32 AC 4A AA |1.2:.646,CL(2.J.|
00000DA0: 49 29 3A 99 22 27 1D 1D 1D 22 3B 3A 82 00 C0 15 |I):."'...";:....|
00000DB0: E8 03 59 B2 59 AA 33 3A 8D 32 34 30 3A 82 3A 8E |..Y.Y.3:.240:.:.|
00000DC0: 00 D4 15 F2 03 8F 20 50 52 49 4E 54 20 41 20 42 |...... PRINT A B|
00000DD0: 4C 4F 43 4B 00 0A 16 FC 03 97 36 34 36 2C 43 4F |LOCK......646,CO|
00000DE0: 28 31 29 3A 97 35 33 32 38 32 2C 43 4F 28 32 29 |(1):.53282,CO(2)|
00000DF0: 3A 97 35 33 32 38 33 2C 43 4F 28 33 29 3A 97 35 |:.53283,CO(3):.5|
00000E00: 33 32 38 34 2C 43 4F 28 34 29 00 3D 16 06 04 57 |3284,CO(4).=...W|
00000E10: B2 30 3A 81 4D 31 B2 30 A4 33 3A 81 4E B2 30 A4 |.0:.M1.0.3:.N.0.|
00000E20: 33 3A 57 B2 57 AA 31 3A 4A B2 A5 4A 28 51 28 57 |3:W.W.1:J..J(Q(W|
00000E30: 29 29 3A 4B B2 A5 4B 28 51 28 57 29 29 00 4B 16 |)):K..K(Q(W)).K.|
00000E40: 10 04 8B 4A B3 30 A7 31 30 36 30 00 70 16 1A 04 |...J.0.1060.p...|
00000E50: 97 36 34 36 2C 50 4F 28 4A 29 3A 99 22 92 22 20 |.646,PO(J):."." |
00000E60: 20 42 24 28 4A AA 31 2C 4B 29 3B 22 92 91 22 3B | B$(J.1,K);"..";|
00000E70: 00 76 16 24 04 82 00 9A 16 2E 04 99 22 11 11 9D |.v.$........"...|
00000E80: 9D 9D 9D 9D 9D 9D 9D 22 3B 3A 82 3A 99 22 1D 1D |.......";:.:."..|
00000E90: 1D 1D 1D 1D 1D 1D 91 91 22 3B 00 A0 16 38 04 8E |........";...8..|
00000EA0: 00 B9 16 42 04 8F 20 41 20 50 41 54 43 48 20 4F |...B.. A PATCH O|
00000EB0: 4E 20 53 55 42 32 35 30 21 00 D2 16 4C 04 91 4D |N SUB250!...L..M|
00000EC0: 89 37 34 30 2C 37 34 30 2C 31 31 31 30 2C 31 31 |.740,740,1110,11|
00000ED0: 32 30 00 F5 16 56 04 43 4F 28 33 29 B2 43 4F 28 |20...V.CO(3).CO(|
00000EE0: 32 29 3A 43 4F 28 34 29 B2 43 4F 28 32 29 3A 4E |2):CO(4).CO(2):N|
00000EF0: 43 B2 32 3A 8E 00 11 17 60 04 43 4F 28 34 29 B2 |C.2:....`.CO(4).|
00000F00: 43 4F 28 33 29 3A 4E 43 B2 33 3A 20 4D B2 34 3A |CO(3):NC.3: M.4:|
00000F10: 8E 00 21 17 6A 04 8F 20 44 52 41 57 20 47 52 49 |..!.j.. DRAW GRI|
00000F20: 44 00 2D 17 74 04 97 36 34 36 2C 30 30 00 77 17 |D.-.t..646,00.w.|
00000F30: 7E 04 58 B2 32 33 3A 59 B2 35 3A 8D 32 34 30 3A |~.X.23:Y.5:.240:|
00000F40: 99 22 5C 5D 5B 5D 5B 5D 5B 5D 11 9D 9D 9D 9D 9D |."\][][][]......|
00000F50: 9D 9D 9D 2A 2B 2A 2B 2A 2B 2A 2B 11 9D 9D 9D 9D |...*+*+*+*+.....|
00000F60: 9D 9D 9D 9D 5B 5D 5B 5D 5B 5D 5B 5D 11 9D 9D 9D |....[][][][]....|
00000F70: 9D 9D 9D 9D 9D 22 3B 00 A2 17 88 04 99 22 2A 2B |.....";......"*+|
00000F80: 2A 2B 2A 2B 2A 2B 11 9D 9D 9D 9D 9D 9D 9D 9D 5B |*+*+*+.........[|
00000F90: 5D 5B 5D 5B 5D 5B 5D 11 9D 9D 9D 9D 9D 9D 9D 9D |][][][].........|
00000FA0: 22 3B 00 CD 17 92 04 99 22 2A 2B 2A 2B 2A 2B 2A |";......"*+*+*+*|
00000FB0: 2B 11 9D 9D 9D 9D 9D 9D 9D 9D 5B 5D 5B 5D 5B 5D |+.........[][][]|
00000FC0: 5B 5D 11 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 EA 17 |[].........";...|
00000FD0: 9C 04 99 22 2A 2B 2A 2B 2A 2B 2A 2B 11 9D 9D 9D |..."*+*+*+*+....|
00000FE0: 9D 9D 9D 9D 9D 22 3B 20 3A 8E 00 FF 17 A6 04 8F |....."; :.......|
00000FF0: 20 44 49 53 4B 20 44 49 52 45 43 54 4F 52 59 00 | DISK DIRECTORY.|
00001000: 0D 18 B0 04 97 35 33 32 37 32 2C 32 31 00 49 18 |.....53272,21.I.|
00001010: BA 04 99 22 9E 93 22 3A 9E 4D 54 AA 35 31 2C 22 |..."..":.MT.51,"|
00001020: 24 3A 22 AA 22 51 2E 2A 22 2C 44 56 3A 9F 31 35 |$:"."Q.*",DV:.15|
00001030: 2C 38 2C 31 35 3A 20 20 20 8D 31 39 37 30 3A 8B |,8,15: .1970:.|
00001040: 45 B3 32 30 A7 31 32 33 30 00 7D 18 C4 04 99 22 |E.20.1230.}...."|
00001050: 9E 11 11 11 11 20 20 20 20 20 20 44 52 49 56 45 |..... DRIVE|
00001060: 20 45 52 52 4F 52 22 3A 99 3A 99 3A 99 22 1D 1D | ERROR":.:.:."..|
00001070: 1D 1D 1D 22 3B 45 3B 45 24 3B 54 3B 53 00 90 18 |...";E;E$;T;S...|
00001080: CE 04 A0 31 35 3A 8D 32 31 30 3A 89 31 35 32 30 |...15:.210:.1520|
00001090: 00 9A 18 D8 04 8F 53 41 56 45 00 CF 18 E2 04 99 |......SAVE......|
000010A0: 22 93 11 11 22 3A 97 35 33 32 37 32 2C 32 33 3A |"...":.53272,23:|
000010B0: 81 49 B2 31 A4 31 36 3A 8B 51 28 49 29 B3 31 B0 |.I.1.16:.Q(I).1.|
000010C0: 51 28 49 29 B1 32 38 A7 20 31 33 33 30 3A 82 00 |Q(I).28. 1330:..|
000010D0: E6 18 EC 04 A0 31 35 3A A0 33 3A 8B 46 24 B2 22 |.....15:.3:.F$."|
000010E0: 22 A7 31 32 36 32 00 1F 19 ED 04 99 22 93 11 11 |".1262......"...|
000010F0: 11 1D 1D 1D 53 41 56 45 20 41 53 20 22 46 24 22 |....SAVE AS "F$"|
00001100: 3F 20 28 59 2F 4E 29 22 3A 9E 4D 54 AA 34 35 2C |? (Y/N)":.MT.45,|
00001110: 22 59 4E 22 3A 8B 46 25 B2 31 A7 31 32 36 38 00 |"YN":.F%.1.1268.|
00001120: 53 19 EE 04 99 3A 99 22 11 1D 1D 1D 46 49 4C 45 |S....:."....FILE|
00001130: 4E 41 4D 45 3A 20 22 3B 3A 9E 43 4D AA 36 36 2C |NAME: ";:.CM.66,|
00001140: 31 2C 31 33 2C 32 30 3A 8B 57 24 B2 22 22 A7 31 |1,13,20:.W$."".1|
00001150: 35 32 30 00 5D 19 F0 04 46 24 B2 57 24 00 7B 19 |520.]...F$.W$.{.|
00001160: F4 04 8B C8 28 46 24 2C 32 29 B3 B1 22 51 2E 22 |....(F$,2).."Q."|
00001170: A7 46 24 B2 22 51 2E 22 AA 46 24 00 AF 19 F5 04 |.F$."Q.".F$.....|
00001180: 51 39 24 B2 46 24 3A A0 31 35 3A 9F 31 35 2C 44 |Q9$.F$:.15:.15,D|
00001190: 56 2C 31 35 2C 22 53 3A 22 AA 46 24 3A 9F 32 2C |V,15,"S:".F$:.2,|
000011A0: 44 56 2C 32 2C 51 39 24 AA 22 2C 50 2C 57 22 00 |DV,2,Q9$.",P,W".|
000011B0: DD 19 F6 04 81 49 B2 31 A4 34 3A 98 32 2C 43 4F |.....I.1.4:.2,CO|
000011C0: 28 49 29 3A 82 3A 81 49 B2 31 A4 31 36 3A 98 32 |(I):.:.I.1.16:.2|
000011D0: 2C 51 28 49 29 3A 82 3A 98 32 2C 4E 43 00 EC 19 |,Q(I):.:.2,NC...|
000011E0: 00 05 8D 31 39 37 30 3A 99 22 92 9F 00 01 1A 0A |...1970:."......|
000011F0: 05 8B 45 B3 32 30 A7 31 33 31 30 3A 99 22 92 9F |..E.20.1310:."..|
00001200: 22 00 28 1A 14 05 99 3A 99 22 53 41 56 45 20 46 |".(....:."SAVE F|
00001210: 41 49 4C 45 44 22 3A 99 3A 99 45 3B 45 24 3B 54 |AILED":.:.E;E$;T|
00001220: 3B 53 3A 89 31 33 32 30 00 44 1A 1E 05 99 3A 99 |;S:.1320.D....:.|
00001230: 22 9E 11 20 20 20 20 20 22 51 39 24 22 20 53 41 |".. "Q9$" SA|
00001240: 56 45 44 22 00 5B 1A 28 05 A0 32 3A A0 31 35 3A |VED".[.(..2:.15:|
00001250: 20 8D 32 31 30 3A 89 31 35 32 30 00 6C 1A 32 05 | .210:.1520.l.2.|
00001260: A0 32 3A A0 31 35 3A 89 31 35 32 30 00 77 1A 3C |.2:.15:.1520.w.<|
00001270: 05 8F 20 4C 4F 41 44 00 A1 1A 46 05 9E 42 4F 58 |.. LOAD...F..BOX|
00001280: 2C 30 2C 33 39 2C 33 2C 32 31 2C 31 30 32 2C 31 |,0,39,3,21,102,1|
00001290: 30 3A 97 35 33 32 37 32 2C 32 33 3A 8D 33 30 35 |0:.53272,23:.305|
000012A0: 30 00 C0 1A 4B 05 9E 43 4D AA 34 32 2C 22 49 30 |0...K..CM.42,"I0|
000012B0: 22 2C 44 56 3A 8B C5 28 45 24 29 A7 31 33 35 39 |",DV:..(E$).1359|
000012C0: 00 FC 1A 4D 05 4D 53 24 B2 22 C7 45 54 54 49 4E |...M.MS$.".ETTIN|
000012D0: 47 20 44 49 52 45 43 54 4F 52 59 2E 2E 2E 22 3A |G DIRECTORY...":|
000012E0: 8D 33 30 30 30 3A 9E 4D 54 AA 36 2C 22 24 3A 51 |.3000:.MT.6,"$:Q|
000012F0: 2E 2A 22 2C 44 56 2C 35 33 32 34 38 00 2F 1B 4E |.*",DV,53248./.N|
00001300: 05 8B 46 25 B2 30 A7 4D 53 24 B2 22 CE 4F 20 51 |..F%.0.MS$.".O Q|
00001310: 55 49 4C 54 53 20 4F 4E 20 54 48 49 53 20 44 49 |UILTS ON THIS DI|
00001320: 53 4B 22 3A 8D 33 30 33 30 3A 89 31 35 32 30 00 |SK":.3030:.1520.|
00001330: 4D 1B 4F 05 8B C5 28 45 24 29 A7 4D 53 24 B2 45 |M.O...(E$).MS$.E|
00001340: 24 3A 8D 33 30 33 30 3A 89 31 35 32 30 00 83 1B |$:.3030:.1520...|
00001350: 50 05 4D 53 24 B2 22 D0 4C 45 41 53 45 20 53 45 |P.MS$.".LEASE SE|
00001360: 4C 45 43 54 20 51 55 49 4C 54 22 3A 8D 33 30 30 |LECT QUILT":.300|
00001370: 30 3A 9E 43 4D AA 37 32 2C 31 30 2C 32 39 2C 35 |0:.CM.72,10,29,5|
00001380: 2C 31 39 00 A5 1B 52 05 9E 43 4D AA 33 2C 31 31 |,19...R..CM.3,11|
00001390: 2C 34 2C 31 31 2C 33 2C 31 3A 8B 46 24 B2 22 22 |,4,11,3,1:.F$.""|
000013A0: A7 31 35 33 30 00 C6 1B 59 05 51 39 24 B2 46 24 |.1530...Y.Q9$.F$|
000013B0: 3A A0 33 3A 9F 33 2C 44 56 2C 33 2C 51 39 24 AA |:.3:.3,DV,3,Q9$.|
000013C0: 22 2C 50 2C 52 22 00 F4 1B 5A 05 81 49 B2 31 A4 |",P,R"...Z..I.1.|
000013D0: 34 3A 84 33 2C 43 4F 28 49 29 3A 82 3A 81 49 B2 |4:.3,CO(I):.:.I.|
000013E0: 31 A4 31 36 3A 84 33 2C 51 28 49 29 3A 82 3A 84 |1.16:.3,Q(I):.:.|
000013F0: 33 2C 4E 43 00 22 1C 64 05 A0 33 3A 9E 43 4D AA |3,NC.".d..3:.CM.|
00001400: 34 32 2C 22 22 2C 44 56 3A 8B C5 28 45 24 29 A7 |42,"",DV:..(E$).|
00001410: 4D 53 24 B2 45 24 3A 8D 33 30 33 30 3A 89 31 35 |MS$.E$:.3030:.15|
00001420: 32 30 00 2C 1C 82 05 89 31 34 35 30 00 57 1C 8C |20.,....1450.W..|
00001430: 05 97 35 33 32 36 35 2C C2 28 35 33 32 36 35 29 |..53265,.(53265)|
00001440: B0 36 34 3A 97 35 33 32 38 31 2C 31 35 3A 97 35 |.64:.53281,15:.5|
00001450: 33 32 38 30 2C 30 39 00 A0 1C 96 05 81 4A B2 30 |3280,09......J.0|
00001460: A4 32 3A 50 4F 28 4A 29 B2 43 4F 28 31 29 3A 82 |.2:PO(J).CO(1):.|
00001470: 3A 50 4F 28 33 29 B2 43 4F 28 32 29 3A 50 4F 28 |:PO(3).CO(2):PO(|
00001480: 34 29 B2 43 4F 28 31 29 3A 50 4F 28 35 29 B2 43 |4).CO(1):PO(5).C|
00001490: 4F 28 32 29 3A 50 4F 28 36 29 B2 43 4F 28 33 29 |O(2):PO(6).CO(3)|
000014A0: 00 AF 1C A0 05 8D 38 35 30 3A 89 31 38 36 30 00 |......850:.1860.|
000014B0: D0 1C AA 05 81 49 B2 31 A4 31 36 3A 8B 51 28 49 |.....I.1.16:.Q(I|
000014C0: 29 B3 31 B0 51 28 49 29 B1 32 38 A7 31 34 37 30 |).1.Q(I).28.1470|
000014D0: 00 DD 1C B4 05 82 3A 20 89 31 34 32 30 00 11 1D |......: .1420...|
000014E0: BE 05 99 22 11 11 20 11 20 20 20 20 9E 11 20 20 |...".. . .. |
000014F0: 20 20 54 48 49 53 20 49 53 20 4E 4F 54 20 41 20 | THIS IS NOT A |
00001500: 51 55 49 4C 54 22 3A 8D 32 31 30 3A 89 31 35 32 |QUILT":.210:.152|
00001510: 30 00 24 1D C8 05 8F 20 49 4E 53 54 52 55 43 54 |0.$.... INSTRUCT|
00001520: 49 4F 4E 53 00 54 1D D2 05 97 35 33 32 37 32 2C |IONS.T....53272,|
00001530: 32 31 3A 99 C7 28 31 34 29 3A 9E 4D 54 AA 35 31 |21:..(14):.MT.51|
00001540: 2C 22 54 2E 49 4E 53 54 52 55 43 54 49 4F 4E 53 |,"T.INSTRUCTIONS|
00001550: 22 2C 44 56 00 68 1D DC 05 97 35 33 32 37 32 2C |",DV.h....53272,|
00001560: 33 31 3A 89 31 35 32 30 00 71 1D E6 05 8D 33 38 |31:.1520.q....38|
00001570: 30 00 A9 1D F0 05 97 35 33 32 36 35 2C C2 28 35 |0......53265,.(5|
00001580: 33 32 36 35 29 AF 31 39 31 3A 97 35 33 32 38 30 |3265).191:.53280|
00001590: 2C 30 3A 97 35 33 32 38 31 2C 30 3A 97 36 34 36 |,0:.53281,0:.646|
000015A0: 2C 33 3A 97 31 39 38 2C 30 00 E8 1D FA 05 99 22 |,3:.198,0......"|
000015B0: 93 22 3A 97 35 33 32 37 32 2C 33 31 3A 59 B2 37 |.":.53272,31:Y.7|
000015C0: 3A 9E 42 4F 58 2C 30 2C 33 39 2C 33 2C 32 31 2C |:.BOX,0,39,3,21,|
000015D0: 30 2C 31 30 3A 9E 42 4F 58 2C 30 2C 33 39 2C 30 |0,10:.BOX,0,39,0|
000015E0: 2C 30 2C 31 32 31 2C 38 00 15 1E FC 05 9E 42 4F |,0,121,8......BO|
000015F0: 58 2C 30 2C 33 39 2C 31 2C 31 2C 31 36 30 2C 31 |X,0,39,1,1,160,1|
00001600: 30 3A 9E 42 4F 58 2C 30 2C 33 39 2C 32 2C 32 2C |0:.BOX,0,39,2,2,|
00001610: 31 32 30 2C 32 00 46 1E FE 05 99 22 12 96 22 3B |120,2.F...."..";|
00001620: 3A 9E 43 45 2C 31 2C 22 D0 A0 C1 20 D4 20 C3 20 |:.CE,1,"... . . |
00001630: C8 20 D7 20 CF 20 D2 20 CB 20 20 20 D1 20 D5 20 |. . . . . . . |
00001640: C9 20 CC 20 D4 22 00 8D 1E 00 06 9E 42 4F 58 2C |. . ."......BOX,|
00001650: 30 2C 33 39 2C 32 33 2C 32 33 2C 31 36 30 2C 31 |0,39,23,23,160,1|
00001660: 30 3A 9E 42 4F 58 2C 30 2C 33 39 2C 32 34 2C 32 |0:.BOX,0,39,24,2|
00001670: 34 2C 31 32 30 2C 32 3A 9E 42 4F 58 2C 30 2C 33 |4,120,2:.BOX,0,3|
00001680: 39 2C 32 32 2C 32 32 2C 31 32 31 2C 38 00 BD 1E |9,22,22,121,8...|
00001690: 02 06 9E 43 45 2C 32 33 2C 22 12 C3 D2 D3 D2 2F |...CE,23,"...../|
000016A0: D2 C5 D4 D5 D2 CE 20 CF D2 A0 CA CF D9 D3 D4 C9 |...... .........|
000016B0: C3 CB 20 D4 CF 20 D3 C5 CC C5 C3 D4 22 00 E7 1E |.. .. ......"...|
000016C0: 03 06 9E 4D 54 AA 37 32 2C 38 2C 33 30 2C 38 2C |...MT.72,8,30,8,|
000016D0: 31 37 3A 9E 42 4F 58 2C 39 2C 33 31 2C 37 2C 31 |17:.BOX,9,31,7,1|
000016E0: 36 2C 31 36 30 2C 37 00 0E 1F 04 06 59 B2 59 AA |6,160,7.....Y.Y.|
000016F0: 31 3A 9E 43 45 2C 59 2C 22 9E 20 C9 CE D3 D4 D2 |1:.CE,Y,". .....|
00001700: D5 C3 D4 C9 CF CE D3 20 20 20 20 20 20 22 00 35 |....... ".5|
00001710: 1F 0E 06 59 B2 59 AA 31 3A 9E 43 45 2C 59 2C 22 |...Y.Y.1:.CE,Y,"|
00001720: 20 C3 C8 CF CF D3 C5 20 CE C5 D7 20 C3 CF CC CF | ...... ... ....|
00001730: D2 D3 20 20 22 00 5C 1F 18 06 59 B2 59 AA 31 3A |.. ".\...Y.Y.1:|
00001740: 9E 43 45 2C 59 2C 22 20 C4 C5 D3 C9 C7 CE 20 CE |.CE,Y," ...... .|
00001750: C5 D7 20 C2 CC CF C3 CB 20 20 20 22 00 83 1F 22 |.. ..... "..."|
00001760: 06 59 B2 59 AA 31 3A 9E 43 45 2C 59 2C 22 20 CC |.Y.Y.1:.CE,Y," .|
00001770: CF C1 C4 20 C1 20 D1 D5 C9 CC D4 20 20 20 20 20 |... . ..... |
00001780: 20 20 22 00 AA 1F 2C 06 59 B2 59 AA 31 3A 9E 43 | "...,.Y.Y.1:.C|
00001790: 45 2C 59 2C 22 20 D3 C1 D6 C5 20 C3 D5 D2 D2 C5 |E,Y," .... .....|
000017A0: CE D4 20 D1 D5 C9 CC D4 20 22 00 D7 1F 36 06 8F |.. ..... "...6..|
000017B0: 3A 59 3D 59 2B 31 3A 53 59 53 43 45 2C 59 2C 22 |:Y=Y+1:SYSCE,Y,"|
000017C0: 36 2E 20 44 49 53 4B 20 44 C9 D2 C5 C3 D4 CF D2 |6. DISK D.......|
000017D0: D9 20 20 20 20 20 22 00 FE 1F 40 06 59 B2 59 AA |. "...@.Y.Y.|
000017E0: 31 3A 9E 43 45 2C 59 2C 22 20 D6 C9 C5 D7 20 C3 |1:.CE,Y," .... .|
000017F0: D5 D2 D2 C5 CE D4 20 D1 D5 C9 CC D4 20 22 00 25 |...... ..... ".%|
00001800: 20 4A 06 59 B2 59 AA 31 3A 9E 43 45 2C 59 2C 22 | J.Y.Y.1:.CE,Y,"|
00001810: 20 C3 D2 C5 C1 D4 C5 20 D2 C1 CE C4 CF CD 20 D1 | ...... ...... .|
00001820: D5 C9 CC D4 22 00 4C 20 54 06 59 B2 59 AA 31 3A |....".L T.Y.Y.1:|
00001830: 9E 43 45 2C 59 2C 22 20 D2 C5 D4 D5 D2 CE 20 D4 |.CE,Y," ...... .|
00001840: CF 20 CC CF C1 C4 D3 D4 C1 D2 20 22 00 6C 20 59 |. ........ ".l Y|
00001850: 06 9E 4D 54 AA 34 38 2C 38 2C 31 30 2C 33 30 2C |..MT.48,8,10,30,|
00001860: 38 2C 37 2C 31 2C 33 3A 49 B2 46 25 00 9C 20 5E |8,7,1,3:I.F%.. ^|
00001870: 06 91 49 89 31 34 39 30 2C 31 36 35 30 2C 31 37 |..I.1490,1650,17|
00001880: 34 30 2C 31 33 35 30 2C 31 32 35 30 2C 31 38 38 |40,1350,1250,188|
00001890: 30 2C 20 32 32 33 30 2C 32 33 34 30 00 B0 20 68 |0, 2230,2340.. h|
000018A0: 06 8F 20 43 48 4F 4F 53 45 20 43 4F 4C 4F 52 53 |.. CHOOSE COLORS|
000018B0: 00 BE 20 72 06 8D 38 35 30 3A 8D 39 39 30 00 F1 |.. r..850:.990..|
000018C0: 20 7C 06 4E 43 B2 34 3A 81 4D B2 31 A4 34 3A 58 | |.NC.4:.M.1.4:X|
000018D0: B2 32 30 3A 59 B2 31 38 3A 8D 32 34 30 3A 99 22 |.20:Y.18:.240:."|
000018E0: 90 52 45 54 55 52 4E 20 53 45 4C 45 43 54 53 22 |.RETURN SELECTS"|
000018F0: 3B 00 21 21 86 06 58 B2 32 30 3A 59 B2 32 30 3A |;.!!..X.20:Y.20:|
00001900: 8D 32 34 30 3A 99 22 44 20 2D 20 44 4F 4E 45 22 |.240:."D - DONE"|
00001910: 3A 8D 37 33 30 3A 8B 4E 43 B3 B1 32 A7 31 36 39 |:.730:.NC..2.169|
00001920: 30 00 47 21 90 06 58 B2 32 38 3A 59 B2 39 3A 8D |0.G!..X.28:Y.9:.|
00001930: 32 34 30 3A 97 36 34 36 2C 43 4F 28 33 29 3A 99 |240:.646,CO(3):.|
00001940: 22 27 22 3A 4D B2 34 00 86 21 9A 06 58 B2 31 39 |"'":M.4..!..X.19|
00001950: AA 33 AC 4D 3A 59 B2 39 3A 8D 32 34 30 3A 97 36 |.3.M:Y.9:.240:.6|
00001960: 34 36 2C 43 4F 28 4D 29 3A 99 22 27 22 3A 82 3A |46,CO(M):."'":.:|
00001970: 9E 42 4F 58 2C 31 39 2C 33 34 2C 31 38 2C 32 30 |.BOX,19,34,18,20|
00001980: 2C 33 32 2C 31 35 00 BC 21 A4 06 97 36 34 36 2C |,32,15..!...646,|
00001990: 43 4F 28 31 29 3A 97 35 33 32 38 32 2C 43 4F 28 |CO(1):.53282,CO(|
000019A0: 32 29 3A 97 35 33 32 38 33 2C 43 4F 28 33 29 3A |2):.53283,CO(3):|
000019B0: 97 35 33 32 38 34 2C 43 4F 28 34 29 00 05 22 AE |.53284,CO(4)..".|
000019C0: 06 81 4A B2 30 A4 32 3A 50 4F 28 4A 29 B2 43 4F |..J.0.2:PO(J).CO|
000019D0: 28 31 29 3A 82 3A 50 4F 28 33 29 B2 43 4F 28 32 |(1):.:PO(3).CO(2|
000019E0: 29 3A 50 4F 28 34 29 B2 43 4F 28 31 29 3A 50 4F |):PO(4).CO(1):PO|
000019F0: 28 35 29 B2 43 4F 28 32 29 3A 50 4F 28 36 29 B2 |(5).CO(2):PO(6).|
00001A00: 43 4F 28 33 29 00 24 22 B8 06 9E 42 4F 58 2C 34 |CO(3).$"...BOX,4|
00001A10: 2C 31 32 2C 32 2C 32 32 2C 33 32 2C 31 35 3A 89 |,12,2,22,32,15:.|
00001A20: 31 37 37 30 00 37 22 C2 06 8F 20 4D 41 4B 45 20 |1770.7"... MAKE |
00001A30: 41 20 42 4C 4F 43 4B 00 45 22 CC 06 8D 38 35 30 |A BLOCK.E"...850|
00001A40: 3A 8D 36 37 30 00 76 22 D6 06 9E 42 4F 58 2C 32 |:.670.v"...BOX,2|
00001A50: 32 2C 33 31 2C 34 2C 31 33 2C 33 32 2C 31 35 3A |2,31,4,13,32,15:|
00001A60: 9E 42 4F 58 2C 31 39 2C 33 34 2C 31 38 2C 32 30 |.BOX,19,34,18,20|
00001A70: 2C 33 32 2C 31 35 00 97 22 E0 06 81 49 B2 31 A4 |,32,15.."...I.1.|
00001A80: 31 36 3A 51 28 49 29 B2 30 3A 82 3A 8D 31 31 34 |16:Q(I).0:.:.114|
00001A90: 30 3A 89 31 38 33 30 00 B7 22 EA 06 9E 42 4F 58 |0:.1830.."...BOX|
00001AA0: 2C 31 39 2C 33 34 2C 31 38 2C 32 30 2C 33 32 2C |,19,34,18,20,32,|
00001AB0: 31 35 3A 58 B2 31 39 00 D8 22 F4 06 59 B2 31 38 |15:X.19.."..Y.18|
00001AC0: 3A 8D 32 34 30 3A 99 22 90 56 20 2D 20 56 49 45 |:.240:.".V - VIE|
00001AD0: 57 20 51 55 49 4C 54 22 00 00 23 FE 06 59 B2 32 |W QUILT"..#..Y.2|
00001AE0: 30 3A 8D 32 34 30 3A 99 22 4D 20 2D 20 4D 45 4E |0:.240:."M - MEN|
00001AF0: 55 22 3A 43 48 24 B2 22 56 4D 22 3A 8D 31 37 30 |U":CH$."VM":.170|
00001B00: 00 11 23 08 07 91 49 89 31 38 38 30 2C 31 35 32 |..#...I.1880,152|
00001B10: 30 00 22 23 12 07 8F 20 45 44 49 54 20 2A 2A 2A |0."#... EDIT ***|
00001B20: 2A 2A 00 4E 23 1C 07 97 35 33 32 38 30 2C 30 39 |**.N#...53280,09|
00001B30: 3A 8D 38 35 30 3A 58 B2 32 33 3A 59 B2 35 3A 8D |:.850:X.23:Y.5:.|
00001B40: 32 34 30 3A 8D 31 30 32 30 3A 8D 36 37 30 00 76 |240:.1020:.670.v|
00001B50: 23 26 07 58 B2 32 30 3A 59 B2 31 38 3A 8D 32 34 |#&.X.20:Y.18:.24|
00001B60: 30 3A 99 22 92 90 52 45 54 55 52 4E 20 53 45 4C |0:."..RETURN SEL|
00001B70: 45 43 54 53 22 3B 00 99 23 30 07 58 B2 32 30 3A |ECTS";..#0.X.20:|
00001B80: 59 B2 32 30 3A 8D 32 34 30 3A 99 22 92 90 44 20 |Y.20:.240:."..D |
00001B90: 2D 20 44 4F 4E 45 20 20 22 00 A3 23 3A 07 8D 31 |- DONE "..#:..1|
00001BA0: 39 39 30 00 C1 23 44 07 58 B2 32 33 3A 59 B2 35 |990..#D.X.23:Y.5|
00001BB0: 3A 8D 32 34 30 3A 8D 31 30 32 30 3A 89 31 37 37 |:.240:.1020:.177|
00001BC0: 30 00 D3 23 4E 07 8F 20 50 52 49 4E 54 20 51 55 |0..#N.. PRINT QU|
00001BD0: 49 4C 54 00 F4 23 58 07 81 49 B2 31 A4 31 36 3A |ILT..#X..I.1.16:|
00001BE0: 8B 51 28 49 29 B3 31 B0 51 28 49 29 B1 32 38 A7 |.Q(I).1.Q(I).28.|
00001BF0: 31 39 30 30 00 1D 24 62 07 82 3A 97 35 33 32 36 |1900..$b..:.5326|
00001C00: 35 2C C2 28 35 33 32 36 35 29 B0 36 34 3A 97 35 |5,.(53265).64:.5|
00001C10: 33 32 38 31 2C 31 35 3A 89 31 39 31 30 00 57 24 |3281,15:.1910.W$|
00001C20: 6C 07 99 22 9E 93 11 11 11 11 11 11 11 11 1D 1D |l.."............|
00001C30: 20 20 20 20 20 20 20 20 4E 4F 20 51 55 49 4C 54 | NO QUILT|
00001C40: 20 49 4E 20 4D 45 4D 4F 52 59 22 3A 8D 32 31 30 | IN MEMORY":.210|
00001C50: 3A 20 89 31 35 32 30 00 8C 24 76 07 97 35 33 32 |: .1520..$v..532|
00001C60: 38 30 2C 31 35 3A 99 22 93 22 3A 58 B2 34 3A 59 |80,15:.".":X.4:Y|
00001C70: B2 30 3A 8D 32 34 30 3A 81 49 B2 31 A4 33 3A 81 |.0:.240:.I.1.3:.|
00001C80: 4C B2 31 A4 34 3A 8D 31 30 32 30 3A 00 9D 24 80 |L.1.4:.1020:..$.|
00001C90: 07 99 22 91 91 91 91 91 91 22 3B 3A 82 00 AE 24 |.."......";:...$|
00001CA0: 8A 07 59 B2 59 AA 38 3A 8D 32 34 30 3A 82 00 DE |..Y.Y.8:.240:...|
00001CB0: 24 94 07 58 B2 37 3A 59 B2 32 34 3A 8D 32 34 30 |$..X.7:Y.24:.240|
00001CC0: 3A 99 22 90 92 45 20 2D 20 45 44 49 54 20 20 20 |:."..E - EDIT |
00001CD0: 20 20 20 20 4D 20 2D 20 4D 45 4E 55 22 3B 00 02 | M - MENU";..|
00001CE0: 25 9E 07 49 B2 30 3A 20 43 48 24 B2 22 45 4D 22 |%..I.0: CH$."EM"|
00001CF0: 3A 8D 31 37 30 3A 91 49 89 31 38 32 30 2C 31 35 |:.170:.I.1820,15|
00001D00: 32 30 00 13 25 A8 07 8F 20 44 49 53 4B 20 45 52 |20..%... DISK ER|
00001D10: 52 4F 52 00 26 25 B2 07 84 31 35 2C 45 2C 45 24 |ROR.&%...15,E,E$|
00001D20: 2C 54 2C 53 3A 8E 00 31 25 BC 07 8F 20 45 44 49 |,T,S:..1%... EDI|
00001D30: 54 00 73 25 C6 07 58 B2 32 33 3A 59 B2 35 3A 8D |T.s%..X.23:Y.5:.|
00001D40: 32 34 30 3A 4B 31 B2 31 3A 4A 31 B2 30 3A 20 20 |240:K1.1:J1.0: |
00001D50: 20 20 20 20 20 20 43 48 24 B2 C7 28 31 33 29 AA | CH$..(13).|
00001D60: 22 91 11 9D 1D 44 22 20 20 20 20 20 20 20 20 3A |"....D" :|
00001D70: 5A B2 31 00 A6 25 D0 07 99 22 90 5C 22 3A 20 20 |Z.1..%...".\": |
00001D80: 8D 31 37 30 3A 20 91 49 89 32 30 31 30 2C 32 30 |.170: .I.2010,20|
00001D90: 32 30 2C 32 30 34 30 2C 32 30 36 30 2C 32 30 38 |20,2040,2060,208|
00001DA0: 30 2C 32 31 30 30 00 BF 25 DA 07 4D B2 34 AC 4A |0,2100..%..M.4.J|
00001DB0: 31 AA 4B 31 3A 8D 32 36 30 3A 89 32 31 38 30 00 |1.K1:.260:.2180.|
00001DC0: CE 25 E4 07 8B 4A 31 B2 30 A7 32 30 30 30 00 E6 |.%...J1.0.2000..|
00001DD0: 25 EE 07 8D 32 31 34 30 3A 4A 31 B2 4A 31 AB 31 |%...2140:J1.J1.1|
00001DE0: 3A 89 32 31 32 30 00 F5 25 F8 07 8B 4A 31 B2 33 |:.2120..%...J1.3|
00001DF0: A7 32 30 30 30 00 0D 26 02 08 8D 32 31 34 30 3A |.2000..&...2140:|
00001E00: 4A 31 B2 4A 31 AA 31 3A 89 32 31 32 30 00 1C 26 |J1.J1.1:.2120..&|
00001E10: 0C 08 8B 4B 31 B2 31 A7 32 30 30 30 00 34 26 16 |...K1.1.2000.4&.|
00001E20: 08 8D 32 31 34 30 3A 4B 31 B2 4B 31 AB 31 3A 89 |..2140:K1.K1.1:.|
00001E30: 32 31 32 30 00 43 26 20 08 8B 4B 31 B2 34 A7 32 |2120.C& ..K1.4.2|
00001E40: 30 30 30 00 5B 26 2A 08 8D 32 31 34 30 3A 4B 31 |000.[&*..2140:K1|
00001E50: B2 4B 31 AA 31 3A 89 32 31 32 30 00 76 26 34 08 |.K1.1:.2120.v&4.|
00001E60: 81 49 B2 31 A4 31 36 3A 8B 51 28 49 29 B2 30 A7 |.I.1.16:.Q(I).0.|
00001E70: 51 28 49 29 B2 31 00 7E 26 3E 08 82 3A 8E 00 A5 |Q(I).1.~&>..:...|
00001E80: 26 48 08 5A B2 34 AC 4A 31 AA 4B 31 3A 58 B2 58 |&H.Z.4.J1.K1:X.X|
00001E90: 28 5A 29 3A 59 B2 59 28 5A 29 3A 8D 32 34 30 3A |(Z):Y.Y(Z):.240:|
00001EA0: 89 32 30 30 30 00 D1 26 52 08 8F 20 53 55 42 32 |.2000..&R.. SUB2|
00001EB0: 30 36 30 20 50 52 49 4E 54 53 20 53 51 55 41 52 |060 PRINTS SQUAR|
00001EC0: 45 20 54 4F 20 45 52 41 53 45 20 43 55 52 53 4F |E TO ERASE CURSO|
00001ED0: 52 00 F3 26 5C 08 57 B2 34 AC 4A 31 AA 4B 31 3A |R..&\.W.4.J1.K1:|
00001EE0: 58 B2 58 28 57 29 3A 59 B2 59 28 57 29 3A 8D 32 |X.X(W):Y.Y(W):.2|
00001EF0: 34 30 3A 00 1A 27 66 08 4A B2 A5 4A 28 51 28 57 |40:..'f.J..J(Q(W|
00001F00: 29 29 3A 4B B2 A5 4B 28 51 28 57 29 29 3A 8B 51 |)):K..K(Q(W)):.Q|
00001F10: 28 57 29 B2 30 A7 32 32 31 30 00 29 27 70 08 97 |(W).0.2210.)'p..|
00001F20: 36 34 36 2C 50 4F 28 4A 29 00 3E 27 7A 08 99 22 |646,PO(J).>'z.."|
00001F30: 92 22 3B 42 24 28 4A AA 31 2C 4B 29 3A 8E 00 80 |.";B$(J.1,K):...|
00001F40: 27 84 08 5A B2 34 AC 4A 31 AA 4B 31 3A 58 B2 58 |'..Z.4.J1.K1:X.X|
00001F50: 28 5A 29 3A 59 B2 59 28 5A 29 3A 8D 32 34 30 3A |(Z):Y.Y(Z):.240:|
00001F60: 4A B2 A5 4A 28 51 28 5A 29 29 3A 4B B2 A5 4B 28 |J..J(Q(Z)):K..K(|
00001F70: 51 28 5A 29 29 3A 97 36 34 36 2C 50 4F 28 4A 29 |Q(Z)):.646,PO(J)|
00001F80: 00 AC 27 8E 08 99 42 24 28 4A AA 31 2C 4B 29 3A |..'...B$(J.1,K):|
00001F90: 8D 32 34 30 3A 43 48 24 B2 C7 28 31 33 29 AA 22 |.240:CH$..(13)."|
00001FA0: 91 11 9D 1D 44 22 3A 89 32 30 30 30 00 D6 27 98 |....D":.2000..'.|
00001FB0: 08 8F 20 4E 45 58 54 20 54 57 4F 20 4C 49 4E 45 |.. NEXT TWO LINE|
00001FC0: 53 20 50 52 49 4E 54 20 42 4C 4F 43 4B 20 53 45 |S PRINT BLOCK SE|
00001FD0: 4C 45 43 54 45 44 00 EA 27 A2 08 97 36 34 36 2C |LECTED..'...646,|
00001FE0: 30 30 3A 20 99 22 5B 22 3A 8E 00 F7 27 AC 08 8F |00: ."[":...'...|
00001FF0: 20 52 41 4E 44 4F 4D 00 12 28 B6 08 43 4F 28 31 | RANDOM..(..CO(1|
00002000: 29 B2 43 4C 28 B5 28 31 34 AC BB 28 30 29 29 AA |).CL(.(14..(0)).|
00002010: 31 29 00 3F 28 C0 08 43 4F 28 32 29 B2 43 4C 28 |1).?(..CO(2).CL(|
00002020: B5 28 31 34 AC BB 28 30 29 29 AA 31 29 3A 8B 43 |.(14..(0)).1):.C|
00002030: 4F 28 32 29 B2 43 4F 28 31 29 A7 32 32 33 30 00 |O(2).CO(1).2230.|
00002040: 78 28 CA 08 43 4F 28 33 29 B2 43 4C 28 B5 28 31 |x(..CO(3).CL(.(1|
00002050: 34 AC BB 28 30 29 29 AA 31 29 3A 8B 43 4F 28 33 |4..(0)).1):.CO(3|
00002060: 29 B2 43 4F 28 31 29 B0 43 4F 28 33 29 B2 43 4F |).CO(1).CO(3).CO|
00002070: 28 32 29 A7 32 33 31 30 00 BD 28 D4 08 43 4F 28 |(2).2310..(..CO(|
00002080: 34 29 B2 43 4C 28 B5 28 31 34 AC BB 28 30 29 29 |4).CL(.(14..(0))|
00002090: AA 31 29 3A 8B 43 4F 28 34 29 B2 43 4F 28 31 29 |.1):.CO(4).CO(1)|
000020A0: B0 43 4F 28 34 29 B2 43 4F 28 32 29 B0 43 4F 28 |.CO(4).CO(2).CO(|
000020B0: 34 29 B2 43 4F 28 33 29 A7 32 33 32 30 00 C6 28 |4).CO(3).2320..(|
000020C0: DE 08 4E 43 B2 34 00 0F 29 E8 08 81 4A B2 30 A4 |..NC.4..)...J.0.|
000020D0: 32 3A 50 4F 28 4A 29 B2 43 4F 28 31 29 3A 82 3A |2:PO(J).CO(1):.:|
000020E0: 50 4F 28 33 29 B2 43 4F 28 32 29 3A 50 4F 28 34 |PO(3).CO(2):PO(4|
000020F0: 29 B2 43 4F 28 31 29 3A 50 4F 28 35 29 B2 43 4F |).CO(1):PO(5).CO|
00002100: 28 32 29 3A 50 4F 28 36 29 B2 43 4F 28 33 29 00 |(2):PO(6).CO(3).|
00002110: 45 29 F2 08 97 36 34 36 2C 43 30 28 31 29 3A 97 |E)...646,C0(1):.|
00002120: 35 33 32 38 32 2C 43 4F 28 32 29 3A 97 35 33 32 |53282,CO(2):.532|
00002130: 38 33 2C 43 4F 28 33 29 3A 97 35 33 32 38 34 2C |83,CO(3):.53284,|
00002140: 43 4F 28 34 29 00 6B 29 FC 08 81 49 B2 31 A4 31 |CO(4).k)...I.1.1|
00002150: 36 3A 51 28 49 29 B2 B5 28 32 38 AC BB 28 30 29 |6:Q(I)..(28..(0)|
00002160: 29 AA 31 3A 82 3A 89 31 38 38 30 00 92 29 06 09 |).1:.:.1880..)..|
00002170: 43 4F 28 33 29 B2 43 4F 28 32 29 3A 43 4F 28 34 |CO(3).CO(2):CO(4|
00002180: 29 B2 43 4F 28 32 29 3A 4E 43 B2 32 3A 89 32 32 |).CO(2):NC.2:.22|
00002190: 38 30 00 AD 29 10 09 43 4F 28 34 29 B2 43 4F 28 |80..)..CO(4).CO(|
000021A0: 33 29 3A 4E 43 B2 33 3A 89 32 32 38 30 00 BE 29 |3):NC.3:.2280..)|
000021B0: 1A 09 8F 20 52 45 43 4F 4E 4E 45 43 54 2A 00 C4 |... RECONNECT*..|
000021C0: 29 24 09 8F 00 E6 29 2E 09 9E 35 32 34 38 33 3A |)$....)...52483:|
000021D0: 99 22 93 22 3A 97 35 33 32 38 31 2C 30 3A 97 35 |.".":.53281,0:.5|
000021E0: 33 32 38 30 2C 30 00 1B 2A 38 09 41 24 B2 22 48 |3280,0..*8.A$."H|
000021F0: 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 3A 81 49 |ELLO CONNECT":.I|
00002200: B2 38 A4 39 3A A0 32 3A 9F 32 2C 49 2C 32 3A A0 |.8.9:.2:.2,I,2:.|
00002210: 32 3A 8B 53 54 A7 20 32 34 30 30 00 54 2A 42 09 |2:.ST. 2400.T*B.|
00002220: A0 31 35 3A 9F 31 35 2C 49 2C 31 35 2C 22 52 30 |.15:.15,I,15,"R0|
00002230: 3A 22 AA 41 24 AA 22 3D 22 AA 41 24 3A 84 31 35 |:".A$."=".A$:.15|
00002240: 2C 45 52 3A A0 31 35 3A 8B 45 52 B2 36 33 A7 20 |,ER:.15:.ER.63. |
00002250: 32 34 30 30 00 80 2A 4C 09 82 3A 99 22 93 9F 22 |2400..*L..:.".."|
00002260: 3A 97 32 30 34 38 2C 30 3A 97 34 34 2C 38 3A 97 |:.2048,0:.44,8:.|
00002270: 35 33 32 37 32 2C 32 33 3A 97 31 38 36 2C 44 56 |53272,23:.186,DV|
00002280: 00 AB 2A 56 09 97 35 33 32 37 32 2C 32 31 3A 97 |..*V..53272,21:.|
00002290: 56 AA 32 31 2C 30 3A 97 35 36 2C 31 36 30 3A 9C |V.21,0:.56,160:.|
000022A0: 3A 99 22 93 22 C7 28 39 29 3A 80 00 CC 2A 60 09 |:.".".(9):...*`.|
000022B0: 99 22 93 90 11 11 11 4C 4F 41 44 22 C7 28 33 34 |.".....LOAD".(34|
000022C0: 29 41 24 C7 28 33 34 29 22 2C 22 49 00 F5 2A 6A |)A$.(34)","I..*j|
000022D0: 09 99 22 11 11 11 11 52 55 4E 13 22 3A 97 36 33 |.."....RUN.":.63|
000022E0: 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 31 39 |1,13:.632,13:.19|
000022F0: 38 2C 32 3A 80 00 1F 2B 74 09 9F 31 35 2C 39 2C |8,2:...+t..15,9,|
00002300: 31 35 2C 22 53 30 3A 51 55 49 4C 54 22 3A A0 31 |15,"S0:QUILT":.1|
00002310: 35 3A 94 22 51 55 49 4C 54 22 2C 39 20 3A 80 00 |5:."QUILT",9 :..|
00002320: 31 2B B8 0B 8D 33 30 31 30 3A 8D 33 30 32 30 3A |1+...3010:.3020:|
00002330: 8E 00 69 2B C2 0B 9E 42 4F 58 2C 30 2C 33 39 2C |..i+...BOX,0,39,|
00002340: 32 33 2C 32 33 2C 31 36 30 2C 37 3A 99 22 12 9E |23,23,160,7:."..|
00002350: 22 3B 3A 9E 43 4D AA 32 37 2C 32 33 2C 4D 53 24 |";:.CM.27,23,MS$|
00002360: 3A 4D 53 24 B2 22 22 3A 8E 00 A1 2B CC 0B 81 4A |:MS$."":...+...J|
00002370: B2 31 A4 31 36 3A 9E 43 4D AA 37 32 2C 30 2C 33 |.1.16:.CM.72,0,3|
00002380: 39 2C 32 33 2C 32 33 3A 82 3A 9E 42 4F 58 2C 30 |9,23,23:.:.BOX,0|
00002390: 2C 33 39 2C 32 33 2C 32 33 2C 32 35 35 2C 37 3A |,39,23,23,255,7:|
000023A0: 8E 00 C0 2B D6 0B 8D 33 30 30 30 3A 97 31 39 38 |...+...3000:.198|
000023B0: 2C 30 3A 92 31 39 38 2C 31 35 3A A1 41 24 3A 8E |,0:.198,15:.A$:.|
000023C0: 00 D9 2B E0 0B 97 31 39 38 2C 30 3A 92 31 39 38 |..+...198,0:.198|
000023D0: 2C 31 35 3A A1 41 24 3A 8E 00 06 2C EA 0B 9E 43 |,15:.A$:...,...C|
000023E0: 4D AA 37 32 2C 31 37 2C 32 32 2C 34 2C 31 34 3A |M.72,17,22,4,14:|
000023F0: 9E 42 4F 58 2C 31 38 2C 32 33 2C 33 2C 31 33 2C |.BOX,18,23,3,13,|
00002400: 31 36 30 2C 31 32 00 36 2C F4 0B 99 22 12 98 22 |160,12.6,...".."|
00002410: 3B 3A 81 49 B2 38 A4 31 36 3A 9E 43 4D AA 32 34 |;:.I.8.16:.CM.24|
00002420: 2C 32 32 AB C3 28 C4 28 49 29 29 2C 49 AB 34 2C |,22..(.(I)),I.4,|
00002430: C4 28 49 29 3A 82 00 65 2C FE 0B 8B 4D 53 24 B2 |.(I):..e,...MS$.|
00002440: 22 22 A7 4D 53 24 B2 22 D0 4C 45 41 53 45 20 D3 |"".MS$.".LEASE .|
00002450: 45 4C 45 43 54 20 C1 20 C4 52 49 56 45 20 CE 55 |ELECT . .RIVE .U|
00002460: 4D 42 45 52 22 00 6F 2C 08 0C 8D 33 30 31 30 00 |MBER".o,...3010.|
00002470: A7 2C 12 0C 9E 4D 45 2C 34 2C 31 38 2C 32 33 2C |.,...ME,4,18,23,|
00002480: 39 2C 31 32 AA 31 32 38 2C 31 32 39 2C 30 3A A0 |9,12.128,129,0:.|
00002490: 32 3A 9F 32 2C 46 25 AA 37 2C 32 3A A0 32 3A 8B |2:.2,F%.7,2:.2:.|
000024A0: 53 54 A7 33 30 39 30 00 D7 2C 1C 0C 44 56 B2 46 |ST.3090..,..DV.F|
000024B0: 25 AA 37 3A 8D 33 31 31 30 3A 9E 43 4D AA 31 38 |%.7:.3110:.CM.18|
000024C0: 2C 32 33 32 3A 8D 33 31 32 30 3A 9E 43 4D AA 32 |,232:.3120:.CM.2|
000024D0: 31 2C 32 33 32 3A 8E 00 FF 2C 26 0C 4D 53 24 B2 |1,232:...,&.MS$.|
000024E0: 22 C3 D2 D3 D2 2F D2 C5 D4 D5 D2 CE 20 D4 4F 20 |"..../...... .O |
000024F0: D3 45 4C 45 43 54 22 3A 8D 33 30 31 30 3A 8E 00 |.ELECT":.3010:..|
00002500: 21 2D 30 0C 44 B2 46 25 AA 37 3A 8B C2 28 37 38 |!-0.D.F%.7:..(78|
00002510: 37 29 A7 97 37 38 37 2C 30 3A 8B 44 B2 53 44 A7 |7)..787,0:.D.SD.|
00002520: 8E 00 43 2D 3A 0C 9E 43 4D AA 34 32 2C 22 43 50 |..C-:..CM.42,"CP|
00002530: 22 2C 44 3A 50 B2 C5 28 45 24 29 3A 8B 50 B3 B1 |",D:P..(E$):.P..|
00002540: 32 A7 8E 00 75 2D 44 0C 9E 42 4F 58 2C 30 2C 33 |2...u-D..BOX,0,3|
00002550: 39 2C 31 2C 31 2C 31 36 30 2C 31 3A 97 31 39 39 |9,1,1,160,1:.199|
00002560: 2C 31 3A 97 36 34 36 2C 31 3A 9E 43 4D AA 32 37 |,1:.646,1:.CM.27|
00002570: 2C 31 2C 45 24 00 B0 2D 4E 0C 4D 53 24 B2 22 D5 |,1,E$..-N.MS$.".|
00002580: 53 45 20 43 55 52 52 45 4E 54 20 50 41 52 54 49 |SE CURRENT PARTI|
00002590: 54 49 4F 4E 3F 20 28 D9 2F CE 29 22 3A 8D 33 30 |TION? (./.)":.30|
000025A0: 33 30 3A 8B 41 24 B3 B1 22 4E 22 A7 33 32 33 30 |30:.A$.."N".3230|
000025B0: 00 F3 2D 58 0C 4D 53 24 B2 22 D3 45 4C 45 43 54 |..-X.MS$.".ELECT|
000025C0: 20 D0 41 52 54 49 54 49 4F 4E 2E 2E 2E 22 3A 8D | .ARTITION...":.|
000025D0: 33 30 30 30 3A 9E 43 4D 2C 22 24 3D 50 22 2C 44 |3000:.CM,"$=P",D|
000025E0: 2C 31 36 33 38 34 2C 31 30 2C 37 2C 31 30 2C 31 |,16384,10,7,10,1|
000025F0: 33 2C 31 00 0D 2E 62 0C 8B C5 28 45 24 29 A7 4D |3,1...b...(E$).M|
00002600: 53 24 B2 45 24 3A 8D 33 30 33 30 3A 8E 00 1A 2E |S$.E$:.3030:....|
00002610: 6C 0C 8B 46 24 B2 22 22 A7 8E 00 3D 2E 76 0C 46 |l..F$.""...=.v.F|
00002620: 24 B2 22 24 3D 50 3A 22 AA 46 24 3A 8D 33 34 31 |$."$=P:".F$:.341|
00002630: 30 3A 50 B2 42 46 3A 8B 50 B2 30 A7 8E 00 63 2E |0:P.BF:.P.0...c.|
00002640: 80 0C 9E 43 4D AA 34 32 2C 22 22 2C 44 3A 8B C5 |...CM.42,"",D:..|
00002650: 28 45 24 29 A7 4D 53 24 B2 45 24 3A 8D 33 30 33 |(E$).MS$.E$:.303|
00002660: 30 3A 8E 00 7A 2E 8A 0C 9E 43 4D AA 34 32 2C 22 |0:..z....CM.42,"|
00002670: 43 D0 22 AA C7 28 50 29 2C 44 00 AC 2E 94 0C 9E |C."..(P),D......|
00002680: 42 4F 58 2C 30 2C 33 39 2C 31 2C 31 2C 31 36 30 |BOX,0,39,1,1,160|
00002690: 2C 31 3A 97 31 39 39 2C 31 3A 97 36 34 36 2C 31 |,1:.199,1:.646,1|
000026A0: 3A 9E 43 4D AA 32 37 2C 31 2C 45 24 00 D0 2E 9E |:.CM.27,1,E$....|
000026B0: 0C 9E 43 4D AA 34 32 2C 22 43 44 2F 22 2C 44 3A |..CM.42,"CD/",D:|
000026C0: 8D 33 33 33 30 3A 8B 44 24 B3 B1 22 48 22 A7 8E |.3330:.D$.."H"..|
000026D0: 00 F5 2E A8 0C 9E 43 4D AA 36 2C 22 24 3A 2A 3D |......CM.6,"$:*=|
000026E0: 42 22 2C 44 2C 31 36 33 38 34 3A 8B 46 25 B2 30 |B",D,16384:.F%.0|
000026F0: A7 33 33 31 30 00 2C 2F B2 0C 4D 53 24 B2 22 D3 |.3310.,/..MS$.".|
00002700: 45 4C 45 43 54 20 53 55 42 44 49 52 45 43 54 4F |ELECT SUBDIRECTO|
00002710: 52 59 20 28 D3 D4 CF D0 20 46 4F 52 20 43 55 52 |RY (.... FOR CUR|
00002720: 52 45 4E 54 29 22 3A 8D 33 30 30 30 00 54 2F BC |RENT)":.3000.T/.|
00002730: 0C 9E 43 4D AA 37 32 2C 31 35 2C 33 34 2C 35 2C |..CM.72,15,34,5,|
00002740: 31 33 3A 9E 43 4D AA 33 2C 31 36 2C 34 2C 31 30 |13:.CM.3,16,4,10|
00002750: 2C 37 2C 31 00 6E 2F C6 0C 8B C5 28 45 24 29 A7 |,7,1.n/....(E$).|
00002760: 4D 53 24 B2 45 24 3A 8D 33 30 33 30 3A 8E 00 7E |MS$.E$:.3030:..~|
00002770: 2F D0 0C 8B 46 24 B2 22 22 A7 33 33 31 30 00 AA |/...F$."".3310..|
00002780: 2F DA 0C 9E 43 4D AA 34 32 2C 22 43 44 3A 22 AA |/...CM.42,"CD:".|
00002790: 46 24 2C 44 3A 8B C5 28 45 24 29 A7 4D 53 24 B2 |F$,D:..(E$).MS$.|
000027A0: 45 24 3A 8D 33 30 33 30 3A 8E 00 B4 2F E4 0C 89 |E$:.3030:.../...|
000027B0: 33 32 34 30 00 BA 2F EE 0C 8E 00 CD 2F F8 0C 43 |3240../...../..C|
000027C0: 48 45 43 4B 20 44 49 52 20 54 59 50 45 00 F8 2F |HECK DIR TYPE../|
000027D0: 02 0D 9F 32 2C 44 2C 32 2C 22 24 3A 22 3A A1 23 |...2,D,2,"$:":.#|
000027E0: 32 2C 44 24 2C 45 24 3A 81 49 B2 34 A4 33 33 3A |2,D$,E$:.I.4.33:|
000027F0: A1 23 32 2C 41 24 3A 82 00 24 30 0C 0D 41 B2 30 |.#2,A$:..$0..A.0|
00002800: 3A 81 49 B2 33 34 A4 33 38 3A A1 23 32 2C 41 24 |:.I.34.38:.#2,A$|
00002810: 3A 41 B2 41 AA C6 28 41 24 AA C7 28 30 29 29 3A |:A.A..(A$..(0)):|
00002820: 82 3A A0 32 00 58 30 16 0D 8B 44 24 B2 22 48 22 |.:.2.X0...D$."H"|
00002830: A7 44 49 24 B2 22 D2 4F 4F 54 20 C4 49 52 22 3A |.DI$.".OOT .IR":|
00002840: 8B 41 B3 B1 30 A7 44 49 52 24 B2 22 D3 55 42 44 |.A..0.DIR$.".UBD|
00002850: 49 52 45 43 54 4F 52 59 00 8F 30 20 0D 8B 44 24 |IRECTORY..0 ..D$|
00002860: B2 22 41 22 A7 44 49 24 B2 22 31 35 34 31 20 31 |."A".DI$."1541 1|
00002870: 37 30 CB 22 3A 8B 45 24 B2 C7 28 31 32 38 29 A7 |70.":.E$..(128).|
00002880: 44 49 24 B2 22 31 35 37 31 20 33 34 30 CB 22 00 |DI$."1571 340.".|
00002890: AB 30 2A 0D 8B 44 24 B2 22 44 22 A7 44 49 24 B2 |.0*..D$."D".DI$.|
000028A0: 22 31 35 38 31 20 38 30 30 CB 22 00 B1 30 34 0D |"1581 800."..04.|
000028B0: 8E 00 E6 30 3E 0D 9F 34 2C 44 2C 30 2C 22 24 3A |...0>..4,D,0,"$:|
000028C0: 53 5E 25 5F 3E 2E 28 22 3A 81 49 B2 31 A4 33 34 |S^%_>.(":.I.1.34|
000028D0: 3A A1 23 34 2C 41 24 3A 82 3A A1 23 34 2C 4C 24 |:.#4,A$:.:.#4,L$|
000028E0: 2C 48 24 3A A0 34 00 09 31 48 0D 42 46 B2 C6 28 |,H$:.4..1H.BF..(|
000028F0: 4C 24 AA C7 28 30 29 29 AA C6 28 48 24 AA C7 28 |L$..(0))..(H$..(|
00002900: 30 29 29 AC 32 35 36 3A 8E 00 35 31 52 0D 9F 34 |0)).256:..51R..4|
00002910: 2C 44 2C 30 2C 46 24 3A 81 49 B2 31 A4 33 34 3A |,D,0,F$:.I.1.34:|
00002920: A1 23 34 2C 41 24 3A 82 3A A1 23 34 2C 4C 24 2C |.#4,A$:.:.#4,L$,|
00002930: 48 24 3A A0 34 00 58 31 5C 0D 42 46 B2 C6 28 4C |H$:.4.X1\.BF..(L|
00002940: 24 AA C7 28 30 29 29 AA C6 28 48 24 AA C7 28 30 |$..(0))..(H$..(0|
00002950: 29 29 AC 32 35 36 3A 8E 00 94 31 66 0D 97 37 38 |)).256:...1f..78|
00002960: 38 2C 35 32 3A 41 24 B2 22 48 45 4C 4C 4F 20 43 |8,52:A$."HELLO C|
00002970: 4F 4E 4E 45 43 54 22 3A 81 49 B2 38 A4 39 3A A0 |ONNECT":.I.8.9:.|
00002980: 32 3A 9F 32 2C 49 2C 32 3A A0 32 3A 8B 53 54 A7 |2:.2,I,2:.2:.ST.|
00002990: 33 34 35 30 00 CC 31 70 0D A0 31 35 3A 9F 31 35 |3450..1p..15:.15|
000029A0: 2C 49 2C 31 35 2C 22 52 30 3A 22 AA 41 24 AA 22 |,I,15,"R0:".A$."|
000029B0: 3D 22 AA 41 24 3A 84 31 35 2C 45 52 3A A0 31 35 |=".A$:.15,ER:.15|
000029C0: 3A 8B 45 52 B2 36 33 A7 33 34 36 30 00 E0 31 7A |:.ER.63.3460..1z|
000029D0: 0D 82 3A 99 22 93 22 3A 97 31 38 36 2C 38 3A 80 |..:.".":.186,8:.|
000029E0: 00 00 32 84 0D 51 24 B2 C7 28 33 34 29 3A 97 36 |..2..Q$..(34):.6|
000029F0: 34 36 2C C2 28 35 33 32 38 31 29 3A 99 22 93 22 |46,.(53281):."."|
00002A00: 00 43 32 8E 0D 99 22 93 11 11 11 50 CF 32 30 34 |.C2..."....P.204|
00002A10: 38 2C 30 3A 50 CF 34 34 2C 38 3A 50 CF 34 33 2C |8,0:P.44,8:P.43,|
00002A20: 31 3A 50 CF 35 36 2C 31 36 30 3A 50 CF 35 35 2C |1:P.56,160:P.55,|
00002A30: 30 3A 43 4C 52 3A 4C CF 22 51 24 41 24 51 24 22 |0:CLR:L."Q$A$Q$"|
00002A40: 2C 22 49 00 6D 32 98 0D 99 22 11 11 11 11 52 55 |,"I.m2..."....RU|
00002A50: 4E 3A 13 22 3A 97 36 33 31 2C 31 33 3A 97 36 33 |N:.":.631,13:.63|
00002A60: 32 2C 31 33 3A 97 31 39 38 2C 32 3A 80 00 93 32 |2,13:.198,2:...2|
00002A70: 10 27 A0 31 35 3A 9F 31 35 2C 38 2C 31 35 2C 22 |.'.15:.15,8,15,"|
00002A80: 53 3A 51 55 49 4C 54 22 3A 94 22 51 55 49 4C 54 |S:QUILT":."QUILT|
00002A90: 22 2C 38 00 00 00 |",8... |
..$.D.. COPYRIGHT MAURICE JONES 1992.L.N
..56,56:.51,0:.:DV.B(186):.DV.8.DV.8.K.X
..I,X,Y,J,K,M,MT,DV,E,J1,K1......52480,G
(13)."....",20,20,20,20.J....G(14);G(8):
MT.36864:BOX.MT.15:CE.MT.27:CM.MT:ME.CM.
48.T....1510... .. CHOICE*......220.....
.I.1.C(CH$):.A$.J(CH$,I,1)........:.170.
-.H.. ANY KEY-GET A$*.N.R.X.0:Y.24:.240:
.".. PLEASE PRESS A KEY
..."......A$:.A$."".220:....... PRINT
AT*......211,X:.214,Y:.58732:..C.... SEL
ECT SQUARES.....X.5:Y.3:.240:."..^":K.1:
J.0.....CH$.G(13)."....":.170:.I.280,290
,310,330,350.+...Q(M).4.J.K:." ":..8.".
.J.0.270._.,.." ":Y.Y.3:.240:."..^":J.J
.1:.270.L.6..J.6.270...@.." ":Y.Y.3:.24
0:."..^":J.J.1:.270. .J..K.1.270.G.T.."
":X.X.2:.240:."..^":K.K.1:.270.T.^..K.4
.270...H.." ":X.X.2:.240:."..^":K.K.1:.
270...R.. START UP.@.|..Q1$(7,4),CL(14),
Q(16),B$(7,4),X(16),Y(16),CC(14).X...Q1$
(2,1).".":Q1$(2,2).".":Q1$(2,3).".":Q1$(
2,4).".".....Q1$(3,1).".#":Q1$(3,2).".$"
:Q1$(3,3).".%":Q1$(3,4).".&".....Q1$(5,1
)."..":Q1$(5,2)."..":Q1$(5,3)."..":Q1$(5
,4)."..".+...Q1$(1,1)."'":Q1$(1,2).". ":
Q1$(1,3).". ":Q1$(1,4).". ".W...B$(2,1).
".'... .":B$(2,2).". ...'.":B$(2,3)." ..
...'":B$(2,4)."'..... ".G...B$(3,1).".#'
... #":B$(3,2).".$ ...'$":B$(3,3).". %..
.%'":B$(3,4).".'&...& "...B.B$(5,1)."..'
... .":B$(5,2).".. ...'.":B$(5,3).". ...
..'":B$(5,4).".'..... ".E.L.B$(1,1)."''.
..''":B$(1,2)." ... ":B$(1,3).". ...
":B$(1,4).". ... "...V..I.1.12:CL(I).
I.1:.:CL(13).13:CL(14).14.....B $(4,1).B
$(3,1):B $(4,2).B $(3,2):B $(4,3).B$(3,
3):B $(4,4).B $(3,4). ...B$(6,1).B$(5,1)
:B$(6,2).B$(5,2):B$(6,3).B$(5,3):B$(6,4)
.B$(5,4).D...B$(7,1).B$(5,1):B$(7,2).B$(
5,2):B$(7,3).B$(5,3):B$(7,4).B$(5,4)....
.K.23:.I.1.4:X(I).K:X(I.4).K:X(I.8).K:X(
I.12).K:K.K.2:..X....I.1.4:Y(I).5:.:.I.5
.8:Y(I).7:.: .I.9.12:Y(I).9:.......I.
13.16:Y(I).11:........J(X)..((X.1).4):..
K(X).X.4.(.((X.1).4)).I.&.Q1$(4,1).Q1$(3
,1):Q1$(4,2).Q1$(3,2):Q1$(4,3).Q1$(3,3):
Q1$(4,4).Q1$(3,4)...0.Q1$(6,1).Q1$(5,1):
Q1$(6,2).Q1$(5,2):Q1$(6,3).Q1$(5,3):Q1$(
6,4).Q1$(5,4)...:.Q1$(7,1).Q1$(5,1):Q1$(
7,2).Q1$(5,2):Q1$(7,3).Q1$(5,3):Q1$(7,4)
.Q1$(5,4)...D.NR(2).1:NR(3).3:NR(4).6.2.
N..I.1.14:.CC(I):..J.X..144,5,28,159,156
,30,31,158,129,149,150,151,153,154...B..
NEXT 3 LINES DEFINE A QUILT...L..4,3,14
,14,3,6,2,3,2,9,11,8,7,12,10,2,3,2,5,3,3
...V..I.1.4:.CO(I):.: .I.1.16:.Q(I):.:
.NC.4....J.0.2:PO(J).CO(1):.:PO(3).CO(2)
:PO(4).CO(1):PO(5).CO(2):PO(6).CO(3).:..
...W.... PRINT POSSIBLE SQUARES.}....BOX
,4,12,2,22,32,15:X.4:Y.2:.240......J.1.N
R(NC).1:.646,PO(J.1):."."; :.I.1.4:.Q1$(
J,I);"..";.......Q...Y.Y.3:.240:..W.F...
..P.. COLORS-MOVE CURSOR...Z.X.6:Y.4:.2
40:.".^":K.1:J.0.J...CH$.G(13)."....D"
:.170:.I.750,760,780,800,820,1100.F...C
O(M).CL(2.J.K):." ":..S....J.0.740.....
." ":Y.Y.3:.240:."^":J.J.1:.740......J.
6.740.J...." ":Y.Y.3:.240:."^":J.J.1:.7
40.W. ..K.1.740...*.." ":X.X.4:.240:."^
":K.1:.740...4..K.2.740.*.>.." ":X.X.4:
.240:."^":K.2:.740.7.H.. SCREEN.Q.R.."."
:.53272,31:.198,0.|.\..53265,B(53265).64
:.53281,15:.53280,09...F..BOX,0,39,0,24,
0,08:.BOX,3,13,1,23,32,15:.BOX,3,3,1,23,
63,08...P..BOX,13,13,1,23,61,08:.BOX,21,
32,3,14,32,15:.BOX,21,21,3,14,63,08.K.Z.
.BOX,32,32,3,14,61,08:.BOX,18,35,17,21,3
2,15:.BOX,18,35,17,17,60,08.G....BOX,18,
35,21,21,62,08:......646,8:X.18:Y.17:.24
0:."[..?..?..?..*"......646,8:X.35:Y.17:
.240:."]..=..=..=..+".....X.03:Y.23:.240
:."*>>>>>>>>>+".....X.03:Y.1:.240:.646,0
8:."[<<<<<<<<<].0...X.21:Y.3:.240:.646,0
8:."[<<<<<<<<<<].S...X.21:Y.14:.240:."*>
>>>>>>>>>+".Y.J...S.T.. PRINT COLOR SQUA
RES.....X.6:Y.3:.240:.J.0. 6:.I.1.2:.646
,CL(2.J.I):."'...";:......Y.Y.3:.240:.:.
.T.... PRINT A BLOCK......646,CO(1):.532
82,CO(2):.53283,CO(3):.53284,CO(4).=...W
.0:.M1.0.3:.N.0.3:W.W.1:J..J(Q(W)):K..K(
Q(W)).K....J.0.1060.P....646,PO(J):."."
B$(J.1,K);"..";.V.$........".........."
;:.:."..........";. .8.....B.. A PATCH O
N SUB250!.R.L..M.740,740,1110,1120...V.C
O(3).CO(2):CO(4).CO(2):NC.2:....`.CO(4).
CO(3):NC.3: M.4:..!.J.. DRAW GRID.-.T..6
46,00.W.~.X.23:Y.5:.240:."\][][][]......
...*+*+*+*+.........[][][][].........";.
....."*+*+*+*+.........[][][][].........
";.M...."*+*+*+*+.........[][][][]......
...";......"*+*+*+*+........."; :.......
DISK DIRECTORY......53272,21.I...."..":
.MT.51,"$:"."Q.*",DV:.15,8,15: .1970:.
E.20.1230.}.D.."..... DRIVE ERROR":
.:.:.".....";E;E$;T;S...N. 15:.210:.1520
...X..SAVE.O...."...":.53272,23:.I.1.16:
.Q(I).1.Q(I).28. 1330:...... 15: 3:.F$."
".1262......".......SAVE AS "F$"? (Y/N)"
:.MT.45,"YN":.F%.1.1268.S....:."....FILE
NAME: ";:.CM.66,1,13,20:.W$."".1520.]...
F$.W$.{....H(F$,2).."Q.".F$."Q.".F$.....
Q9$.F$: 15:.15,DV,15,"S:".F$:.2,DV,2,Q9$
.",P,W"......I.1.4:.2,CO(I):.:.I.1.16:.2
,Q(I):.:.2,NC......1970:."........E.20.1
310:."..".(....:."SAVE FAILED":.:.E;E$;T
;S:.1320.D....:.".. "Q9$" SAVED".[.(
. 2: 15: .210:.1520.L.2. 2: 15:.1520.W.<
.. LOAD...F..BOX,0,39,3,21,102,10:.53272
,23:.3050...K..CM.42,"I0",DV:.E(E$).1359
...M.MS$."GETTING DIRECTORY...":.3000:.M
T.6,"$:Q.*",DV,53248./.N..F%.0.MS$."NO Q
UILTS ON THIS DISK":.3030:.1520.M.O..E(E
$).MS$.E$:.3030:.1520...P.MS$."PLEASE SE
LECT QUILT":.3000:.CM.72,10,29,5,19...R.
.CM.3,11,4,11,3,1:.F$."".1530.F.Y.Q9$.F$
: 3:.3,DV,3,Q9$.",P,R"...Z..I.1.4:.3,CO(
I):.:.I.1.16:.3,Q(I):.:.3,NC.".D. 3:.CM.
42,"",DV:.E(E$).MS$.E$:.3030:.1520.,....
1450.W....53265,B(53265).64:.53281,15:.5
3280,09. ....J.0.2:PO(J).CO(1):.:PO(3).C
O(2):PO(4).CO(1):PO(5).CO(2):PO(6).CO(3)
... ..850:.1860.P....I.1.16:.Q(I).1.Q(I)
.28.1470......: .1420......".. . ..
THIS IS NOT A QUILT":.210:.1520.$.H..
INSTRUCTIONS.T.R..53272,21:.G(14):.MT.51
,"T.INSTRUCTIONS",DV.H....53272,31:.1520
.Q....380......53265,B(53265).191:.53280
,0:.53281,0:.646,3:.198,0......".":.5327
2,31:Y.7:.BOX,0,39,3,21,0,10:.BOX,0,39,0
,0,121,8......BOX,0,39,1,1,160,10:.BOX,0
,39,2,2,120,2.F...."..";:.CE,1,"P A T C
H W O R K Q U I L T"......BOX,0,39,23,
23,160,10:.BOX,0,39,24,24,120,2:.BOX,0,3
9,22,22,121,8......CE,23,".CRSR/RETURN O
R JOYSTICK TO SELECT"......MT.72,8,30,8,
17:.BOX,9,31,7,16,160,7.....Y.Y.1:.CE,Y,
". INSTRUCTIONS ".5...Y.Y.1:.CE,Y,"
CHOOSE NEW COLORS ".\...Y.Y.1:.CE,Y,"
DESIGN NEW BLOCK "...".Y.Y.1:.CE,Y," L
OAD A QUILT "...,.Y.Y.1:.CE,Y," SA
VE CURRENT QUILT ".W.6..:Y=Y+1:SYSCE,Y,"
6. DISK DIRECTORY "...@.Y.Y.1:.CE,Y,
" VIEW CURRENT QUILT ".% J.Y.Y.1:.CE,Y,"
CREATE RANDOM QUILT".L T.Y.Y.1:.CE,Y,"
RETURN TO LOADSTAR ".L Y..MT.48,8,10,30,
8,7,1,3:I.F%.. ^..I.1490,1650,1740,1350,
1250,1880, 2230,2340.. H.. CHOOSE COLORS
.. R..850:.990.. |.NC.4:.M.1.4:X.20:Y.18
:.240:.".RETURN SELECTS";.!!..X.20:Y.20:
.240:."D - DONE":.730:.NC..2.1690.G!..X.
28:Y.9:.240:.646,CO(3):."'":M.4..!..X.19
.3.M:Y.9:.240:.646,CO(M):."'":.:.BOX,19,
34,18,20,32,15..!...646,CO(1):.53282,CO(
2):.53283,CO(3):.53284,CO(4).."...J.0.2:
PO(J).CO(1):.:PO(3).CO(2):PO(4).CO(1):PO
(5).CO(2):PO(6).CO(3).$"...BOX,4,12,2,22
,32,15:.1770.7"B.. MAKE A BLOCK.E"L..850
:.670.V"V..BOX,22,31,4,13,32,15:.BOX,19,
34,18,20,32,15.."...I.1.16:Q(I).0:.:.114
0:.1830.."...BOX,19,34,18,20,32,15:X.19.
X"..Y.18:.240:.".V - VIEW QUILT"..#..Y.2
0:.240:."M - MENU":CH$."VM":.170..#...I.
1880,1520."#... EDIT *****.N#...53280,09
:.850:X.23:Y.5:.240:.1020:.670.V#&.X.20:
Y.18:.240:."..RETURN SELECTS";..#0.X.20:
Y.20:.240:."..D - DONE "..#:..1990.A#D.
X.23:Y.5:.240:.1020:.1770.S#N.. PRINT QU
ILT..#X..I.1.16:.Q(I).1.Q(I).28.1900..$B
..:.53265,B(53265).64:.53281,15:.1910.W$
L.."............ NO QUILT IN MEMO
RY":.210: .1520..$V..53280,15:.".":X.4:Y
.0:.240:.I.1.3:.L.1.4:.1020:..$...".....
.";:...$..Y.Y.8:.240:...$..X.7:Y.24:.240
:."..E - EDIT M - MENU";..%..I.0:
CH$."EM":.170:.I.1820,1520..%... DISK ER
ROR.&%...15,E,E$,T,S:..1%... EDIT.S%F.X.
23:Y.5:.240:K1.1:J1.0: CH$.G(13).
"....D" :Z.1..%P..".\": .170: .I
.2010,2020,2040,2060,2080,2100..%Z.M.4.J
1.K1:.260:.2180.N%...J1.0.2000..%...2140
:J1.J1.1:.2120..%...J1.3.2000..&...2140:
J1.J1.1:.2120..&...K1.1.2000.4&...2140:K
1.K1.1:.2120.C& ..K1.4.2000.[&*..2140:K1
.K1.1:.2120.V&4..I.1.16:.Q(I).0.Q(I).1.~
&>..:...&H.Z.4.J1.K1:X.X(Z):Y.Y(Z):.240:
.2000.Q&R.. SUB2060 PRINTS SQUARE TO ERA
SE CURSOR..&\.W.4.J1.K1:X.X(W):Y.Y(W):.2
40:..'F.J..J(Q(W)):K..K(Q(W)):.Q(W).0.22
10.)'P..646,PO(J).>'Z..".";B$(J.1,K):...
'..Z.4.J1.K1:X.X(Z):Y.Y(Z):.240:J..J(Q(Z
)):K..K(Q(Z)):.646,PO(J)..'...B$(J.1,K):
.240:CH$.G(13)."....D":.2000.V'... NEXT
TWO LINES PRINT BLOCK SELECTED..'...646,
00: ."[":...'... RANDOM..(..CO(1).CL(.(1
4..(0)).1).?(..CO(2).CL(.(14..(0)).1):.C
O(2).CO(1).2230.X(J.CO(3).CL(.(14..(0)).
1):.CO(3).CO(1).CO(3).CO(2).2310..(T.CO(
4).CL(.(14..(0)).1):.CO(4).CO(1).CO(4).C
O(2).CO(4).CO(3).2320.F(..NC.4..)...J.0.
2:PO(J).CO(1):.:PO(3).CO(2):PO(4).CO(1):
PO(5).CO(2):PO(6).CO(3).E)...646,C0(1):.
53282,CO(2):.53283,CO(3):.53284,CO(4).K)
...I.1.16:Q(I)..(28..(0)).1:.:.1880..)..
CO(3).CO(2):CO(4).CO(2):NC.2:.2280..)..C
O(4).CO(3):NC.3:.2280..)... RECONNECT*.D
)$....)...52483:.".":.53281,0:.53280,0..
*8.A$."HELLO CONNECT":.I.8.9: 2:.2,I,2:
2:.ST. 2400.T*B. 15:.15,I,15,"R0:".A$."=
".A$:.15,ER: 15:.ER.63. 2400..*L..:.".."
:.2048,0:.44,8:.53272,23:.186,DV..*V..53
272,21:.V.21,0:.56,160:.:."."G(9):..L*`.
.".....LOAD"G(34)A$G(34)","I..*J.."....R
UN.":.631,13:.632,13:.198,2:...+T..15,9,
15,"S0:QUILT": 15:."QUILT",9 :..1+...301
0:.3020:..I+B..BOX,0,39,23,23,160,7:."..
";:.CM.27,23,MS$:MS$."":...+L..J.1.16:.C
M.72,0,39,23,23:.:.BOX,0,39,23,23,255,7:
...+V..3000:.198,0:.198,15:.A$:..Y+...19
8,0:.198,15:.A$:...,...CM.72,17,22,4,14:
.BOX,18,23,3,13,160,12.6,..."..";:.I.8.1
6:.CM.24,22.C(D(I)),I.4,D(I):..E,...MS$.
"".MS$."PLEASE SELECT A DRIVE NUMBER".O,
...3010..,...ME,4,18,23,9,12.128,129,0:
2:.2,F%.7,2: 2:.ST.3090.W,..DV.F%.7:.311
0:.CM.18,232:.3120:.CM.21,232:...,&.MS$.
"CRSR/RETURN TO SELECT":.3010:..!-0.D.F%
.7:.B(787)..787,0:.D.SD...C-:..CM.42,"CP
",D:P.E(E$):.P..2...U-D..BOX,0,39,1,1,16
0,1:.199,1:.646,1:.CM.27,1,E$..-N.MS$."U
SE CURRENT PARTITION? (Y/N)":.3030:.A$..
"N".3230..-X.MS$."SELECT PARTITION...":.
3000:.CM,"$=P",D,16384,10,7,10,13,1...B.
.E(E$).MS$.E$:.3030:....L..F$.""...=.V.F
$."$=P:".F$:.3410:P.BF:.P.0...C....CM.42
,"",D:.E(E$).MS$.E$:.3030:..Z....CM.42,"
CP".G(P),D......BOX,0,39,1,1,160,1:.199,
1:.646,1:.CM.27,1,E$.P....CM.42,"CD/",D:
.3330:.D$.."H"........CM.6,"$:*=B",D,163
84:.F%.0.3310.,/..MS$."SELECT SUBDIRECTO
RY (STOP FOR CURRENT)":.3000.T/...CM.72,
15,34,5,13:.CM.3,16,4,10,7,1.N/F..E(E$).
MS$.E$:.3030:..~/P..F$."".3310../Z..CM.4
2,"CD:".F$,D:.E(E$).MS$.E$:.3030:.../...
3240../....M/..CHECK DIR TYPE../...2,D,2
,"$:":.#2,D$,E$:.I.4.33:.#2,A$:..$0..A.0
:.I.34.38:.#2,A$:A.A.F(A$.G(0)):.: 2.X0.
..D$."H".DI$."ROOT DIR":.A..0.DIR$."SUBD
IRECTORY..0 ..D$."A".DI$."1541 170K":.E$
.G(128).DI$."1571 340K"..0*..D$."D".DI$.
"1581 800K"..04....0>..4,D,0,"$:S^%_>.("
:.I.1.34:.#4,A$:.:.#4,L$,H$: 4..1H.BF.F(
L$.G(0)).F(H$.G(0)).256:..51R..4,D,0,F$:
.I.1.34:.#4,A$:.:.#4,L$,H$: 4.X1\.BF.F(L
$.G(0)).F(H$.G(0)).256:...1F..788,52:A$.
"HELLO CONNECT":.I.8.9: 2:.2,I,2: 2:.ST.
3450.L1P. 15:.15,I,15,"R0:".A$."=".A$:.1
5,ER: 15:.ER.63.3460..1Z..:.".":.186,8:.
..2..Q$.G(34):.646,B(53281):.".".C2...".
...PO2048,0:PO44,8:PO43,1:PO56,160:PO55,
0:CLR:LO"Q$A$Q$","I.M2..."....RUN:.":.63
1,13:.632,13:.198,2:...2.' 15:.15,8,15,"
S:QUILT":."QUILT",8...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL