安卓按键精判定疑问(已补充问题) 安卓按键精灵找图难题求助 写脚本
安卓按键精判定疑问(已补充问题)安卓按键精灵找图难题求助写脚本高手们否教一教我,关於找图点击和判定的,我要找A,B,C,D四组图片,A大约二十张,B大约二十张,C大约二十...
安卓按键精判定疑问(已补充问题)
安卓按键精灵找图难题求助
写脚本高手们否教一教我,
关於找图点击和判定的,
我要找A,B,C,D四组图片,A大约二十张,B大约二十张,C大约二十张,D就只有单一张,不过图片不是一开始就全都出现了的一开始时只有几张A和B,过程中,要开始找图,找到然後点击来消除图片,每消失一张,才会出现另一张如此类推,
而要做到的效是,先找A组,找到没有A组的图就转找B组,找完时转回找B,找完B找A,一直循环直至AB都没了时,
就找C组,都找完才找D,
就样的话,判定命令,要怎麼写?
求大神指点
问题补充:谢谢,但可否注解一下,我还是新手,很多不明白的地方,麻烦大大了,另想补充一下,图片的总数量是固定的,但一场下来会出现那几张和多少张却是随机的,这有影响吗?只有分组方面是固定的,图片总数是300多吧,平均每场出现60-80 展开
安卓按键精灵找图难题求助
写脚本高手们否教一教我,
关於找图点击和判定的,
我要找A,B,C,D四组图片,A大约二十张,B大约二十张,C大约二十张,D就只有单一张,不过图片不是一开始就全都出现了的一开始时只有几张A和B,过程中,要开始找图,找到然後点击来消除图片,每消失一张,才会出现另一张如此类推,
而要做到的效是,先找A组,找到没有A组的图就转找B组,找完时转回找B,找完B找A,一直循环直至AB都没了时,
就找C组,都找完才找D,
就样的话,判定命令,要怎麼写?
求大神指点
问题补充:谢谢,但可否注解一下,我还是新手,很多不明白的地方,麻烦大大了,另想补充一下,图片的总数量是固定的,但一场下来会出现那几张和多少张却是随机的,这有影响吗?只有分组方面是固定的,图片总数是300多吧,平均每场出现60-80 展开
1个回答
展开全部
这需要把全部图片都截取下来才行的。
就算是人也要都知道这300张图片,分别是A还是B
Hwnd = Plugin.Window.Find(0, "找图")
Rem A组
Delay 1000
XY = Plugin.Bkgnd.FindMultiPic(Hwnd, 0, 0, 2000,2000, "C:\A组1.bmp|A组2.bmp|A组3.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If X > 0 And Y > 0 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else
Goto B组
End If
Goto A组
Rem B组
Delay 1000
XY = Plugin.Bkgnd.FindMultiPic(Hwnd, 0, 0, 2000,2000, "C:\B组1.bmp|B组2.bmp|B组3.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If X > 0 And Y > 0 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else
Goto C组
End If
Goto B组
Rem C组
Delay 1000
XY = Plugin.Bkgnd.FindMultiPic(Hwnd, 0, 0, 2000,2000, "C:\C组1.bmp|C组2.bmp|C组3.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If X > 0 And Y > 0 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else
Goto E组
End If
Goto C组
Rem E组
Delay 1000
XY = Plugin.Bkgnd.FindMultiPic(Hwnd, 0, 0, 2000,2000, "C:\E组1.bmp|E组2.bmp|E组3.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If X > 0 And Y > 0 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
MessageBox "找图完成 QQ1115100881"
EndScript
Else
MessageBox "QQ1115100881"
End If
Goto E组
按键精灵锭置各种小脚本 1115100881
就算是人也要都知道这300张图片,分别是A还是B
Hwnd = Plugin.Window.Find(0, "找图")
Rem A组
Delay 1000
XY = Plugin.Bkgnd.FindMultiPic(Hwnd, 0, 0, 2000,2000, "C:\A组1.bmp|A组2.bmp|A组3.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If X > 0 And Y > 0 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else
Goto B组
End If
Goto A组
Rem B组
Delay 1000
XY = Plugin.Bkgnd.FindMultiPic(Hwnd, 0, 0, 2000,2000, "C:\B组1.bmp|B组2.bmp|B组3.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If X > 0 And Y > 0 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else
Goto C组
End If
Goto B组
Rem C组
Delay 1000
XY = Plugin.Bkgnd.FindMultiPic(Hwnd, 0, 0, 2000,2000, "C:\C组1.bmp|C组2.bmp|C组3.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If X > 0 And Y > 0 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else
Goto E组
End If
Goto C组
Rem E组
Delay 1000
XY = Plugin.Bkgnd.FindMultiPic(Hwnd, 0, 0, 2000,2000, "C:\E组1.bmp|E组2.bmp|E组3.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If X > 0 And Y > 0 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
MessageBox "找图完成 QQ1115100881"
EndScript
Else
MessageBox "QQ1115100881"
End If
Goto E组
按键精灵锭置各种小脚本 1115100881
追问
感恩大神,先试试!
对不起,大大可否再麻烦你一下,应该是代码不对,我要的是手机安卓版按键精灵,谢谢
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询