File: RadialNabla.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 (24 lines) | stat: -rw-r--r-- 556 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
// 143#41

set colorpool image:001.jpg
//set colorpool randomhue
set maxdepth 50
#define sym 21
set maxsize 3

sym * { ry 360/sym } S1

set background white 
Rule S1 {
//set seed initial 
 R1
}

Rule R1 { dbox set seed initial { z 0.6 rx 5   }  R1 }
Rule R1 { dbox { z 0.5 rx -90 }  R1 }
Rule R1 { dbox{ z 0.6 rz 90 }  R1 }
Rule R1 { dbox{ z 0.6 rz -90 }  R1 }
Rule R1 weight 0.01 { } 
Rule dbox {  { color random s 2 2  0.5  }  box }
Rule dbox weight 0.5 {   { ry 90 s 0.5  1 1 } R1 }
Rule dbox weight 0.5 { { rx 90 s 0.5 2 1 } R1}