%% Script Written by Hunter, Dawn, Aaron, and Kirsten
% Purpose: Combines .mat files (our picks from  picker.m were saved as
% Tpicks_jday.mat and need to be combined
% June 24 2009 NMTECH Field Course

%%
clear all; close all; clc
cd '/Users/geop572/Desktop/SEGY/'

x_final = zeros(1,100); 
start_timef_final = zeros(100,4);
% These create matrices filled with zeros to be populated with values below
picklength = 0;
tick = 0;

for i = 161:167
%     if i==164
%         i
%     elseif i==173
%         i
%     elseif i==169
%         i
%     else
% Use commented area for days that were not picked
tt = strcat(['load Tpicks_',num2str(i),'.mat']);
eval([tt])
%     end
  
    x_final(1,tick+1:tick+length(x)) = x;
    for j = 1:length(x)
        start_timef_final(tick+j,:) = start_timef(j,:);
    end
    tick = tick+length(x);
        picklength = length(x)+picklength;
end

X_final(1,1:picklength) = x_final(1,1:picklength);

Start_time_final(1:picklength,:) = start_timef_final(1:picklength,:);
        

save Tpicks_Compiled.mat Start_time_final X_final