00000000: 6D 06 C2 06 2B 07 00 0A 1A 00 20 53 41 56 45 20 |m...+..... SAVE |
00000010: 22 40 30 3A 43 4F 4C 4F 52 20 53 57 49 52 4C 22 |"@0:COLOR SWIRL"|
00000020: 00 14 04 00 00 1E 1C 00 20 20 20 20 20 20 20 B0 |........ .|
00000030: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE |................|
00000040: 00 28 20 00 20 20 B0 C0 C0 C0 C0 BD 20 20 43 4F |.( . ...... CO|
00000050: 4C 4F 52 20 53 57 49 52 4C 20 20 AD C0 C0 C0 AE |LOR SWIRL .....|
00000060: 00 32 20 00 20 20 DD 20 42 59 20 20 20 43 41 52 |.2 . . BY CAR|
00000070: 4C 20 53 45 41 4C 4F 56 45 20 20 20 20 20 20 DD |L SEALOVE .|
00000080: 00 3C 20 00 20 20 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 |.< . ..........|
00000090: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B3 |................|
000000A0: 00 46 20 00 20 20 DD 20 20 20 20 4D 4F 44 49 46 |.F . . MODIF|
000000B0: 49 45 44 20 53 51 55 49 52 41 4C 20 20 20 20 DD |IED SQUIRAL .|
000000C0: 00 50 20 00 20 20 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 |.P . ..........|
000000D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD |................|
000000E0: 00 5A 04 00 00 64 22 7F 0A 03 0B 43 4F 4C 4F 52 |.Z...d"....COLOR|
000000F0: 20 53 57 49 52 4C 0F 03 0C 43 41 52 4C 20 53 45 | SWIRL...CARL SE|
00000100: 41 4C 4F 56 45 15 00 6E 04 00 00 78 10 00 4D 41 |ALOVE..n...x..MA|
00000110: 49 4E 20 50 52 4F 47 52 41 4D 00 82 06 7F 01 81 |IN PROGRAM......|
00000120: 00 8C 0A 97 43 44 32 98 81 8A 00 96 06 7F 02 81 |....CD2.........|
00000130: 00 A0 06 7F 03 81 00 AA 06 9B 6B 8A 00 B4 04 00 |..........k.....|
00000140: 00 BE 09 70 01 25 8B 00 7B 00 C8 09 07 04 02 00 |...p.%..{.......|
00000150: 00 3A 00 D2 0A FF 1E 02 00 01 FF 1F 00 DC 0A FF |.:..............|
00000160: 20 02 00 06 FF 21 00 E6 0A FF 46 02 00 04 FF 47 | ....!....F....G|
00000170: 00 F0 0B 5F 02 00 93 4B 65 60 61 00 FA 18 B5 03 |..._...Ke`a.....|
00000180: 0D 20 44 49 53 54 41 4E 43 45 3A 20 31 9D B7 07 |. DISTANCE: 1...|
00000190: 05 B8 BB 01 04 08 07 06 04 05 3A 01 0E 18 B5 03 |..........:.....|
000001A0: 0D 20 41 4E 47 4C 45 3A 20 20 38 39 9D 9D B7 07 |. ANGLE: 89....|
000001B0: 07 B8 BB 01 18 18 B5 03 0D 20 49 4E 43 52 45 4D |......... INCREM|
000001C0: 45 4E 54 3A 31 9D B7 07 08 B8 BB 01 22 0A FF 16 |ENT:1......."...|
000001D0: 02 00 00 FF 17 01 2C 05 FF 53 01 36 05 7D 01 01 |......,..S.6.}..|
000001E0: 40 04 00 01 4A 09 70 02 6B 8B 00 7B 01 54 0D 97 |@...J.p.k..{.T..|
000001F0: 04 06 02 01 6D 2A 98 65 8B 01 5E 09 FF 39 04 06 |....m*.e..^..9..|
00000200: FF 3A 01 68 09 FF 48 04 07 FF 49 01 72 06 7F 09 |.:.h..H...I.r...|
00000210: 81 01 7C 09 07 06 02 00 01 3D 01 86 06 9B 37 8B |..|......=....7.|
00000220: 01 90 05 7D 02 01 9A 04 00 01 A4 09 70 09 C2 8B |...}........p...|
00000230: 00 7B 01 AE 09 07 04 02 00 01 3D 01 B8 11 68 04 |.{........=...h.|
00000240: 04 02 00 04 2C 6A 07 04 02 00 00 3A 01 C2 11 68 |....,j.....:...h|
00000250: 04 04 02 00 01 2C 6A 07 04 02 00 07 3A 01 CC 11 |.....,j.....:...|
00000260: 68 04 04 02 00 08 2C 6A 07 04 02 00 02 3A 01 D6 |h.....,j.....:..|
00000270: 09 FF 1E 04 04 FF 1F 01 E0 05 7D 09 01 EA 04 00 |..........}.....|
00000280: 01 F4 09 70 03 F1 8B 00 7B 01 FE 08 07 06 04 05 |...p....{.......|
00000290: 3A 02 08 06 7F 09 81 02 12 05 FF 42 02 1C 05 FF |:..........B....|
000002A0: 54 02 26 05 FF 44 02 30 05 7D 03 02 3A 04 00 02 |T.&..D.0.}..:...|
000002B0: 44 04 00 02 4E 0D 70 0A B9 8F 02 74 0B 74 0C 7C |D...N.p....t.t.||
000002C0: 02 58 14 8C 8F 0D 00 02 00 28 93 8F 0E 00 02 00 |.X.......(......|
000002D0: 28 93 94 C5 02 62 10 0C 0E 02 00 01 1F 02 00 28 |(....b.........(|
000002E0: 19 03 00 3C 02 6C 12 07 0F 02 00 24 09 0B 51 29 |...<.l.....$..Q)|
000002F0: 47 02 00 02 25 3A 02 76 12 07 10 02 00 22 09 0C |G...%:.v....."..|
00000300: 51 29 47 02 00 02 25 3A 02 80 04 00 02 8A 0A FF |Q)G...%:........|
00000310: 1E 02 00 09 FF 1F 02 94 0A FF 46 02 00 07 FF 47 |..........F....G|
00000320: 02 9E 0A FF 20 02 00 07 FF 21 02 A8 2F 09 0D 03 |.... ....!../...|
00000330: 27 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 |'...............|
00000340: D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 D6 |................|
00000350: D6 D6 D6 D6 D6 D6 D6 D6 3C 02 B2 11 5F 02 00 93 |........<..._...|
00000360: 4B 65 66 02 00 8E 4B 65 60 61 02 BC 06 5F 60 61 |Kef...Ke`a..._`a|
00000370: 02 C6 04 00 02 D0 10 82 11 F1 8C 02 00 01 84 02 |................|
00000380: 00 13 85 87 02 DA 22 5F 02 00 91 4B 65 66 02 00 |......"_...Kef..|
00000390: 14 04 11 29 63 66 0C 0D 02 00 01 1F 02 00 02 04 |...)cf..........|
000003A0: 11 24 13 65 60 61 02 E4 07 8A 11 BF 8C 02 EE 0B |.$.e`a..........|
000003B0: 5F 03 02 91 20 65 60 61 02 F8 04 00 03 02 0B 5F |_... e`a......._|
000003C0: 02 00 91 4B 65 60 61 03 0C 10 82 11 43 8D 02 00 |...Ke`a.....C...|
000003D0: 01 84 02 00 16 85 87 03 16 1B 5F 03 01 20 65 66 |.........._.. ef|
000003E0: 02 00 76 4B 65 66 02 00 26 63 66 02 00 76 4B 65 |..vKef..&cf..vKe|
000003F0: 66 61 03 20 06 5F 60 61 03 2A 07 8A 11 12 8D 03 |fa. ._`a.*......|
00000400: 34 04 00 03 3E 10 82 11 96 8D 02 00 01 84 02 00 |4...>...........|
00000410: 12 85 87 03 48 0A 5F 03 01 20 65 66 61 03 52 0B |....H._.. efa.R.|
00000420: 5F 02 00 91 4B 65 66 61 03 5C 23 5F 0C 0D 02 00 |_...Kefa.\#_....|
00000430: 01 1F 04 11 13 65 66 02 00 26 04 11 29 63 66 0C |.....ef..&..)cf.|
00000440: 0D 02 00 01 1F 04 11 13 65 60 61 03 66 07 8A 11 |........e`a.f...|
00000450: 4E 8D 03 70 0C 5F 03 03 13 11 11 65 60 61 03 7A |N..p._.....e`a.z|
00000460: 2F 5F 03 01 20 65 66 02 00 76 4B 65 66 0C 0E 02 |/_.. ef..vKef...|
00000470: 00 01 1F 04 0F 13 65 66 02 00 12 4B 65 66 03 01 |......ef...Kef..|
00000480: 1F 65 66 06 0B 65 66 03 01 95 65 60 61 03 84 2F |.ef..ef...e`a../|
00000490: 5F 03 03 11 11 20 65 66 02 00 76 4B 65 66 0C 0E |_.... ef..vKef..|
000004A0: 02 00 01 1F 04 10 13 65 66 02 00 12 4B 65 66 03 |.......ef...Kef.|
000004B0: 04 1F 42 59 20 65 66 06 0C 65 60 61 03 8E 04 00 |..BY ef..e`a....|
000004C0: 03 98 2F 5F 03 26 11 11 1D 1D 1D 90 B0 C0 C0 C0 |../_.&..........|
000004D0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000004E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 65 60 61 03 |............e`a.|
000004F0: A2 2E 5F 03 25 1D 1D 1D DD 95 20 43 4F 4D 4D 4F |.._.%..... COMMO|
00000500: 44 4F 52 45 20 36 34 20 57 45 53 54 20 55 53 45 |DORE 64 WEST USE|
00000510: 52 20 47 52 4F 55 50 20 90 DD 65 60 61 03 AC 2F |R GROUP ..e`a../|
00000520: 5F 03 26 1D 1D 1D 90 DD 95 20 43 4F 4D 41 4C 20 |_.&...... COMAL |
00000530: 53 50 45 43 49 41 4C 20 49 4E 54 45 52 45 53 54 |SPECIAL INTEREST|
00000540: 20 47 52 4F 55 50 20 90 DD 65 60 61 03 B6 31 5F | GROUP ..e`a..1_|
00000550: 03 28 1D 1D 1D DD 95 20 20 20 21 21 20 90 57 45 |.(..... !! .WE|
00000560: 20 54 52 41 44 45 20 50 52 4F 47 52 41 4D 53 95 | TRADE PROGRAMS.|
00000570: 20 20 95 21 21 20 20 20 90 DD 65 60 61 03 C0 2C | .!! ..e`a..,|
00000580: 5F 03 23 1D 1D 1D AB C0 C0 C0 C0 C0 C0 C0 C0 C0 |_.#.............|
00000590: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
000005A0: C0 C0 C0 C0 C0 B3 65 60 61 03 CA 2E 5F 03 25 1D |......e`a..._.%.|
000005B0: 1D 1D DD 95 20 20 20 20 20 31 33 30 37 20 43 4F |.... 1307 CO|
000005C0: 4C 4F 52 41 44 4F 20 41 56 45 4E 55 45 20 20 20 |LORADO AVENUE |
000005D0: 20 20 90 DD 65 60 61 03 D4 2E 5F 03 25 1D 1D 1D | ..e`a..._.%...|
000005E0: DD 95 20 20 20 53 41 4E 54 41 20 4D 4F 4E 49 43 |.. SANTA MONIC|
000005F0: 41 2C 20 43 41 2C 20 39 30 34 30 34 20 20 20 20 |A, CA, 90404 |
00000600: 90 DD 65 60 61 03 DE 2C 5F 03 23 1D 1D 1D AD C0 |..e`a..,_.#.....|
00000610: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000620: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 BD 65 60 |..............e`|
00000630: 61 03 E8 28 5F 03 1F 11 11 1D 1D 1D 20 20 20 20 |a..(_....... |
00000640: 20 20 20 20 20 20 1F 12 20 50 52 45 53 53 20 41 | .. PRESS A|
00000650: 20 4B 45 59 20 92 65 60 61 03 F2 04 00 03 FC 04 | KEY .e`a.......|
00000660: 00 04 06 0D 97 F9 02 00 00 4B 2D 99 F4 9A 04 10 |.........K-.....|
00000670: 05 7D 0A 14 8B 8A 00 00 14 2E 8B 00 00 14 CB 8B |.}..............|
00000680: 00 00 10 FC AF 00 00 10 F7 AF 00 00 10 F2 AF 00 |................|
00000690: 00 10 ED AF 00 00 10 E8 AF 00 00 14 74 8B 00 00 |............t...|
000006A0: 14 FE 8B 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000006B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000006C0: 00 00 00 00 00 00 00 00 0A 49 4E 49 54 49 41 4C |.........INITIAL|
000006D0: 49 5A 45 09 44 52 41 57 52 49 47 48 54 09 49 4E |IZE.DRAWRIGHT.IN|
000006E0: 43 52 45 4D 45 4E 54 01 50 01 44 01 54 01 41 01 |CREMENT.P.D.T.A.|
000006F0: 43 0B 43 48 41 4E 47 45 43 4F 4C 4F 52 0A 54 49 |C.CHANGECOLOR.TI|
00000700: 54 4C 45 27 50 41 47 45 05 54 49 54 4C 45 06 41 |TLE'PAGE.TITLE.A|
00000710: 55 54 48 4F 52 04 4C 49 4E 45 06 53 50 41 43 45 |UTHOR.LINE.SPACE|
00000720: 53 05 53 54 41 52 54 06 53 54 41 52 54 31 01 49 |S.START.START1.I|
00000730: 00 81 |.. |
M.B.+..... SAVE "@0:COLOR SWIRL"........
..................( . ...... CO
LOR SWIRL ......2 . . BY CARL SEALOV
E ..< . ..........................
.F . . MODIFIED SQUIRAL ..P . ..
.........................Z...D"...COLOR
SWIRL...CARL SEALOVE..N...X..MAIN PROGR
AM.........CD2......... .......K.....
...P.%..{.H......:.R............ ....!..
..F....G..._...KE`A...... DISTANCE: 1...
..........:...... ANGLE: 89............
. INCREMENT:1.......".........,..S.6.}..
@...J.P.K..{.T......M*.E..^..9...:.H..H.
..I.R....|......=....7....}........P.B.
.{........=...H.....,J.....:.B.H.....,J.
....:.L.H.....,J.....:.V..........}.....
...P....{.......:.........B....T.&..D.0
.}..:...D...N.P....T.T.|.X.......(......
(..E.B.........(...<.L.....$..Q)G...%:.V
....."..Q)G...%:..................F....G
.... ....!../...'VVVVVVVVVVVVVVVVVVVVVVV
VVVVVVVVVVVVVVVV<..._...KEF...KE`A..._`A
.F...P...............Z"_...KEF.....)CF..
.........$.E`A.........._... E`A......._
...KE`A.....C............._.. EF..VKEF..
&CF..VKEFA. ._`A.*......4...>...........
....H._.. EFA.R._...KEFA.\#_.........EF.
.&..)CF.........E`A.F...N..P._.....E`A.Z
/_.. EF..VKEF.........EF...KEF...EF..EF.
..E`A../_.... EF..VKEF.........EF...KEF.
..BY EF..E`A....../_.&..................
....................E`A..._.%..... COMMO
DORE 64 WEST USER GROUP ..E`A../_.&.....
. COMAL SPECIAL INTEREST GROUP ..E`A..1_
.(..... !! .WE TRADE PROGRAMS. .!!
..E`A..,_.#.............................
......E`A.J._.%..... 1307 COLORADO A
VENUE ..E`A.T._.%..... SANTA MONIC
A, CA, 90404 ..E`A..,_.#.............
......................E`A..(_.......
.. PRESS A KEY .E`A...............
.K-......}............K.................
............T...........................
.................INITIALIZE.DRAWRIGHT.IN
CREMENT.P.D.T.A.C.CHANGECOLOR.TITLE'PAGE
.TITLE.AUTHOR.LINE.SPACES.START.START1.I
..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL