Do the ski gloves fit?

• Speech Communication
• IEEE TASP
• IEEE Speech and Language Tech Committee
• ICSI Berkeley Speech
• IEEE Sigproc Soc ICASSP etc.
• IWAENC
• SiSEC
• ICMLA
• IEEE Conferences

Problem: I want to compare my pitch extraction algorithm to PRAAT’s

Briefly: Write a praat script to extract script and dump into a text file. Eat up into your favorite environment.

Solution:
The following get_praat_pitch.m calls the extract_pitch.praat script.

function praatpitch=get_praat_pitch(snd, fs)

% TODO hardcoded location of praat
        fprintf('WARNING get_praat_pitch: Hardcoded location of praat and extract_pitch.praatn');
        global MSOROOTDIR
        SNDDIR=[MSOROOTDIR, 'sep', filesep];
        FILENM=['praat-tmp'];
        FULLFILENM=[SNDDIR, FILENM, '.wav'];
        wavwrite(snd, fs, FULLFILENM);

        if(ispc()),
                PRAATCOMM=['"', MSOROOTDIR, 'extraneous/praatcon-win', '"'];
        elseif(isunix()),
                PRAATCOMM=[MSOROOTDIR, 'extraneous/praat'];
        end;

        praatcommand=[PRAATCOMM,' "',MSOROOTDIR,...
                'helpers/extract_pitch.praat" ',...
                FILENM, '.wav', ' ', FILENM, '.Pitch ', SNDDIR];

        retval=system(praatcommand);
        delete(FULLFILENM);
        if(retval==0),
                fprintf('Got pitch from praat!n');
                praatpitch=load([SNDDIR, FILENM, '.Pitch']);
                fprintf('Pitches read...n');
        else,
                fprintf('Praat error occurred.n');
                input('Press any key to continue...');
        end;

extract_pitch.praat

# Extract pitch from file (first parameter) and write it out to a text file
# (second parameter).

form PitchExtractor
        sentence sound_file_name
        sentence pitch_file_name
        sentence Directory
endform

echo Reading from 'Directory$''sound_file_name$'
Read from file... 'Directory$''sound_file_name$'
To Pitch... 0.0 75 600

pitchID = selected("Pitch");
Down to PitchTier
pitchtierID = selected("PitchTier")
num_points = Get number of points

filedelete 'Directory$''pitch_file_name$'
echo Writing to 'Directory$''pitch_file_name$'
for i to num_points
        time = Get time from index... i
        hertz = Get value at index... i
        fileappend "'Directory$''pitch_file_name$'" 'time' 'hertz' 'newline$'
endfor

Problem: I want a cocktail party NOW!!!

OK: play multiple media/audio streams dynamically localized in space.

Briefly: Compile spatialization plug-in for mplayer and run multiple instances with different parameters.

Solution:
It’s a hack, it’s a fix, it makes for a real party, especially when you play those a o scott podcasts — with the same person going on in three streams!

Compile the filter into mplayer, by putting in af_spatialize.c in the list of audio filters compiled in libaf:

Code af_spatialize.c
Header carried over from af_hrtf.c listing some constants af_spatialize.h
Header with head-related transfer functions for various directions hrtf_22050_3.h

With the spatialization plugin, a file can be localized at angles compiled into the plugin.

cocktail.sh 45 file1.mp3 &
cocktail.sh -45 file2.mp3 &

#!/bin/bash
IFS=#
~/mplayer/mplayer -af volnorm,resample=22050,spatialize=${1} ${2} 2>&1 > /dev/null &

It’s in Pegasus’ league.

It is not the aim of my dissertation to design a lab logo. (It is actually better described by the blog title and in the “about” link at top right corner).