[Implemented] length=movielength(filename$)

[spacefractal]

I seen MovieInfo() return wrong fps values (too buggy).

I would like to see an movielength() that is a lots faster, without using the slow LoadMovie(), just doing that.

This one is easy with avi files trouch (but what about wmv and mpeg files?).