soundsc.m

来自「基于matlab的面向对象的信号处理类库。主要应用于音频、语音信号的一些处理。内」· M 代码 · 共 14 行

function soundsc(s)

% $Id: soundsc.m 93 2005-10-24 13:54:45Z bassus $

s1 = s.s/(1.01*max(max(abs(s.s))));

if isunix
  wavwrite(s1,s.time.fs,'/tmp/wave.wav');
  !play /tmp/wave.wav
  !rm /tmp/wave.wav
else
  soundsc(s1,s.time.fs);
end