che, free, en serio, media pila... funciona perfecto... aca te dejo el ejemplo...
import "mod_flic";
import "mod_map";
import "mod_screen";
import "mod_key";
import "mod_mouse";
import "mod_wm";
import "mod_proc";
import "mod_video";
import "mod_sound";
import "mod_say";
global
Mus_video1;
end
function Rep_Video1()
PRIVATE
flic_id;
music_channel_id;
BEGIN
music_channel_id = play_wav(Mus_video1, 0);
flic_id = fli_start("Video1.flc", 0, 0);
WHILE(!mouse.left && !key(_ESC) && ( ( music_channel_id >= 0 && is_playing_wav(music_channel_id) > 0 ) || music_channel_id < 0 ))
IF (exit_status == 1)
exit("bye", 0);
END
FRAME;
END
fli_end(flic_id);
stop_wav(all_sound);
WHILE(mouse.left || key(_ESC)) frame; end;
END
function Rep_Video2()
PRIVATE
flic_id;
music_channel_id;
BEGIN
music_channel_id = play_wav(Mus_video1, 0);
flic_id = fli_start("Video2.flc", 0, 0);
WHILE(!mouse.left && !key(_ESC) && ( ( music_channel_id >= 0 && is_playing_wav(music_channel_id) > 0 ) || music_channel_id < 0 ))
IF (exit_status == 1)
exit("bye", 0);
END
FRAME;
END
fli_end(flic_id);
WHILE(mouse.left || key(_ESC)) frame; end;
END
begin
Mus_video1 = load_wav("intro.wav");
set_mode(320,240,8);
Rep_Video1();
Rep_Video2();
end
lo probe en wiz y dingux, no probe en caanoo, porque ya no tiene sentido hacerlo si los otros ya funcionan...