Как мне тут в коде кусок кода с рандомом активировать, начиная со строчки $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