Changeset 1086


Ignore:
Timestamp:
Oct 1, 2020, 2:33:42 PM (2 months ago)
Author:
sommeria
Message:

set_slice updated

Location:
trunk/src
Files:
1 added
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/uvmat.m

    r1083 r1086  
    12321232uicontrol('Style','pushbutton','Units','normalized', 'Position', [ii ii wwp hh],'BackgroundColor',[1 0 0],'String','APPLY','Callback',@(hObject,eventdata)set_slice_APPLY_Callback(hObject,eventdata),...
    12331233    'FontWeight','bold','FontUnits','points','FontSize',12,'TooltipString','''APPLY'': apply the output to the current field series in uvmat');
    1234 uicontrol('Style','checkbox','Units','normalized', 'Position', [2*ii+wwp ii wwp hh],'BackgroundColor',[1 0 0],'String','Replicate','Callback',@(hObject,eventdata)set_slice_REPLICATE_Callback(hObject,eventdata),...
    1235     'FontWeight','bold','FontUnits','points','FontSize',12,'TooltipString','''Replicate'': select to replicate the output of APPLY to a series of experiments');
     1234uicontrol('Style','checkbox','Units','normalized', 'Position', [2*ii+wwp ii wwp hh],'tag','CheckReplicate','BackgroundColor',[1 0 0],'String','Replicate','Callback',@(hObject,eventdata)set_slice_REPLICATE_Callback(hObject,eventdata),...
     1235    'FontWeight','bold','FontUnits','points','FontSize',12,'TooltipString','''CheckReplicate'': select to replicate the output of APPLY to a series of experiments');
    12361236uicontrol('Style','pushbutton','Units','normalized', 'Position', [3*ii+2*wwp ii wwp hh],'Callback',@(hObject,eventdata)set_slice_Cancel_Callback(hObject,eventdata),...
    12371237    'String','Cancel','FontWeight','bold','FontUnits','points','FontSize',12,'TooltipString','''Cancel'': quit GUI without action');
     
    13041304end
    13051305
    1306 hreplicate=findobj(hObject,'Tag','Replicate');
     1306hreplicate=findobj(hset_slice,'Tag','CheckReplicate');
    13071307if get(hreplicate,'Value')
    1308     'TEST'
     1308    %% open the GUI browse_data
     1309    hbrowse=findobj(allchild(0),'Tag','browse_data');
     1310    if ~isempty(hbrowse)% look for the GUI browse_data
     1311        BrowseData=guidata(hbrowse);
     1312        SourceDir=get(BrowseData.SourceDir,'String');
     1313        ListExp=get(BrowseData.ListExperiments,'String');
     1314        ExpIndices=get(BrowseData.ListExperiments,'Value');
     1315        ListExp=ListExp(ExpIndices);
     1316        ListDevices=get(BrowseData.ListDevices,'String');
     1317        DeviceIndices=get(BrowseData.ListDevices,'Value');
     1318        ListDevices=ListDevices(DeviceIndices);
     1319        ListDataSeries=get(BrowseData.DataSeries,'String');
     1320        DataSeriesIndices=get(BrowseData.DataSeries,'Value');
     1321        ListDataSeries=ListDataSeries(DataSeriesIndices);
     1322        NbExp=0; % counter of the number of experiments set by the GUI browse_data
     1323        for iexp=1:numel(ListExp)
     1324            if ~isempty(regexp(ListExp{iexp},'^\+/'))% if it is a folder
     1325                for idevice=1:numel(ListDevices)
     1326                    if ~isempty(regexp(ListDevices{idevice},'^\+/'))% if it is a folder
     1327                        for isubdir=1:numel(ListDataSeries)
     1328                            if ~isempty(regexp(ListDataSeries{isubdir},'^\+/'))% if it is a folder
     1329                                lpath= fullfile(SourceDir,regexprep(ListExp{iexp},'^\+/',''),...
     1330                                    regexprep(ListDevices{idevice},'^\+/',''));
     1331                                ldir= regexprep(ListDataSeries{isubdir},'^\+/','');
     1332                                if exist(fullfile(lpath,ldir),'dir')
     1333                                    NbExp=NbExp+1;
     1334                                    ListPath{NbExp}=lpath;
     1335                                    ListSubdir{NbExp}=ldir;
     1336                                    ExpIndex{NbExp}=iexp;
     1337                                end
     1338                            end
     1339                        end
     1340                    end
     1341                end
     1342            end
     1343        end
     1344        for iexp=1:NbExp
     1345            XmlName=fullfile(ListPath{iexp},[ListSubdir{iexp} '.xml']);
     1346            if exist(XmlName,'file')
     1347                check_update=1;
     1348            else
     1349                check_update=0;
     1350            end
     1351            errormsg=update_imadoc(GeometryCalib,XmlName,'GeometryCalib');% introduce the calibration data in the xml file
     1352            if ~strcmp(errormsg,'')
     1353                msgbox_uvmat('ERROR',errormsg);
     1354            else
     1355                if check_update
     1356                    display([XmlName ' updated with calibration parameters'])
     1357                else
     1358                    display([XmlName ' created with calibration parameters'])
     1359                end
     1360            end
     1361        end
     1362    end
     1363    msgbox_uvmat('CONFIMATION',['slices replicated for ' num2str(NbExp) ' experiments']);
    13091364else
    13101365   
Note: See TracChangeset for help on using the changeset viewer.