Added movie

Megapov compatibility.
This commit is contained in:
hjp 2002-03-18 20:01:51 +00:00
parent 2bfd7a746e
commit 15c1f3407e
7 changed files with 66 additions and 39 deletions

View File

@ -23,6 +23,11 @@ uninteresting: \
test-torus.jpg \
entdecker1.jpg \
movie: entdecker-in-theophilus.pov
$(POVRAY) +L$(POVINC) +V -I$< +FP +W200 +H300 \
+KI0 +KF60 +KFI0 +KFF120 \
+SF40 +EF100 \
+HTX
%.ppm: %.pov
$(POVRAY) +L$(POVINC) +V -I$< +FP

View File

@ -74,33 +74,33 @@ camera {
#end
#macro warnkreis (r1, r2, s)
#macro warnkreis (r1, r2, st)
// r1 ... inner radius
// r2 ... outer radius
// s ... step width
// st ... step width
union {
#local i = 0;
#while (i < 360)
polygon {
5
<r1 * cos(radians(i-s)), r1 * sin(radians(i-s))>
<r1 * cos(radians(i-st)), r1 * sin(radians(i-st))>
<r1 * cos(radians(i-0)), r1 * sin(radians(i-0))>
<r2 * cos(radians(i+s)), r2 * sin(radians(i+s))>
<r2 * cos(radians(i+st)), r2 * sin(radians(i+st))>
<r2 * cos(radians(i+0)), r2 * sin(radians(i+0))>
<r1 * cos(radians(i-s)), r1 * sin(radians(i-s))>
<r1 * cos(radians(i-st)), r1 * sin(radians(i-st))>
pigment { color Yellow }
}
#local i = i + s;
#local i = i + st;
polygon {
5
<r1 * cos(radians(i-s)), r1 * sin(radians(i-s))>
<r1 * cos(radians(i-st)), r1 * sin(radians(i-st))>
<r1 * cos(radians(i-0)), r1 * sin(radians(i-0))>
<r2 * cos(radians(i+s)), r2 * sin(radians(i+s))>
<r2 * cos(radians(i+st)), r2 * sin(radians(i+st))>
<r2 * cos(radians(i+0)), r2 * sin(radians(i+0))>
<r1 * cos(radians(i-s)), r1 * sin(radians(i-s))>
<r1 * cos(radians(i-st)), r1 * sin(radians(i-st))>
pigment { color 0.1 }
}
#local i = i + s;
#local i = i + st;
#end
rotate <90, 0, 0>
translate <0, 0.01, 0>
@ -202,7 +202,7 @@ difference {
}
texture {
pigment { color rgb <0.7, 0.7, 0.9> }
finish { F_MetalA }
//finish { F_MetalA }
}
}
cylinder {
@ -224,6 +224,28 @@ difference {
#include "entdecker.pov"
#local t1 = 10;
#local t2 = 30;
#local t3 = 50;
#local t4 = 60;
#switch (clock)
#range (0, t1)
#local elev = -2000
#break
#range (t1, t2)
#local elev = (clock-t1)/(t2-t1);
#local elev = elev*elev;
#local elev = elev * 1000 - 2000;
#break;
#range (t2, t3)
#local elev = (clock-t3)/(t2-t3);
#local elev = elev*elev;
#local elev = - elev * 1000;
#break;
#range (t3, t4)
#local elev = 0;
#break;
#end
#if (1)
union {
cylinder {
@ -240,7 +262,7 @@ union {
translate <0, 930, 0>
}
translate <0, -200, 0>
translate <0, elev, 0>
}
#end

View File

@ -244,45 +244,45 @@
// formen einen leicht verzerrten Buckyball
#declare i = 0;
#while (i < 5)
#declare s = -1;
#while (s <= 1)
#declare sg = -1;
#while (sg <= 1)
object {
mvh
translate <900, 0, 0>
rotate <0, 0, s*70.81>
rotate <0, i*72+(s-1)*18 + 36, 0>
rotate <0, 0, sg*70.81>
rotate <0, i*72+(sg-1)*18 + 36, 0>
}
object {
mvh
translate <900, 0, 0>
rotate <0, 0, s*48.11>
rotate <0, i*72+(s-1)*18 + 36, 0>
rotate <0, 0, sg*48.11>
rotate <0, i*72+(sg-1)*18 + 36, 0>
}
object {
mvh
translate <900, 0, 0>
rotate <0, 0, s*31.48>
rotate <0, i*72+(s-1)*18 + 12, 0>
rotate <0, 0, sg*31.48>
rotate <0, i*72+(sg-1)*18 + 12, 0>
}
object {
mvh
translate <900, 0, 0>
rotate <0, 0, s*31.48>
rotate <0, i*72+(s-1)*18 + 60, 0>
rotate <0, 0, sg*31.48>
rotate <0, i*72+(sg-1)*18 + 60, 0>
}
object {
mvh
translate <900, 0, 0>
rotate <0, 0, s*9.27>
rotate <0, i*72+(s-1)*18 + 24, 0>
rotate <0, 0, sg*9.27>
rotate <0, i*72+(sg-1)*18 + 24, 0>
}
object {
mvh
translate <900, 0, 0>
rotate <0, 0, s*9.27>
rotate <0, i*72+(s-1)*18 + 48, 0>
rotate <0, 0, sg*9.27>
rotate <0, i*72+(sg-1)*18 + 48, 0>
}
#declare s = s + 2;
#declare sg = sg + 2;
#end
#declare i = i + 1;
#end
@ -290,22 +290,22 @@
// Ortungsbänder
#declare i = 0;
#while (i < 5)
#declare s = -1;
#while (s <= 1)
#declare sg = -1;
#while (sg <= 1)
object {
ortungsband
rotate <0, 0, 22.5>
rotate <s*25, 0, 0>
rotate <0, i*72 + s*28, 0>
rotate <sg*25, 0, 0>
rotate <0, i*72 + sg*28, 0>
}
object {
ortungsband
rotate <0, 0, 180>
rotate <0, 0, 22.5>
rotate <s*25, 0, 0>
rotate <0, i*72 + s*28, 0>
rotate <sg*25, 0, 0>
rotate <0, i*72 + sg*28, 0>
}
#declare s = s + 2;
#declare sg = sg + 2;
#end
object {
ortungsband

View File

@ -7,7 +7,7 @@
#declare cone_texture =
texture {
material_map {
gif "16_lines_v_capped.map.gif"
png "16_lines_v_capped.map.png"
map_type 2
texture {
pigment { color rgb <0.75, 0.75, 0.1> }
@ -128,7 +128,7 @@
1, 0.5
texture {
material_map {
gif "16_lines.map.gif"
png "16_lines.map.png"
map_type 5
texture {
pigment { color rgb <0.75, 0.75, 0.1> }

View File

@ -1,4 +1,5 @@
+A
+AM2
+QR
+HTP
+fp

View File

@ -4,7 +4,6 @@
#include "metals.inc"
#include "stones.inc"
global_settings {
assumed_gamma 1.0
ambient_light rgb<0.5, 0.5, 0.5>

View File

@ -4,10 +4,10 @@
#include "metals.inc"
#include "stones.inc"
global_settings {
assumed_gamma 1.0
ambient_light rgb<0.5, 0.5, 0.5>
//ambient_light rgb<0.5, 0.5, 0.5>
radiosity {}
}
light_source {