Landestützen (Juni 2002, offenbar nie eingecheckt)

This commit is contained in:
hjp 2009-10-20 22:32:43 +00:00
parent e773515aeb
commit 1e320c2683
3 changed files with 94 additions and 40 deletions

View File

@ -3,51 +3,49 @@ include GNUmakevars
all: \ all: \
sol-im-leerraum.ppm \ test-sz.png \
raumhafen.ppm \ sol-im-leerraum.png \
people.ppm \ raumhafen.png \
test-mittelstueck.ppm \ people.png \
test-sz.ppm \ test-mittelstueck.png \
test-sol.ppm \ test-sol.png \
test-mensch.ppm \ test-mensch.png \
exodus.ppm \ exodus.png \
sol-ortho.ppm sol-ortho.png
%.jpg: %.ppm %.jpg: %.png
cjpeg $< > $@ cjpeg $< > $@
%.ppm: %.pov %.png: %.pov
$(POVRAY) +L$(POVINC) +V -I$< +FP $(POVRAY) +L$(POVINC) +V -I$< +FN
%.pov: make% %.pov: make%
$< > $@ $< > $@
test-sz.ppm: test-sz.pov sz.pov ynkelonium_texture.pov Triebwerk.pov test-sz.png: test-sz.pov sz.pov ynkelonium_texture.pov Triebwerk.pov
test-mittelstueck.ppm: test-mittelstueck.pov mittelstueck.pov \ test-mittelstueck.png: test-mittelstueck.pov mittelstueck.pov \
ynkelonium_texture.pov Triebwerk.pov ynkelonium_texture.pov Triebwerk.pov
test-sol.ppm: test-sol.pov sol.pov sz.pov mittelstueck.pov \ test-sol.png: test-sol.pov sol.pov sz.pov mittelstueck.pov \
ynkelonium_texture.pov Triebwerk.pov ynkelonium_texture.pov Triebwerk.pov
test-mensch.ppm: test-mensch.pov mensch.pov test-mensch.png: test-mensch.pov mensch.pov
exodus.ppm: exodus.pov sol.pov sz.pov mittelstueck.pov \ exodus.png: exodus.pov sol.pov sz.pov mittelstueck.pov \
ynkelonium_texture.pov Triebwerk.pov mensch.pov ringwulst.pov ynkelonium_texture.pov Triebwerk.pov mensch.pov ringwulst.pov
$(POVRAY) +L$(POVINC) +V -I$< +FP +W600 +H800 $(POVRAY) +L$(POVINC) +V -I$< +FP +W600 +H800
raumhafen.ppm: raumhafen.pov raumhafen.png: raumhafen.pov
$(POVRAY) +L$(POVINC) +V -I$< +FP +W600 +H800 $(POVRAY) +L$(POVINC) +V -I$< +FP +W600 +H800
sol-im-leerraum.ppm: sol-im-leerraum.pov sol.pov sz.pov mittelstueck.pov \ sol-im-leerraum.png: sol-im-leerraum.pov sol.pov sz.pov mittelstueck.pov \
ynkelonium_texture.pov Triebwerk.pov ringwulst.pov ynkelonium_texture.pov Triebwerk.pov ringwulst.pov
$(POVRAY) +L$(POVINC) +V -I$< +FP $(POVRAY) +L$(POVINC) +V -I$< +FP
sol-ortho.ppm: sol-ortho.pov sol.pov sz.pov mittelstueck.pov \ sol-ortho.png: sol-ortho.pov sol.pov sz.pov mittelstueck.pov \
ynkelonium_texture.pov Triebwerk.pov ringwulst.pov ynkelonium_texture.pov Triebwerk.pov ringwulst.pov
%.gif: %.ppm
ppmquant 256 $< | ppmtogif > $@

View File

@ -133,24 +133,77 @@
union { union {
#declare i = 15; #declare i = 15;
#while (i < 360) #while (i < 360)
cone { #ifdef (Landestuetzen_ausgefahren)
<0, 0, 0>, 100 #local j = 0;
<0, 10, 0>, 100 #while (j < 3)
translate <0, -1260, 0> #local Rl = 1250*sqrt(0.5);
rotate <45, 0, 0> #local Yo = (1270 - Rl) * (3-j)/3 - 1270;
rotate <0, i, 0> #local Zo = (1100 - Rl) * j/3 + Rl;
texture { #local Yu = (1270 - Rl) * (2-j)/3 - 1270;
pigment { color rgb <0.7, 0.5, 0.7> } #local Zu = (1100 - Rl) * (j+1)/3 + Rl;
finish { #debug concat ("\nlandestuetze: (",
ambient 0.2 str(Yo, 0, 0), ", ", str(Zo, 0, 0), ") - (",
diffuse 0.35 str(Yu, 0, 0), ", ", str(Zu, 0, 0), ")")
specular 0.55 #local Rl = 50 - 10 * j;
roughness 0.1 cone {
reflection 0.25 <0, Yo, Zo>, Rl
brilliance 1.0 <0, Yu, Zu>, Rl
rotate <0, i, 0>
texture {
Ynkelonium_Texture
}
}
#local j = j + 1;
#end
union {
intersection {
sphere {
<0, 10, 0>, 50
}
cylinder {
<0, 10, 0>
<0, 60, 0>
50
}
}
cone {
<0, 0, 0>, 100
<0, 10, 0>, 100
}
texture {
pigment { color rgb <0.7, 0.5, 0.7> }
finish {
ambient 0.2
diffuse 0.35
specular 0.55
roughness 0.1
reflection 0.25
brilliance 1.0
}
}
translate <0, -1280, 1100>
rotate <0, i, 0>
}
#else
cone {
<0, 0, 0>, 100
<0, 10, 0>, 100
translate <0, -1260, 0>
rotate <45, 0, 0>
rotate <0, i, 0>
texture {
pigment { color rgb <0.7, 0.5, 0.7> }
finish {
ambient 0.2
diffuse 0.35
specular 0.55
roughness 0.1
reflection 0.25
brilliance 1.0
}
} }
} }
} #end
#declare i = i + 30; #declare i = i + 30;
#end #end
} }

View File

@ -25,16 +25,19 @@ camera {
#ifdef (Camera_Totale) #ifdef (Camera_Totale)
camera { camera {
location <4650, 1700, 0> angle 40
location <8000, 1300, 0>
look_at <1250, 1300, 0> look_at <1250, 1300, 0>
} }
#end #end
#declare Landestuetzen_ausgefahren = 1;
#include "sz.pov" #include "sz.pov"
object { object {
SZ SZ
translate <0, 1300, 0> translate <0, 1280, 0>
} }