Belajar bikin animasi dengan MATLAB, part 1

	clc;
	figure('menubar', 'none', 'resize' , 'off');
	x = dir('.');
	test = cell(length(dir)) ;
	iterasi = 0;
	for i=1:length(x),
	a = x(i);
	a = a.name;
	a =regexp(a, '\.', 'split');
	if(iscell(a(end)) && length(a) == 2)
	n =a(end);
	m = a(1);
	n = n{1};
	m = m{1};
	% cari hanya file yang berekstensi 'jpg' dan 'png'
	cc = regexp(m,'[a-z, A-Z, 0-9]', 'match');
	dd = regexp(n,'[jpg, png]','match');
	if(~isempty(cc) && ~isempty(dd))
	cc = strcat(m,'.', n);
	iterasi = iterasi+1;
	test{iterasi} = imread(cc);
	end
	end
	end
	panel1 = uipanel('units', 'pix', 'position', [20,20, 525,380]);
	axes('parent', panel1);
	i = 1;
	while 1
	im = image(test{i});
	pause(2);
	% salah satu cara biar MATLAB g crash. karena di MATLAb thread itu
	% berjalan dengan cara yang aneh dan tidak diduga-duga. saya kan sudah
	% bilang MATLAB itu jelek, :D
	% kalo anda exit figure, sementara loop ini masih jalan, MATLAB akan
	% crash, dan kalo anda gunakan 'requestclosefcn', itu akan membuat
	% crash.
	if (ishandle(im))
	delete(im);
	else
	break;
	end
	i = i+1;
	if i == iterasi+1
	i=1;
	end
	end
	disp('program selesai');

view raw animasi.m hosted with ❤ by GitHub

download file lengkap:https://docs.google.com/file/d/0B1irLqfPwjq0QXlJMk14dkk5N1U/edit?usp=sharing