音频处理.zip

MATLAB数字信号处理音频 绘制频谱图 变声 变频 代码实现

% 1. 绘制时域图像 
% clear
% clc
%  %左声道
%  [datafs]= audioread（‘E:\AAAAA\数字信号处理\音频处理\盗将行 .wav‘）;
%  left=data（:1）;
%  
%  % 右声道
%  right=data（:2）;
%  
%  % 采样总时间
%  time=（1/fs）*length（left）;
%  
%  t = linspace（0timelength（left））;
%  plot（tleft）;
%  
%  xlabel（‘t/s‘）;
%  ylabel（‘y（t）‘）;
%soundsc（leftfs）;  %播放音乐

% 2.绘制频谱图
% clear
% clc
% 
% [datafs]= audioread（‘E:\AAAAA\数字信号处理\音频处理\盗将行 .wav‘）;
%   
% N = length（data）;
% 
% left = data（:1）;
% right= data（:2）;
% 
% Y = fft（leftN）;
% 
% Pyy = Y.* conj（Y） / N;  % conj（Y）是求Y的共轭数
% 
% halflength=floor（N/2）;  
% 
% f=fs*（0:halflength）/N; % 采样频率的一半为频率范围
% figure;
% plot（fPyy（1:halflength+1））;
% xlabel（‘Frequency（Hz）‘）;


%  3.绘制时域图并产生 回声效果
%  clear
%  clc
%  
%  [datafs]= audioread（‘E:\AAAAA\数字信号处理\音频处理\盗将行 .wav‘）;
%   
%  left = data（:1）;
%  right= data（:2）;
%  
%  leftout = left;
%  
%  time=（1/fs）*length（left）;
%  
%  N = 10000;   % delay second = N/fs;
%  
%  for n = N+1:length（left）
%      leftout（n） = left（n） + left（n - N）;
%  end
%  
%  t = linspace（0timelength（left））;
%  plot（tleftout）;
%  
%  soundsc（leftoutfs）;

%4.调节频率达到变声效果
clear
clc

[xfs]= audioread（‘E:\AAAAA\数字信号处理\音频处理\盗将行 .wav‘）;

time=（1/fs）*length（x）;%计算时间

x1=x*0.5;   %幅值调节

fs1=fs*2;   %频率调节
soundsc（x1fs1）;

pause % 按任意键结束播放
clear sound

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2019-05-30 16:45  音频处理\
     文件        1536  2019-05-30 16:38  音频处理\Sound.asv
     文件        1512  2019-05-30 16:46  音频处理\Sound.m
     文件       27973  2019-05-29 22:55  音频处理\回声效果代码.png
     文件       71823  2019-05-29 22:22  音频处理\时域图.png
     文件       61446  2019-05-29 22:43  音频处理\时域图代码.png
     文件    34949646  2018-12-21 19:40  音频处理\盗将行 .wav
     文件       35580  2019-05-30 16:44  音频处理\频率调节.png
     文件       38453  2019-05-29 23:11  音频处理\频谱图.png
     文件       46213  2019-05-29 23:12  音频处理\频谱图代码.png