Home » Archimedes archive » Acorn User » AU 1994-Xmas.adf » Programs » StarInfo/December/Pillidge/Info
StarInfo/December/Pillidge/Info
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » Archimedes archive » Acorn User » AU 1994-Xmas.adf » Programs |
| Filename: | StarInfo/December/Pillidge/Info |
| Read OK: | ✔ |
| File size: | 01EF bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
Spirograph ---------- This program draws "Spirograph" patterns in MODE 15. The wheel size, ring size, hole number, start point and pen colour for each pattern are mouse selectable. The number of points your pattern will make is shown as you change wheel size and ring size. Escape quits the program. If you like your pattern you can turn it into a Draw file and print it out. If anyone knows how to turn the elegant curves of Spirograph patterns into Bezier curves please let us all know!
00000000 53 70 69 72 6f 67 72 61 70 68 0a 2d 2d 2d 2d 2d |Spirograph.-----| 00000010 2d 2d 2d 2d 2d 0a 0a 54 68 69 73 20 70 72 6f 67 |-----..This prog| 00000020 72 61 6d 20 64 72 61 77 73 20 22 53 70 69 72 6f |ram draws "Spiro| 00000030 67 72 61 70 68 22 20 70 61 74 74 65 72 6e 73 20 |graph" patterns | 00000040 69 6e 20 4d 4f 44 45 20 31 35 2e 0a 0a 54 68 65 |in MODE 15...The| 00000050 20 77 68 65 65 6c 20 73 69 7a 65 2c 20 72 69 6e | wheel size, rin| 00000060 67 20 73 69 7a 65 2c 20 68 6f 6c 65 20 6e 75 6d |g size, hole num| 00000070 62 65 72 2c 20 73 74 61 72 74 20 70 6f 69 6e 74 |ber, start point| 00000080 20 61 6e 64 20 70 65 6e 20 63 6f 6c 6f 75 72 20 | and pen colour | 00000090 66 6f 72 20 65 61 63 68 0a 70 61 74 74 65 72 6e |for each.pattern| 000000a0 20 61 72 65 20 6d 6f 75 73 65 20 73 65 6c 65 63 | are mouse selec| 000000b0 74 61 62 6c 65 2e 0a 0a 54 68 65 20 6e 75 6d 62 |table...The numb| 000000c0 65 72 20 6f 66 20 70 6f 69 6e 74 73 20 79 6f 75 |er of points you| 000000d0 72 20 70 61 74 74 65 72 6e 20 77 69 6c 6c 20 6d |r pattern will m| 000000e0 61 6b 65 20 69 73 20 73 68 6f 77 6e 20 61 73 20 |ake is shown as | 000000f0 79 6f 75 20 63 68 61 6e 67 65 20 77 68 65 65 6c |you change wheel| 00000100 0a 73 69 7a 65 20 61 6e 64 20 72 69 6e 67 20 73 |.size and ring s| 00000110 69 7a 65 2e 0a 0a 45 73 63 61 70 65 20 71 75 69 |ize...Escape qui| 00000120 74 73 20 74 68 65 20 70 72 6f 67 72 61 6d 2e 0a |ts the program..| 00000130 0a 49 66 20 79 6f 75 20 6c 69 6b 65 20 79 6f 75 |.If you like you| 00000140 72 20 70 61 74 74 65 72 6e 20 79 6f 75 20 63 61 |r pattern you ca| 00000150 6e 20 74 75 72 6e 20 69 74 20 69 6e 74 6f 20 61 |n turn it into a| 00000160 20 44 72 61 77 20 66 69 6c 65 20 61 6e 64 20 70 | Draw file and p| 00000170 72 69 6e 74 20 69 74 20 6f 75 74 2e 0a 0a 49 66 |rint it out...If| 00000180 20 61 6e 79 6f 6e 65 20 6b 6e 6f 77 73 20 68 6f | anyone knows ho| 00000190 77 20 74 6f 20 74 75 72 6e 20 74 68 65 20 65 6c |w to turn the el| 000001a0 65 67 61 6e 74 20 63 75 72 76 65 73 20 6f 66 20 |egant curves of | 000001b0 53 70 69 72 6f 67 72 61 70 68 20 70 61 74 74 65 |Spirograph patte| 000001c0 72 6e 73 20 69 6e 74 6f 0a 42 65 7a 69 65 72 20 |rns into.Bezier | 000001d0 63 75 72 76 65 73 20 70 6c 65 61 73 65 20 6c 65 |curves please le| 000001e0 74 20 75 73 20 61 6c 6c 20 6b 6e 6f 77 21 0a |t us all know!.| 000001ef
.