求按键精灵自动搜大鱼的脚本 谢谢

求按键精灵自动搜大鱼的脚本 谢谢

我是菜鸟，刚接触按键，在玩coc，电脑BS模拟器玩的。总是手动搜鱼太麻烦了。
于是自己做的coc自动搜鱼代码，用的是大漠做的，经测试能百分之八九十能搜到大鱼。
电脑的分辨率是：1920*1080
BS分辨率是：800*600
貌似还不够完善，有时候金币没符合条件，也停止了搜索。大家来来学习一下，大神帮帮忙帮完善一下
代码是这样的：
PutAttachment \"c:\\test_game\", \"dm.dll\"
PutAttachment \".\\plugin\", \"regdll.dll\"
Call Plugin.RegDll.reg(\"c:\\test_game\\dm.dll\")
Set dm = createobject(\"dm.dmsoft\")
base_path = dm.GetBasePath()
dm_ret = dm.SetPath(\"c:\\test_game\")
dm_ret = dm.SetDict(0, \"dm_soft.txt\")
//上面的都是大漠的注册等
hwnd = dm.FindWindow(\"\", \"靠谱助手\")//获取靠谱的BS模拟器窗口句柄
dm_ret = dm.bindwindow(hwnd, \"normal\", \"normal\", \"normal\", 0)//绑定窗口
Rem a
Rem s
Rem m
s = dm.Ocr(35, 53, 147, 76, \"cfcfcf-303030\", 0.9)//获取游戏左上角显示的金币数值
If s > 180000 Then //判断金币是否大于十八万
Goto b
Else
m = dm.Ocr(703, 384, 763, 410, \"fcfcfc-b4b1ab\", 0.9)//获取右下角的“下一个”按钮
If m=下一个 Then
Call Plugin.Bkgnd.LeftClick(Hwnd, 690, 396)//点击按钮

Delay 2000
Else
Goto a
End if
Goto a

Rem b
End If

大概是这样！！
求指点！！！

我。。知。。道 加。。我。。私。。聊

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息