Question

按键精灵循环找多图、怎么简化代码

指定区域内、一查到就执行操作、再查、再操作、无限循环到我按结束为止
代码我都写好了、我这段代码可以正常使用、但是如果我要找的图多了、代码一段一段的要复制很多、而且每段代码中就所找的图片名称不一样、有没有什么方法连接起来，比如（“图片1”，“图片2”，“图片3”等等等等等好多图）这样就不用一段段的复制改名字了
---------------------------------------------------------------------------------------------------
Do
FindPic 0,139,271,589,"Attachment:\1.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
RightClick 1
KeyPress "Up", 1
KeyPress "Enter", 1
Exit Do
End If
FindPic 0,139,271,589,"Attachment:\2.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
RightClick 1
KeyPress "Up", 1
KeyPress "Enter", 1
Exit Do
End If
FindPic 0,139,271,589,"Attachment:\3.bmp",1,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
RightClick 1
KeyPress "Up", 1
KeyPress "Enter", 1
Exit Do
End If
Loop
//我想要的是：不要写 N 段一样的代码、能不能把 N 张图片的名字连接起来、如何简化？

Answer 1

iNum = Plugin.Pic.FindMultiPicEx(0,0,1024,768,"C:\图片.bmp", 0, 1.0)
iCoord = Split(iNum, "|")
For n = 0 To Ubound(iCoord)
XY = Split(iCoord(n), ",")
TracePrint XY(0)
TracePrint XY(1)
Next
//可以多个图片路径（"C:\图片.bmp|D:\图片.bmp"），或者只要第一个有路径后面都跟随（"D:\图片1.bmp|图片2.bmp"）。
//失败返回：-1,-1|X,Y|...

追问

您的脚本在调试过程中，产生了下列调试信息：
脚本
我的脚本1.Q ，第1行：对象不支持此属性或方法: 'PIC.FINDMULTIPICEX',

追答

更新按键版本.

追问

最新版本、官网重载过、方便加QQ么？
761五32八八0

追答

其实我想说的是用数组.
即使不用数组,只要图片名称一致,序号是按序递增也可以.
do
for i=1 to 10
FindPic 0,139,271,589,"Attachment:\"&i&".bmp",1,intX,intY
If intX > 0 And intY > 0 Then
MoveTo intX, intY
RightClick 1
KeyPress "Up", 1
KeyPress "Enter", 1
Exit Do
End If
next
loop

追问

附件图片必须递增改名，12345……或者是图片1图片2

这样子的吗？我回家试试看

这个方法可以，只要图片名字纯数字，并且数字在i的区间内都可以被找到并执行操作！

我还想问您下，如果我想再附加一个功能：在上面这个循环中添加查找一个与上面不同坐标范围的多张图，然后执行与上面循环不同的操作，需要怎么加入？

追答

用IF判断i的值.

追问

    是用 if 判断这个区间么？比如：

• i 值在 1 到 100 之间是查找范围 A、然后执行动作 A

• i 值在 100 到 200 之间查找范围 B、然后执行动作 B

    代码是加在End if 之前么？我刚学习、不好意思啊一直问您！

追答

//给找图坐标赋初始值
a1=0,a2=139,a3=271,a4=589

do
for i=1 to 200
FindPic a1,a2,a3,a4,"Attachment:\"&i&".bmp",1,intX,intY
If intX > 0 And (i>=1 and i 0 And (i>100 and i100 then//图100以后,换找图范围
a1=100,a2=200,a3=300,a4=400
elseIf i>200 then//因为是不断循环找图,超过200图以后重新回图100以下的找图范围
a1=0,a2=139,a3=271,a4=589
end if
next
loop

追问

赋值语句错误，怎么解决呢，我好小白

追答

逗号换冒号

追问

谢谢，可以了，有问题，我私信你可以吗？我先采纳了，很感谢你，谢谢