[爆料] 零基础到TC大师级别全套教程!,另附成品脚本源码30个

7851881

好东西需要回复的

zhangfengkoi

顶起

hyxgod

学习谢谢[哭][同意][不理你了]

hyxgod

学习谢谢[哭][同意][不理你了]

小苹果

csordy

江老师也顶贴了我们没有理由不顶啊。

wangqifeng84

学习学习

154639702

支持

iop888

Sub 找多图(x坐标, y坐标, x1坐标, y1坐标, 图片路径, 相似度, x偏移量, y偏移量, 图片像素x, 图片像素y, 延时时间, 鼠标动作)// 如 Call 找多图(0, 0, 1200, 800, "Attachment:\1.bmp", 0.9, 2, 10, 5, 20, 100, "LeftClick 2")
a = x坐标
b = y坐标
c = x1坐标
d = y1坐标
e = 0
Do
FindPic a,b,c,d,图片路径,相似度,intX,intY
If intX > 0 And intY > 0 Then
TracePrint intX & "," & intY
i = 0
a = intX + 图片像素x
d = intY + 图片像素y
TracePrint d
e = intY + 图片像素y
MoveTo intX+x偏移量, intY+y偏移量
Delay 延时时间
execute 鼠标动作
ElseIf intX < 0 and intY < 0 Then
TracePrint intX & "," & intY
a = 0
b = e
d = 1000
i = i + 1
TracePrint i
If i >= 3 Then
Exit Do
End If
End If
Delay 100
Loop
End Sub
这个是我写脚本的时候碰到多图问题 用数组又无法解决 因此想到这个办法 效果很好 而且可以随时调用 可以选择鼠标点击方式 以及查找的图片包括需要查找的图片相似度

本帖隐藏的内容

数量 = 找多图(0, 0, 1200, 800, "Attachment:\1.bmp", 0.9, 2, 10, 5, 20, 100)
MessageBox 数量
Function 找多图(x坐标, y坐标, x1坐标, y1坐标, 图片路径, 相似度, x偏移量, y偏移量, 图片像素x, 图片像素y, 延时时间)
// 如 数量 = 找多图(0, 0, 1200, 800, "Attachment:\1.bmp", 0.9, 2, 10, 5, 20, 100)
a = x坐标
b = y坐标
c = x1坐标
d = y1坐标
e = 0
图片数量 = 0
Do
FindPic a,b,c,d,图片路径,相似度,intX,intY
If intX > 0 And intY > 0 Then
TracePrint intX & "," & intY
i = 0
a = intX + 图片像素x
d = intY + 图片像素y
TracePrint d
e = intY + 图片像素y
MoveTo intX+x偏移量, intY+y偏移量
Delay 延时时间
图片数量 = 图片数量 + 1
ElseIf intX < 0 and intY < 0 Then
TracePrint intX & "," & intY
a = 0
b = e
d = 1000
i = i + 1
TracePrint i
If i >= 3 Then
Exit Do
End If
End If
Delay 100
Loop
找多图 = 图片数量
End Function
找多个图片返回图片数量

本帖隐藏的内容

数量 = 找多图(0, 0, 1200, 800, "Attachment:\1.bmp", 0.9, 5, 20, 0)
MessageBox 数量
Function 找多图(x坐标, y坐标, x1坐标, y1坐标, 图片路径, 相似度, 图片像素x, 图片像素y, 模式)
// 如 数量 = 找多图(0, 0, 1200, 800, "Attachment:\1.bmp", 0.9, 5, 20, 0)
//模式0为返回图片数量 模式1为返回所有图片坐标 模式2为返回图片数量后面带有返回的所有坐标
a = x坐标 : b = y坐标 : c = x1坐标 : d = y1坐标 : e = 0 : 图片数量 = 0 : 图片坐标 = ""
Do
FindPic a, b, c, d, 图片路径, 相似度, intX, intY
If intX > 0 And intY > 0 Then
图片坐标 = 图片坐标 & intX & "," & intY & "|"
i = 0 : a = intX + 图片像素x : d = intY + 图片像素y : e = intY + 图片像素y
Delay 100
图片数量 = 图片数量 + 1
ElseIf intX < 0 and intY < 0 Then
a = 0 : b = e : d = 1000 : i = i + 1
If i >= 3 Then
Exit Do
End If
End If
Delay 100
Loop
If 模式 = 0 Then
找多图 = 图片数量
ElseIf 模式 = 1 Then
找多图 = 图片坐标
ElseIf 模式 = 2 Then
找多图 = 图片数量 & ":" & 图片坐标
End If
End Function

傲视风云

顶111111