Серый форум — AHK: Возврат к метке в коде

Re: AHK: Возврат к метке в коде

2014-07-24T00:14:58Z

Да.

Re: AHK: Возврат к метке в коде

2014-07-24T00:08:19Z

Все равно краш даже так. Ваша версия AHK 1.1.15.00 ?

Re: AHK: Возврат к метке в коде

2014-07-24T00:01:12Z

У меня так работает.

IfWinNotActive, Name
{
   if !(lock_3 = 0 && shiftkey = 0 && winkey = 1)
   {
      lock_3 = 1
      PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
      if ErrorLevel = 1
      Retry:
      {
         msgbox
         PixelSearch,,,  122 , 122 , 122 , 122 , 0x8D8414, 9, fast
         if (ErrorLevel = 1 || sell != 1)
         {
            if (mustang = 5 && sell = 5)
               SendInput  12
            GoTo, Retry
         }
      }
   }
}
Return

Re: AHK: Возврат к метке в коде

2014-07-23T23:46:02Z

Нет, там вначале идет еще так:

~3::
IfWinActive, Name
{
  if (lock_3 = 0 && shiftkey = 0 && winkey = 1)
  {
    lock_3 = 1
    PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
Retry:
if ErrorLevel = 1
{
   PixelSearch,,,  122 , 122 , 122 , 122 , 0x8D8414, 9, fast
   if (ErrorLevel = 1 || sell != 1)
   {
      if (mustang = 5 && sell = 5)
         SendInput  12
      ErrorLevel = 1
      GoSub, Retry
   }
}
}
}
Return

Если ставить "Retry:" даже перед "IfWinActive, Name", то все равно идет краш.

Re: AHK: Возврат к метке в коде

2014-07-23T23:13:36Z

Получится.
А, не заметил у вас знак "или" в этой строчке.

if (ErrorLevel = 1 || sell != 1)

Поправил код.

PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
Retry:
if ErrorLevel = 1
{
   PixelSearch,,,  122 , 122 , 122 , 122 , 0x8D8414, 9, fast
   if (ErrorLevel = 1 || sell != 1)
   {
      if (mustang = 5 && sell = 5)
         SendInput  12
      ErrorLevel = 1
      GoSub, Retry
   }
}

Re: AHK: Возврат к метке в коде

2014-07-23T23:09:10Z

С чего вы это взяли?

Потому что в моем коде без блока не получится. Если рассматривать строго одну команду без блоков, то вариант работает.

Re: AHK: Возврат к метке в коде

2014-07-23T23:03:01Z

Второй вариант опять будет помещать GoTo внутрь блока

С чего вы это взяли?
Метка Retry находится не внутри блока, это главное.

В первом не понятно зачем после retry снова в нем же делать переход к нему

Это я как пример привел - метку кинуть в конец.
А там уже сами домыслите.

Re: AHK: Возврат к метке в коде

2014-07-23T22:59:22Z

Второй вариант опять будет помещать GoTo внутрь блока. В первом не понятно зачем после retry снова в нем же делать переход к нему.

Re: AHK: Возврат к метке в коде

2014-07-23T22:00:49Z

Просто GoSub и Goto не может перейти внутрь блока.
У вас не код, а какая-то путанница.
Я бы сделал примерно так:

a = 1
if a = 1
   GoTo, retry 

retry:
msgbox
GoTo, retry

Либо если не хотите выносить retry, то:

PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
Retry:
if ErrorLevel = 1
   msgbox % ErrorLevel
GoTo retry

Re: AHK: Возврат к метке в коде

2014-07-23T18:01:52Z

Кстати, только что решил эту проблему альтернативным путем.

~3::
IfWinActive, Name
{
  if (lock_3 = 0 && shiftkey = 0 && winkey = 1)
  {
    lock_3 = 1
    PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
    if ErrorLevel = 1
      Re_try:
      {
        PixelSearch,,,  122 , 122 , 122 , 122 , 0x8D8414, 9, fast
        if (ErrorLevel = 1 || sell != 1)
        {
          if (mustang = 5 && sell = 5)
            SendInput  12
            SetTimer, Re_try, On
            ; Задача: Здесь должен быть переход к else if (ErrorLevel =  0 && sell = 1)
        }
        else if (ErrorLevel =  0 && sell = 1)
        {
          if (mustang = 5 && mode = 1)                 ;[mode = 1]
          {
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              if (GetKeyState("XButton1","P")=0)
                sleep, 1320
              if (GetKeyState("XButton1","P")=0)
                Send 7
              sleep, 150
              Send {vk4B}
          }
          if (mustang =0 && mode = 0 )                ;[mode = 0]
          {
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 150
              Send {vk4B}
          }
        }
    }
  }
}
Return

Re_try:
PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
if (ErrorLevel =  0 && sell = 1)
        {
          if (mustang = 5 && mode = 1)                 ;[mode = 1]
          {
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              if (GetKeyState("XButton1","P")=0)
                sleep, 1320
              if (GetKeyState("XButton1","P")=0)
                Send 7
              sleep, 150
              Send {vk4B}
          }
          if (mustang =0 && mode = 0 )                ;[mode = 0]
          {
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 150
              Send {vk4B}
          }
        }
SetTimer, Re_try, Off
Return

Скорее всего к крашу приводит ошибка непосредственно в самом AHK, баг в его коде.

Re: AHK: Возврат к метке в коде

2014-07-23T17:50:31Z

~3::
IfWinActive, Name
{
  if (lock_3 = 0 && shiftkey = 0 && winkey = 1)
  {
    lock_3 = 1
    PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
    if ErrorLevel = 1
      Re_try:
      {
        PixelSearch,,,  122 , 122 , 122 , 122 , 0x8D8414, 9, fast
        if (ErrorLevel = 1 || sell != 1)
        {
          if (mustang = 5 && sell = 5)
            SendInput  12
            Gosub Re_try                                       ; После выполнения этого возвращения идет краш
            ; Задача: Здесь должен быть переход к else if (ErrorLevel =  0 && sell = 1)
        }
        else if (ErrorLevel =  0 && sell = 1)
        {
          if (mustang = 5 && mode = 1)                 ;[mode = 1]
          {
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              if (GetKeyState("XButton1","P")=0)
                sleep, 1320
              if (GetKeyState("XButton1","P")=0)
                Send 7
              sleep, 150
              Send {vk4B}
          }
          if (mustang =0 && mode = 0 )                ;[mode = 0]
          {
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 150
              Send {vk4B}
          }
        }
    }
  }
}
Return

Так более понятнее выглядит о чем я говорю. Попробуйте сделать такой же пример - увидите, что такое краш.

Re: AHK: Возврат к метке в коде

2014-07-23T17:40:58Z

Переписанный Вами мой пример более удобен для восприятия, однако вопроса это не решает. Только ErrorLevel = 0 и некоторые немаловажные переменные опущены у Вас почему-то.
Нужно написать метку перехода после ErrorLevel = 1 на ErrorLevel = 0 или еще раз производить поиск пикселя после выполнения условий ErrorLevel = 1, однако тут возникает какой-то баг, потому что после задания вернуться к метке через GoTo или Gosub скрипт начинает крашиться.
Крашить - он зависает вместе с компьютером. Приходится отключать через диспетчер, либо перезапускать компьютер, потому что курсор невероятно долго двигается.

Re: AHK: Возврат к метке в коде

2014-07-23T12:09:51Z

Что значит "крашит"? Что именно не срабатывает?

Может так имелось в виду:

~3::
IfWinActive, Name
{
  if (lock_3 = 0 && shiftkey = 0 && winkey = 1)
  {
    lock_3 = 1
    PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
    if ErrorLevel = 1
    {
      loop
      {
        PixelSearch,,,  122 , 122 , 122 , 122 , 0x8D8414, 9, fast
        if (ErrorLevel = 1 || sell != 1)
        {
          if (mustang = 5 && sell = 5)
            SendInput  12
        }
        else if sell = 1
        {
          if (mustang = 5 && mode = 1)                 ;[mode = 1]
          {
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              if (GetKeyState("XButton1","P")=0)
                sleep, 1320
              if (GetKeyState("XButton1","P")=0)
                Send 7
              sleep, 150
              Send {vk4B}
          }
          else if mode = 0                 ;[mode = 0]
          {
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 20
              Send 7
              sleep, 150
              Send {vk4B}
          }
          break
        }
      }
    }
  }
}
Return

OFF: Дурацкое слово... КрАшит... Словно хлеб на стол крАшит...

Re: AHK: Возврат к метке в коде

2014-07-22T11:26:22Z

Alectric, одно и тоже. С добавлением continue опять крашит.

Re: AHK: Возврат к метке в коде

2014-07-22T10:59:07Z

Попробуйте использовать ограниченный цикл вместо метки.(Цикл ограничен с помощью "break" в конце)

~3::
IfWinActive, Name
{
  if (lock_3 = 0 && shiftkey = 0 && winkey = 1)
  {
    lock_3 = 1

    PixelSearch,,,  400 , 1070 , 400 , 1070 , 0x1CC3F3, 2, fast
    if ErrorLevel = 1
    loop
    {
      PixelSearch,,,  122 , 122 , 122 , 122 , 0x8D8414, 9, fast
      if (ErrorLevel = 1 || sell != 1)
      {
        if (mustang = 5 && sell = 5)
        {
          SendInput  12
        }
        continue
      }
      if (ErrorLevel = 0 && sell = 1)
      {
      ;Loop 1
         ;{


      ;; MODE    1
        if (mustang = 5 && mode = 1)                 ;[mode = 1]
        {
            Send 7
            sleep, 20
            Send 7
            sleep, 20
            Send 7
            sleep, 20
            Send 7
            if (GetKeyState("XButton1","P")=0)
              sleep, 1320
            if (GetKeyState("XButton1","P")=0)
              Send 7
            sleep, 150
            Send {vk0x4B}
        }
      ;; MODE 0
        if (mustang = 5 && mode = 0)                 ;[mode = 0]
        {
            Send 7
            sleep, 20
            Send 7
            sleep, 20
            Send 7
            sleep, 20
            Send 7
            sleep, 20
            Send 7
            sleep, 150
            Send {vk0x4B}
        }
        ;}
      }
      break
    }
  }
}
Return