//------------------ Fig.14.10-1a Tetrahedron
#version 3.7
#include "colors.inc"
#include "textures.inc"
#include "Woods.inc"
#include "stones.inc"
#include "glass.inc"
#include "metals.inc"
#include "skies.inc"
#include "stars.inc"
#include "chars.inc"
#include "shapes.inc"
#include "shapes2.inc"
#include "shapes3.inc"
global_settings
{ assumed_gamma 2.2 }
//-----------------------------camera - light
camera{
location <0,-14,8>
sky <0, 0, 1>
right <-image_width/image_height,0,0>
look_at <0, 0, 0>
angle 25
}
light_source{ <300,-400,500> color rgb 1.5}
//=================================== Tetrahedron
#declare T1=texture{pigment{Coral*1.2 }
normal{agate 0.3 scale 0.8} }
#declare T2=texture{T_Grnt25 finish{reflection 0.3}
scale 0.8}
object{
Tetrahedron
texture{T1}
rotate x*90 scale 0.6
rotate z*20 translate <-1.5,-0.5,0>
}
object{
Tetrahedron
texture{T2}
rotate x*90 scale 0.8
rotate y*15 translate <1.5,1,0>
}
//---------------------------------------floor
#declare CA1=rgb<0.85,0.85,0.8>;
#declare CA2=rgb<0.85,0.85,0.8>*1.2;
plane{ z, -1.01
pigment{ checker color CA1, color CA2 scale 0.3 }
}
//----------------sky
sky_sphere{
pigment{
wrinkles
color_map{
[ 0.3 SkyBlue]
[ 0.9 White ]
}
scale <1, 0.2, 0.2>
}
}
//------------------ Fig.14.10-1b Tetrahedron
#version 3.7
#include "colors.inc"
#include "textures.inc"
#include "Woods.inc"
#include "stones.inc"
#include "glass.inc"
#include "metals.inc"
#include "skies.inc"
#include "stars.inc"
#include "chars.inc"
#include "shapes.inc"
#include "shapes2.inc"
#include "shapes3.inc"
global_settings
{ assumed_gamma 2.2 }
//-----------------------------camera - light
camera{
location <60,60,10>
sky <0, 0, 1>
right <-image_width/image_height,0,0>
look_at <0, 0, 1.2>
angle 6.8
}
light_source{ <200,400,300> color rgb 1.5}
background {color rgb<1,1,0.9>*0.9 }
//=================================== Tetrahedron
object{
Tetrahedron
pigment{rgbf<1,1,0,0.3>}
}
//--------------------------------coordinate axis
#declare SX=5;
#declare SY=4;
#declare SZ=4;
#declare SC=0.8;
union{
union{
cylinder{x*-5,x*(SX-0.5),0.05}
cone{x*(SX-0.5),0.1,x*(SX+0.1),0}
text{ttf "cyrvetic.ttf","X",0.1,0
scale SC
rotate<90,0,-30>
translate <SX+0.4, 0, -0.5>
}
pigment{color rgb<0.2,1,0.2>}
}
union{
cylinder{y*-5,y*(SY+0.5),0.05}
cone{y*(SY+0.5),0.1,y*(SY+1.1),0}
text{ttf "cyrvetic.ttf","Y",0.1,0
scale SC
rotate<90,0,-30>
translate <-0.1,SY+2,-0.5>
}
pigment{color rgb<0.2,0.2,1.0>}
}
union{
cylinder{z*-5,z*(SZ-0.5),0.05}
cone{z*(SZ-0.5),0.1,z*(SZ+0.1),0}
text{ttf "cyrvetic.ttf","Z",0.1,0
scale SC
rotate<90,0,120>
translate <-0.2,0.2,SZ-0.2>
}
pigment{color rgb<1.0,0.2,0.2>}
}
}