Changeset 239 for trunk

Timestamp:

Apr 18, 2011, 10:55:57 PM (14 years ago)

Author:

sommeria

Message:

sub_background improved (memory allocation) and calc_background created (global backgound)

Location:

trunk/src/series

Files:

• calc_background.m (added)
• sub_background.m (modified) (9 diffs)

trunk/src/series/sub_background.m

@@ -129 +129 @@
 try
     mkdir([dir_images term]);
-catch
-    errormsg=lasterr
-            msgbox_uvmat('ERROR',errormsg);
+catch ME
+            msgbox_uvmat('ERROR',ME.message);
             return
 end
@@ -142 +141 @@
 
 %% set processing parameters
-prompt = {'Number of images for the sliding background';'The number of positions (laser slices)';'volume scan mode (Yes/No)';...
+prompt = {'Number of images for the sliding background (MUST FIT IN COMPUETER MEMORY)';'The number of positions (laser slices)';'volume scan mode (Yes/No)';...
         'the luminosity rank chosen to define the background (0.1=for dense particle seeding, 0.5 (median) for sparse particles'};
 dlg_title = ['get (slice by slice) a sliding background and substract to each image, result in subdir ' subdir_ima term];
@@ -154 +153 @@
 nbaver=ceil(nbaver_ima/siz(1));%number of bursts for the sliding background
 if isequal(floor(nbaver/2),nbaver)
-   nbaver=nbaver+1%put the number of burst to an odd number (so the middle burst is defined)
+   nbaver=nbaver+1;%put the number of burst to an odd number (so the middle burst is defined)
 end
 step=siz(1);%case of bursts: the sliding background is shifted by one burst 
@@ -181 +180 @@
 nbfield_slice=nbfield*nbfield2;% number of fields per slice
 if nbaver_ima > nbfield*nbfield2
-    errordlg('number of images in a slice smaller than the proposed number of images for the sliding average')
+    msgbox_uvmat('ERROR','number of images in a slice smaller than the proposed number of images for the sliding average')
     return
 end
@@ -189 +188 @@
     step=1;
     nbaver=nbaver_ima;
+end
+
+%% prealocate memory for the sliding background
+first_image=name_generator(filebase,num_i1(1),num_j1(1),Series.FileExt,Series.NomType);
+Afirst=read_image(first_image,FileType,num_i1(1),MovieObject);
+[npy,npx]=size(Afirst);
+try 
+Ak=zeros(npy,npx,nbaver_ima,'uint16'); %prealocate memory
+Asort=zeros(npy,npx,nbaver_ima,'uint16'); %prealocate memory
+catch ME
+    msgbox_uvmat('ERROR',ME.message)
+    return
 end
 
@@ -204 +215 @@
     ImageName=name_generator(filebase_b,num_i1(1),num_j1(1),'.png',Series.NomType);
     [pth,ImageName]=fileparts(ImageName);
-    ImageName=[ImageName '.png']
+    ImageName=[ImageName '.png'];
     if isempty(uid_ImageName)
        [t,uid_ImageName]=add(t,uid_Heading,'element','ImageName');
@@ -210 +221 @@
     uid_value=children(t,uid_ImageName);
     if isempty(uid_value)
-        t=add(t,uid_ImageName,'chardata',ImageName)%indicate  name of the first image, with ;png extension
+        t=add(t,uid_ImageName,'chardata',ImageName);%indicate  name of the first image, with ;png extension
     else
-        t=set(t,uid_value(1),'value',ImageName)%indicate  name of the first image, with ;png extension
+        t=set(t,uid_value(1),'value',ImageName);%indicate  name of the first image, with ;png extension
     end  
 
@@ -239 +250 @@
 
 %MAIN LOOP ON SLICES
+
 for islice=1:nbslice_i
     %% select the series of image indices at the level islice
@@ -360 +372 @@
 windowsize=round(min(size(B,1),size(B,2))/20);
 windowsize=floor(windowsize/2)*2+1;
-ix=[1/2-windowsize/2:-1/2+windowsize/2];%
+ix=1/2-windowsize/2:-1/2+windowsize/2;%
 %del=np/3;
 %fct=exp(-(ix/del).^2);