各位大哥大姐都进来看看

tiuster. · 发表于 2019-5-2 15:01:04

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

为什么我的按键精灵不执行While啊，换成do 循环用if半段也不执行啊。
是我的代码写的有问题吗？
急死人啦，都弄了几天了啊。
------------------------------------------ 下面代码是用while 循环的，能找到开始颜色和结束颜色，并且当两个颜色相等的时候不执行循环命令啊。

Do
  Delay 500
  Dim X,Y

      if CmpColorEx("276|168|FFFFFF,357|170|FFFFFF,297|397|FFFFFF,200|590|FFFFFF,384|730|FFFFFF,566|765|FFFFFF",0.9) = 0 AND CmpColorEx("315|172|5959F8,357|168|5959F8,508|169|5959F8,538|179|5959F8",0.9) = 1 Then

      Delay 1000
   Tap 22, 56
   Dim 起始颜色 = GetColorNum(0,83,720,1280,"FFFFFF|999999-000000",0.9)
      TracePrint 起始颜色
   TracePrint "已进入用户详情并已点击退出"
   Exit Do
   Else
   TracePrint "未找到"
   End If
Loop
  Delay 1000
  Dim 结束颜色 = GetColorNum(0,83,720,1280,"FFFFFF|999999-000000",0.9)
  TracePrint 结束颜色
  Delay 500
  While 起始颜色 = 结束颜色
  Delay 200
  TracePrint "页面未跳转正在重试"
  Tap 22,56
  结束颜色 = GetColorNum(0,83,720,1280,"FFFFFF|999999-000000",0.9)
  Wend

  TracePrint "已退出至用户粉丝页面"
-------------------------------------------------------下面是用do 循环 if半段也是能找到颜色并且开始和结束颜色都相等，但是就是不执行命令

  Do
  Do
  Delay 500
  Dim X,Y

      if CmpColorEx("276|168|FFFFFF,357|170|FFFFFF,297|397|FFFFFF,200|590|FFFFFF,384|730|FFFFFF,566|765|FFFFFF",0.9) = 0 AND CmpColorEx("315|172|5959F8,357|168|5959F8,508|169|5959F8,538|179|5959F8",0.9) = 1 Then

      Delay 1000
   Tap 22, 56
   Dim E = GetColorNum(0,83,720,1280,"FFFFFF|999999-000000",0.9)
      TracePrint E
   TracePrint "已进入用户详情并已点击退出"
   Exit Do
   Else
   TracePrint "未找到"
   End If
  Loop
  Delay 2000
  Dim F = GetColorNum(0,83,720,1280,"FFFFFF|999999-000000",0.9)
  TracePrint F
  Delay 500
  If E = F Then
  Delay 200
  TracePrint "页面未跳转正在重试"
  Tap 22,56
  Exit Do
  Else

  TracePrint "已退出至用户粉丝页面"
  Exit Do
  End If
Loop file:///C:/Users/12229/Desktop/0000

紫猫 · 发表于 2019-5-6 18:26:00

应该是颜色一直不成立, 所以无法退出do循环, 导致后面代码不执行

		自动登录	找回密码
密码			立即注册

[已回复] 各位大哥大姐都进来看看

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。