Question: plot audio file maximums

I want to take a wav file and plot a smooth curve across the top indicating the relative maximums then put those points in an array or matrix with their relative x values.

with(AudioTools):
aud:=Read("c:/Documents and Settings/My Music/sample.wav")
aud2:=ToMono(aud)

There are quite a few spikes around the maximums which would indicate multiple maximums at each max area but I just want the general max.

Please Wait...