function GC_Evoked(Data,outfile,Npoint,Order,Window_Size,Step_Size)
Number_Chans  = size(Data,1);
Total_Times = size(Data,2);
Ntrial=Total_Times/Npoint;
Data=reshape(Data,Number_Chans,Npoint,Ntrial);
j=1
for i=1:Step_Size:(Npoint-Window_Size+1)  
    
    Window_Data = reshape(Data(:,i:i+Window_Size-1,:),Number_Chans,Window_Size*Ntrial);
    tic
    Data_gc(j) = regress_window(Window_Data,Order,Window_Size); %#ok<NASGU>
    toc
   
   j=j+1
end
eval(['save ',outfile,'_O',int2str(Order),'_W',int2str(Window_Size),'_S',int2str(Step_Size),' Data_gc;']);
clear Data_gc;
clear Data