Changeset 605 for trunk/src/series/civ_series.m
- Timestamp:
- Apr 5, 2013, 1:17:53 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/series/civ_series.m
r604 r605 59 59 end 60 60 61 %%%%%%%%%%%% STANDARD PART (DO NOT EDIT) %%%%%%%%%%%%62 63 61 %% read input parameters from an xml file if input is a file name (batch mode) 64 62 checkrun=1; … … 67 65 checkrun=0; 68 66 end 67 68 %% input files and indexing 69 NbField=1; 70 if isfield(Param,'InputTable') 71 RootPath=Param.InputTable{1,1}; 72 RootFile=Param.InputTable{1,3}; 73 SubDir=Param.InputTable{1,2}; 74 NomType=Param.InputTable{1,4}; 75 FileExt=Param.InputTable{1,5}; 76 PairCiv1=Param.ActionInput.PairIndices.ListPairCiv1; 77 PairCiv2=''; 78 if isfield(Param.ActionInput.PairIndices,'ListPairCiv2') 79 PairCiv2=Param.ActionInput.PairIndices.ListPairCiv2; 80 end 81 MaxIndex=cell2mat(Param.IndexRange.MaxIndex); 82 MinIndex=cell2mat(Param.IndexRange.MinIndex); 83 [filecell,i_series,tild,j_series]=get_file_series(Param); 84 [i1_series_Civ1,i2_series_Civ1,j1_series_Civ1,j2_series_Civ1,check_bounds,NomTypeNc]=... 85 find_pair_indices(PairCiv1,i_series{1},j_series{1},MinIndex,MaxIndex); 86 if ~isempty(PairCiv2) 87 [i1_series_Civ2,i2_series_Civ2,j1_series_Civ2,j2_series_Civ2,check_bounds_Civ2]=... 88 find_pair_indices(PairCiv2,i_series{1},j_series{1},MinIndex,MaxIndex); 89 check_bounds=check_bounds | check_bounds_Civ2; 90 end 91 i1_series_Civ1=i1_series_Civ1(~check_bounds); 92 i2_series_Civ1=i2_series_Civ1(~check_bounds); 93 j1_series_Civ1=j1_series_Civ1(~check_bounds); 94 j2_series_Civ1=j2_series_Civ1(~check_bounds); 95 if ~isempty(j1_series_Civ1) 96 FrameIndex_A_Civ1=j1_series_Civ1; 97 FrameIndex_B_Civ1=j2_series_Civ1; 98 else 99 FrameIndex_A_Civ1=i1_series_Civ1; 100 FrameIndex_B_Civ1=i2_series_Civ1; 101 end 102 if ~isempty(PairCiv2) 103 i1_series_Civ2=i1_series_Civ2(~check_bounds); 104 i2_series_Civ2=i2_series_Civ2(~check_bounds); 105 j1_series_Civ2=j1_series_Civ2(~check_bounds); 106 j2_series_Civ2=j2_series_Civ2(~check_bounds); 107 if ~isempty(j1_series_Civ2) 108 FrameIndex_A_Civ2=j1_series_Civ2; 109 FrameIndex_B_Civ2=j2_series_Civ2; 110 else 111 FrameIndex_A_Civ2=i1_series_Civ2; 112 FrameIndex_B_Civ2=i2_series_Civ2; 113 end 114 end 115 116 NbField=numel(i1_series_Civ1); 117 ImageTypeOptions={'image','multimage','mmreader','video'}; 118 [FileType_A,FileInfo,MovieObject_A]=get_file_type(filecell{1,1}); 119 FileType_B=FileType_A; 120 MovieObject_B=MovieObject_A; 121 if size(filecell,1)>=2 && ~strcmp(filecell{1,1},filecell{2,1}) 122 [FileType_B,FileInfo,MovieObject_B]=get_file_type(filecell{2,1}); 123 CheckImage_B=~isempty(find(strcmp(FileType,ImageTypeOptions)));% =1 for images 124 end 125 end 126 127 128 %% Output directory 69 129 OutputDir=[Param.OutputSubDir Param.OutputDirExt]; 70 130 … … 81 141 check_patch1=0;%default 82 142 83 % case of input Param set by an xml file (batch mode) 84 if ischar(Param) 85 Param=xml2struct(Param); %if Param is the name of an xml file, read this file as a Matlab structure 86 end 87 88 RootPath=Param.InputTable{1,1}; 89 RootFile=Param.InputTable{1,3}; 90 SubDir=Param.InputTable{1,2}; 91 NomType=Param.InputTable{1,4}; 92 FileExt=Param.InputTable{1,5}; 93 PairCiv1=Param.ActionInput.PairIndices.ListPairCiv1; 94 PairCiv2=''; 95 if isfield(Param.ActionInput.PairIndices,'ListPairCiv2') 96 PairCiv2=Param.ActionInput.PairIndices.ListPairCiv2; 97 end 98 99 % option use with GUI series 100 NbField=1; 101 MovieObject_A=[]; 102 if isfield(Param,'InputTable') 103 MaxIndex=cell2mat(Param.IndexRange.MaxIndex); 104 MinIndex=cell2mat(Param.IndexRange.MinIndex); 105 [filecell,i_series,tild,j_series]=get_file_series(Param); 106 [i1_series_Civ1,i2_series_Civ1,j1_series_Civ1,j2_series_Civ1,check_bounds,NomTypeNc]=... 107 find_pair_indices(PairCiv1,i_series{1},j_series{1},MinIndex,MaxIndex); 108 if ~isempty(PairCiv2) 109 [i1_series_Civ2,i2_series_Civ2,j1_series_Civ2,j2_series_Civ2,check_bounds_Civ2]=... 110 find_pair_indices(PairCiv2,i_series{1},j_series{1},MinIndex,MaxIndex); 111 check_bounds=check_bounds | check_bounds_Civ2; 112 end 113 i1_series_Civ1=i1_series_Civ1(~check_bounds); 114 i2_series_Civ1=i2_series_Civ1(~check_bounds); 115 j1_series_Civ1=j1_series_Civ1(~check_bounds); 116 j2_series_Civ1=j2_series_Civ1(~check_bounds); 117 if ~isempty(j1_series_Civ1) 118 FrameIndex_A_Civ1=j1_series_Civ1; 119 FrameIndex_B_Civ1=j2_series_Civ1; 120 else 121 FrameIndex_A_Civ1=i1_series_Civ1; 122 FrameIndex_B_Civ1=i2_series_Civ1; 123 end 124 if ~isempty(PairCiv2) 125 i1_series_Civ2=i1_series_Civ2(~check_bounds); 126 i2_series_Civ2=i2_series_Civ2(~check_bounds); 127 j1_series_Civ2=j1_series_Civ2(~check_bounds); 128 j2_series_Civ2=j2_series_Civ2(~check_bounds); 129 if ~isempty(j1_series_Civ2) 130 FrameIndex_A_Civ2=j1_series_Civ2; 131 FrameIndex_B_Civ2=j2_series_Civ2; 132 else 133 FrameIndex_A_Civ2=i1_series_Civ2; 134 FrameIndex_B_Civ2=i2_series_Civ2; 135 end 136 end 137 138 NbField=numel(i1_series_Civ1); 139 ImageTypeOptions={'image','multimage','mmreader','video'}; 140 [FileType_A,FileInfo,MovieObject_A]=get_file_type(filecell{1,1}); 141 FileType_B=FileType_A; 142 MovieObject_B=MovieObject_A; 143 if size(filecell,1)>=2 && ~strcmp(filecell{1,1},filecell{2,1}) 144 [FileType_B,FileInfo,MovieObject_B]=get_file_type(filecell{2,1}); 145 CheckImage_B=~isempty(find(strcmp(FileType,ImageTypeOptions)));% =1 for images 146 end 147 end 143 144 145 148 146 149 147 %%%%% MAIN LOOP %%%%%%
Note: See TracChangeset
for help on using the changeset viewer.