#include <Array.au3>

Global $A =	[[1, 2, 22,'a4', 20, 22, 66, 23],	_
			[ 2, 5, 23,'a4', 34, 31, 34, 55],	_
			[ 2, 5, 23,'a4', 34, 31, 34, 55],	_
			[ 1, 2, 22,'a4', 20, 22, 66, 23],	_
			[ 2, 5, 23,'a4', 34, 31, 34, 55],	_
			[ 2, 5, 23,'a4', 34, 31, 34, 55],	_; 6,4
			[ 5, 1, 20,'a4', 22, 44, 55, 66],	_;
			[ 6, 7, 10,'a4', 55, 66, 33, 44],	_;
			[ 5, 1, 20,'a4', 55, 66, 33, 44],	_
			[ 2, 5, 23,'a4', 22, 44, 55, 66],	_
			[ 1, 2, 86,'a4', 55, 66, 33, 44]]

Global $B = [['a4', 34, 31, 34, 55],	_
			[ 'a4', 22, 44, 55, 66],	_
			[ 'a4', 55, 66, 33, 44]]
;MsgBox($MB_SYSTEMMODAL,'',UBound($A,2)&' '&UBound($b,2) ) ;3임 3,7

For $i = 0 To UBound($A,1) - UBound($B,1)

	For $j = 0 To UBound($A,2) - UBound($B,2)

		For $k = 0 To UBound($B,1)-1

			For $l = 0 To UBound($B,2)-1

				If ( $B[$k][$l] <> $A[$k+$i][$l+$j] ) Then

						ContinueLoop 2

				EndIf

			Next

		Next

	Next

Next

MsgBox($MB_SYSTEMMODAL, 'AREA', $i &','& $j &' ~ '& $i+UBound($B,1)-1 &',' & $j+UBound($B,2)-1 )
MsgBox($MB_SYSTEMMODAL, 'area', 'x, y : ' & $j &','& $i &' ~ '&  $j+UBound($B,2)-1 & ','& $i+UBound($B,1)-1 )