//------------------------------------------------------------------------------------ #include "analytical_g.inc" //------------------------------------------------------------------------------------ #declare A = <-0.20, 0.30,-0.90>; #declare B = < 0.50, 0.60,-0.20>; #declare C = < 0.30, 0.00,-0.50>; #declare D = <-0.40, 0.70,-0.50>; //------------------------------------------------------------------------------------ sphere{ A, 0.035 pigment{ color rgb<1,0.2,0> } no_shadow } object{ Show_Yxz( A, 0.01) pigment{ color rgb<1,1,1>*0.7} no_shadow } sphere{ B, 0.035 pigment{ color rgb<1,0.2,0> } no_shadow } object{ Show_Yxz( B, 0.01) pigment{ color rgb<1,1,1>*0.7} no_shadow } sphere{ C, 0.035 pigment{ color rgb<1,0.2,0> } no_shadow } object{ Show_Yxz( C, 0.01) pigment{ color rgb<1,1,1>*0.7} no_shadow } sphere{ D, 0.035 pigment{ color rgb<1,0.2,0> } no_shadow } object{ Show_Yxz( D, 0.01) pigment{ color rgb<1,1,1>*0.7} no_shadow } text { ttf "arial.ttf", "A",0.1,0 scale 0.15 rotate<20,-45,0> translate A+<-0.2,-0.1,-0.1> pigment{ color Red*0.7 } no_shadow} text { ttf "arial.ttf", "B",0.1,0 scale 0.15 rotate<20,-45,0> translate B+< 0.0,0.1,-0.0> pigment{ color Red*0.7 } no_shadow } text { ttf "arial.ttf", "C",0.1,0 scale 0.15 rotate<20,-45,0> translate C+<-0.0,0.2,-0.1> pigment{ color Red*0.7 } no_shadow } text { ttf "arial.ttf", "D",0.1,0 scale 0.15 rotate<20,-45,0> translate D+<-0.0,0.1,-0.1> pigment{ color Red*0.7 } no_shadow } //------------------------------------------------------------------------------------ //------------------------------------------------------------------------------------ // Parallelepiped - box // Parallelepiped by edge vectors V1,V2,V3: // object{ Parallelepiped ( P0,V1,V2,V3, 0.015,0.025,Filled) pigment{ color Green transmit 0.65}} // object{ Parallelepiped ( A, B-A,C-A,D-A, 0.015,0.025, 1) pigment{ color Green transmit 0.65}} // Parallelepiped by corners P1P2P3P4: .... // object{ Parallelepiped_by_Corners ( P0,P1,P2,P3, Rl,Rp, Filled) pigment{ color Green transmit 0.65}} object{ Parallelepiped_by_Corners( A,B,C,D, 0.015, 0.025, 1) pigment{ color Green transmit 0.75}}