这个代码实现找到图中天神下凡四个字。

429338353 · 发表于 2019-1-1 19:13:09

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

本帖最后由 429338353 于 2019-1-1 19:15 编辑

Rem x1
找天神 = FindStr(293,766,953,1768, "天|神|天神", "DCD23B-101010|DAD03B-101010|DAD13B-101010", 0.7, intX, intY)
If 找天神 > -1 Then

TracePrint intX,intY

Else
TracePrint "没有找到，正在重新寻找"
Goto x1
End If

我试过很多不同的写法。就是找不到。要不就是找到不是这个字的坐标。有没有大佬能帮忙看看。
我是准备找个这个字的坐标，然后偏移点击。字库这些也是没有问题的。实在不行就找个大神帮忙写个，可以给钱。但是一定要实现这个操作才行。

C:\Users\田鑫敏\Desktop\截图1.png

429338353 · 发表于 2019-1-1 19:16:47

本帖最后由 429338353 于 2019-1-1 19:18 编辑

C:\Users\田鑫敏\Desktop\脚本图\截图1.pngfile:///C:/Users/田鑫敏/Desktop/脚本图/截图1.png

429338353 · 发表于 2019-1-1 19:18:39

file:///C:/Users/田鑫敏/Desktop/脚本图/截图1.png

admin_user · 发表于 2019-1-1 21:44:23

列子:

[按键精灵] 纯文本查看 复制代码

  
TracePrint SetDictEx(0, "Attachment:s1.txt")//设置附件中的s1.txt文档为1号字库
TracePrint UseDict(0)//使用1号字库文件，之后的找字、识别都在这个文件点阵中匹配
Dim 索引值,intX,intY
索引值 = FindStr(0,0,2000,2000,"长安","9f2e3f-000000",1.0,intX,intY)
If intX >= 0 and intY >= 0 Then
    Tap intX,intY
End If

索引值 = FindStr(0,0,2000,2000,"长安|洛阳","9f2e3f-000000",0.9,intX,intY)
If intX >= 0 and intY >= 0 Then
     Tap intX,intY
End If

索引值 = FindStr(0,0,2000,2000,"长安|洛阳","9f2e3f-000000",0.9,intX,intY)
Select Case 索引值
Case 0
    Traceprint "找到长安"
Case 1
    Traceprint "找到洛阳"
End Select

紫猫 · 发表于 2019-1-1 21:54:16

手机版不推荐你用找字功能, 建议找图或者找色

linyoude · 发表于 2019-1-5 20:03:56

看不清的图啊,

贫僧要脱贫 · 发表于 2019-1-11 00:27:07

看不清的图啊,

		自动登录	找回密码
密码			立即注册

[已回复] 这个代码实现找到图中 天神下凡 四个字 。

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

[已回复] 这个代码实现找到图中天神下凡四个字。