symbols_to_bits.m

来自「Sphit算法针对１２８*１２８的灰度图象进行压缩处理」· M 代码 · 共 31 行

% code the dominant and subordinate pass symbols using AC
clear
%clc
load filename output
sym=sym(1:486);
lim=length(sym)+1;
sequence=[];
pass=0;

ii=1;
while ii<lim
    partial=[];
    while ii<lim & sym(ii)~='0' & sym(ii)~='1'
        partial=[partial sym(ii)];
        ii=ii+1;
    end
    
    sequence=[sequence entropy_code(partial,pass)];
    partial=[];
    
    while ii<lim & sym(ii)~='p' & sym(ii)~='n' & sym(ii)~='i' & sym(ii)~='r' 
        partial=[partial sym(ii)];
        ii=ii+1;
    end
    
    sequence=[sequence entropy_code(partial,~pass)];
end


save filename sequence
disp(' COMPLETE ')