使用Matlab实现录音与播放功能

clc;clear;close all;
Fs = 48000; % 采样率为4800Hz
f = 18000; % 正弦波频率为18000Hz
t = 0:1/Fs:10; % 从0到10秒的时间向量 
y = sin(2*pi*f*t); % 生成正弦波信号
signal=[y',y'];   %signal为n行2列，两列数据含义表示左右声道。
%[signal,fs]=audioread('recorded.wav');  %假如播放wav格式的文件，使用这个函数读取。
signal=signal./max(abs(signal));  %归一化数据

%方式1播放
sound(signal, Fs); % 播放正弦波信号
display("播放中。。。"); 
system("pause");  %阻塞线程
clear sound;  %停止播放
return;       %结束程序

%方式2播放
% 创建audioplayer对象
player = audioplayer(allaudio, Fs);
% 设置播放结束时的回调函数
set(player, 'TimerFcn', {@audioplayerCallback, player});
% 播放音频
play(player);
display("播放中。。。");
system("pause");
stop(player);
return;

function audioplayerCallback(obj, event,player)
    if player.CurrentSample == player.TotalSamples
        % 当播放结束时，重新播放音频
        stop(player);
        play(player);
    end
end

doc sound
doc audioplayer

Fs=48000;    %采样率   
nBits=16;    %位深
nChannels=2;  %通道数
%info=audiodevinfo;  %获取电脑上所有的输入和输入的音频设备，通过名称确定您要使用的声卡，并记录其ID值
ID=-1;   %默认输入设备
recObj = audiorecorder(Fs,nBits,nChannels,ID);
disp("开始录音.")
%recDuration = 20; %定时录音
%recordblocking(recObj,recDuration);  %定时录音方式
record(recObj)     %手动录音
disp("press any key...")
pause   %阻塞线程
stop(recObj)%停止录音
disp("结束录音.")
%获取录音数据
Recording=getaudiodata(recObj);
%play(recObj);   %播放录音
Lrecord=Recording(:,1);  %左声道数据
Rrecord=Recording(:,2);  %右声道数据
%plot(abs(fft(Lrecord,Fs)));  %对录音数据进行fft变换
return;

clc;clear;close all;
Fs = 48000; % 采样率为4800Hz
f = 18000; % 正弦波频率为18000Hz
t = 0:1/Fs:10; % 从0到10秒的时间向量 
y = sin(2*pi*f*t); % 生成正弦波信号
signal=[y',y'];   %signal为n行2列，两列数据含义表示左右声道。
 
%[signal,fs]=audioread('recorded.wav');  %假如播放wav格式的文件，使用这个函数读取。
signal=signal./max(abs(signal));  %归一化数据
%方式1播放
% sound(signal, Fs); % 播放正弦波信号
% display("播放中。。。"); 
% system("pause");  %阻塞线程
%方式2
player = audioplayer(signal, Fs);
% 设置播放结束时的回调函数
set(player, 'TimerFcn', {@audioplayerCallback, player});
% 播放音频
play(player);
 
 
Fs=48000;    %采样率   
nBits=16;    %位深
nChannels=2;  %通道数
%info=audiodevinfo;  %获取电脑上所有的输入和输入的音频设备，通过名称确定您要使用的声卡，并记录其ID值
ID=-1;   %默认输入设备
recObj = audiorecorder(Fs,nBits,nChannels,ID);
disp("开始录音.")
%recDuration = 20; %定时录音
%recordblocking(recObj,recDuration);  %定时录音方式
record(recObj)     %手动录音
disp("press any key...")
pause   %阻塞线程
stop(recObj)%停止录音
stop(player);  %停止播放
disp("结束录音.")
%获取录音数据
Recording=getaudiodata(recObj);
%play(recObj);   %播放录音
Lrecord=Recording(:,1);
Rrecord=Recording(:,2);
plot(abs(fft(Lrecord,Fs)));  %对录音数据进行fft变换
return;
 
function audioplayerCallback(obj, event,player)
    if player.CurrentSample == player.TotalSamples
        % 当播放结束时，重新播放音频
        stop(player);
        play(player);
    end
end