b=length(w);
clear a
start  = 40;
points = 100;

thresh = 0.005;

clusterActive = 0;
thisChunk   = {};
thisCluster = {};
allClusters = {};

for i=1:points
    v = fastconv(w1,4096*2,start+i, 14.7);
    [av1,fv1] = desa(v);
    timeAbove = find( av1>thresh );
    
    above = time_above( av1, 0.005 );
    if above
        if clusterActive
            % add to cluseter
            thisChunk   = { av1( above(1):above(2) ) };
            thisCluster{ length(thisCluster) + 1 } = thisChunk;
            thisChunk   = {};
        else
            % create new cluster
            clusterActive = 1;
        end
    else
        if clusterActive
            % close out cluster
            allClusters{ length(allClusters) + 1 } = thisCluster;
            thisCluster   = {};
            clusterActive = 0;
        else
            % do nothing    
        end
    end
end