camera { location <0,0,-120> direction 1*z look_at 0} 
                                                        
#declare TotalFrames = 600; 
#declare Prefix = "C:\images\femfac"
#declare Frame = (TotalFrames*clock)+1; 
#declare BFrame = (TotalFrames*clock)+2; 
#declare CFrame = (TotalFrames*clock)+3; 
#declare DFrame = (TotalFrames*clock)+4; 
//#declare Frame = floor(Frame);

box {0,<1,1,0>  
texture {
finish {ambient 1 diffuse 1}
pigment { average
pigment_map {
[image_map {
#if (Frame < 99)
#if (Frame < 10)                            
tga concat(Prefix,"00",str(Frame,0,0), ".tga")
#else
tga concat(Prefix,"0",str(Frame,0,0), ".tga")
#end
#else
tga concat(Prefix,str(Frame,0,0), ".tga")
#end
interpolate 2 
}]
[image_map {
#if (Frame < 99)
#if (Frame < 10)                            
tga concat(Prefix,"00",str(Frame,0,0), ".tga")
#else
tga concat(Prefix,"0",str(Frame,0,0), ".tga")
#end
#else
tga concat(Prefix,str(Frame,0,0), ".tga")
#end
interpolate 2 
}]
[image_map {
#if (BFrame < 99)
#if (BFrame < 10)                            
tga concat(Prefix,"00",str(BFrame,0,0), ".tga")
#else
tga concat(Prefix,"0",str(BFrame,0,0), ".tga")
#end
#else
tga concat(Prefix,str(BFrame,0,0), ".tga")
#end
interpolate 2 
}]
[image_map {
#if (CFrame < 99)
#if (CFrame < 10)                            
tga concat(Prefix,"00",str(CFrame,0,0), ".tga")
#else
tga concat(Prefix,"0",str(CFrame,0,0), ".tga")
#end
#else
tga concat(Prefix,str(CFrame,0,0), ".tga")
#end
interpolate 2 
}]
/*[image_map {
#if (DFrame < 100)
#if (DFrame < 10)                            
tga concat(Prefix,"00",str(DFrame,0,0), ".tga")
#else
tga concat(Prefix,"0",str(DFrame,0,0), ".tga")
#end
#else
tga concat(Prefix,str(DFrame,0,0), ".tga")
#end
interpolate 2 
}]*/
}        
}
}
scale <160,120,1>
translate <-80,-60,-.001>
}