Case $ToCheck = "Overview"
Local $Overview_1[6] = [844, 7, 844, 12, 0x838383, 10] ;Миникарта, палоске слева от Universe
Local $Overview_2[6] = [768, 170, 768, 503, 0xC11414, 10] ;Координаты цели которую можно взять на прицел (NPC)
Local $Overview_3[6] = [768, 170, 768, 503, 0xD8D8D8, 10] ;Координаты цели которую можно взять на прицел (девственно белый Wreck)
Local $Overview_4[6] = [768, 170, 768, 503, 0x7B7B7B, 5] ;Координаты цели которую можно взять на прицел (темно серый поюзанный Wreck)
Local $Overview_5[7] = [770,169,772,170,0xFFFFFF,2,"Station Icon Col"]
Local $Overview_6[7] = [868,175,878,175,0xB6B6B6,50,"Asteroid Name Col"]
Local $Overview_7[8] = [768, 170, 768, 503, 0xFFFFFF, 10, 1, "Jettison"]
If $AdvCheck = "Count Actual Targets" Then
Local $x = 766, $y = 172, $Count = 0
For $i = 0 To 5 Step 1
PixelSearch($x, $y+$i*19, $x+5, $y+$i*19, 0xD8D8D8, 20, $CurWin_hwnd)
If Not @error Then $Count = $Count+1
Next
Return $Count
EndIf
;~ UpdLog("Проверяю состояние Овервью.")
;~ If $Location[0][0] = "Станция" Or $Location[0][0] = "Идет загрузка..." Or $Location[0][0] = "Нахожусь в варпе" Then Return "#"
PixelSearch($Overview_1[0], $Overview_1[1], $Overview_1[2], $Overview_1[3], $Overview_1[4], $Overview_1[5], 1, $CurWin_hwnd);Проверяем не сдвинуто ли овервью миникартой
If Not @error Then
MouseClick("Left", Random(1014, 1017), Random(7, 10, 1) , 1, 10) ;Закрываем миникарту
;~ UpdLog("Закрыл миникарту вызывавшую сбои.")
Sleep(Random(1000,2000, 1))
EndIf
Local $NPC = PixelSearch($Overview_2[0], $Overview_2[1], $Overview_2[2], $Overview_2[3], $Overview_2[4], $Overview_2[5], 1, $CurWin_hwnd) ;Ищим красный цвет неписей
If Not @error Then
;~ UpdLog("В овервью обнаружена непись.")
SetError(1) ;Если еррор = 1 значит мы нашли непись
If $AdvCheck = "Pos" Then Return $NPC ;Если запрос шел на координаты найденной цели, возвращаем $NPC
Return "NPC" ;Если же нет, возвращаем что нашли неписей.
Else
Local $Jettison = PixelSearch($Overview_7[0], $Overview_7[1], $Overview_7[2], $Overview_7[3], $Overview_7[4], $Overview_7[5], $Overview_7[6], $CurWin_hwnd)
If Not @error Then
SetError(4) ;Если Еррор = 4 значит мы нашли джет
If $AdvCheck = "Pos" Then Return $Jettison ;Если запрос шел на координаты найденной цели, возвращаем $Wreck
Return "Jettison"
Else
Local $Wreck = PixelSearch($Overview_3[0], $Overview_3[1], $Overview_3[2], $Overview_3[3], $Overview_3[4], $Overview_3[5], 1, $CurWin_hwnd) ;Если не нашли неписей - ищим врек белый врек
If Not @error Then ;Если нашли белый врек
;~ UpdLog("В овервью обнаружены лутабельные вреки.")
SetError(2) ;Если Еррор = 2 значит мы нашли врек
If $AdvCheck = "Pos" Then Return $Wreck ;Если запрос шел на координаты найденной цели, возвращаем $Wreck
Return "Wreck" ;Если же нет, возвращаем что нашли врек
Else
Local $Wreck = PixelSearch($Overview_4[0], $Overview_4[1], $Overview_4[2], $Overview_4[3], $Overview_4[4], $Overview_4[5], 1, $CurWin_hwnd) ;Если не нашли белый - ищим сервый врек
If Not @error Then ;Если нашли серый врек
;~ UpdLog("В овервью обнаружены лутабельные вреки.")
SetError(2) ;Если Еррор = 2 значит мы нашли врек
If $AdvCheck = "Pos" Then Return $Wreck ;Если запрос шел на координаты найденной цели, возвращаем $Wreck
Return "Wreck" ;Если же нет, возвращаем что нашли врек
Else
Local $AsterExists = False, $StationExists = False
Local $Asteroid = PixelSearch($Overview_6[0],$Overview_6[1],$Overview_6[2],$Overview_6[3],$Overview_6[4],$Overview_6[5], 1, $CurWin_hwnd);ищим астероиды
If Not @error Then Local $AsterExists = True
;~ MsgBox(0,0,1)
Local $Station = PixelSearch($Overview_5[0],$Overview_5[1],$Overview_5[2],$Overview_5[3],$Overview_5[4],$Overview_5[5], 1, $CurWin_hwnd);ищим станции
If Not @error Then Local $StationExists = True
If $AsterExists And Not $StationExists Then
;~ TestMSG($Asteroid[0]&" "&$Asteroid[1])
If $AdvCheck = "Pos" Then Return $Asteroid
Return "Asteroid"
EndIf
If $AsterExists And $StationExists Then
If $AdvCheck = "Pos" Then Return $Station
Return "Station"
EndIf
EndIf
EndIf
EndIf
EndIf
SetError(3) ;Если Еррор = 3 значит мы ничиво нинашли
Return "Объект не найден"
Что то у меня не получилось найти опции "shade-variation".
