File: drums.pov

package info (click to toggle)
povray 1%3A3.6.1-12
  • links: PTS
  • area: non-free
  • in suites: lenny, squeeze
  • size: 31,084 kB
  • ctags: 20,310
  • sloc: ansic: 110,032; cpp: 86,573; sh: 13,595; pascal: 5,942; asm: 2,994; makefile: 1,753; ada: 1,637
file content (130 lines) | stat: -rw-r--r-- 2,736 bytes parent folder | download | duplicates (2)
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
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
// Persistence Of Vision raytracer version 3.5 sample file.
// Drums, the new improved version  Feb. 1992
// Copyright Dan Farmer 1992
// Time: a little over 3 hours no anti-aliasing, 640,480 on 33/486
//       7 hrs, 22 min +a0.05
//
// -w320 -h240
// -w800 -h600 +a0.3

/*
Fractint 17 parameter file to reconstruct REDNEWT.PNG:

Clip the Red Newton block below and save to a file named REDNEWT.PAR.
Run FRACTINT, press @ to get to the par file screen, press F6 to select
REDNEWT.PAR. Make it as large as you think your memory will afford... I used
1024x768 myself.

Red Newton         { ; Used as backdrop in DRUMS2.PNG
  reset type=complexnewton passes=1
  corners=-4.316552/-6.725229/9.54158/9.251383/-5.04438/10.512019
  params=8/0/4/8 maxiter=32767 inside=0 periodicity=0
  colors=000700<13>000000000000000<124>y00z00y00<108>800
  }

*/

global_settings { max_trace_level 20 assumed_gamma 2.2 }

#include "colors.inc"
#include "shapes.inc"
#include "textures.inc"
#include "drums.inc"


/*----------------------------- Viewer and lights -----------------------------*/
camera {
   location <0.0, 3.0, -90.0>
   direction <0.0, 0.0, 2.0>
   //   direction <0.0, 0.0,  3.0>  (Close up view, nice, too.)
   up  <0.0,  1.0,  0.0>
   right <4/3, 0.0, 0.0>
   look_at <0.0, 8.0, 0.0>
}


#declare Spacing = 15;
#declare Brightness = 0.5;



// Light source #1
union {
   light_source { <-Spacing, 0.0, 0.0> color red Brightness }
   light_source { <0.0, Spacing, 0.0>  color green Brightness }
   light_source { <Spacing, 0.0, 0.0>  color blue Brightness }

   pigment { White } // Doesn't do anything but suppresses a warning

   translate -100*z
   rotate 80*x
}


// Light source #2
union {
   light_source { <-Spacing, 0.0, 0.0> color red Brightness }
   light_source { <0.0, Spacing, 0.0>  color green Brightness }
   light_source { <Spacing, 0.0, 0.0>  color blue Brightness }

   pigment { White }

   translate -100*z
   rotate <30, 30, 0>
}

// Light source #3
union {
   light_source { <-Spacing, 0.0, 0.0> color red Brightness }
   light_source { <0.0, Spacing, 0.0> color green Brightness }
   light_source { <Spacing, 0.0, 0.0> color blue Brightness }

   pigment { White }

   translate -100*z
   rotate <30, -30, 0>
}

sphere {
   <0, 0, 0>, 1000
   hollow on

   pigment {
      image_map { png "rednewt.png" interpolate 4 }
      translate <-0.5, -0.5, 0.0>
      scale 800
   }
   finish {
      ambient 1
      diffuse 0.5
   }
}

// Floor
plane {
   y, -10.0

   pigment { Black }
   finish {
      ambient 0.2
      diffuse 0.8
      reflection 0.25
   }
}


// Left drumset

object {
   HalfSet
   rotate 20.0*y
   translate -13.0*x
}


// Right drumset
object {
   HalfSet
   rotate -20.0*y
   translate 13.0*x
}