1 |
root |
1.1 |
// draw a colourful mikachuball |
2 |
|
|
|
3 |
|
|
ruleset ( |
4 |
|
|
S => |
5 |
|
|
{ |
6 |
root |
1.2 |
attr(color,'1 0 1) F+ |
7 |
root |
1.1 |
attr(color,'0 1 1) F+ |
8 |
root |
1.2 |
attr(color,'1 1 0) F+ |
9 |
|
|
attr(color,'1 1 1) F+ |
10 |
root |
1.3 |
}; |
11 |
root |
1.1 |
) |
12 |
|
|
|
13 |
|
|
mikachuball(n) => attr (delta, 90) S,n-1; |
14 |
|
|
|
15 |
root |
1.2 |
define size 0.41; |
16 |
root |
1.1 |
|
17 |
|
|
S => [ |
18 |
|
|
[S] |
19 |
|
|
attr (distance, distance * (1 - size) * 0.5) |
20 |
|
|
f+f- |
21 |
|
|
attr (distance, distance / (1 - size) / 0.5 * size) |
22 |
root |
1.2 |
+(15) |
23 |
|
|
[&f&(-90)S] // roof |
24 |
|
|
[&S]f+ |
25 |
|
|
[&S]f+ |
26 |
|
|
[&S]f+ |
27 |
root |
1.1 |
[&S] |
28 |
|
|
]; |
29 |
|
|
|