// Last edited on 2003-10-21 22:59:35 by stolfi

global_settings { max_trace_level 10 }

// Crystal Castle by Carlos Camolesi 04/09/03
// -------------------------------------------

#declare ctr = <  0.00, 0.00, 1.00 >;
#declare camdir = < 20.00, 10.00, 10.00 >;

camera {
  location  ctr + 0.65*camdir
  right     -1.00*x
  up        0.75*y
  sky       z
  look_at   ctr
} 

light_source {
  < 10.00, 20.00, 30.00 >
  color rgb 1.2*< 1.00, 1.00, 1.00 >
} 

light_source {
  < 10.00, 10.00, 5.00 >
  color rgb 0.6*< 1.00, 1.00, 1.00 >
} 

#include "colors.inc"

background{ color rgb < 1.00, 1.00, 1.00 > } 



#declare tinta_A = 
  texture {
    pigment { color rgb < 0.80, 0.80, 1.00 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare tinta_B = 
  texture {
    pigment { color rgb < 1.00, 0.80, 0.10 > }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
  }

#declare tinta_P =
  texture {
    pigment { color rgb < 0.00, 0.00, 0.00> }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
}


#declare tinta_R =
  texture {
    pigment { color rgb < 1.00, 0.00, 0.00> }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
}



#declare tinta_G =
  texture {
    pigment { color rgb < 0.00, 1.00, 0.00> }
    finish { diffuse 0.5 specular 0.5 roughness 0.005 ambient 0.1 }
}

#declare palace = 
		
	union {	
		cylinder { 
			< 3.00, 0.00, 0.00> < 3.00,0.00, 2.00> 3 
			texture { tinta_A }
 		}
		
		box { 
                    	<-6.00, -3.00, 2.00>
			< 3.00, 3.00, 0.00>
			texture { tinta_A}
		}
	
		sphere {
			<-3.00, 0.00, 2.00> 3
			texture { tinta_A}
		}	

		cylinder {
			<-3.00, -3.00, 0.00> 
			<-3.00, -3.00, 2.00> 3
			texture { tinta_A}
		}
		
		
		cylinder {
			<-3.00, 3.00, 0.00> 
			<-3.00, 3.00, 2.00> 3
			texture {tinta_A}
		}
		
}

#declare gate = 
	
	torus { 2.00 .50 }
	

// Aqui está a cena, finalmente:

palace