Автохилер ВоВ 2.4.3, скрипт для хилинга 1-5 юнитов в пати. Хочется добиться работы с readme Опции

[Alfer]

Итак есть интерес нарисовать хилера.

Формально от 1 до 5 разных окон запущенного клиента из одной и той же папки.
Система Win7 x64.
Клиент "WoW 2.4.3 build 8606 Jul 10 2008"

Для начала беру 2 окна.
Для двух окон родился код через поиск цвета точки, что неудобно.

Код

// перед запуском скрипта прописать макросы для лечения фокуса и DD выбрать в фокус.
set #hanldewinheal 1644826 // указать хендл окна хилера
set #hanldewinDD 596864 // указать хендл окна DD
set $hppoint1 "40, 155 57344" // DD тут ткнуть Ктрл+А для указания точки срабатывания начала лечения игрока. Где-то 70-75% ХП
set $hppoint2 "39, 182 52480" // Heal тут ткнуть Ктрл+А для указания точки срабатывания начала лечения хилера. Где-то 50-70% ХП
set #tw1 0
set #gcd 1500
set #hp1 1234
set workwindow #hanldewinDD
readmem #hp1 0x24543D1C R
log #hp1
wait 40s
:check
set windowpos [1 715 [494 325 [#hanldewinheal]]]
set windowpos [69 288 [1208 753 [#hanldewinDD]]]
set workwindow #hanldewinDD
while ($hppoint1) and ($hppoint2)
if_not ($hppoint1)
goto heal_1
end_if
if_not ($hppoint2)
goto heal_2
end_if
end_while
:heal_1
set workwindow #hanldewinheal
set timer
send {num_4} #gcd
send {num_5} #gcd
set workwindow #hanldewinDD
if_not ($hppoint2)
goto heal_2
end_if
set workwindow #hanldewinDD
if ($hppoint1)
goto check
end_if
set workwindow #hanldewinheal
send {num_4} #gcd
set workwindow #hanldewinDD
if ($hppoint1)
goto check
end_if
set workwindow #hanldewinheal
send {num_4} #gcd
set workwindow #hanldewinDD
if_not ($hppoint2)
goto heal_2
end_if
set workwindow #hanldewinDD
if ($hppoint1)
goto check
end_if
set workwindow #hanldewinDD
while_not ($hppoint1)
set workwindow #hanldewinheal
send {num_6} 2000
set workwindow #hanldewinDD
if_not ($hppoint2)
goto heal_2
end_if
set workwindow #hanldewinheal
send {num_0}
if timer > 11000
set workwindow #hanldewinDD
if ($hppoint1)
goto check
end_if
goto heal_1
end_if
end_while
goto check
:heal_2
set workwindow #hanldewinheal
set timer
send {num_7} #gcd
send {num_8} #gcd
set workwindow #hanldewinDD
if_not ($hppoint1)
goto heal_1
end_if
set workwindow #hanldewinDD
if ($hppoint2)
goto check
end_if
set workwindow #hanldewinheal
send {num_7} #gcd
set workwindow #hanldewinDD
if ($hppoint2)
goto check
end_if
set workwindow #hanldewinheal
send {num_7} #gcd
set workwindow #hanldewinDD
if_not ($hppoint1)
goto heal_1
end_if
set workwindow #hanldewinDD
if ($hppoint1)
goto check
end_if
set workwindow #hanldewinDD
while_not ($hppoint2)
set workwindow #hanldewinheal
send {num_9} 2000
set workwindow #hanldewinDD
if_not ($hppoint1)
goto heal_1
end_if
set workwindow #hanldewinheal
send {num_0}
if timer > 11000
set workwindow #hanldewinDD
if ($hppoint2)
goto check
end_if
goto heal_2
end_if
end_while
goto check

Эта конструкция работает вполне сносно. Но решил углубиться в работу с памятью. Перечитал, что по-человечески нужно отталкиваться от базового адреса с цепочкой оффсетов, но пока не понял как ее отследить.

Основной алгоритм предполагается такой
пока ((ДД_ХП_актуал)\(ДД_ХП_макс) > 0.75) И ((Хил_ХП_актуал)\(Хил_ХП_МАХ) > 0.75) ждать
Иначе проверяем чьё меньше и отправляемся в процедуру его отхила.
процедура отхила ДД
процедура отхила Хила

Через ArtMoney нашёл 4 адреса(ДД хп макс и актуал, и Хил ХП макс и актуал )
Но это значение не читается в переменную
set workwindow #hanldewinDD
readmem #hp1 0x<Адресартмани> D (а Артмани тип целое 4 байта)
log #hp1
Но переменная выдает ошибку. (-1) при выводе переменной в лог

Перепробовал все возможные варианты типа данных и типа переменной всегда ошибка (-1)

Что не так подскажите куда копать в работе с памятью wow.
перечитал длинную тему про оффсеты, слазил на буржуйский форум не нашёл готовой цепочки офсетов для ХП своего и членов пати\рейда, и не нашёл механизма поиска этой цепочки. Но ведь если АртМани находит адрес памяти значит как минимум из этого адреса можно получить цифру в переменную, а вот не отдает. Подскажите куда копать ?

[Alfer]

Вот так заработало так как надо.

Скрипт

Код

// перед запуском скрипта прописать макросы для лечения фокуса и лечимый объект выбрать в фокус.
set #base_adress 0x00e29d28 // базовый, где хранится адрес ячейки начала структуры чара.
set #offset_maxHP 0x26b0 // смещение для поиска максимального значения ХП выбранного окна
set #hanldewinheal 1254942   // указать хендл окна хилера
set #hanldewinDD 26416278 // указать хендл окна ДД
set #gcd 1500
:0
set #part_hp_heal 100
set #part_hp_dd 100
set workwindow #hanldewinheal
readmem #first_adress #base_adress D
set #adress_maxHP_Heal #first_adress + #offset_maxHP //вычисляем адрес максимального значения ХП Хилера
set #adress_actHP_Heal #adress_maxHP_Heal - 0x18 //вычисляем адрес актуального значения ХП Хиера
set workwindow #hanldewinDD
readmem #first_adress #base_adress D
set #adress_maxHP_DD #first_adress + #offset_maxHP //вычисляем адрес максимального значения ХП ДДшника
set #adress_actHP_DD #adress_maxHP_DD - 0x18 //вычисляем адрес актуального значения ХП ДДшника
call hpdd_check #hanldewinDD #adress_maxHP_DD #adress_actHP_DD #part_hp_dd
call hpheal_check #hanldewinheal #adress_maxHP_Heal #adress_actHP_Heal #part_hp_heal
set #heal_mark 2
if  (#part_hp_dd <= 75) or (#part_hp_heal <= 75)
    if #part_hp_dd < #part_hp_heal
       set #heal_mark 0
    else
       set #heal_mark 1
    end_if
end_if
switch #heal_mark
case 0:
    gosub Heal_D
    break
case 1:
    gosub Heal_H
    break
case 2:
    break
end_switch
goto 0
Proc hpdd_check #hanldewinDD #adress_maxHP_DD #adress_actHP_DD #part_hp_dd
     set #temp_workwindow workwindow
     set #cs current_script
     set workwindow #hanldewinDD
     readmem #hpDD_m #adress_maxHP_DD D
     readmem #hpDD_a #adress_actHP_DD D
     set #hp1 #hpDD_a * 100 / #hpDD_m
     set $result #hp1
     set #part_hp_dd.#cs #hp1
     set workwindow #temp_workwindow
end_proc
Proc hpheal_check #hanldewinheal #adress_maxHP_Heal #adress_actHP_Heal #part_hp_heal
     set #temp_workwindow workwindow
     set #cs current_script
     set workwindow #hanldewinheal
     readmem #hpheal_m #adress_maxHP_Heal D
     readmem #hpheal_a #adress_actHP_Heal D
     set #hp2 #hpheal_a * 100 / #hpheal_m
     set $result #hp2
     set #part_hp_heal.#cs #hp2
     set workwindow #temp_workwindow
end_proc
end_script
:Heal_D
set workwindow #hanldewinheal
send {num_4} #gcd
set timer
send {num_5} #gcd
call hpdd_check #hanldewinDD #adress_maxHP_DD #adress_actHP_DD #part_hp_dd
if #part_hp_dd >= 75
    return
end_if
send {num_4} #gcd
call hpheal_check #hanldewinheal #adress_maxHP_Heal #adress_actHP_Heal #part_hp_heal
if #part_hp_heal < 75
    gosub Heal_H
end_if
send {num_4} #gcd
call hpdd_check #hanldewinDD #adress_maxHP_DD #adress_actHP_DD #part_hp_dd
if #part_hp_dd >= 75
    return
end_if
call hpheal_check #hanldewinheal #adress_maxHP_Heal #adress_actHP_Heal #part_hp_heal
if #part_hp_heal < 75
    gosub Heal_H
end_if
while timer < 9000
    send_down {DOWN}
    send_up {DOWN}
    send {num_6} 2100
    send {num_0}
    call hpdd_check #hanldewinDD #adress_maxHP_DD #adress_actHP_DD #part_hp_dd
    if #part_hp_dd >= 75
        return
    end_if
end_while
return
:Heal_H
set workwindow #hanldewinheal
send {num_7} #gcd
set timer
send {num_8} #gcd
call hpheal_check #hanldewinheal #adress_maxHP_Heal #adress_actHP_Heal #part_hp_heal
if #part_hp_heal >= 75
    return
end_if
send {num_7} #gcd
call hpdd_check #hanldewinDD #adress_maxHP_DD #adress_actHP_DD #part_hp_dd
if #part_hp_dd < 75
    gosub Heal_D
end_if
send {num_7} #gcd
call hpheal_check #hanldewinheal #adress_maxHP_Heal #adress_actHP_Heal #part_hp_heal
if #part_hp_heal >= 75
    return
end_if
call hpdd_check #hanldewinDD #adress_maxHP_DD #adress_actHP_DD #part_hp_dd
if #part_hp_dd < 75
    gosub Heal_D
end_if
while timer < 9000
    send_down {DOWN}
    send_up {DOWN}
    send {num_9} 2100
    send {num_0}
    call hpheal_check #hanldewinheal #adress_maxHP_Heal #adress_actHP_Heal #part_hp_heal
    if #part_hp_heal >= 75
        return
    end_if
end_while
return

Теперь попытаюсь еще отследить прерывание каста при нанесении хилу дмг.