// Persistence of Vision Ray Tracer Scene Description File
// File: ?.pov
// Vers: 3.5
// Desc: Basic Scene Example
// Date: mm/dd/yy
// Auth: ?
//

#version 3.5;

#include "colors.inc"

#declare ScaleFactor=clock*4000000;   // 2500000+

camera {
  location  0
  direction 1.5*z
  right     x*image_width/image_height
  look_at   <0.0, 0.0,  1.0>
}

#declare TestObject = sphere {  4*z   1   }
//#declare TestObject = box {  4*z-.5  4*z+.5  }
//#declare TestObject = sphere { 0 1 scale <1,.5,1> translate 4*z  }

object {
        TestObject
        texture {
                finish {ambient 1 }
                pigment { red 1 }
        }  
        scale ScaleFactor
}

// create a TrueType text shape
text {
  ttf
  "crystal.ttf",
  concat("Scale: ",str(ScaleFactor,7,0) )
  .1,
  0  
  scale .05
  translate <-.2,-.15,.5>
  texture {
                finish {ambient 1 }
                pigment { green 1 }
  }
}

// ----------------------------------------