function?DirGrad2（Ar0c0）;
????global?pnGradX;
????global?pnGradY;
????global?pnGradXY;
	int?y?;
	int?x?;
	%?計算x方向的方向導數，在邊界出進行了處理，防止要訪問的象素出界
	for?y=1:r0
??????for?x=1:c0
??????pnGradX（（y-1）*c0+x）=A（ymin（c0x+1））-A（ymax（1x-1））+A（max（1y-1）min（c0x+1））-A（max（1y-1）max（1x-1））+A（min（r0y+1）min（c0x+1））-A（min（r0y+1）max（1x-1））;
??????end
????end

	%?計算y方向的方向導數，在邊界出進行了處理，防止要訪問的象素出界
	for?y=1:r0
??????for?x=1:c0
			pnGradY（（y-1）*c0+x）=A（min（r0y+1）x）-A（max（1y-1）x）+A（min（r0y+1）max（1x-1））-A（max（1y-1）max（1x-1））+A（min（r0y+1）min（c0x+1））-A（max（1y-1）min（c0x+1））;
				%（pUnOrgImg[min（（int）（r0-1）y+1）*c0?+?x]-pUnOrgImg[max（0y-1）*c0+x]）;
??????end
????end
	for?y=0:r0-1
		for?x=1:c0
????????
			pnGradXY（y*c0+x）=pnGradX（y*c0+x）*pnGradY（y*c0+x）;
????????end
???

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

?????文件???????1036??2009-05-20?12:10??程序包\DirGrad2.m

?????文件???????1275??2009-05-20?12:38??程序包\Gaussian.m

?????文件???????2363??2009-07-02?13:31??程序包\harris.m

?????文件????????675??2009-07-02?22:44??程序包\main.m

?????文件????????530??2009-05-20?12:32??程序包\MakeGauss2.m

?????文件???????1115??2009-07-02?22:35??程序包\matchok.m

?????文件????????230??2009-07-02?14:35??程序包\read?me.txt

?????文件????????672??2009-07-02?22:43??程序包\stitch.m

????..A..H.???????162??2010-05-22?16:10??程序包\~$?Microsoft?Word?文檔.doc

?????文件??????27648??2010-05-21?11:27??程序包\圖像拼接設計文檔1.doc

?????文件??????55808??2010-05-22?16:08??程序包\新建?Microsoft?Word?文檔.doc

?????目錄??????????0??2010-05-24?16:47??程序包

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

????????????????91514????????????????????12