Code: Select all
InitMovie()
LoadMovie(0, "test.wmv")
LoadMovie(1, "test.wmv")
OpenWindow(0, 100, 150, MovieWidth(0), MovieHeight(0), "PureBasic - Movie")
PlayMovie(0, WindowID(0))
OpenWindow(1, 100, 450, MovieWidth(1), MovieHeight(1), "PureBasic - Movie")
PlayMovie(1, WindowID(1))
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow