function?F?=?embed（FQw）???%?w=1:64.*64???F
size4=size（F）;
N1=size4（1）;???%32
N2=size4（2）;???%32
k=1;
for?j=1:N1
????for?i=1:N2
????????if（w（k）==1）
????????????F{ij}（15:7）=round（F{ij}（15:7）./Q{ij}（15:7））.*Q{ij}（15:7）+Q{ij}（15:7）./2;
????????????%F{ij}（25:7）=round（F{ij}（25:7）./Q{ij}（25:7））.*Q{ij}（25:7）+Q{ij}（25:7）./2;
????????else
????????????F{ij}（15:7）=round（F{ij}（15:7）./Q{ij}（15:7））.*Q{ij}（15:7）;
????????????%F{ij}（25:7）=round（F{ij}（25:7）./Q{ij}（25:7））.*Q{ij}（25:7）;
????????end
????????k=k+1;
????????if（w（k）==1）
????????????F{ij}（35:7）=round（F{ij}（35:7）./Q{ij}（35:7））.*Q{ij}（35:7）+Q{ij}（35:7）./2;
????????????%F{ij}（44:6）=round（F{ij}（44:6）./Q{ij}（44:6））.*Q{ij}（44:6）+Q{ij}（44:6）./2;
????????else
????????????F{ij}（35:7）=round（F{ij}（35:7）./Q{ij}（35:7））.*Q{ij}（35:7）;
????????????%F{ij}（44:6）=round（F{ij}（44:6）./Q{ij}（44:6））.*Q{ij}（44:6）;
????????end
????????k=k+1;
????????if（w（k）==1）?????
????????????F{ij}（54）=round（F{ij}（54）./Q{ij}（54））.*Q{ij}（54）+Q{ij}（54）./2;
????????else
????????????F{ij}（54）=round（F{ij}（54）./Q{ij}（54））.*Q{ij}（54）;
????????end
????????k=k+1;
????????if（w（k）==1）
????????????F{ij}（72）=round（F{ij}（72）./Q{ij}（72））.*Q{ij}（72）+Q{ij}（72）./2;
????????else
????????????F{ij}（72）=round（F{ij}（72）./Q{ij}（72））.*Q{ij}（72）;
????????end
????????k=k+1;
????end
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????1427??2008-05-03?05:49??數字水印\embed.m

?????文件???????1539??2008-05-05?00:34??數字水印\experiment1.m

?????文件????????746??2008-05-05?00:29??數字水印\experiment2.m

?????文件????????758??2008-05-03?15:47??數字水印\experiment3.m

?????文件????????686??2008-05-02?04:35??數字水印\intensity.m

?????文件??????10579??2008-05-05?00:32??數字水印\lena.jpg

?????文件??????66614??2008-05-05?00:34??數字水印\marked.bmp

?????文件?????473296??2008-05-05?00:34??數字水印\marked.mat

?????文件??????66616??2008-05-04?23:46??數字水印\marked1.bmp

?????文件??????66616??2008-05-04?23:49??數字水印\marked2.bmp

?????文件??????68112??2008-05-04?23:51??數字水印\marked3.bmp

?????文件??????67788??2008-05-04?23:54??數字水印\marked4.bmp

?????文件????????836??2008-05-03?15:52??數字水印\pick_up.m

?????文件????????297??2008-05-05?00:38??數字水印\read_me.txt

????..A.SH.?????43520??2008-05-07?23:10??數字水印\Thumbs.db

?????文件????????718??2008-05-03?05:41??數字水印\Torus.m

?????文件??????12342??2008-05-03?15:14??數字水印\watermark.bmp

?????文件????????574??2008-05-05?00:34??數字水印\Wpick.bmp

?????文件????????600??2008-05-05?00:34??數字水印\Wpick.mat

?????目錄??????????0??2008-05-07?23:10??數字水印

-----------?---------??----------?-----??----

???????????????883664????????????????????20