Daniel@0: function varargout = mirplay(a,varargin)
Daniel@0: % mirplay method for mirmidi objects.
Daniel@0: 
Daniel@0: specif.option = struct;
Daniel@0: 
Daniel@0: specif.eachchunk = 'Normal';
Daniel@0: 
Daniel@0: varargout = mirfunction(@mirplay,a,varargin,nargout,specif,@init,@main);
Daniel@0: if nargout == 0
Daniel@0:     varargout = {};
Daniel@0: end
Daniel@0: 
Daniel@0: 
Daniel@0: function [x type] = init(x,option)
Daniel@0: type = '';
Daniel@0: 
Daniel@0: 
Daniel@0: function noargout = main(a,option,postoption)
Daniel@0: if iscell(a)
Daniel@0:     a = a{1};
Daniel@0: end
Daniel@0: d = get(a,'Data');
Daniel@0: n = get(a,'Name');
Daniel@0: for k = 1:length(d)
Daniel@0:     display(['Playing analysis of file: ' n{k}])   
Daniel@0:     playmidi(d{k});
Daniel@0: end
Daniel@0: noargout = {};