Что нового

Работа if & ElseIf

RaDuGa

Новичок
Сообщения
5
Репутация
0
Как мне тут в коде кусок кода с рандомом активировать, начиная со строчки $ran = Random(0, 3, 1)? Вставил этот кусок в отдельный текст, он работает, а тут нет. Может много if @error?

Код:
While 1
   $coord = PixelSearch(43, 118, 1850, 1008, 0xF177DD) ; Ищет пиксели и жмет по ним
   If @error Then
    $coord = PixelSearch(43, 118, 1850, 1008, 0x768DFC)
    If @error Then
     $coord = PixelSearch(43, 118, 1850, 1008, 0xFC7677)
     If @error Then $coord = PixelSearch(43, 118, 1850, 1008, 0xFFE869)
      if @error Then ; Если пиксель не найден, то проверить черные зоны на отхождение от них
         if PixelGetColor(859, 555) = 0x000000 Then
         Send("{d down}")
         sleep(1200)
         Send("{d up}")
         ElseIf PixelGetColor(959, 655) = 0x000000 Then
         Send("{w down}")
         sleep(1200)
         Send("{w up}")
         ElseIf PixelGetColor(1059, 555) = 0x000000 Then
         Send("{a down}")
         sleep(1200)
         Send("{a up}")
         ElseIf PixelGetColor(959, 455) = 0x000000 Then
         Send("{s down}")
         sleep(1200)
         Send("{s up}")
          If @error Then ; Если ничего прежде, то рандомные движения
           $ran = Random(0, 3, 1)
           if $ran = 0 Then
            Send("{d down}")
            sleep(1200)
            Send("{d up}")
           ElseIf $ran = 1 Then
            Send("{w down}")
            sleep(1200)
            Send("{w up}")
            ElseIf $ran = 2 Then
            Send("{a down}")
            sleep(1200)
            Send("{a up}")
            ElseIf $ran = 3 Then
            Send("{s down}")
            sleep(1200)
            Send("{s up}")
           EndIf
        EndIf
      EndIf
    EndIf
    EndIf
   EndIf
  If IsArray($coord) Then MouseClick("left", $coord[0], $coord[1])
WEnd
 

InnI

AutoIT Гуру
Сообщения
4,922
Репутация
1,432
Код:
While 1
  $coord = PixelSearch(43, 118, 1850, 1008, 0xF177DD) ; Ищет пиксели и жмет по ним
  If @error Then
    $coord = PixelSearch(43, 118, 1850, 1008, 0x768DFC)
    If @error Then
      $coord = PixelSearch(43, 118, 1850, 1008, 0xFC7677)
      If @error Then
        $coord = PixelSearch(43, 118, 1850, 1008, 0xFFE869)
        If @error Then ; Если пиксель не найден, то проверить черные зоны на отхождение от них
          If PixelGetColor(859, 555) = 0x000000 Then
            Send("{d down}")
            Sleep(1200)
            Send("{d up}")
          ElseIf PixelGetColor(959, 655) = 0x000000 Then
            Send("{w down}")
            Sleep(1200)
            Send("{w up}")
          ElseIf PixelGetColor(1059, 555) = 0x000000 Then
            Send("{a down}")
            Sleep(1200)
            Send("{a up}")
          ElseIf PixelGetColor(959, 455) = 0x000000 Then
            Send("{s down}")
            Sleep(1200)
            Send("{s up}")
          Else ; Если ничего прежде, то рандомные движения
            $ran = Random(0, 3, 1)
            If $ran = 0 Then
              Send("{d down}")
              Sleep(1200)
              Send("{d up}")
            ElseIf $ran = 1 Then
              Send("{w down}")
              Sleep(1200)
              Send("{w up}")
            ElseIf $ran = 2 Then
              Send("{a down}")
              Sleep(1200)
              Send("{a up}")
            ElseIf $ran = 3 Then
              Send("{s down}")
              Sleep(1200)
              Send("{s up}")
            EndIf
          EndIf
        EndIf
      EndIf
    EndIf
  EndIf
  If IsArray($coord) Then MouseClick("left", $coord[0], $coord[1])
WEnd
 
Автор
R

RaDuGa

Новичок
Сообщения
5
Репутация
0
Работает. Что-то я по разному пробовал, даже Else кажется пробовал или же видимо нет...
В любом случае спасибо.
 
Верх