MATLAB制作GIF之大鹏展翅

clc;clear all;close all;filename='bird.gif';for i=1:8    str = sprintf('photo1\\photo%d.jpg',i); % 写入文件位置和名称    img = imread(str); % 读取图像    img = imresize(img,[128,128]); % 重新设置图像大小    figure(i)    imshow(img);    set(gcf,'color','w'); % 设置背景为白色    set(gca,'units','pixels','Visible','off');    q=get(gca,'position');    q(1)=0; %设置左边距离值为零    q(2)=0; %设置右边距离值为零    set(gca,'position',q);    frame = getframe(gcf,[1,1,128,128]);%    im = frame2im(frame);%制作gif文件，图像必须是index索引图像    imshow(im);    [I,map] = rgb2ind(im,256); % 将真彩色图像转化为索引图像    if i==1;        imwrite(I,map,filename,'gif','Loopcount',inf,'DelayTime',0.1);%loopcount只是在i==1的时候才有用    else        imwrite(I,map,filename,'gif','WriteMode','append','DelayTime',0.1);%DelayTime用于设置gif文件的播放快慢    endendclose all;

转载自
www.ilovematlab.cn/thread-122348-1-1.html