pokoj Milosz

#include  "colors.inc"
#include  "woods.inc"
#include  "textures.inc"


camera    {
location  <-4,3,0>
look_at <-7,1,10>
}


light_source {
<-5,3,5>   *1
White
}
light_source {
<-2,3,-9>
White     *0.7
}
light_source {
<-5.,2,-2>
White     *0.2
}


plane {
y,0
texture {T_Wood15}
}
plane {
x,-10
pigment {color LightBlue}
}
plane {
z,10
pigment {color LightBlue}
}
plane {
y,5
pigment {color LightBlue}
}

plane {
x,-1.3
pigment {color LightBlue}
}



# declare regal =
union
{
box {
<-3,0,1.75>
<0,3,1.5>
pigment {DMFWood5}

}
box {
<0,0,1.5>
<0,3,1.3>
pigment {DMFWood5}
}
box {
<-3,0,1.5>
<-3,3,1.3>
pigment {DMFWood5}
}
box {
<-3,3,1.5>
<0,3.1,1.3>
pigment {DMFWood5}
}
 box {
<-3,2.5,1.5>
<0,2.6,1.3>
pigment {DMFWood5}
}
box {
<-3,2,1.5>
<0,2.1,1.3>
pigment {DMFWood5}
}
box {
<-3,1.5,1.5>
<0,1.6,1.3>
pigment {DMFWood5}
}
box {
<-3,1,1.5>
<0,1.1,1.3>
pigment {DMFWood5}
}

box {
<-3,0.5,1.5>
<0,0.6,1.3>
pigment {DMFWood5}
}}




# declare lampka12 =
union
{
cone{
<0,3,-5.5> 0.48
<0,4,-5.5> 0.21
open
texture {Silver_Metal}
}
cone{
<0,3,-5.5> 0.05
<0,0,-5.5> 0.05
open
texture {Silver_Metal}
}

cylinder
{
<0,0,-5.5>
<0,1.134,-5.5>, 0.5
texture {Silver_Metal}
}
}



# declare kanapa =

difference {

box {
<5,-1,-5.8>
<3,2.3,-3>
pigment {White_Marble}
}
box {
<4.6,1.8,-5.5 >
<-4.6,2.4,-3.3>
pigment {White_Marble}
}
}



# declare dywan =
 union
{
cylinder
{
<-8,0,5.5>,
<-8,0.00023,5.5>, 1.2
pigment { Blue_Agate}
}
}



# declare lozko =
 union
{
box {
<-9.8,0,9>
<-7,0.5,5>
pigment {White_Marble}
}
box {
<-9.8,0.5,9>
<-7,0.51,5>
pigment {color Violet}
}
box {
<-9.7,0.51,7>
<-7.1,0.5623,5.1>
pigment {color BlueViolet}
}
box {
<-9.5,0.51,8.9>
<-7.3,0.5923,8>
pigment {color Plum}
}
}




box{
<-10,1.7,5.1>
<-9.99,3.7,9>
pigment {Blue_Sky}
}

box{
<-9,1.7,10>
<-5,3.7,9.99>
pigment {Blue_Sky}
}




# declare stol =
union
{
cylinder
{
<-7,1.4,3>, <-7,1.5,3>, 0.9
texture { PinkAlabaster}
}
cylinder
{
<-7,0,3>, <-7,1.5,3>, 0.07
texture {Silver_Metal}
}

cylinder
{
<-7,0,3>,
<-7,0.05,3>, 0.5
texture {Silver_Metal}
}
}




object {stol  scale 0.82 translate <-2.2,0,1.4>}
object {regal scale 0.8 translate <-2,0,8.2> }
object {lampka12  scale 0.9 translate <-5.5,-1,13.6>}
object {kanapa  scale 0.9 translate <-6.5,-1,11>}
object {dywan scale 1 translate <2.7,0,0> }
object {lozko}