Format NCsingleDisplay.m

workflow/templates/easy/NCsingleDisplay.m

@@ -6,27 +6,19 @@ global scan
 
 eDir=ExpPath;
 hf=figure;
-%**************Parameter Entry******************
+% Parameter Entry
 [scLst, row, col]=NCdisplayGui(eDir);  %(ExpPath); %Ncode 122111replaced removed  ,numOfPrtTimes)
-%***********************************************
-
 close(hf)
-
-
 selSpot=(row-1)*24 + col;
 for iPlate=1:length(scLst)
   scanPltNum=str2double(scLst(iPlate));
-    %scanPltNum(iPlate);
-%-----------------------------------------------------------------------
   K=scan(scanPltNum).plate(1).CFout((selSpot),3);
   r=scan(scanPltNum).plate(1).CFout((selSpot),4);
   l=scan(scanPltNum).plate(1).CFout((selSpot),5);
-
   suffix=strcat('Scan-Plate', scLst(iPlate)); % char(QspLst(n));
   % fileSpotSuffix=strcat('-Spot#',num2str(selSpot),'-Row=',selSpotRC(1),'-Col=',selSpotRC(2),'-FitData','-L=',num2str(l),'-r=',num2str(r),'-K=',num2str(K));    
   fileSpotSuffix=strcat('-Spot#',num2str(selSpot),'-Row=',num2str(row),'-Col=',num2str(col),'-FitData','-L=',num2str(l),'-r=',num2str(r),'-K=',num2str(K));    
   filenameNoExt=[suffix fileSpotSuffix];
-
   timeArr=scan(scanPltNum).plate(1).tSeries;
   rawIntens=scan(scanPltNum).plate(1).intens((selSpot),:)/scan(scanPltNum).plate(1).Ag((selSpot));
   try
@@ -34,8 +26,6 @@ filterTms= scan(scanPltNum).plate(1).filterTimes{(selSpot)};
     normInts=scan(scanPltNum).plate(1).normIntens{(selSpot)};
   catch
   end
-%********************************
-
   if (exist('K','var')&& exist('r','var') && exist('l','var'))
     t=(0:1:200);   
     Growth=K ./ (1 +  exp(-r.* (t - l )));
@@ -45,7 +35,6 @@ if length(scLst)>1
   else
     cla
   end
-
   hold on
   plot(timeArr,rawIntens,'g*');
   try
@@ -57,25 +46,18 @@ title(strcat(filenameNoExt,''));
   xlabel('Hours');
   ylabel('Intensities Normalized by Area');
   grid on;
-
   if (exist('K','var')&& exist('r','var') && exist('l','var'))
     plot(t, Growth,'b-');
-%*********Plot L on curvefit figure***********
+    % Plot L on curvefit figure
     grL=Growth(round(l)); %growthCurve timePT for l in hours 
     plot(l,0:grL,'-b') % to display position of l 
     plot(l,grL,'^b') % to display l position on curve as an arrowhead
 
-%***Plot Arbitrary User Entry AUC "finalTimePt"  
+    % Plot Arbitrary User Entry AUC "finalTimePt"  
     % plot(finalTimePt,0,'+m')
     % plot(0:finalTimePt,bl,'-m')
-
   end  
 end
-%end  %end for SWsingle display/plot figure
-
-%############################################################
-
-
 
 %Spot entry form------------------------------------------------------
 %{