按键精灵 两个点两个颜色满意任意条件 做一下动作 否则无限循环找两个点的颜色 没有分希望大神能帮忙
FindPic0,0,1024,768,"Attachment:\1.bmp",0.6,AX,AYIfAX>0AndAY>0ThenRemAIfColorAX+379,A...
FindPic 0,0,1024,768,"Attachment:\1.bmp",0.6,AX,AY
If AX > 0 And AY > 0 Then
Rem A
IfColor AX + 379, AY + 74, "233689", 2 Then
IfColor AX + 406, AY + 68, "4209C", 2 Then
Delay 550
KeyPress "1", 1
Delay 550
KeyPress "2", 1
Delay 550
KeyPress "3", 1
Delay 550
KeyPress "4", 1
Delay 750
KeyPress "5", 1
Delay 550
Delay 550
KeyPress "1", 1
Delay 550
KeyPress "2", 1
Delay 550
KeyPress "3", 1
Delay 550
KeyPress "4", 1
Delay 750
KeyPress "5", 1
Delay 550
Delay 550
KeyPress "1", 1
Delay 550
KeyPress "2", 1
Delay 550
KeyPress "3", 1
Delay 550
KeyPress "4", 1
Delay 750
KeyPress "5", 1
Delay 550
Else
Goto A
Else
Goto A
End If
End If
End If 展开
If AX > 0 And AY > 0 Then
Rem A
IfColor AX + 379, AY + 74, "233689", 2 Then
IfColor AX + 406, AY + 68, "4209C", 2 Then
Delay 550
KeyPress "1", 1
Delay 550
KeyPress "2", 1
Delay 550
KeyPress "3", 1
Delay 550
KeyPress "4", 1
Delay 750
KeyPress "5", 1
Delay 550
Delay 550
KeyPress "1", 1
Delay 550
KeyPress "2", 1
Delay 550
KeyPress "3", 1
Delay 550
KeyPress "4", 1
Delay 750
KeyPress "5", 1
Delay 550
Delay 550
KeyPress "1", 1
Delay 550
KeyPress "2", 1
Delay 550
KeyPress "3", 1
Delay 550
KeyPress "4", 1
Delay 750
KeyPress "5", 1
Delay 550
Else
Goto A
Else
Goto A
End If
End If
End If 展开
2个回答
展开全部
FindPic 0,0,1024,768,"Attachment:\1.bmp",0.6,AX,AY
If AX > 0 And AY > 0 Then
Do
GetColor1=GetPixelColor(AX + 379, AY + 74)
GetColor2=GetPixelColor(AX + 406, AY + 68)
If GetColor1 = "233689" or GetColor2 = "4209C" Then
Exit Do//找到两点任一满足条件则跳出循环
End If
Loop
//下面加上满足条件后需要执行的动作命令
If AX > 0 And AY > 0 Then
Do
GetColor1=GetPixelColor(AX + 379, AY + 74)
GetColor2=GetPixelColor(AX + 406, AY + 68)
If GetColor1 = "233689" or GetColor2 = "4209C" Then
Exit Do//找到两点任一满足条件则跳出循环
End If
Loop
//下面加上满足条件后需要执行的动作命令
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询