set -eu

#   --------------------------------------------------------------
visual_sleep ()
{
msg="$1"
nbre="$2"

# echo $msg ; echo $nbre

for foo in $(seq 0 $nbre) ; do
	local bar=$(( $nbre - $foo ))
	printf "========  %-20s  %3d\r" "$msg" $bar
	sleep 1
done
echo
}
#   --------------------------------------------------------------
#		un essai qui semble un echec.
#
ralentisseur ()
{
temps=$1

load=$(awk '{print int($1)}' < /proc/loadavg)
# echo "   load is $load" | tee -a WS/log
if [ $load -gt 10 ] ; then
	attente=$(( $temps + ($RANDOM % 90) ))
	echo "ralentir $0 $SEQNAME $attente"  # | tee -a WS/log
	sleep $attente
fi
}
#   --------------------------------------------------------------

ff_encodage()
{
SRCDIR="$1"
FILMNAME="$2"

echo "Encoding $SRCDIR to $FILMNAME" | tee -a WS/log
ffmpeg  -nostdin                                        	\
        -y -r 30 -f image2 -i frames/${SRCDIR}/%05d.png		\
        -metadata artist='--[ tTh ]--'                  	\
        -metadata title='-- HexaCone --'    			\
        -c:v libx264                                    	\
        -pix_fmt yuv420p                                	\
        -tune film                                      	\
        $FILMNAME

}
#   --------------------------------------------------------------
#
#		celui-ci n'est pas terminé !
#
mp_encodage()
{
#
#	NOT WORKING !
#
mencoder	'mf://frames/*.png'		\
		-mf				\
		fps=24				\
		-ovc lavc			\
		-lavcopts vcodec=mpeg4		\
		-o output.avi
}

#   --------------------------------------------------------------
#   --------------------------------------------------------------