Ce programme utilise également  lcreadOX pour effectuer la matrice v(x;y;t) en tous point du wafer.


Voici le code réalisé sous Matlab, qui nous a permit de faire ce programme.

% programme de relecture

tic

d1='E:\mesures manip\manip du 4 fevrier\';%prendre les mesures de l'oscilo
imax=168;
jmax=105;
t0=750; % tps de départ
tmax=1000;
v=zeros(imax,jmax,tmax);
Delta=.3;
Nmax=imax*jmax;
Y=0;
X=0;


%  lecture 1er point
filename=[d1,'F1X=', num2str(X),'_Y=',num2str(Y),'_00000.trc']; % permet de definir le nom d'un fichier
if exist(filename)==2 % teste si le fichier existe, sinon, c'est un point hors wafer ou un point manqué...
    W=lcreadOX(filename);
    time=W.x(t0:t0-1+tmax);
    v(round(Y/Delta)+1,round(X/Delta)+1,:)=W.y(t0:t0-1+tmax);% vecteur 'amplitude
else
    v(round(Y/Delta)+1,round(X/Delta)+1,:)=NaN; %W.y(t0:t0-1+tmax);
end

% lecture 1ere ligne
for jj=1:(jmax-1)
    X=X+Delta;
    filename=[d1,'F1X=', num2str(X),'_Y=',num2str(Y),'_00000.trc']; % permet de definir le nom d'un fichier
    if exist(filename)==2
        W=lcreadOX(filename);
        v(round(Y/Delta)+1,round(X/Delta)+1,:)=W.y(t0:t0-1+tmax);% vecteur 'amplitude'
    else
        v(round(Y/Delta)+1,round(X/Delta)+1,:)=NaN; %W.y(t0:t0-1+tmax);
    end
end

% Boucle principale
for ii=2:imax
    ii
    % Premier point de la ligne i
    if(mod(ii,2)==1)
        X=0;
    else
        X=(jmax-1)*Delta;
    end
    Y=Y+Delta;
    filename=[d1,'F1X=', num2str(X),'_Y=',num2str(Y),'_00000.trc']; % permet de definir le nom d'un fichier
    if exist(filename)==2
        W=lcreadOX(filename);
        v(round(Y/Delta)+1,round(X/Delta)+1,:)=W.y(t0:t0-1+tmax);% vecteur 'amplitude'
    else
        v(round(Y/Delta)+1,round(X/Delta)+1,:)=NaN ; %W.y(t0:t0-1+tmax);
    end
    for jj=1:(jmax-1)
        if(mod(ii,2)==1)
            X=X+Delta;
        else
            X=X-Delta;
        end

        if(X<1e-4)
            X=0;
        end

        filename=[d1,'F1X=', num2str(X),'_Y=',num2str(Y),'_00000.trc']; % permet de definir le nom d'un fichier
        if exist(filename)==2

            W=lcreadOX(filename);
            v(round(Y/Delta)+1,round(X/Delta)+1,:)=W.y(t0:t0-1+tmax);% vecteur 'amplitude'
        else
            v(round(Y/Delta)+1,round(X/Delta)+1,:)=NaN ;%W.y(t0:t0-1+tmax);
        end
    end

end;
toc

Retour en haut de la page.