admin 管理员组

文章数量: 887007

按键精灵找图基础写法

//Sub 找图点击(图片)
//    FindPic 0, 0, 3000, 3000, "c:\" & 图片 & ".bmp", 0.8, x, y
//    If x >= 0 Then 
//        MoveTo x, y
//        LeftClick 1
//        TracePrint 图片
//    End If
//    Delay 500
//End Sub
//Do
//    找图点击 "完成任务"
//    找图点击 "立即装备"
//Loop
//另一种写法
Sub 找图点击(图片, 图片数量)图标列表 = Split(图片, "|")For i = 0 To 3FindPic 0, 0, 3000, 3000, "c:\" & 图标列表(i) & ".bmp", 0.8, x, yIf x >= 0 Then MoveTo x, yLeftClick 1TracePrint 图片End IfNextDelay 500
End Sub
DoCall 找图点击("完成任务|立即装备|学习技能|自动提取",4)
Loop

本文标签: 按键精灵找图基础写法