如何并行运行代码？ 通过VISA和RS232与设备通讯

问题描述

我写了一个代码来同时控制3个不同的设备。 （函数发生器，温度计和光谱仪）

每个循环都从温度计读取温度，并从光谱仪收集光谱数据。但是，为了获得良好的信噪比，光谱仪需要500毫秒的曝光时间+ 2倍的平均值。 （总共约1秒钟）这是运行代码的瓶颈，它阻止了我从温度计收集更频繁的温度数据。 （它可以每200ms接收一次温度数据。）因此，我可以每1.2秒获取数据点。我希望通过并行运行这两个循环来更频繁地从温度计中收集数据。 （在while循环中，这两个部分用粗体标出。这部分是我要并行运行的部分。）另外，这两个测量也应实时进行

您会教我如何做到这一点吗？下面是我编写的代码。谢谢您的提前帮助！

i = 1;
tstart=tic;
k=0;
tNow = 0;
tic
while(tNow<Timetotal)
    % time(i) = DataAcqTime*(i-1); do not work due to latency in RC232
    if ((tNow > BeforeField) && (tNow < BeforeField + AfterField)) && k==0
        fprintf(fgen,':OUTPUT:STATe 1'); %Field is on
        k=1;
    end
    
    if (tNow > BeforeField + Fieldtime) && k==1  
        fprintf(fgen,':OUTPUT:STATe 0'); %Field is off
        k=2;
    end
    
    temp = fscanf(sObject);
    %fscanf(sObject)
    t{i} = temp(7:12);
    data(i) = str2double(t{i});
    tNow = tNow + toc
    time(i)=tNow;
    tic
    NrMeas=0;
while (stoploop==false) & (NrMeas<Measnum)
    S.StartPixel=0;
    S.StopPixel=nPix-1;
    S.IntegrationDelay=0;
    S.CorDynDark=0;
    S.Smoothing=0;
    S.TriggerMode=0;
    S.TriggerSource=0;
    S.TriggerSourceType=0;
    S.SaturationDetection=1;
    myLambda=spectrometer('getlambda');
    spectrometer('measconfig',S);
    spectrometer('measure',1);
    myData=spectrometer('getdata');
    mySat=spectrometer('getsaturated');
    NrMeas=NrMeas+1;
    xlabel('Wavelength [nm]');          
    ylabel('Counts');
%    pause(0.001)  %seconds !!
end

    %plot(myLambda,myData,myLambda,mySat);
    specdata{i}=myData;
    %pause(DataAcqTime); %no small value than 0.1 it fails
    i=i+1;
    tNow = tNow + toc
    time2(i)=tNow; %spectrum time is different from T probe time
    
    tic
end
tEnd = toc(tstart)

解决方法

并行计算工具箱是必经之路。工具箱中的“ parfor”功能可以帮助您并行运行多个for循环。

一种替代方法是使用Simulink。对于您的应用程序类型（3个输入数据流），可以使用“合并”块。

有关parfor的更多信息-https://www.mathworks.com/help/parallel-computing/convert-for-loops-into-parfor-loops.html，还有有关“合并”块的更多信息-https://www.mathworks.com/help/simulink/slref/merge.html