Changeset 1606

Timestamp:

08/06/09 14:11:09 (16 years ago)

Author:

Mathieu Morlighem

Message:

improved transient movie by creating an animated gif

Location:

issm/trunk/src/m/classes/public/plot

Files:

• parse_options.m (modified) (1 diff)
• plot_transient_movie.m (modified) (2 diffs)
• plotdoc.m (modified) (1 diff)

issm/trunk/src/m/classes/public/plot/parse_options.m

@@ -130 +130 @@
 end
 
-%transient_movie_fps
-transient_movie_fps_values=findarg(optionstring,'transient_movie_fps');
-if ~isempty(transient_movie_fps_values),
-        options_struct.transient_movie_fps=transient_movie_fps_values.value;
-else
-        options_struct.transient_movie_fps=NaN;
-end
-
-%transient_movie_quality
-transient_movie_quality_values=findarg(optionstring,'transient_movie_quality');
-if ~isempty(transient_movie_quality_values),
-        options_struct.transient_movie_quality=transient_movie_quality_values.value;
-else
-        options_struct.transient_movie_quality=NaN;
+%transient_movie_time
+transient_movie_time_values=findarg(optionstring,'transient_movie_time');
+if ~isempty(transient_movie_time_values),
+        options_struct.transient_movie_time=transient_movie_time_values.value;
+else
+        options_struct.transient_movie_time=2;
 end
 

issm/trunk/src/m/classes/public/plot/plot_transient_movie.m

@@ -30 +30 @@
                 
                 if ~isnan(options_structure.transient_movie_output),
-                        frames(i)=getframe(gcf);
+                        set(gcf,'Renderer','zbuffer','color','white'); %fixes a bug on Mac OS X (not needed in future Matlab version)
+                        if i==1,
+                                %initialize images and frame
+                                frame=getframe(gcf);
+                                [images,map]=rgb2ind(frame.cdata,256,'nodither');
+                                images(1,1,1,length(md.results.transient))=0;
+                        else
+                                frame=getframe(gcf);
+                                images(:,:,1,i) = rgb2ind(frame.cdata,map,'nodither');
+                        end
                 else
                         pause(0.5)
@@ -39 +48 @@
         if ~isnan(options_structure.transient_movie_output),
                 filename=options_structure.transient_movie_output;
-                
-                %fps 
-                if ~isnan(options_structure.transient_movie_fps),
-                        fps=options_structure.transient_movie_fps;
-                else
-                        fps=5;
-                end
-                %quality
-                if ~isnan(options_structure.transient_movie_quality),
-                        quality=options_structure.transient_movie_quality;
-                else
-                        quality=75;
-                end
-                movie2avi(frames,filename,'fps',fps,'quality',quality);
+                imwrite(images,map,filename,'DelayTime',options_structure.transient_movie_time,'LoopCount',inf)
         end
 

issm/trunk/src/m/classes/public/plot/plotdoc.m

@@ -42 +42 @@
 disp('                  - ''transient_movie_field'': field to be displayed when doing  transient_movie data display');
 disp('                  - ''transient_movie_output'': filename if output is desired for movie');
-disp('                  - ''transient_movie_fps'': fps: frames per seconds');
-disp('                  - ''transient_movie_quality'': quality of movie output, from 0 to 100');
+disp('                  - ''transient_movie_time'': time for each image (default 2 seconds)');
 disp('                  - ''thermaltransient_results'': this will display all the time steps of a thermal transient run');
 disp('                  - ''importancefactors'': qmu results');