comparison scripts/audio/saveaudio.m @ 2310:e2a8f216373d

[project @ 1996-07-11 20:02:03 by jwe]
author jwe
date Thu, 11 Jul 1996 20:02:03 +0000
parents 5cffc4b8de57
children 2b5788792cad
comparison
equal deleted inserted replaced
2309:bc85631e060d 2310:e2a8f216373d
17 ### Software Foundation, 59 Temple Place - Suite 330, Boston, MA 17 ### Software Foundation, 59 Temple Place - Suite 330, Boston, MA
18 ### 02111-1307, USA. 18 ### 02111-1307, USA.
19 19
20 function saveaudio (name, X, ext, bit) 20 function saveaudio (name, X, ext, bit)
21 21
22 # usage: saveaudio (name, X, [, ext [, bit]]) 22 ## usage: saveaudio (name, X, [, ext [, bit]])
23 # 23 ##
24 # Saves a vector X of audio data in the file "name.ext". 24 ## Saves a vector X of audio data in the file "name.ext".
25 # The format of the audio file is determined by ext which has to be 25 ## The format of the audio file is determined by ext which has to be
26 # written without an inital "."; default value for ext is "lin". 26 ## written without an inital "."; default value for ext is "lin".
27 # 27 ##
28 # Currently, the following audio formats are supported: 28 ## Currently, the following audio formats are supported:
29 # *) mu-law files with extension "mu", "au" or "snd" 29 ## *) mu-law files with extension "mu", "au" or "snd"
30 # *) linearly encoded files with extension "lin" or "raw" 30 ## *) linearly encoded files with extension "lin" or "raw"
31 # If the data is saved linearly, the bit argument decides whether an 31 ## If the data is saved linearly, the bit argument decides whether an
32 # 8-bit (default) or a 16-bit format is used. 32 ## 8-bit (default) or a 16-bit format is used.
33 33
34 # Written by AW (Andreas.Weingessel@ci.tuwien.ac.at) on Sep 5, 1994 34 ## Written by AW (Andreas.Weingessel@ci.tuwien.ac.at) on Sep 5, 1994
35 # Last modified by AW on Oct 29, 1994 35 ## Last modified by AW on Oct 29, 1994
36 # Copyright Dept of Probability Theory and Statistics TU Wien 36 ## Copyright Dept of Probability Theory and Statistics TU Wien
37 37
38 if (nargin < 2 || nargin > 4) 38 if (nargin < 2 || nargin > 4)
39 usage ("saveaudio (X, name [, ext [, bit]])"); 39 usage ("saveaudio (X, name [, ext [, bit]])");
40 endif 40 endif
41 41