//Тру маяки
//Радар справа вверху - должен быть виден
//В его настройках должны стоять ПЕРВАЯ и ПОСЛЕДНЯЯ галка.
//Больше никаких галок
//Кнопки менияем под себя:
set $t F1 F2 F3 //кнопки с таргетами мобов
set clipboard $t
get clipboard %t
set $m F4 F5 F6 F7 //кнопки с метками (сердце\луна и т.д.)
set clipboard $m
get clipboard %m
//
//
//C задержками
set #timescan 3000 //Время на сканирование моба(мс)
set #timepress 2000 //Время на срабатывание нажатой кнопки(мс)
//
//
set #iTarg 1
set #iMetk 1
set linedelay 1 //Для забывчивых (IMG:
style_emoticons/default/wink.gif)
gosub xyScan
//
//
:targe //Нажимаем поочереди кнопки с таргетами мобов
if #iTarg > 3
set #iTarg 1
end_if
send %t[1 #iTarg]
wait #timepress
set #iTarg #iTarg + 1
//
//
:scanMob //Ищем на радаре красную точку "таргета"
set #tsc timer + #timescan
set #point -1
:scan2
if #tsc > timer
set #point findcolor (#xABS1, #yABS1 #xABS2, #yABS2 1 1 (R(180-246)+G(0-88)) %poi 2)
If #point > 0
hint #point
goto metka
end_if
// msg #xABS1, #yABS1 xABS2, #yABS2
end_if
if #tsc < timer
hint (15 (Не могу взять в таргет о_0))
goto targe
end_if
goto scan2
//
//
:metka //проверяем, принадлежит ли таргет нашей "зоне" (комнате)
set #po size (%poi)
if #x1 < %poi[1 1] and %poi[1 1] < #x2
if #y1 < %poi[1 2] and %poi[1 2] < #y2
goto znak
end_if
else
if (#x1 < %poi[#po 1] and %poi[#po 1] < #x2) and (#y1 < %poi[#po 2] and %poi[#po 2] < #y2)
goto znak
end_if
//hint mob daleko
send escape
goto targe
end_if
//
//
:znak //Вешаем поочередно сердце\луну и т.д.
if #iMetk > 4
set #iMetk 1
end_if
send %m[1 #iMetk]
wait #timepress
set #iMetk #iMetk + 1
goto targe
//
//
:XYscan //привязка к окну радара и задание координат "комнаты"
get windowpos 0 [#X #Y [#width #height [#result]]]
set $a FindImage (0 0 #width #height (N.bmp) %pic 2 80 1)
if $a < 70
hint (16 (Не могу найти радар!!!))
goto XYscan
end_if
set #xXX (%pic[1 1]) + 6
set #yYY (%pic[1 2]) + 79
set #x1 #xXX - 5
set #x2 #xXX + 5
set #y1 #yYY - 5
set #y2 #yYY + 5
set #yABS1 54
set #yABS2 116
set #xABS1 #width - 136
set #xABS2 #width - 76
return
end_script