File: Pure%20Structure.es

package info (click to toggle)
structure-synth 1.5.0-2
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 2,268 kB
  • ctags: 1,966
  • sloc: cpp: 10,209; python: 164; makefile: 71; sh: 15
file content (70 lines) | stat: -rw-r--r-- 973 bytes parent folder | download | duplicates (5)
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
#define shrink  s 0.996

set maxdepth 1000
set background white 
set syncrandom true 

//set colorpool image:001.jpg

set colorpool list:white,white,white,orange
set minsize 0.5

5 * { x 2 } 1 * { s 0.2 0.2 1 } s2

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



rule start { 6  * { rz 60 } hbox }

rule hbox md 10 { r }

rule r {
 set seed initial 
 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
}