// Last edited on DATE TIME by USER
// Processed by remove-cam-lights

 

 

 

 

background{ color rgb < 0.75, 0.80, 0.85 > }

#declare raio = 2.000;

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

#declare tinta_AA =
  texture {
    pigment { color rgb < 0.50, 0.50, 0.50 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

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

#declare tinta_C =
  texture {
    pigment { color rgb < 0.30, 0.30, 0.30 > }
    finish { diffuse 0.8 specular 0.1 roughness 0.005 ambient 0.1 }
  }

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

#declare tinta_especial = pigment{
 bozo
 color_map{
    [0.0 color rgb<1.0, 1.0, 0.0>]
    [0.5 color rgb<0.0, 0.0, 1.0>]
    }
 scale 0.2
}
  

#declare tinta_especial_esfera = pigment{
 bozo
 color_map{
    [0.3 color rgbft<1.0, 0.0, 0.0, 0.5, 0.5>]
    [0.5 color rgbft<1.0, 0.0, 1.0, 0.5, 0.5>]
    [0.2 color rgbft<0.0, 1.0, 0.0, 0.5, 0.5>]
    }
 scale 0.2
}

#declare texto1 = text{
    ttf "verdana.ttf"
    "oloco"
    0.3,1
    texture { tinta_C }
}

#declare esfera = sphere {
    < 0.0, 0.0, 0.00 >, 4.0
    texture { tinta_especial_esfera }
  }

#macro letra(l, tx, ty, tz, rx, ry, rz)
object { 
 text{
     ttf "verdana.ttf"
     l
     0.3,1
     rotate <rx, ry, rz>
     translate <tx, ty, tz>
     texture { tinta_especial }
 }
      }
#end

#macro palavra(pa, cx, cy, r)
    union{    
 #declare sizepa = strlen(pa);
 #declare i = sizepa;
 #while (i > 0)
   #declare i = i - 1;
   #declare xTex= cos((2*pi/sizepa) * i) * r + cx;
   #declare yTex = sin((2*pi/sizepa) * i) * r + cy;
   #declare zTex = 0;
   #declare letraatual = substr(pa, i, 1)
   letra (letraatual, xTex, yTex, zTex, 90,0,90+((360/sizepa) * i))
 #end
   }
#end

#macro volta(cx, cy, r, quant, raiomini)
    union{    
 #declare i = sizepa;
 #while (i > 0)
   #declare i = i - 1;
   #declare xS= cos((2*pi/quant) * i) * r + cx;
   #declare zS = sin((2*pi/quant) * i) * r + cy;
   #declare yS = 0;
   sphere {
    < xS, yS, zS >, raiomini
    texture { tinta_A }
  }
 #end
   }
#end

#declare chao = plane { 
z,0 
  texture { 
    pigment { 
      checker rgb<0.9,0.9,0.9> filter 0.8, rgb <0.7,0.7,0.7> filter 0.8
    } finish {
 diffuse 0.5 ambient 0.5
      }
  } 
}
union
{
difference{
  object { esfera }
 
  palavra("               ->Paulo<-  ", 0, 0, 3.8)
}
object { chao }
volta(0,0,4,10, 1)
}

// Original camera parameters:
// #local cam_ctr = <0,0,0>
// #local cam_vec = <2.00,-15.00,2.00>
// #local cam_sky = z

#include "camlight.inc"
camlight(<0,0,0>,<10,10,10>,20.0,z,1.0)