// Persistence of Vision Ray Tracer Scene Description File
// File: .pov
// Vers: 3.5
// Desc:  serpentin pour lightbeam
// Date: 20h09 Jeudi 16 Décembre 2004
// Auth: É.chap.
#include "colors.inc"
#include "textures.inc"
#include "skies.inc" 
#include "glass.inc"   
//------------------------------
#declare use_flocon=0;//ajout
//------------------------------
global_settings{charset utf8 }//ajout
//------------------------------
camera {
  location  <6,10,-25>
  look_at   <6,0,0>
  right     x*image_width/image_height     
  
}         

light_source { <10,42,-36> color White scale 2 }  
light_source { <0,-7,-1> color White scale 2 }  

sphere { 0,400 texture { T_Cloud2 scale 100} hollow} 
sphere { 0,405 texture { Silver_Texture scale 100} hollow}      
box { <-100,-10,-100>,<100,-15,100> texture { pigment { Blue}} }

#declare t1=texture{ T_Glass2 normal {bumps 0.5 scale 20}  }  

#if(use_flocon)//ajout
#declare flocon=
difference {                                                           
height_field { png "C:\Documents and Settings\L.TEST\Bureau\dessins\mes oeuvres\flocon3.png"
     scale <50,10,50> texture { T_Glass3}}
     box { 0,<55,2,55> texture {t1}}   
     }            
#end

//sphere { <25,5,25>,5 texture { pigment { checker rgbf<1,0,0,0.8>, rgbf<0,1,0,0.9> } scale 3} finish { phong_size 25} }         

#declare MyTexte1=
union{

#declare Jstr="JOYEUX";
#declare Pol="Times.ttf"//change
#declare i=1;
#while (i<7)
 #declare SU=substr(Jstr,i,1);
 #declare j=1;
 #while (j<1.5)
   text { ttf Pol, SU, 0.1,0 texture { Gold_Texture} scale j*1.5 translate < i*1.3-j/4,-j/2,j>}
   #declare j=j+0.05;
   #end
 #declare i=i+1;     
 #end }
 
#declare MyTexte2=
union{
#declare trema=chr(203);//ajout
#declare Jstr=concat("NO",trema,"L")//ajout
#declare Pol="Times.ttf"//change
#declare i=1;
#while (i<5)
 #declare SU=substr(Jstr,i,1);
 #declare j=1;
 #while (j<1.5)
   text { ttf Pol, SU, 0.1,0 texture { Gold_Texture} scale j*1.5 translate < i*1.5-j/4,-j/2,j>}
   #declare j=j+0.01;
   #end
 #declare i=i+1;     
 #end } 
 
#if(use_flocon)object { flocon rotate x*-15  scale 0.75 translate <-14,-10,-9> }#end
//object { balle}
object { MyTexte1 rotate x*25 scale 3 translate <-7,0,5>}  
object { MyTexte2 rotate x*25 scale 3 translate <-7,0,-10>}