
【基本介绍】
按键源码Dim intX,intY
Dim x1,y1
Dim x2,y2
Dim 偏移位置x,偏移位置y
Do
For 2000
Delay 20
Tap 507, 456
Next
TracePrint "执行额外事件"
For 1
FindMultiColor 0,0,0,0,"4BCB3F-101010","4|27|FBEEC7-101010,33|84|FFFFFF-101010",0,0.9,intX,intY //寻找宠物蛋
If intX > 0 And intY > 0 Then
For 3
Delay 2000
Tap intX, intY
Next
Delay 20
Else
TracePrint "没有找到宠物蛋"
End If
Delay 20
FindMultiColor 0,277,1067,585,"24BBFE-101010","8|12|4E2D88-101010,8|13|877CA0-101010",0,0.9,x1,y1//寻找小仙女
If x1 > 0 And y1 > 0 Then
Delay 10
Tap x1, y1
TracePrint "已经打开小仙女"
Delay 10
Else
TracePrint "没有找到小仙女"
End If
Delay 20
FindMultiColor 0,0,0,0,"FFFFFF-101010","-1|11|6F1954-101010,-3|51|37E7FC-101010",0,0.9,x2,y2 //释放紫色技能判断
If x2 > 0 And y2 > 0 Then
偏移位置x = x2 + 10
偏移位置y = y2 + 30
Tap 偏移位置x,偏移位置y
Delay 10
Else
TracePrint "技能正在冷却中"
End If
TracePrint"没有执行技能判断"
Next
Loop


































