%将图片的名称按1，2，3~顺序命名
num = 30;%为影像数量
for i=1:num
    str = strcat(num2str(i), '.bmp');
    A=imread(str);
    [I,map]=gray2ind(A,256);%灰度图像
    %[I,map]=rgb2ind(A,256);%彩图
    if(i==1)
        imwrite(I,map,'movefig.gif','DelayTime',0.1,'LoopCount',Inf) %第一帧
    else
        imwrite(I,map,'movefig.gif','WriteMode','append','DelayTime',0.1) %其余帧
    end
end

转载本文请联系原作者获取授权，同时请注明本文来自吴远昆科学网博客。

链接地址：https://wap.sciencenet.cn/blog-3473451-1346094.html?mobile=1

收藏

分享