yading@10: function step1(song)
yading@10: 
yading@10: x = wavread(song);
yading@10: y = extractMelody(x,hamming(2025),4096,'baby.txt');
yading@10: wavwrite(y,44100,'melody.wav');
yading@10: 
yading@10: 
yading@10: