MPlayerTcl allows to play movie file in linux tcl/tk application.
MPlayerTcl uses MPlayer, to load on : http://mplayerhq.hu
Example tcl/tk script code, using MPlayerTcl : 
#!/usr/bin/wish -f
package require MPlayerTcl
media .m -dvd 1 -width 160
-height 120 -scale 3
pack .m -expand yes -fill both
See Also : proptest.tcl include in package.
Movie command description, on media.html
Convert a XanimTcl
script to MPLayerTcl script is easy, see here
Download MPlayerTcl package :
mplayertcl-rh8pre.tgz by Leonid
Install MPlayerTcl package :
# tar -xvzf mplayertcl-X.X.X.tar.gz
# cd mplayertcl/generic
# make ; make install
Bugs, please report bugs on :
cyril.barbato@voila.fr
THANKS TO :
Sylvain Galliano idea
Leonid contribution
See Also :
http://xanimtcl.sourceforge.net
http://hem.fyristorg.com/matben/qt/