学习用matlab制作GIF动画（png转gif）

pulbieup

目标：将三幅图（png格式）制作成GIF

准备材料：三幅png格式的图
$ B( z$ g6 L. ]- ~

4 C) A; c; e) T$ n! S4 V
; d* ~9 J/ W( u4 ~gif展现一个动态由悲到喜的过程

实现代码：

`%预定义变量
  T9 J5 y9 B! Z2 `2 n- }, vPicture_save = {0};                                                        
%初始化提高效率
3 U- k+ v* U" X7 Kfilename = 'myGIF.gif';
% |2 S2 J% A+ ^1 a+ T7 B& n6 @5 n

4 P  R$ X2 c7 S) e' Q  Y%图像获取，图像类型转换
[P1, map]  = imread('1.png');     
picture1 = ind2rgb(P1,map);                                                
  U/ b  D# v  r%索引图必须转换为真彩图,否则颜色不对
[P2, map]  = imread('2.png');
picture2 = ind2rgb(P2,map);
0 q" |9 ?: Q; k- `+ {0 }[P3, map]  = imread('3.png');
picture3 = ind2rgb(P3,map);

' r8 u8 F7 N  |2 U/ uarray = [{picture1}, {picture2} ,{picture3}];                              
%方便循环  

%保留帧数据
for idx = 1:3
8 ^8 x  y2 S' T2 z) u9 I    figure(idx)
    imshow(array{idx});                                                   
    %索引图转换为真彩图 ，{}访问数组里面的类型 （）访问元胞类型     
2 @- j8 a3 p  v5 v    Picture_save{idx} = frame2im(getframe(idx));                           
    %获取figure（idx）展示的效果，将其以图片数据保存
$ ?# a" O1 y1 }    close all
end

% `$ d9 Y1 T# m%制作GIF
1 m6 I: ~. q% C3 W; t  W  e5 a. L%有个bug 在第一次播放的时候没有中间的那一帧，之后又有了
) w  n. a* j! ]6 U  j0 ?6 q/ n- pfor idx = 1:3
    [A,map] = rgb2ind(Picture_save{idx},256);                              
" Y( k8 F! g8 ^0 ^$ j$ n( V; F    %imwrite不能显示三维图像，所以要进行转换
    if idx == 1
7 {9 L7 ~1 S( ^3 J: W        imwrite(A,map,filename,'gif','LoopCount',Inf,'DelayTime',0.5);   
; _5 r& s- a" O         %Inf 无限循环
    else
' j% E; j9 ^5 z6 D" \        imwrite(A,map,filename,'gif','WriteMode','append','DelayTime',0.5);
    end
* }9 C  ^# K5 i. [$ k6 Bend

$ R; y% X& {9 f# F; |close all`
3 @# _: f. {, Y% I' K4 ~
  }8 v1 q/ @( r- e. H
8 h# F; W" @& d, \# k( m以下是代码的截图
1 Z, p( X' b$ W* a
# A+ N9 Z& R3 g

6 c3 h+ b* y4 T4 T* ~6 X当然了，还有更简单的办法：
1 u# y6 {$ T! N' z* r" U
for idx = 1:3
5 Y. N- z% t1 }2 O    [A,map] = imread(strcat(num2str(idx),'.PNG'));                              %imwrite不能显示三维图像，所以要进行转换
    if idx == 1
$ Y- S3 \" N( G! @        imwrite(A,map,'new.gif','LoopCount',Inf,'DelayTime',0.5);               %Inf 无限循环
    else
3 g0 i5 b9 h+ I- Q        imwrite(A,map,'new.gif','WriteMode','append','DelayTime',0.8);
    end
end
% U& \2 T4 a+ Z+ z; d

3 |$ p5 w2 k9 @7 M; X  f关于代码有遇到别的问题，或者有改进意见，欢迎评论。
# x* N4 K2 t+ [  F* {: j
6 p$ K  g% n* g; c1 N) r. _在实现过程中我也遇到了很多问题，有些注释在代码中，有些遗漏了，希望可以在讨论中得到补充。

0 ]  s- n9 w# U  ?% Y
% \" q9 j* Y& U

yin123

用matlab制作GIF动画