File: Menger3.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 (76 lines) | stat: -rw-r--r-- 2,003 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
#define DISTANCE0 OFF
#define DISTANCE1 ON
#define DISTANCE2 ON
#define DISTANCE3 OFF
#define WIDTH  0.05
#define STEP 9

// Camera settings. Place these before first rule call.
set translation [0.566876 -3.52063 -20]
set rotation [0.596494 -0.797386 0.0913825 0.253351 0.295103 0.921269 -0.761576 -0.526383 0.378044]
set pivot [0 0 0]
set scale 5.35875

set background #fff

ON

rule ON maxdepth 3 > MyBox {
       { s 1/3 } DISTANCE0	

       { s 1/3 x -1  }  DISTANCE1
	{ s 1/3 x +1  }  DISTANCE1 
       { s 1/3 y -1  }  DISTANCE1
	{ s 1/3 y +1  }  DISTANCE1
       { s 1/3 z -1  }  DISTANCE1
	{ s 1/3 z +1  }  DISTANCE1

	{ s 1/3 x -1 y -1 }   DISTANCE2 
	{ s 1/3 x 1 y -1 }    DISTANCE2 
	{ s 1/3  y -1  z -1 } DISTANCE2  
	{ s 1/3  y -1  z +1 } DISTANCE2 
	{ s 1/3 x -1 y 1 }    DISTANCE2 
	{ s 1/3 x 1 y 1 }     DISTANCE2 
	{ s 1/3  y 1 z -1 }   DISTANCE2  
	{ s 1/3  y 1 z +1 }   DISTANCE2 
	{ s 1/3 x -1 z -1 }   DISTANCE2 
	{ s 1/3 x -1 z +1 }   DISTANCE2 
	{ s 1/3 x 1 z -1 }    DISTANCE2 
	{ s 1/3 x 1 z +1 }    DISTANCE2 
	
	{ s 1/3 x 1 y -1  z -1 }  DISTANCE3 
	{ s 1/3 x -1 y -1  z -1}  DISTANCE3 
	{ s 1/3 x -1 y -1  z +1}  DISTANCE3 
	{ s 1/3 x 1 y -1  z +1 }  DISTANCE3 	
	{ s 1/3 x -1 y 1  z -1 }  DISTANCE3 
	{ s 1/3 x -1 y 1  z +1 }  DISTANCE3 
	{ s 1/3 x 1 y 1  z -1 }   DISTANCE3 
	{ s 1/3 x 1 y 1  z +1 }  DISTANCE3   
}

rule MyBox {
	{ s 0.9 color white } box
  { color black } frame
	
}

rule frame  {
{ s WIDTH 1 WIDTH x STEP  z STEP } box
{ s WIDTH 1 WIDTH x STEP  z -STEP } box
{ s WIDTH 1 WIDTH x -STEP  z STEP } box
{ s WIDTH 1 WIDTH x -STEP  z -STEP } box

{ s 1 WIDTH WIDTH y STEP  z STEP } box
{ s 1 WIDTH WIDTH y STEP  z -STEP } box
{ s 1 WIDTH WIDTH y -STEP  z STEP } box
{ s 1 WIDTH WIDTH y -STEP  z -STEP } box

{ s WIDTH WIDTH 1 y STEP  x STEP } box
{ s WIDTH WIDTH 1 y STEP  x -STEP } box
{ s WIDTH WIDTH 1 y -STEP  x STEP } box
{ s WIDTH WIDTH 1 y -STEP  x -STEP } box

}

rule Off {
}