按键精灵 数字识别不到求大神帮我看看哪里出问题了

Question

ux = 101
uy = 88

y = uy
For 8
x = ux
For 6
GetColor=GetPixelColor(x,y)
If GetColir = "966B15" Then
i = "1"
Else
i = "0"
End If
code = code & i
x = x + 1
Next
y = y + 1
Next

no0="100001100101001100001100001100001100101101100001"
no1="111011100011110011110011110011110011110011100001"
no2="100001001100001100111101111011110011101100000000"
no3="100001001101101101110011111101111100001100100001"
no4="111001110001110001100001001001000000111001110000"
no5="100001101111101111100001101100111100001100100001"
no6="100001101001001111000001001100001100001100100001"
no7="100000001101111001111011110011110011110011110011"
no8="100001001100001101100001101001001100001100100001"
no9="100001001101001100001100100000111101101001100011"

If code = no0 Then
num="0"
ElseIf code = no1 Then
num="1"
ElseIf code = no2 Then
num="2"
ElseIf code = no3 Then
num="3"
ElseIf code = no4 Then
num="4"
ElseIf code = no5 Then
num="5"
ElseIf code = no6 Then
num="6"
ElseIf code = no7 Then
num="7"
ElseIf code = no8 Then
num="8"
ElseIf code = no9 Then
num="9"
Else
num="识别不到"
MessageBox num
End If
\\顺便问下怎么根据识别出来的0-9做不同的指令
比如说识别出来是7，然后跳转到标记 7

Answer 1

这源码以前好像看过,应该是按键论坛的一个新手源码吧..?

识别文本字串的源码,都是通过颜色点阵的位置来识别,这个源码的局限性很大,首先,你要确定和源码规定的字体是一致的,然后,你要判断一下你所写的数字的颜色是否等于"966B15"(可以用抓抓来查看.)

看你的问题,你应该是新学的吧,推荐你学一下大漠吧..大漠的文字点阵识别很出名的..功能很强大..

至于跳转,这个很简单的..
用你上面的代码来说一下吧.
If code = no0 Then
num="0" //判断code等于no0,则把num赋值"0"..
ElseIf code = no1 Then
num="1" //判断code等于no1,则把num赋值"1".. 下面的也是相同的
ElseIf code = no2 Then
num="2"
ElseIf code = no3 Then
num="3"
End if

上面的num="x" .就是一个相等则被操作的语句

所以,你可以直接把你要操作的语句,放进它赋值的位置即可.. 比如(num="0" )那个位置