按键精灵找图脚本
A. 按键精灵找图脚本如何制作
Rem 找图1
FindPic 0,0,1024,768,"Attachment:\1.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
End If
If intX > 0 and inty > 0 Then
MoveTo intx + 3, inty + 3
LeftClick 1
Else
Delay 100
Goto 找图1
End If
Delay 1000
Rem 找图2
FindPic 0,0,1024,768,"Attachment:\2.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
End If
If intX > 0 and inty > 0 Then
MoveTo intx + 3, inty + 3
LeftClick 1
Else
Delay 100
Goto 找图2
End If
For 60
Delay 1000
Next
Goto 找图1
B. 按键精灵里找图,连续找图并执行命令
MoveTo 457, 522
Do
i = i + 1
字符串 = "第 " & i & " 次找图"
For 1
FindPic 434, 735, 452, 757, "Attachment:\1.bmp", 0.9, intX, intY
If intX < 0 Then
TracePrint 字符串 & " ,A处没找到"
Exit For
End If
FindPic 526, 735, 542, 757, "Attachment:\1.bmp", 0.9, intX, intY
If intX < 0 Then
TracePrint 字符串 & " ,B处没找到"
Exit For
End If
FindPic 615, 735, 632, 757, "Attachment:\1.bmp", 0.9, intX, intY
If intX < 0 Then
TracePrint 字符串 & " ,C处没找到"
Exit For
Else
TracePrint 字符串 & " ,C处找到了"
EndScript
End If
Next
Delay 200
LeftClick 2
Delay 400
Loop
C. 按键精灵连续找图点击求脚本
//找到哪张图就点哪张,无限循环
Do
For i = 1 To 9
FindPic 0, 0, 1024, 768, "Attachment:\" & i & ".bmp", 0.9, intX, intY
If intX > 0 And intY > 0 Then
MoveTo intX + 3, intY + 3
LeftDoubleClick 1
End If
Delay 200
Next
Loop
D. 按键精灵脚本自动找图问题
第一、可能你设置的0.5太小了。所以一直能找到。就点击了。。
第二个,你把Else前加以句Goto aaa。
E. 求按键精灵高手看一下自动找图脚本
“程序有错误”,估计应该是版本不一样的问题。你找的代码是低级版本写的,你执行的版本比较高级。
如果你熟悉这些指令的话,建议你按照他用你自己的版本重新写一遍
F. 按键精灵全程找图命令
代码里面加两句找图代码即可。如果你不需要马上点掉对话框,就可以这样做。能单线程就单线程。多线程如果有参数传达,不好控制。
G. 求按键精灵区域找图脚本
Do // 0, 0 和1024, 768是找图范围的左上角坐标和右下角坐标. FindPic 0, 0, 1024, 768, "Attachment:\神盾.bmp", 0.9, intX, intY //找到后这个intx和inty就是图的左上角坐标,会大于0的.没找到就是-1,-1 If intX > 0 And intY > 0 //找到后执行if 和else之间的代码. Else //没有找到执行else和endif之间的代码. End If Delay 300 //do和loop间的代码重复执行,直到这个条件成立则不再循环,即intx和inty都大于0则不再循环 Loop Until intx>0 and inty>0 追问: 因为接下来还要找图片,也就是说找无数张图片,但循环不能乱,也就是说找到这张图片接着找下一张图片,每张图片要单独循环 Do (这个是不是要改标记1--9) FindPic 0,0,1440,900,"C:\Users\Administrator\Pictures\258.bmp",0.5,intX,intY If intX > 0 And intY > 0 Then Else End if Delay 30 Loop Until intx>0 and inty>0(这里应该怎样改) MoveTo 1000, 193 LeftClick 1 回答: Do FindPic 0,0,1440,900,"C:\Users\Administrator\Pictures\258.bmp",0.5,intX,intY If intX > 0 And intY > 0 Then Else End if Delay 30 Loop Until intx>0 and inty>0 //找到了图,运行到这一句,就不 再循环 ,即运行接下来的一句. Do FindPic 0,0,1440,900,"C:\Users\Administrator\Pictures\图2.bmp",0.5,intX,intY If intX > 0 And intY > 0 Then Else End if Delay 30 Loop Until intx>0 and inty>0 //从不用标记的。 追问: 问一个白痴的问题:找到图片 鼠标 则移动图片是什么代码了 回答: //FindPic 0, 0, 1024, 768, "Attachment:\ 神盾 .bmp", 0.9, intX, intY //找到后这个intx和inty就是图的左上 角坐标 ,会大于0的.没找到就是-1,-1 Do FindPic 0,0,1440,900,"C:\Users\Administrator\Pictures\258.bmp",0.5,intX,intY If intX > 0 And intY > 0 Then moveto intx,inty //称动到图片的左上角。也可以:moveto intx+5,inty+5 Else End if Delay 30 Loop Until intx>0 and inty>0 //找到了图,运行到这一句,就不 再循环 ,即运行接下来的一句. Do
H. 按键精灵找图脚本
picpath=array("图1","图2","图3","图4","图5","图6","图7")
//把你所有要找的图片放到附件里面.需要多少张图自己随意加,按格式
i=0
do
FindPic 0,0,1440,900,"Attachment:\"&picpath(i)&".bmp",0.8,X,Y
If X > 0 And Y > 0 Then
//不管出现哪一张之后鼠标移动过去就会点击该图片
MoveTo x+5,y+5
LeftClick 1
Exit do //找到后跳出循环
End If
i=i+1
If 5=i Then
i=0
End if
loop
I. 按键精灵 找图点击 求写脚本
好吧 我 就写到 006 001 是 找不到 跳 001 002 也是 找不到 跳 001 不知道是不是你想要的 至于006 后面的 都差不多了
Rem a
FindPic 0,0,1024,768,"Attachment:\001.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
LeftClick 1
Else
Goto a
End If
Rem b
FindPic 0,0,1024,768,"Attachment:\002.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
LeftClick 1
Else
Goto a
End If
Rem c
FindPic 0,0,1024,768,"Attachment:\003.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
LeftClick 1
Else
Goto b
End If
Rem d
FindPic 0,0,1024,768,"Attachment:\004.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
LeftClick 1
Else
Goto c
End If
Rem e
FindPic 0,0,1024,768,"Attachment:\005.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
LeftClick 1
Delay 200
LeftClick 1
Delay 200
LeftClick 1
Delay 200
Else
Goto d
End If
Rem f
FindPic 0,0,1024,768,"Attachment:\006.bmp",0.9,intX,intY
If intX > 0 And intY > 0 Then
LeftClick 1
Else
Goto e
End If
J. 按键精灵 找图脚本,找到图执行点击后,不继续找图,
你把同一级别要找的图放入一个FOR循环(或者DO循环,找到后点击完直接退出循环,执行以后的脚本,那么这层的所有找图都不会再执行了)
For 1
FindPic 0, 0, 1360, 768, "Attachment:\购买雷.bmp", 0.9, intX, intY
If intX > 0 And intY > 0 Then
Call 点击
Exit For
End If
FindPic 0, 0, 1360, 768, "Attachment:\购买木.bmp", 0.9, intX, intY
If intX > 0 And intY > 0 Then
Call 点击
Exit For
End If
FindPic 0, 0, 1360, 768, "Attachment:\购买水.bmp", 0.9, intX, intY
If intX > 0 And intY > 0 Then
Call 点击
Exit For
End If
FindPic 0, 0, 1360, 768, "Attachment:\购买火.bmp", 0.9, intX, intY
If intX > 0 And intY > 0 Then
Call 点击
Exit For
End If
next
或者你把同一级要找的图 全部用Else 来表示,如果找到图以后Else是不会成立的~~
具体操作还是要根据你需要的逻辑来编写代码!