identification.m

Ultrasonor captor with Microchip dsPIC33F

close all;
clear all;
clc;

%Chargement des donn閑s
load donnee.mat

%centrage des donn閑s
ech = ech - mean(ech);

%figure; plot(ech);

%% Cr閍tion de la SBPA
longueur_sbpa = 2047;        %Vecteur pour affichage SBPA
reg_dec = [1,0,1,0,1,0,1,0,1,0,1]; %SBPA de d閜art
freq = 136e3;
k=0:1/freq:(longueur_sbpa-1)/freq;
f = freq*linspace(0,1,longueur_sbpa);

for C = 1:2*longueur_sbpa
    
    %les ou exclusive
    temp=xor(reg_dec(1,9),reg_dec(1,11));
    
    %le decalage
    reg_dec(:,[2:11]) = reg_dec(:,[1:10]);
    reg_dec(1,1) = temp;
    
    SBPA(1,C) = reg_dec(1,1);
end

%centre en 0 la SBPA
for C = 1:2*longueur_sbpa
   if SBPA(1,C) == 0;
       SBPA(1,C)=-1;
   end
end

ech2 = ech([1:2*longueur_sbpa]);
ech2 = ech2 - mean(ech);
if length(ech2) <= 2*longueur_sbpa
    SBPA2 = SBPA([1:length(ech2)-1]);
else
    SBPA2 = SBPA;
    SBPA2([2*longueur_sbpa+1:length(ech)-1]) = SBPA([1:length(ech)-2*longueur_sbpa-1]);
end

SBPA2 = SBPA2';
ech2  = ech2';

%Blocs m閙oires r閏up閞