File: Thingy.es

package info (click to toggle)
structure-synth 1.0.0-1
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 2,072 kB
  • ctags: 1,176
  • sloc: cpp: 7,070; python: 167; makefile: 66; lisp: 25
file content (45 lines) | stat: -rw-r--r-- 581 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
#define steps 30
set minsize 0.01
set background white

10 * { s 0.8 rx 36 ry 10  } steps * { h 1 rz 360/steps } 1 * { x 10 rz 180} dspawn

rule dspawn {
  spawn
   m
}

rule m {
 // { x -0.1 rx 1 s 0.98 } m
 // { x -0.5 s 1.2 } sphere 
}

rule spawn {
  set seed initial
dbox
} 

rule dbox {
  { x 0.1 s 0.99 sat  0.99  } dbox
  box
}

rule dbox {
  { x 0.1 s 0.99 ry 1 } dbox
  box
}

rule dbox {
  { x 0.1 s 0.99 ry -1 } dbox
  box
}

rule dbox {
  { x 0.1 s 0.99 ry 1 } dbox
  box
}

rule dbox {
  { x 0.1 s 0.99 rz -3 } dbox
  box
}