按键精灵基本操作

MoveTo 465, 962

//获取坐标位置的颜色
'rColor = GetPixelColor(465, 962)
'TracePrint "这个点的颜色为："&rColor

//是目标颜色则执行录制的脚本
IfColor 465, 962,"6891F9",2 Then
Delay 1000
LeftDown 1
Delay 50
LeftClick 1

int runFlag = 0
int runCount = 0
int oldCase = 0
 Dim myCase//定义变量a
 Dim oldCase

Event Form1.Button1.Click
  runFlag = 1
  Form1.Timer1.Interval = 65000 
  Form1.Timer1.Enabled = true
  myCase = 0
  runCount = 0
  oldCase = -1
End Event

Function fun350
'==========以下是按键精灵录制的内容==========
MoveTo 649, 105
Delay 1685
LeftDown 1
Delay 16
LeftClick 1
LeftUp 1
MoveTo 962, 528
Delay 3089
LeftDown 1
LeftClick 1
LeftUp 1
MoveTo 1174, 746
Delay 1607
LeftDown 1
LeftClick 1
LeftUp 1
MoveTo 1007, 594
Delay 1809
LeftDown 1
LeftDown 1
LeftClick 1
MoveTo 1057, 526
Delay 921
LeftDown 1
LeftClick 1
LeftUp 1
'==========以上是按键精灵录制的内容==========

End Function

Function fun450
'==========以下是按键精灵录制的内容==========
MoveTo 644, 107
Delay 2028
LeftDown 1
Delay 15
LeftDown 1