    % Prueba de los algoritmos de extracion y busqueda de fingerprints. 

% OBJETIVO: calcular la funcion densidad de probabilidad para detecciones correctas y para falsas alarmas    

% fecha de creacion del archivo: 17-01-2007

clear;

load BaseDatosFingerprints;
finger_audio=f_22_23_01_8000_8;

n=zeros(1,229*32);

for m=1:12

    switch m
        case 1, audio=wavread('Anuncios\Procesado\22_23_01_8000_8');
        case 2, audio=wavread('Anuncios\Procesado\22_23_02_8000_8');
        case 3, audio=wavread('Anuncios\Procesado\22_23_03_8000_8');           
        case 4, audio=wavread('Anuncios\Procesado\22_23_04_8000_8');
        case 5, audio=wavread('Anuncios\Procesado\01_07_01_8000_8');
        case 6, audio=wavread('Anuncios\Procesado\08_19_01_8000_8');            
        case 7, audio=wavread('Anuncios\Procesado\05_19_01_8000_8');
        case 8, audio=wavread('Anuncios\Procesado\05_23_01_8000_8'); 
        case 9, audio=wavread('Anuncios\Procesado\15_19_01_8000_8'); 
        case 10, audio=wavread('Anuncios\Procesado\16_19_01_8000_8'); 
        case 11, audio=wavread('Anuncios\Procesado\17_19_01_8000_8'); 
        case 12, audio=wavread('Anuncios\Procesado\18_23_01_8000_8');             
                 
    end
            
    for l=3:10003
        detectado=audio(l:l+24000-1,1);

        finger_detectado=fingerprint(detectado);

        distancia=busqueda(finger_detectado,finger_audio);
    
        resultado=min(distancia);
    
        n(1,resultado)=n(1,resultado)+1;
      
    end
end

plot((1:229*32)/229/32,n/sum(n),'x')

