matlab人机交互界面生成GIF图片

1、%以下代码为在matlab2017a版本下编写的代码%该代码运行后会出现人机交互界面，用于从用户指定的文件夹中取出图片并生成相应的GIF动图%具体操作：将该文件中的内容拷贝后保存为.txt文件，然后修改该文件的后缀名为.m文件。打开matlab，并在matlab中打开该.m文件。点击运行后会出现人机交互界面。在人机交互界面中选择图片所在的路径，并设定其他相应的参数，最后点击“生成GIF图片”按钮即可在该.m文件所在路径下生成相应的GIF动图。%人机交互界面截图如下：%functionvarargout=gen_gif(varargin)gui_Singleton=1;gui_State=str

2、uct(gui_Name,mfilename,.gui_Singleton,gui_Singleton,.gui_OpeningFcn,gen_gif_OpeningFcn,.gui_OutputFcn,gen_gif_OutputFcn,.gui_LayoutFcn,.gui_Callback,);ifnargin&ischar(varargin1)gui_State.gui_Callback=str2func(varargin1);endifnargoutvarargout1:nargout=gui_mainfcn(gui_State,varargin:);elsegui_mainfcn(

3、gui_State,varargin:);endfunctiongen_gif_OpeningFcn(hObject,eventdata,handles,varargin)handles.output=hObject;guidata(hObject,handles);functionvarargout=gen_gif_OutputFcn(hObject,eventdata,handles)varargout1=handles.output;functiongen_gif_Callback(hObject,eventdata,handles)height=get(handles.height,S

4、tring);height=str2double(height);delaytime=get(handles.delaytime,String);delaytime=str2double(delaytime);maxnum=get(handles.maxnum,String);maxnum=str2double(maxnum);path_imgs=get(handles.path_imgs,String);ifisempty(path_imgs)msgbox(请先选择一个含有图片的文件夹！,Tip,modal);elsegen_mygif(path_imgs,height,delaytime,

5、maxnum);endfunctionpick_path_Callback(hObject,eventdata,handles)path_imgs=uigetdir;set(handles.path_imgs,String,path_imgs);functionheight_Callback(hObject,eventdata,handles)functionheight_CreateFcn(hObject,eventdata,handles)ifispc&isequal(get(hObject,BackgroundColor),get(0,defaultUicontrolBackground

6、Color)set(hObject,BackgroundColor,white);endfunctiondelaytime_CreateFcn(hObject,eventdata,handles)ifispc&isequal(get(hObject,BackgroundColor),get(0,defaultUicontrolBackgroundColor)set(hObject,BackgroundColor,white);endfunctionmaxnum_CreateFcn(hObject,eventdata,handles)ifispc&isequal(get(hObject,Back

7、groundColor),get(0,defaultUicontrolBackgroundColor)set(hObject,BackgroundColor,white);endfunctionpath_imgs_CreateFcn(hObject,eventdata,handles)ifispc&isequal(get(hObject,BackgroundColor),get(0,defaultUicontrolBackgroundColor)set(hObject,BackgroundColor,white);endfunctiontxt_height_CreateFcn(hObject,

8、eventdata,handles)ifispc&isequal(get(hObject,BackgroundColor),get(0,defaultUicontrolBackgroundColor)set(hObject,BackgroundColor,white);endfunctiondelaytime_Callback(hObject,eventdata,handles)functiontxt_delaytime_CreateFcn(hObject,eventdata,handles)ifispc&isequal(get(hObject,BackgroundColor),get(0,d

9、efaultUicontrolBackgroundColor)set(hObject,BackgroundColor,white);endfunctionmaxnum_Callback(hObject,eventdata,handles)functiontxt_maxnum_CreateFcn(hObject,eventdata,handles)ifispc&isequal(get(hObject,BackgroundColor),get(0,defaultUicontrolBackgroundColor)set(hObject,BackgroundColor,white);end%产生gif

10、文件functiongen_mygif(path_imgs,img_H,time_delay,max_numImgs)dbImds=imageDatastore(path_imgs,IncludeSubfolders,true,LabelSource,foldernames);num_img=numel(dbImds.Files);num_img=min(num_img,max_numImgs);ifnum_img=0msgbox(所选文件夹内不含任何图片，请重新选择图片路径！,Tip,modal);return;endI=readimage(dbImds,1);I_tmp=uint8(zer

11、os(size(I,2),size(I,1),size(I,3);I_tmp(:,:,1)=I(:,:,1);I_tmp(:,:,2)=I(:,:,2);I_tmp(:,:,3)=I(:,:,3);I=I_tmp;s1,s2,=size(I);ifimg_H=0,img_H=s1;end%为0表示使用原始图像长宽数据,suffix=fileparts(path_imgs);name_gif=sprintf(%s_%d_%.2f_%d.gif,suffix,img_H,time_delay,num_img);img_W=floor(img_H*(s2/s1);fori=1:num_imgI=readimage(dbImds,i);I_tmp=uint8(zeros(size(I,2),size(I,1),size(I,3);I_tmp(:,:,1)=I(:,:,1);I_tmp(:,:,2)=I(:,:,2);I_tmp(:,:,3)=I(:,:,3);I=I_tmp;I=imresize(I,img_H,img_W);I2,map=rgb2ind(I,256);ifi=1imwrite(I2,map,name_gif,gif,WriteMode,append