#version 3.6;
-// Rendering options : +FN +W80 +H60 +AM1 +A0.05 +R5 +J0 +KFF99
+// Rendering options : +FT +W80 +H60 +AM1 +A0.05 +R5 +J0 +KFF500
+// Produced TGA images converted to MPG with good old (1993) CMPEG tool
+// Conversion : cmpeg.exe -v1 ipb.ctl frames.lst press.mpg
#include "colors.inc"
#include "rad_def.inc"
#end
object{ Objects[ Counter ] }
};
-
- #declare X0=Counter/(Items+1);
+
+ #declare Pause=0.1;
+ #declare X0=(Counter+Pause)/(Items+2);
#declare Y0=0;
- #declare X1=(Counter+1)/(Items+1);
+ #declare X1=(Counter+1)/(Items+2);
#declare Y1=1;
- #declare X2=(Counter+2)/(Items+1);
+ #declare X2=(Counter+2-Pause)/(Items+2);
#declare Y2=0;
- #declare increase=f_line(clock,X0,Y0,X1,Y1);
- #declare decrease=f_line(clock,X1,Y1,X2,Y2);
+ #declare C1=f_line(clock,0,0,3/4,1);
+ #declare C2=(Items+1)/(Items+2);
+ #declare C3=f_line(clock,1/4,0,1,1);
+ #declare C=max(min(C1,C2),C3);
+
+ #declare increase=f_line(C,X0,Y0,X1,Y1);
+ #declare decrease=f_line(C,X1,Y1,X2,Y2);
#declare change=min(increase,decrease);
- #declare level=max(change,0);
+ #declare level=min(max(change,0),1);
object{
Objects[ Counter ]