Simtel MSDOS - Coast to Coast/simteldosarchivecoasttocoast2.iso/windows3/mtlabsnd.zip/READWAV.M

Text File | 1993-04-26 | 379b | 15 lines

function [ret] = readwav(filename)

% var = readwav(filename);
%
%       Reads a Windows 3.1 WAV type file into the given variable.
%       Assumes the variable is column-major and of a single column.
%

string = ['!sox ' filename '.wav ' filename '.mat'];
eval(string);
string = ['load ' filename '.mat'];
eval(string);
string = ['ret = sound;'];
eval(string);