⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 junyun.m

📁 均匀PCM量化和u律非均匀量化的对比效果分析实验
💻 M
字号:
close all;
clear all;
%初始化,n为量化级数
n=input('Please enter the qualify level n:');
if isempty(n)
    n=8;
end;
dt=0.01;                                %时域分辨率的初始化(单位:ms)
N=500;                                  %采样点个数
T=dt*N;                                 %时域宽度
t=linspace(-T/2,T/2,N);                 %时间轴值
fx=0.2;                                %模拟信号的频率(单位:kHz)
a=sin(2*pi*fx*t);                       %绘制曲线(约能画出1个周期)

%a=randn(1,500);
%a=[20*randn(1,20),rand(1,480)];

a_ori=a;                                %保留原始的信号
%ft=16;                                 %抽样频率
lt=5;                                   %每次抽样需要处理的采样点个数
te=linspace(-T/2,T/2,N/lt);
for i=1:lt:length(t)
    if (i+lt)>length(t)
        a([i:length(a)])=a(i+1);        %防止超标
    else 
        a(i+[0:lt])=a(i+1);
    end
end
amax=max(abs(a));
a_quan=a/amax;                          %归一化
b_quan=a_quan;
d=2/n;                                  %量化间隔
q=d.*[0:n-1];                          
q=q-((n-1)/2)*d;                        %量化电平
%进行量化
for i=1:n
    a_quan(find((q(i)-d/2<=a_quan) & (a_quan<=q(i)+d/2)))=...%定位第i个量化间隔码子
    q(i).*ones(1,length(find((q(i)-d/2<=a_quan)&(a_quan<=q(i)+d/2))));
    %赋值为相应的量化电平
    b_quan(find(a_quan==q(i))) =(i-1).*ones(1,length(find(a_quan==q(i))));%转化为对应的整数
end
a_quan=a_quan*amax;                     %恢复原值,去规一化(量化后)
nu=ceil(log2(n));                       %编码位数
code=zeros(length(a),nu);
for i=1:length(a)
    for j=nu:-1:0                       %从高向低编码
        if (fix(b_quan(i)/(2^j))==1)
        code(i,(nu-j))=1;
        b_quan(i)=b_quan(i)-2^j;
        end
    end
end

code_temp=zeros(10,nu);                 %存储前10个量化编码的中间变量
quan_temp=zeros(10,1);                  %存储前10个量化值的中间变量
count=1;                                %计数器
for i=1:length(a)/lt                    %循环找到前10个输入信号量化值
    count=count+1;
    quan_temp(i,1)=a_quan(1,i*lt);
    code_temp(i,:)=code(i*lt,:);
    if count==11                        %控制循环次数
        break;
    end
end

sqnr=20*log10(norm(a)/norm(a-a_quan))  %求量化信噪比
%显示前十个量化值和编码
quan_temp
code_temp
error=zeros(1,N/lt);
for i=1:N/lt
    error(i)=a(i*lt)-a_quan(i*lt);
end
%画图:
figure(1)
set(1,'position',[10,50,350,250])%设置窗口位置
plot(t,a_quan,'b',t,a_ori,'r')
grid on
axis([-T/2,T/2,min(a),max(a)])%设置坐标格式
xlabel('t(ms)')%给X轴加标签
ylabel('s(t)') %给Y轴加标签
title('量化级数为n时量化输出波形')

figure(2)
set(2,'position',[700,50,350,250])%设置窗口位置
stem(te,error,'b')
grid on
axis([-T/2,T/2,min(a),max(a)])%设置坐标格式
xlabel('t(ms)')%给X轴加标签
ylabel('Δs') %给Y轴加标签
title('量化级数为n时的均匀量化误差图')

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -