Povray 3.5 compatibility.

This commit is contained in:
hjp 2002-03-18 20:08:59 +00:00
parent 15c1f3407e
commit 7c3e80b9c3
4 changed files with 218 additions and 210 deletions

Binary file not shown.

Before

Width:  |  Height:  |  Size: 575 B

After

Width:  |  Height:  |  Size: 583 B

View File

@ -11,25 +11,25 @@
//
////////////////////////////////////////////////////
#declare _MAT_gif = "krpl200.gif"
#declare _M_ANGL = 0.0
#declare _MAT_gif = "KRPL200.GIF"
#declare _M_ANGL = 0.0;
#declare _FENSTER_R = 100
#declare _FENSTER_R = 100;
//#declare _STUETZE = 1 // wenn deklariert dann sind
//#declare _STUETZE = 1; // wenn deklariert dann sind
// die Landstützen ausgefahren
//#declare _NO_F_LIGHT = 1 // wenn deklariert dann sind
//#declare _NO_F_LIGHT = 1; // wenn deklariert dann sind
// die Fenster dunkel
//#declare _NO_K_LIGHT = 1 // wenn deklariert dann sind
//#declare _NO_K_LIGHT = 1; // wenn deklariert dann sind
// Beobachtungskuppel dunkel
#include "KRMat.inc"
#include "KRMAT.INC"
////////////////////////////////////////////////////
// Kugelraumer 200 Meter
#declare R = 100.0 // Kugelradius
#declare wr = 15.0 // Wulstradius
#declare R = 100.0; // Kugelradius
#declare wr = 15.0; // Wulstradius
// Fenster
#declare F_O1 =
@ -45,7 +45,7 @@ union {
texture { TERKONIT }
}
#declare Count = 0
#declare Count = 0;
#declare F_OR =
union {
// OBEN 1
@ -61,10 +61,10 @@ union {
}
translate < 0, 70, 0 > // oben 1
}
#declare Count=Count+20 //18
#declare Count=Count+20; //18
#end
// OBEN 2
#declare Count = 0
#declare Count = 0;
#while (Count < 180)
union {
object {
@ -77,10 +77,10 @@ union {
}
translate < 0, 52, 0 > // oben 2
}
#declare Count=Count+18 //15
#declare Count=Count+18; //15
#end
// OBEN 3
#declare Count = 36
#declare Count = 36;
#while (Count < 325)
union {
object {
@ -97,11 +97,11 @@ union {
}
translate < 0, 35, 0 > //oben 3
}
#declare Count=Count+12
#declare Count=Count+12;
#end
// UNTEN 1
#declare Count = 0
#declare Count = 0;
#while (Count < 180)
union {
object {
@ -114,11 +114,11 @@ union {
}
translate < 0, -54, 0 > // unten 1
}
#declare Count=Count+18 //15
#declare Count=Count+18; //15
#end
// UNTEN 2
#declare Count = 0
#declare Count = 0;
#while (Count < 180)
union {
object {
@ -131,7 +131,7 @@ union {
}
translate < 0, -72, 0 > // unten 2
}
#declare Count=Count+20 //18
#declare Count=Count+20; //18
#end
} // end union
@ -152,7 +152,7 @@ difference {
texture {
pigment {
image_map {
gif "manns.gif"
gif "MANNS.GIF"
interpolate 4 // 4=normalized distance
filter 5 1.0
once
@ -167,7 +167,7 @@ texture {
texture {
pigment {
image_map {
gif "HB200.gif"
gif "HB200.GIF"
interpolate 4 // 4=normalized distance
filter 5 1.0
once
@ -182,7 +182,7 @@ texture {
texture {
pigment {
image_map {
gif "hgro200.gif"
gif "HGRO200.GIF"
interpolate 4 // 4=normalized distance
filter 5 1.0
once
@ -197,7 +197,7 @@ texture {
texture {
pigment {
image_map {
gif "hgru200.gif"
gif "HGRU200.GIF"
interpolate 4 // 4=normalized distance
filter 5 1.0
once
@ -212,9 +212,8 @@ texture {
texture {
pigment {
image_map {
gif "hgsj200.gif"
png "HGSJ200.png"
interpolate 4 // 4=normalized distance
filter 5 1.0
once
}
translate < -0.5, -0.5, 0 >
@ -224,14 +223,14 @@ texture {
} // end texture
//----- Hangar Tore
#declare norm_msl_h = 16.25 // Höhe Mannschl normal
#declare zus_msl_h = 45 // Höhe Mannschl zusätzlich
#declare sjh_h = 28 // Höhe SJ-Hangar
#declare hgkr_ob = 60 // Höhe Hangarkreis oben
#declare hgkr_ut = -35 // Höhe Hangarkreis unten
#declare hgb_h = -85 // Höhe Bodenhangar
#declare norm_msl_h = 16.25; // Höhe Mannschl normal
#declare zus_msl_h = 45; // Höhe Mannschl zusätzlich
#declare sjh_h = 28; // Höhe SJ-Hangar
#declare hgkr_ob = 60; // Höhe Hangarkreis oben
#declare hgkr_ut = -35; // Höhe Hangarkreis unten
#declare hgb_h = -85; // Höhe Bodenhangar
#declare Count = 45
#declare Count = 45;
#declare MANNSCHL =
union {
#while (Count < 360)
@ -248,7 +247,7 @@ union {
}
rotate < 0, Count ,0 >
} // end intersection
#declare Count=Count+45
#declare Count=Count+45;
#end
intersection {
sphere { <0, 0, 0>, R-0.5 }
@ -264,7 +263,7 @@ union {
} // end intersection
} // end Union
#declare Count = 0
#declare Count = 0;
#declare HANGAR_B =
union {
#while (Count < 360)
@ -281,11 +280,11 @@ union {
} // end texture
rotate < 0, Count ,0 >
} // end intersection
#declare Count=Count+180
#declare Count=Count+180;
#end
} // end union
#declare Count = 0
#declare Count = 0;
#declare HANGARKR_OB =
union {
#while (Count < 360)
@ -302,11 +301,11 @@ union {
} // end texture
rotate < 0, Count ,0 >
} // end intersection
#declare Count=Count+60
#declare Count=Count+60;
#end
} // end union
#declare Count = 0
#declare Count = 0;
#declare HANGARKR_UT =
union {
#while (Count < 360)
@ -323,7 +322,7 @@ union {
} // end texture
rotate < 0, Count ,0 >
} // end intersection
#declare Count=Count+45
#declare Count=Count+45;
#end
} // end union
@ -342,7 +341,7 @@ intersection {
} // end intersection
//----- Hangar Ausschnitte
#declare Count = 45
#declare Count = 45;
#declare _MANNSCHL =
union {
#while (Count < 360)
@ -352,7 +351,7 @@ union {
rotate < 0, Count ,0 >
translate < 0, norm_msl_h, 0 >
}
#declare Count=Count+45
#declare Count=Count+45;
#end
superellipsoid { < 0.2, 0.2 >
scale < R/2+5, 1.25, 2.5 >
@ -373,7 +372,7 @@ object {
} // end object
// oberer Hangarkreis
#declare Count = 0
#declare Count = 0;
#declare _HANGARKR_OB =
union {
#while (Count < 180)
@ -382,13 +381,13 @@ union {
rotate < 0, Count ,0 >
translate < 0, hgkr_ob, 0 >
}
#declare Count=Count+60
#declare Count=Count+60;
#end
texture { TERKONIT }
} // end union
// unterer Hangarkreis
#declare Count = 0
#declare Count = 0;
#declare _HANGARKR_UT =
union {
#while (Count < 180)
@ -397,7 +396,7 @@ union {
rotate < 0, Count ,0 >
translate < 0, hgkr_ut, 0 >
}
#declare Count=Count+45
#declare Count=Count+45;
#end
texture { TERKONIT }
} // end union
@ -452,8 +451,8 @@ object {
}
} // end obj
#declare r1 = 7.25 // Düsenentfernung
#declare dsk = 45 // Düsenwinkel
#declare r1 = 7.25; // Düsenentfernung
#declare dsk = 45; // Düsenwinkel
#declare WULST =
object {
@ -462,31 +461,31 @@ object {
torus { R, wr }
cylinder { -wr*y , wr*y, R }
}
#declare Count = 10
#declare Count = 10;
#while (Count < 360)
#declare X=(r1*cos(radians( dsk ))+R)*sin(radians( Count ))
#declare Z=(r1*cos(radians( dsk ))+R)*cos(radians( Count ))
#declare Y=r1*sin(radians( dsk ))
#declare X=(r1*cos(radians( dsk ))+R)*sin(radians( Count ));
#declare Z=(r1*cos(radians( dsk ))+R)*cos(radians( Count ));
#declare Y=r1*sin(radians( dsk ));
object {
DUESE
rotate < dsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z, >
}
#declare Count=Count+20
#declare Count=Count+20;
#end
#declare Count = 10
#declare Count = 10;
#while (Count < 360)
#declare X=(r1*cos(radians( -dsk ))+R)*sin(radians( Count ))
#declare Z=(r1*cos(radians( -dsk ))+R)*cos(radians( Count ))
#declare Y=r1*sin(radians( -dsk ))
#declare X=(r1*cos(radians( -dsk ))+R)*sin(radians( Count ));
#declare Z=(r1*cos(radians( -dsk ))+R)*cos(radians( Count ));
#declare Y=r1*sin(radians( -dsk ));
object {
DUESE
rotate <180-dsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z, >
}
#declare Count=Count+20
#declare Count=Count+20;
#end
}
} // end object
@ -577,7 +576,7 @@ object {
scale 5
} // end obj
#declare rgs = R - 1.5 // Radius Polgeschütz
#declare rgs = R - 1.5; // Radius Polgeschütz
#declare GSKP =
union {
sphere { < 0, 0, 0 >, 1
@ -600,112 +599,112 @@ union {
rotate < 0, 20, 0>
}
#declare rgs = R - 1.0 // Radius Geschütz
#declare Count = 0
#declare wgsk = 50 // Gesützkreiswinkel
#declare rgs = R - 1.0; // Radius Geschütz
#declare Count = 0;
#declare wgsk = 50; // Gesützkreiswinkel
#declare GSKR1 =
union{
#while (Count < 360)
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare Y=rgs*sin(radians( wgsk ))
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
#declare Y=rgs*sin(radians( wgsk ));
object {
GSKUPPEL_1
rotate < 90-wgsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+45
#declare Count=Count+45;
#end
}
#declare Count = 15
#declare wgsk = 27 // Gesützkreiswinkel
#declare Count = 15;
#declare wgsk = 27; // Gesützkreiswinkel
#declare GSKR2 =
union{
#declare Y=rgs*sin(radians( wgsk ))
#declare Y=rgs*sin(radians( wgsk ));
#while (Count < 360)
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
object {
GSKUPPEL_3
rotate < 90-wgsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+30
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare Count=Count+30;
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
object {
GSKUPPEL_2
rotate < 90-wgsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+30
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare Count=Count+30;
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
object {
GSKUPPEL_2
rotate < 90-wgsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+30
#declare Count=Count+30;
#end
}
#declare Count = 15
#declare wgsk = -27 // Gesützkreiswinkel
#declare Count = 15;
#declare wgsk = -27; // Gesützkreiswinkel
#declare GSKR3 =
union{
#declare Y=rgs*sin(radians( wgsk ))
#declare Y=rgs*sin(radians( wgsk ));
#while (Count < 360)
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
object {
GSKUPPEL_3
rotate < 90-wgsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+30
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare Count=Count+30;
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
object {
GSKUPPEL_2
rotate < 90-wgsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+30
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare Count=Count+30;
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
object {
GSKUPPEL_2
rotate < 90-wgsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+30
#declare Count=Count+30;
#end
}
#declare Count = 0
#declare wgsk = -50 // Gesützkreiswinkel
#declare Count = 0;
#declare wgsk = -50; // Gesützkreiswinkel
#declare GSKR4 =
union{
#while (Count < 360)
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare Y=rgs*sin(radians( wgsk ))
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
#declare Y=rgs*sin(radians( wgsk ));
object {
GSKUPPEL_1
rotate < 90-wgsk, 0, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+45
#declare Count=Count+45;
#end
}
@ -736,15 +735,15 @@ union {
texture { TERKONIT }
}
#declare rgs = R - 1 // Radius Schutzschirmprojektor
#declare Count = 22.5
#declare wgsk = 50 // Winkel SSprojektorkreis
#declare rgs = R - 1; // Radius Schutzschirmprojektor
#declare Count = 22.5;
#declare wgsk = 50; // Winkel SSprojektorkreis
#declare SSKR1 =
union{
#while (Count < 360)
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare Y=rgs*sin(radians( wgsk ))
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
#declare Y=rgs*sin(radians( wgsk ));
object {
SSPROJ
scale 6
@ -752,18 +751,18 @@ union{
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+45
#declare Count=Count+45;
#end
}
#declare Count = 22.5
#declare wgsk = -50 // Winkel SSprojektorkreis
#declare Count = 22.5;
#declare wgsk = -50; // Winkel SSprojektorkreis
#declare SSKR2 =
union{
#while (Count < 360)
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ))
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ))
#declare Y=rgs*sin(radians( wgsk ))
#declare X=rgs*sin(radians( Count ))*cos(radians( wgsk ));
#declare Z=rgs*cos(radians( Count ))*cos(radians( wgsk ));
#declare Y=rgs*sin(radians( wgsk ));
object {
SSPROJ
scale 6
@ -771,14 +770,14 @@ union{
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+45
#declare Count=Count+45;
#end
}
//---------------------------------------------------
// Landeteller und Landestützen
#declare wldst = 15
#declare wldst = 15;
#declare LDST =
union{
@ -808,24 +807,24 @@ union{
rotate < 0, 0, wldst >
}
#declare Count = 15
#declare wltk = -40
#declare rlt = R - 1
#declare Count = 15;
#declare wltk = -40;
#declare rlt = R - 1;
#ifdef (_STUETZE)
#declare LTKR =
union{
#while (Count < 360)
#declare X=rlt*sin(radians( Count ))*cos(radians( wltk ))
#declare Z=rlt*cos(radians( Count ))*cos(radians( wltk ))
#declare Y=rlt*sin(radians( wltk ))
#declare X=rlt*sin(radians( Count ))*cos(radians( wltk ));
#declare Z=rlt*cos(radians( Count ))*cos(radians( wltk ));
#declare Y=rlt*sin(radians( wltk ));
object {
LDST
rotate < 0, -90, 0 >
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+30
#declare Count=Count+30;
#end
texture { TERKONIT }
}
@ -833,9 +832,9 @@ union{
#declare LTKR =
union{
#while (Count < 360)
#declare X=rlt*sin(radians( Count ))*cos(radians( wltk ))
#declare Z=rlt*cos(radians( Count ))*cos(radians( wltk ))
#declare Y=rlt*sin(radians( wltk ))
#declare X=rlt*sin(radians( Count ))*cos(radians( wltk ));
#declare Z=rlt*cos(radians( Count ))*cos(radians( wltk ));
#declare Y=rlt*sin(radians( wltk ));
cylinder {
< 0, 1.0, 0 >
< 0, 0, 0 >, 6
@ -843,7 +842,7 @@ union{
rotate < 0, Count, 0 >
translate < X, Y, Z >
}
#declare Count=Count+30
#declare Count=Count+30;
#end
texture { TERKONIT }
}
@ -943,29 +942,29 @@ union {
texture { TERKONIT }
}
#declare wank = 69
#declare rank = R-0.4
#declare Y=rank*sin(radians( wank ))
#declare wank = 69;
#declare rank = R-0.4;
#declare Y=rank*sin(radians( wank ));
#declare ORTER =
union {
#declare X=rank*sin(radians( 0 ))*cos(radians( wank ))
#declare Z=rank*cos(radians( 0 ))*cos(radians( wank ))
#declare X=rank*sin(radians( 0 ))*cos(radians( wank ));
#declare Z=rank*cos(radians( 0 ))*cos(radians( wank ));
object {
_ORTER_2
scale 2
//rotate < 0, 0, 0 >
translate < X, Y-0.5, Z >
}
#declare X=rank*sin(radians( 180 ))*cos(radians( wank ))
#declare Z=rank*cos(radians( 180 ))*cos(radians( wank ))
#declare X=rank*sin(radians( 180 ))*cos(radians( wank ));
#declare Z=rank*cos(radians( 180 ))*cos(radians( wank ));
object {
_ORTER_2
scale 2
rotate < 0, 180, 0 >
translate < X, Y-0.5, Z >
}
#declare X=rank*sin(radians( 90 ))*cos(radians( wank ))
#declare Z=rank*cos(radians( 90 ))*cos(radians( wank ))
#declare X=rank*sin(radians( 90 ))*cos(radians( wank ));
#declare Z=rank*cos(radians( 90 ))*cos(radians( wank ));
object {
_ORTER_1
scale 2
@ -973,8 +972,8 @@ union {
rotate < 0, 90, 0 >
translate < X, Y, Z >
}
#declare X=rank*sin(radians( 270 ))*cos(radians( wank ))
#declare Z=rank*cos(radians( 270 ))*cos(radians( wank ))
#declare X=rank*sin(radians( 270 ))*cos(radians( wank ));
#declare Z=rank*cos(radians( 270 ))*cos(radians( wank ));
object {
_ORTER_1
scale 2
@ -1100,32 +1099,32 @@ union {
texture { TERKONIT }
}
#declare Y=rank*sin(radians( wank ))
#declare Y=rank*sin(radians( wank ));
#declare ANTENNE =
union {
#declare X=rank*sin(radians( 45 ))*cos(radians( wank ))
#declare Z=rank*cos(radians( 45 ))*cos(radians( wank ))
#declare X=rank*sin(radians( 45 ))*cos(radians( wank ));
#declare Z=rank*cos(radians( 45 ))*cos(radians( wank ));
object {
_ANTENNE_1
scale 2
translate < X, Y-0.5, Z >
}
#declare X=rank*sin(radians( 225 ))*cos(radians( wank ))
#declare Z=rank*cos(radians( 225 ))*cos(radians( wank ))
#declare X=rank*sin(radians( 225 ))*cos(radians( wank ));
#declare Z=rank*cos(radians( 225 ))*cos(radians( wank ));
object {
_ANTENNE_1
scale 2
translate < X, Y-0.5, Z >
}
#declare X=rank*sin(radians( 135 ))*cos(radians( wank ))
#declare Z=rank*cos(radians( 135 ))*cos(radians( wank ))
#declare X=rank*sin(radians( 135 ))*cos(radians( wank ));
#declare Z=rank*cos(radians( 135 ))*cos(radians( wank ));
object {
_ANTENNE_3
scale 1.5
translate < X, Y-0.3, Z >
}
#declare X=rank*sin(radians( 315 ))*cos(radians( wank ))
#declare Z=rank*cos(radians( 315 ))*cos(radians( wank ))
#declare X=rank*sin(radians( 315 ))*cos(radians( wank ));
#declare Z=rank*cos(radians( 315 ))*cos(radians( wank ));
object {
_ANTENNE_2
scale 1.5
@ -1137,15 +1136,15 @@ union {
//---------------------------------------------------
// Beobachtungskuppel
#declare wbk = 63 // Winkel Beobachtungskuppel
#declare rbk = R - 0.5 // Radius Beobachtungskuppel
#declare Y=rbk*sin(radians( wbk ))
#declare Count = 67.5
#declare wbk = 63; // Winkel Beobachtungskuppel
#declare rbk = R - 0.5; // Radius Beobachtungskuppel
#declare Y=rbk*sin(radians( wbk ));
#declare Count = 67.5;
#declare BKPL =
union {
#while (Count < 360)
#declare X=rbk*sin(radians( Count ))*cos(radians( wbk ))
#declare Z=rbk*cos(radians( Count ))*cos(radians( wbk ))
#declare X=rbk*sin(radians( Count ))*cos(radians( wbk ));
#declare Z=rbk*cos(radians( Count ))*cos(radians( wbk ));
sphere {
< 0, 0, 0 >, 1
hollow
@ -1156,7 +1155,7 @@ union {
rotate < 0, Count, 0 >
translate < X, Y, Z >
} // end sphere
#declare Count=Count+180
#declare Count=Count+180;
#end
} // end union

View File

@ -17,15 +17,24 @@
#include "textures.inc" // Standard Texture definitions
// ==== Additional Includes ====
#include "CONSTS.INC"
#include "consts.inc"
////////////////////////////////////////////////////
//camera {
// orthographic
// location < -300.0, 0.0, -300.0>
// direction 1.3*z
// up y
// right 4/3*x
// look_at < 0.0, 0.0, 0.0>
//}
camera {
orthographic
location < 0.0, 0.0, -300.0>
direction 1.3*z
up y
right 4/3*x
up <0, 200, 0>
right <200*4/3, 0, 0>
look_at < 0.0, 0.0, 0.0>
}
@ -46,7 +55,7 @@ light_source {
////////////////////////////////////////////////////
#declare _STARS = 1
#declare _STARS = 0;
#ifdef (_STARS)
#declare Starfield=
@ -90,6 +99,6 @@ object {
object {
KR200
rotate < 0, -45, 0 >
rotate < -10, 0, 0 >
rotate < 0, -90, 0 >
// rotate < -10, 0, 0 >
}

View File

@ -31,8 +31,8 @@ texture {
//---------------------------------------------------
// Terkonit Kugelraumer Schale
#declare _d = 0.70
#declare _r = 100
#declare _d = 0.70;
#declare _r = 100;
#declare _T_S_1 =
texture {
TERKONIT
@ -40,8 +40,8 @@ texture {
roughness 1/_r }
} // end text 1
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_2 =
texture {
TERKONIT
@ -50,8 +50,8 @@ texture {
} // end text 2
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_3 =
texture {
TERKONIT
@ -59,8 +59,8 @@ texture {
roughness 1/_r }
} // end text 3
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_4 =
texture {
TERKONIT
@ -68,8 +68,8 @@ texture {
roughness 1/_r }
} // end text 4
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_5 =
texture {
TERKONIT
@ -77,8 +77,8 @@ texture {
roughness 1/_r }
} // end text 5
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_6 =
texture {
TERKONIT
@ -86,8 +86,8 @@ texture {
roughness 1/_r }
} // end text 6
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_7 =
texture {
TERKONIT
@ -95,8 +95,8 @@ texture {
roughness 1/_r }
} // end text 7
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_8 =
texture {
TERKONIT
@ -104,8 +104,8 @@ texture {
roughness 1/_r }
} // end text 8
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_9 =
texture {
TERKONIT
@ -113,8 +113,8 @@ texture {
roughness 1/_r }
} // end text 9
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_10 =
texture {
TERKONIT
@ -122,8 +122,8 @@ texture {
roughness 1/_r }
} // end text 10
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_11 =
texture {
TERKONIT
@ -131,8 +131,8 @@ texture {
roughness 1/_r }
} // end text 11
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_12 =
texture {
TERKONIT
@ -140,8 +140,8 @@ texture {
roughness 1/_r }
} // end text 12
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_13 =
texture {
TERKONIT
@ -149,8 +149,8 @@ texture {
roughness 1/_r }
} // end text 13
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_14 =
texture {
TERKONIT
@ -158,8 +158,8 @@ texture {
roughness 1/_r }
} // end text 14
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_15 =
texture {
TERKONIT
@ -167,8 +167,8 @@ texture {
roughness 1/_r }
} // end text 15
#declare _d = _d-0.01
#declare _r = _r-5
#declare _d = _d-0.01;
#declare _r = _r-5;
#declare _T_S_16 =
texture {
TERKONIT
@ -230,19 +230,19 @@ texture {
texture {
pigment {colour rgbft <0.4, 0.4, 0.4, 0.7, 1.0>}
finish { _T_F_finish }
halo {
emitting
constant
max_value 1
spherical_mapping
colour_map {
[0 color rgbt <1.0, 1.0, 1.0, 0>]
[1 color rgbt <0.9, 1.0, 0.8, -1>]
}
// turbulence 0.5
scale _FENSTER_R
samples 10
} // end halo
// halo {
// emitting
// constant
// max_value 1
// spherical_mapping
// colour_map {
// [0 color rgbt <1.0, 1.0, 1.0, 0>]
// [1 color rgbt <0.9, 1.0, 0.8, -1>]
// }
// // turbulence 0.5
// scale _FENSTER_R
// samples 10
// } // end halo
} // end text
#end
@ -270,18 +270,18 @@ texture { _T_K_text
#else
#declare _T_GSK =
texture { _T_K_text
halo {
emitting
cubic
max_value 1
spherical_mapping
colour_map {
[0 color rgbt <1.0, 0.0, 0.0, 0.6>]
[0.2 color rgbt <1.0, 0.2, 0.1, 0.4>]
[1 color rgbt <1.0, 0.4, 0.2, 0.0>]
}
samples 10
} // end halo
// halo {
// emitting
// cubic
// max_value 1
// spherical_mapping
// colour_map {
// [0 color rgbt <1.0, 0.0, 0.0, 0.6>]
// [0.2 color rgbt <1.0, 0.2, 0.1, 0.4>]
// [1 color rgbt <1.0, 0.4, 0.2, 0.0>]
// }
// samples 10
// } // end halo
} // end text
#end