Format NCdisplayGui.m

workflow/templates/easy/NCdisplayGui.m

@@ -1,23 +1,18 @@
 %% CALLED WHEN ACCESSING 'CurveFit Display' %%
 function [scLst, row, col] = NCdisplayGui(eDir)  %(ExpPath)
-%global ExpPath
-%global expDir
-
   xPos=0.05;
   btnWid=0.10;
   btnHt=0.05;
-   spacing=0.02;% Spacing between the button and the next command's label
+  spacing=0.02; % Spacing between the button and the next command's label
       
-%hSpot= figure;
-%figure
-%====================================
+  % Figure
   % The ADD Groups button
   btnNumber=1;
   yPos=0.85-(btnNumber-1)*(btnHt+spacing);
   btnPos=[xPos yPos-spacing btnWid btnHt];
-%
-row=1;
-hedit = uicontrol(...
+
+  row=1;
+  hedit=uicontrol(...
     'Style', 'edit',...
     'String',row,...
     'Units','normalized',...   
@@ -25,23 +20,19 @@ hedit = uicontrol(...
     'callback',{@editRowNum});  % 'Position', [5 100 60 20])
 
   function editRowNum(source,~)
-user_entry = str2double(get(source,'string'));
+    user_entry=str2double(get(source,'string'));
     if (isnan(user_entry)||(user_entry<0)||(user_entry>17) )
       errordlg('Enter a Row between 1 and 16','Bad Input','modal')
       return
     end
-    row= user_entry;
-    
+    row=user_entry;
   end
-%-------------------222222-----------
-%
-btnNumber=2;
+
+  btnNumber=2;
   yPos=0.85-(btnNumber-1)*(btnHt+spacing);
   btnPos=[xPos yPos-spacing btnWid btnHt];
-  
-
-col= 1;
-hedit = uicontrol(...
+  col=1;
+  hedit=uicontrol(...
     'Style', 'edit',...
     'String',col,...
     'Units','normalized',...
@@ -49,30 +40,27 @@ hedit = uicontrol(...
     'callback',{@entryColNum});  % 'Position', [5 100 60 20])
 
   function entryColNum(source,~)
-user_entry = str2double(get(source,'string'));
+    user_entry=str2double(get(source,'string'));
     if (isnan(user_entry)||(user_entry<0)||(user_entry>25))
       errordlg('Enter a Column between 1 and 24','Bad Input','modal')
       return
     end
-    col= user_entry;
-    
+    col=user_entry;
   end
-%}
 
-%*************************************************************
-
-%Ncode 12_0120 for reading in numeric folder names
-nlist=dir(fullfile(eDir,'*'));  %(ExpPath,'*'));
-nnn=0;
-for n=1:size(nlist,1)
+  % Read in numeric folder names
+  nlist=dir(fullfile(eDir,'*')); %(ExpPath,'*'));
+  nnn=0;
+  for n=1:size(nlist,1)
     if (~isempty(str2num(nlist(n).name)))
       nnn=nnn+1;
-        PnumLst(nnn)= (str2num(nlist(n).name));
+      PnumLst(nnn)=(str2num(nlist(n).name));
+      slst(nnn,1)={nlist(n).name};
       slst(nnn,1)={(nlist(n).name)};
     end
-end
+  end
 
-hListbox = uicontrol(...
+  hListbox=uicontrol(...
     'Style', 'listbox',...
     'String',sort(slst),...
     'value',[],...
@@ -83,64 +71,51 @@ hListbox = uicontrol(...
     'callback',{@load_listbox});  %'uiresume(gcbf)'); 'Position', [5 100 60 20])
   
   function load_listbox(source,~)  
-  userIndx = (get(source,'value'));
-  userStr = (get(source,'string'));
-       %scLstIndx= str2num(char(strrep(userStr(userIndx), 'Scan', '')))
-
+    userIndx=(get(source,'value'));
+    userStr=(get(source,'string'));
+    %scLstIndx=str2num(char(strrep(userStr(userIndx), 'Scan', '')))
     user_entry=userStr(userIndx);
-    scLst= user_entry;
+    scLst=user_entry;
   end 
       
-%*****************************************************************
-%-------------------10 10 10 10-----------
-
-btnNumber=10;
+  btnNumber=10;
   yPos=0.85-(btnNumber-1)*(btnHt+spacing);
   btnPos=[xPos yPos-spacing btnWid btnHt];
 
-hedit8 = uicontrol(...
+  hedit8=uicontrol(...
     'Style', 'pushbutton',...
     'String',{'Continue'},...
     'Units','normalized',...   
     'Position', btnPos,... 
     'callback','uiresume(gcbf)');  
 
-
-%------------------------------
-
-%***************************************************************
-% {
-%********LABELS******************************
- % The Labels 
+  % Labels
   xLPos=0.175;
   yPos=0;
   btnWid=0.20;
-
-
-   % Removed Not needed for Ncode ImRobot 
   lblNumber=1;
   yPos=0.85-(lblNumber-1)*(btnHt+spacing);
   btnPos=[xLPos yPos-spacing btnWid btnHt];
-  
-htxt = uicontrol(...
+  htxt=uicontrol(...
     'Style', 'text',...
     'String','Row',...
     'Units','normalized',...   
     'Position', btnPos);
-%-------------------222222-----------
+
   lblNumber=2;
   yPos=0.85-(lblNumber-1)*(btnHt+spacing);
   btnPos=[xLPos yPos-spacing btnWid btnHt];
     
-htxt = uicontrol(...
+  htxt=uicontrol(...
     'Style', 'text',...
     'String','Column',...
     'Units','normalized',...   
     'Position', btnPos);
-  %  Not needed for Ncode ImRobot
 
+  %  Not needed for Ncode ImRobot
   uiwait(gcf);
-end %function end $$$$$
+end %function end $$$$$[/INST]
+
 %}
  %{
 %-------------------333333-----------