bryan/hartman-server
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Format par4Gbl_Main8c.m

Browse Source
This commit is contained in:
Bryan Roessler
2024-07-25 18:41:24 -04:00
parent 2fe4d4e1e1
commit 7d621c96ac
1 changed files with 33 additions and 38 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
workflow/templates/easy/par4Gbl_Main8c.m
View File

@@ -42,7 +42,7 @@ global tptLength
numRows=24; % for Single Vertical numRows=24; % for Single Vertical
numCols=16; % for Single Vertical numCols=16; % for Single Vertical
%*************CIRCLE related************************* % CIRCLE related
doCircle=1; % use Circle area analysis 14_0807 doCircle=1; % use Circle area analysis 14_0807
radius=14; radius=14;
ImParMat(10)=radius; ImParMat(10)=radius;
@@ -52,11 +52,10 @@ try
clf(fhconsole,'reset') clf(fhconsole,'reset')
catch ME catch ME
end end
close
%****************************************** close
EASYconsole EASYconsole
%******************************************
try try
load(ExpOutmat) load(ExpOutmat)
copyfile(ExpOutmat,(fullfile(matDir,'BkUp',strcat((num2str(datenum(now))),'.mat')))) copyfile(ExpOutmat,(fullfile(matDir,'BkUp',strcat((num2str(datenum(now))),'.mat'))))
@@ -77,7 +76,7 @@ catch
% by EASY versions after 20_0819. % by EASY versions after 20_0819.
load(fullfile(resDir,'PTmats','Nbdg')) %Left in to accomodate loads of work before 20_0819 load(fullfile(resDir,'PTmats','Nbdg')) %Left in to accomodate loads of work before 20_0819
end end
%++++++++++++++Load Fotos stored data++++++++++++++++++++ % Load Fotos stored data
try try
load(fullfile(resDir,'Fotos','Coordinates')) load(fullfile(resDir,'Fotos','Coordinates'))
catch catch
@@ -90,23 +89,19 @@ try
load(fullfile(resDir,'Fotos','anlZones')) load(fullfile(resDir,'Fotos','anlZones'))
catch catch
end end
%******autoImCF******************* % autoImCF
try try
load(fullfile(resDir,'PTmats','NCFparms')) load(fullfile(resDir,'PTmats','NCFparms'))
catch ME catch ME
load parameters load parameters
end end
%************Get Print Times******************************* % Get Print Times
PrintTimes=[]; PrintTimes=[];
if ispc expDir=fullfile(ExpPath);
expDir=fullfile(ExpPath,'\');
elseif (isunix || ismac)
expDir=ExpPath
end
scLst={}; scLst={};
%**************Parameter Entry****************** % Parameter Entry
NImParamRadiusGui(expDir) % Ncode 122111replaced removed ,numOfPrtTimes) NImParamRadiusGui(expDir) % Ncode 122111replaced removed ,numOfPrtTimes)
width=24; width=24;
widthEx=width-1; % width extention from reference point widthEx=width-1; % width extention from reference point
@@ -114,7 +109,7 @@ dither=ImParMat(6);
radius=ImParMat(10); radius=ImParMat(10);
NIcircle NIcircle
%***************** Load Stuff************************* % Load Stuff
lastPlateOnLastScan=1; % Ncode lastPlateOnLastScan=1; % Ncode
if size(scLst,1)==1 if size(scLst,1)==1
@@ -143,10 +138,10 @@ selScanNumLst=[];
Scanfiles=[]; Scanfiles=[];
pathname=[]; pathname=[];
% TODO BCR this probably doesn't need to be here but I'm leaving it for now
if ispc if ispc
cd(char(strcat(expDir,scLst(1)))) cd(char(strcat(expDir,scLst(1))))
end elseif (isunix || ismac)
if isunix
cd(fullfile(expDir,cell2mat(scLst(1)))); cd(fullfile(expDir,cell2mat(scLst(1))));
end end
Scanfiles=[]; Scanfiles=[];