cinq=wavread('cinq.wav'); N = 300; Px = stpower(cinq, N);

Zx = stzerocross(cinq, N); plot([Px*1e-5 Zx cinq])