大漠找图算法_新手用大漠找图识别数字，怎么将数字组合起来呢

麻烦哪位大神帮忙看看，萌新面临大困境！

新手不会用大漠识别数字，于是便觉得用找图的方式来间接实现识别数字

Sub 找图识别识别数字()

set dm = createobject("dm.dmsoft")

base_path = dm.GetBasePath()

dm_ret = dm.SetPath(base_path)

dm_ret = dm.SetDict(0, "dm_soft.txt")

dm_ret = dm.Capture(323, 667, 435, 678, "360ye.bmp")

dm_ret = dm.Capture(369, 667, 435, 678, "360ye2.bmp")

dm_ret = dm.FindPic(324, 668, 430, 678, "￥.bmp", "" & wz360 & "", 0.9, 1, intX, intY)

x1 = intX - 1

y1 = inty - 2

x2 = x1 + 6

y2 = y1+11

For 8

Delay 30

i=""

Delay 30

dm_ret = dm.FindPic(x1, y1, x2, y2, "数字0.bmp|数字0b.bmp", "" & wz360 & "", 0.9, 1, intX0, intY0)

If intX0 >= 0 and intY0 >= 0 Then

x1 = x1 + 7

x2 = x2 + 7

i = "0"

Delay 30

MessageBox "0"

End If

dm_ret = dm.FindPic(x1 + 7, y1, x2 + 7, y2, "数字1.bmp|数字1b.bmp", "" & wz360 & "", 0.9, 1, intX1, intY1)<