File: 31%20-%20random%20linear%20height.txt

package info (click to toggle)
povray 1%3A3.7.0.8-5
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 146,872 kB
  • sloc: cpp: 845,005; ansic: 122,118; sh: 34,206; pascal: 6,420; asm: 3,355; ada: 1,681; makefile: 1,387; cs: 879; awk: 590; perl: 245; xml: 95
file content (23 lines) | stat: -rw-r--r-- 520 bytes parent folder | download | duplicates (14)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#declare Random_1 = seed (27053); // Use: "rand(Random_1)" 

union{
 #local Nr = -8;   // start
 #local EndNr = 8; // end
 #while (Nr< EndNr+1) 

 sphere{ <0,0,0>,0.125 
	 texture{ pigment{ color rgb<1,0.65,0>}
                  finish { diffuse 0.9 phong 1}
                } // end of texture

         translate< Nr*0.25, 2*rand(Random_1) ,0>

       } // end of sphere ----------------------


 #local Nr = Nr + 1;  // next Nr
 #end // --------------- end of loop 

rotate<0,0,0> 
translate<0,0,0>
} // end of union