Kanchi

a probar

give me matlab code for B2 coding

Very nice code, although it could use some refactoring, e.g. this part in the main demo file:

OrigSize = size(Orig_I, 1);
max_bits = floor(rate * OrigSize^2);
OutSize = OrigSize;
image_spiht = zeros(size(Orig_I));
[nRow, nColumn] = size(Orig_I);
n = size(Orig_I,1);
n_log = log2(n);
level = n_log;

Could be simple rewritten as:

[nRow, nColumn] = size(Orig_I);
max_bits = floor(rate * nRow^2);
level = log2(nRow);

OutSize and image_spiht are never used in fact. Last line assumes silently that dimensions of the image are power of 2 and that there are at least as many columns as rows. Perhaps this would be better:
level = floor( log2( min( [ nRow, nColumn ] ) ) );

Matlab code analyzer complains a lot about variables growing inside the loops. I think that optimizing that could improve performance a lot.