dan@0: function [eventRoll] = convertEventListToEventRoll(onset,offset,classNames)
dan@0: 
dan@0: 
dan@0: % Initialize
dan@0: eventRoll = zeros(ceil(offset(length(offset))*100),16);
dan@0: eventID = {'alert','clearthroat','cough','doorslam','drawer','keyboard','keys',...
dan@0:     'doorknock','laughter','mouse','pageturn','pendrop','phone','printer','speech','switch'};
dan@0: 
dan@0: 
dan@0: % Fill-in eventRoll
dan@0: for i=1:length(onset)
dan@0:     
dan@0:     pos = strmatch(classNames{i}, eventID);
dan@0:     
dan@0:     eventRoll(floor(onset(i)*100):ceil(offset(i)*100),pos) = 1;
dan@0:     
dan@0: end;