以下是模板,需要先绑定窗口和注册大漠插件,否则会失效。
按键精灵大漠插件颜色获取代码
Sub 获取颜色()
color = dm.GetColor(320,451)
If color = "ff6146" Then
dm.MoveTo 320,451
Delay 100
dm.leftclick
End if
End Sub
按键精灵大漠插件颜色查找代码
Sub 查找颜色()
dm_ret = dm.FindColor(226,418,416,570,"ff6146",1.0,0,intX,intY)
If intX >= 0 and intY >= 0 Then
dm.moveto intX, intY
Delay 100
dm.leftclick
End If
End Sub
按键精灵大漠插件图片查找代码
注意:1.bmp为查找的图片名称,通过大漠插件程序生成。
Sub 查找图片()
dm_ret = dm.FindPic(0,0,2000,2000,"1.bmp","000000",0.9,0,intX,intY)
If intX >= 0 and intY >= 0 Then
dm.moveto intX, intY
Delay 100
dm.leftclick
End If
End Sub
◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。