function GenerateFilm
global Frames Settings
aviobj = avifile(Settings.AviOut,'compression','None','fps',Settings.FPS,...
'Videoname',Settings.Title,'Quality',Settings.Quality);
Scene = {'1',num2str(size(Frames,2))};
Scene = inputdlg({'Start frame','End frame'},'Avi file output',[1,32; 1,32],Scene);
Scene = str2num(char(Scene));
for i = Scene(1):Scene(2)
aviobj = addframe(aviobj,Frames(i).RGB);
end
aviobj = close(aviobj);