function sucrose_peaks=sucrose_waveform_plotter(events)

clf
clr=colormap(jet(size(events,1)));
sucrose_peaks=[];
for event=1:size(events,1),
    %if isempty(find(event==[9 24]))
    z=events(event,:);
    z=z-mean(z(1:10));
    sucrose_peaks=[sucrose_peaks,min(z)];
    z=movingwindowsmooth(z,10);
    plot(z,'color',clr(event,:),'linewidth',2),hold on
    %xval=ceil(rand*10);text([xval:10:length(z)],z([xval:10:length(z)]),num2str(event))
    %end
end