JPEG matlab 压缩

JPEG图像压缩,采用霍夫曼编码，给出压缩比和压缩效率，MATLAB代码

function acCodeOut=AcCode（zScanOut）
%交流系数编码
%完成一个块的交流编码
%输入z形扫描结果，输出码流
N=8;
num=N*N+1;i=N*N;
b=cell（1N*N）;
%b{j}O包括两个部分，b{j}（1）表示连零个数，b{j}{2}表示幅度

%游程编码开始
while（i>1）%确定EOB前系数的长度
    if（zScanOut（i）==0）num=num-1;i=i-1;
    else break;
    end
end

i=2;
j=1;
while（i    zeroNum=0;
    while（zScanOut（i）==0）%确定连零个数
        zeroNum=zeroNum+1;
        i=i+1;
        if（zeroNum==16）
            b{j}=[15 0];
            j=j+1;
            zeroNum=0;
        end
    end
    b{j}=[zeroNum zScanOut（i）];%b{j}（1）表示连零个数，b{j}{2}表示幅度
    j=j+1;
    i=i+1;
end
b{j}=[0 0];%EOB块编码

%游程编码完毕

binacRange=cell（11）;%幅度值二进制编码
forHuf=cell（11）;%Hufman编码的输入参数，每个元素包括两个部分：游程长度和binacRange长度
hufCodeOut=cell（11）;
out=cell（11）;
for i=1:j
    binacRange{i}=dec2bin（abs（b{i}（

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      16570  2003-01-08 16:31  jpeg\1.tif

     文件       3547  2003-01-08 16:35  jpeg\2.tif

     文件       1996  2003-01-08 16:35  jpeg\3.tif

     文件       4200  2003-01-08 16:37  jpeg\4.tif

     文件       1525  2005-06-04 02:18  jpeg\AcCode.m

     文件        307  2010-11-13 23:14  jpeg\antiQuanY.m

     文件       1108  2005-06-04 02:48  jpeg\antiZscan.m

     文件        496  2010-11-14 17:14  jpeg\Code.asv

     文件        615  2010-11-13 20:48  jpeg\Code.m

     文件        838  2010-11-15 00:41  jpeg\Jpeg.asv

     文件        847  2010-11-15 22:32  jpeg\Jpeg.m

     文件       1719  2005-06-04 02:46  jpeg\MakeTree.m

     文件        337  2010-11-15 22:32  jpeg\pic.dat

     文件        313  2010-11-13 23:25  jpeg\QuantyY.m

     文件        130  2010-11-15 01:01  jpeg\show.asv

     文件        169  2010-11-15 01:02  jpeg\show.m

     文件       3017  2010-11-13 21:09  jpeg\UnCode.m

     文件        893  2005-06-04 02:32  jpeg\UnHufCode.m

     文件      12775  2005-06-07 01:55  jpeg\varable.m

     文件      14166  2005-06-04 02:22  jpeg\YAcHufCode.m

     文件       1189  2005-06-04 02:18  jpeg\YCode.m

     文件       1005  2005-06-04 02:28  jpeg\ZScan.m

     目录          0  2010-11-15 22:32  jpeg

----------- ---------  ---------- -----  ----

                67762                    23