Как будет алгоритм снизу в коде?
Пример:
найти цвет1 и кликнуть по нему
и осуществить действия
если нету такого цвета, то найти цвет2 и кликнуть по нему
и осуществить действия
если нету такого цвета, то найти цвет3 и кликнуть по нему
и осуществить действия
Заранее спасибо.
Или вот помогите мне исправить код.. где что лишнее или не хватает?
Пример:
найти цвет1 и кликнуть по нему
и осуществить действия
если нету такого цвета, то найти цвет2 и кликнуть по нему
и осуществить действия
если нету такого цвета, то найти цвет3 и кликнуть по нему
и осуществить действия
Заранее спасибо.
Или вот помогите мне исправить код.. где что лишнее или не хватает?
Код:
$eda = 0xFF0000
$trava = 0x00FF00
$kamni = 0x002AFF
$zhelezo = 0xF600FF
$derevo = 0x0600FF
$reka = 0xFFF600
$tablo = 0xF8EABB
$bel = 0xFFFFFF
$Color9 = 0xA10E25
While 999
$coord = 0
$coord=PixelSearch(0, 0, 600,1000, $eda, 1)
If Not @error Then
Sleep(1000)
MouseClick("left", $coord[0], $coord[1], 1)
_t()
Else
$coord=PixelSearch(0, 0, 600,1000, $trava, 1)
If Not @error Then
Sleep(1000)
MouseClick("left", $coord[0], $coord[1], 1)
_t()
Else
$coord=PixelSearch(0, 0, 600,1000, $kamni, 1)
If Not @error Then
Sleep(1000)
MouseClick("left", $coord[0], $coord[1], 1)
_t()
Else
$coord=PixelSearch(0, 0, 600,1000, $zhelezo, 1)
If Not @error Then
Sleep(1000)
MouseClick("left", $coord[0], $coord[1], 1)
_t()
Else
$coord=PixelSearch(0, 0, 600,1000, $derevo, 1)
If Not @error Then
Sleep(1000)
MouseClick("left", $coord[0], $coord[1], 1)
_t()
Else
$coord=PixelSearch(0, 0, 600,1000, $reka, 1)
If Not @error Then
Sleep(1000)
MouseClick("left", $coord[0], $coord[1], 1)
_t()
WEnd
Func _t()
While 1
If PixelGetColor (224, 516) = $bel Then
Sleep(1000)
Send ("{Enter}")
EndIf
If PixelGetColor (224, 516) = $tablo Then
Sleep(500)
Send ("{Enter}")
Sleep(700)
EndIf
WEnd
EndFunc