此时可以在相关判断语句中使用TracePrint 调试输出语句来提示语句运行结果:
Dim canshu1
canshu1 = 1
Do
//找色命令A
FindColorEx 0,0,1024,768,"3AF7B9",0,0.9,intX,intY
If intX > 0 And intY > 0 Then
TracePrint "命令A找到颜色"
Delay 100
//找色命令B
FindColorEx 0,0,1024,768,"000DBA",0,0.9,intX2,intY2
If intX2 > 0 And intY2 > 0 Then
TracePrint "命令B找到颜色"
canshu1 = 0
Else
TracePrint "命令B找色失败"
End If
Else
TracePrint "命令A找色失败"
End If
Delay 200
Loop While canshu1 = 1