// Ivan Francisco Coutinho Costa
// RA 001833
// MC930 - TP 2 - O Virus da Inflacao
// Data 11/03/2003


#include "colors.inc"
#include "textures.inc"
#include "stones1.inc"

background { color Black }

camera {
    location <.3, .8,-2>
    look_at <0,0,0>
 }

light_source { <10, 20, -10> color White }


plane {
  y, -1.0
  texture { White_Wood } // pigment { color Salmon }
}

#declare virus_blob =
blob {
    threshold .65

    sphere { <0.0, 0.0, 0.0>, .8, 1 texture { T_Grnt9 } } //pigment {Flesh} } // corpo do virus
    sphere { <-0.5, 0, -0.5>, .2, 1 pigment {Yellow} } 
    sphere { <0.5, 0, -0.5>, .2, 1 pigment {Green} }  
    sphere { <-0.5, 0, 0.5>, .2, 1 pigment { Blue} }
    sphere { <0.5, 0, 0.5>, .2, 1 pigment {Red} }
    // sphere { <0.0, 0.0, -0.5>, .2, -1 }             // boca do virus
    cylinder { <0.0, 0.0, 0.0>, <-0.5, 0, -0.5>, .1, .5}   // bracos
    cylinder { <0.0, 0.0, 0.0>, <0.5, 0, -0.5>, .1, .5}		
    cylinder { <0.0, 0.0, 0.0>, <-0.5, 0, 0.5>, .1, .5}	
    cylinder { <0.0, 0.0, 0.0>, <0.5, 0, 0.5>, .1, .5}
    
    finish { phong 1 }
  }

#declare boca =
    cone { 
       <0.0, 0.0, 0.0>, 0.0, <0.0, 0.0, -0.5>, 0.2 
       pigment { color Gray }
    }


difference {
   object { virus_blob }
   object { boca }
}