File: cross2.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 (94 lines) | stat: -rw-r--r-- 1,015 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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
#define shrink  s 0.996

set maxdepth 1000
set background white 
set syncrandom true 


set colorpool image:001.jpg
set minsize 0.5

s2

rule s2 md 25 {
   { z 1  s 0.9 0.9 1 } s2
start
}


{   s 500  500  0.1   color #333 } box

rule start {

6  * { rz 60 } hbox

}



rule hbox md 10 {

  r

}


rule r {
 set seed initial 
 forward
// { s 0.5 rz 180 } forward
}

rule r {
  turn
}


rule r  {
  turn2
}





rule forward md 90  >  r  {
  dbox
{ rz 2 x 0.1 shrink } forward
}


rule turn md 90  >  r  {
    dbox
{ rz 2  x 0.1 shrink } turn
}

rule turn2 md 90  >  r  {
  dbox
{ rz -2  x 0.1 shrink } turn2
}

rule turn3 md 90  >  r  {
    dbox
{ ry -2 x 0.1 shrink } turn3
}

rule turn4 md 90  >  r  {
  dbox
{ ry -2 x 0.1 shrink } turn4
}

rule turn5 md 90  >  r  {
    dbox
{ rx -2 x 0.1 shrink } turn5
}

rule turn6 md 90  >  r  {
  dbox
{ rx -2 x 0.1 shrink } turn6
}

rule dbox {

	{ s 0.2 1 1  color random } box
}