一、简介
基于matlab语音播报
二、源代码
function txt2speech(txt,voice,pace,fs)
if ~ispc, error('要求使用Microsoft Win32 SAPI .');
end
if ~ischar(txt), error('第一个参数是字符串.');
end
SV = actxserver('SAPI.SpVoice');
TK = invoke(SV,'GetVoices');
if nargin > 1
for k = 0:TK.Count-1
if strcmpi(voice,TK.Item(k).GetDescription)
SV.Voice = TK.Item(k);
break;
elseif strcmpi(voice,'list')
disp(TK.Item(k).GetDescription);
end
end
end
if nargin > 2
if isempty(pace), pace = 0;
end
if abs(pace) > 10, pace = sign(pace)*10;
end
SV.Rate = pace;
end
if nargin < 4 || ~ismember(fs,[8000,11025,12000,...
16000,22050,24000,32000,44100,48000]), fs = 16000;
end
function txt2speech(txt,voice,pace,fs)
if ~ispc, error('要求使用Microsoft Win32 SAPI .');
end
if ~ischar(txt), error('第一个参数是字符串.');
end
SV = actxserver('SAPI.SpVoice');
TK = invoke(SV,'GetVoices');
if nargin > 1
for k = 0:TK.Count-1
if strcmpi(voice,TK.Item(k).GetDescription)
SV.Voice = TK.Item(k);
break;
elseif strcmpi(voice,'list')
disp(TK.Item(k).GetDescription);
end
end
end
if nargin > 2
if isempty(pace), pace = 0;
end
if abs(pace) > 10, pace = sign(pace)*10;
end
SV.Rate = pace;
end
if nargin < 4 || ~ismember(fs,[8000,11025,12000,...
16000,22050,24000,32000,44100,48000]), fs = 16000;
end
function txt2speech(txt,voice,pace,fs)
if ~ispc, error('要求使用Microsoft Win32 SAPI .');
end
if ~ischar(txt), error('第一个参数是字符串.');
end
SV = actxserver('SAPI.SpVoice');
TK = invoke(SV,'GetVoices');
if nargin > 1
for k = 0:TK.Count-1
if strcmpi(voice,TK.Item(k).GetDescription)
SV.Voice = TK.Item(k);
break;
elseif strcmpi(voice,'list')
disp(TK.Item(k).GetDescription);
end
end
end
if nargin > 2
if isempty(pace), pace = 0;
end
if abs(pace) > 10, pace = sign(pace)*10;
end
SV.Rate = pace;
end
if nargin < 4 || ~ismember(fs,[8000,11025,12000,...
16000,22050,24000,32000,44100,48000]), fs = 16000;
end
三、运行结果
实际效果为语音播报
四、备注
版本:2014a