annotate arrows/audioplay.m @ 61:eff6bddf82e3
tip
Finally implemented perceptual brightness thing.
| author |
samer |
| date |
Sun, 11 Oct 2015 10:20:42 +0100 |
| parents |
beb8a3f4a345 |
| children |
|
| rev |
line source |
|
samer@0
|
1 function a=audioplay(ch,rate,window,varargin)
|
|
samer@0
|
2 if nargin<3, window=[]; end
|
|
samer@37
|
3 opts=options('buffer',1,'queue',4,'dspargs',{},varargin{:});
|
|
samer@0
|
4
|
|
samer@0
|
5 a=asysobj(@(sz)dsp.AudioPlayer(rate,'BufferSizeSource','Property', ...
|
|
samer@0
|
6 'BufferSize', opts.buffer*sz{1}(1), ...
|
|
samer@0
|
7 'QueueDuration',opts.queue*sz{1}(1)/rate, ...
|
|
samer@0
|
8 opts.dspargs{:}), ...
|
|
samer@0
|
9 1,0, @(sz){});
|
|
samer@0
|
10
|
|
samer@0
|
11 if ~isempty(window), a=arr(@(x)x(window,:))*a; end
|
|
samer@0
|
12 end
|
|
samer@0
|
13
|
