home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 12
/
CD_ASCQ_12_0294.iso
/
news
/
2391
/
form03
/
sue
/
mutation.frm
< prev
next >
Wrap
Text File
|
1994-01-25
|
894b
|
30 lines
Copyright (c) Sue Cunningham
// starting point a very simple web
s1 = ellipse <0.5, 0.2, 2> stack 50 in 15;
s2 = sphere 0.1 stack 50 in 10%;
web1 = s1 web 3 with s2 1;
//second mutation
s3 = sphere 0.1 stack 50 in 10% bend 60;
web2 = s1 web 3 with s3 1;
//third mutation
s4 = ellipse <0.5, 0.2, 2> stack 50 in 15 twist 180;
web3 = s4 web 3 with s3 1;
//fourth mutation
s5 = ellipse <0.5, 0.2, 2> stack 50 in 15 twist 360;
web4 = s5 web 4 with s3 1;
//fifth mutation
s6 = sphere 0.1 stack 50 in 10% bend 120;
web5 = s5 web 4 with s6 1;
//sixth mutation
web6 = s5 web 5 with s6 1;
//seventh mutation
s7 = ellipse <0.5, 0.2, 2> stack 50 in 15 twist 360 bend 45;
web7 = s7 web 5 with s6 1;
//final form
spoke1 = ellipse <0.5, 0.2, 2> stack 50 in 15 twist 2*360, 0.5 bend 45;
spoke2 = sphere 0.1 stack 50 in 10% bend 120;
web8 = spoke1 web 5 with spoke2 1 ;
web2;
end;