Changeset 804 for trunk/src/series/particle_tracking.m

Timestamp:

Jul 30, 2014, 8:38:17 PM (10 years ago)

Author:

sommeria

Message:

float tracking updated

File:

• trunk/src/series/particle_tracking.m (modified) (4 diffs)

trunk/src/series/particle_tracking.m

@@ -78 +78 @@
     end
     % parameters specific to the function 'particle_tracking'
-%     Par.Nblock=[];%size of image subblocks for background determination, =[]: no sublock
-%     Par.ThreshLum=-2000;% luminosity threshold for particle detection, < 0 for black particles, >0 for white particles
-%   ParamOut.ActionInput=Par;
+    Par.Nblock=10;%size of image subblocks for background determination, =[]: no sublock
+    Par.ThreshLum=70;% luminosity threshold for particle detection, < 0 for black particles, >0 for white particles
+  ParamOut.ActionInput=Par;
     return
 end
@@ -92 +92 @@
     checkrun=0;
 end
+hseries=findobj(allchild(0),'Tag','series');
+RUNHandle=findobj(hseries,'Tag','RUN');%handle of RUN button in GUI series
+WaitbarHandle=findobj(hseries,'Tag','Waitbar');%handle of waitbar in GUI series
 
 %% define the directory for result file
@@ -137 +140 @@
 %%%%%%%%%%%%   SPECIFIC PART (to edit) %%%%%%%%%%%%
 %filter for particle center of mass(luminosity)
-%Nblock=Param.ActionInput.Nblock;
-%ThreshLum=Param.ActionInput.ThreshLum;% luminosity threshold for particle detection, < 0 for black particles, >0 for white particles
-AbsThreshold=30; %threshold below which a pixel is considered belonging to a float
+Nblock=Param.ActionInput.Nblock;
+ThreshLum=Param.ActionInput.ThreshLum;% luminosity threshold for particle detection, < 0 for black particles, >0 for white particles
+%AbsThreshold=30; %threshold below which a pixel is considered belonging to a float
 %
 hh=ones(5,5);
@@ -170 +173 @@
 for ifile=1:nbfield
     if checkrun
-        if strcmp(get(Param.RUNHandle,'BusyAction'),'queue')
-            update_waitbar(Param.WaitbarHandle,ifile/nbfield)
-        else
-            break% leave the loop if the STOP button is activated on the GUI series
+        update_waitbar(WaitbarHandle,ifile/nbfield)
+        if ~isempty(RUNHandle) &&ishandle(RUNHandle) && ~strcmp(get(RUNHandle,'BusyAction'),'queue')
+            disp('program stopped by user')
+            return
         end
     end
+    j1=1;
     if ~isempty(j1_series)&&~isequal(j1_series,{[]})
         j1=j1_series{1}(ifile);