maybe try this:
graphics3d,800,600 Global movie1 Global file1$="nameofyourmovie.avi" movie1=OpenMovie( file1$ ) If movie1=0 RuntimeError "Unable to open movie file" while not keydown(1) If (MoviePlaying(movie1)=0) Then CloseMovie( movie1 ) movie1=OpenMovie( file1$ ) endif DrawMovie movie1,36,26,175,150 Flip False Wend CloseMovie movie End