Как создать плагин для HD мода

Что это за процедура - CombatMan_00477C00
толком не знаю, в вогобазе как-то не очень подробно битвы прокомментированы.

Опытным путем установил, что можно хук запипирить в эту процедуру

Точно не скажу. В этой функции как минимум три хука HD/HotA (Ваш, кстати, с ними не пересекается). Функция вызывается всякий раз, когда отряд получает управление. Например, если в начале боя ослепить единственный вражеский отряд, то до тех пор, пока эффект заклинания не пройдёт, диалог Eagle Eye показан не будет, что логично.

 Код

Код: Выделить всё

#define _CRT_RAND_S
#define _CRT_SECURE_NO_WARNINGS
#include "HotA\homm3.h"

Patcher* _P;
PatcherInstance* _PI;

static _bool_ plugin_On = 0;

struct PicStruc {
    int type;       // тип картинки (9 - заклинание)
    int id;         // ID картинки
};

// кастомный _List_
struct List {
    _ptr_ Creation;
    PicStruc* Data;
    PicStruc* EndData;
    _ptr_ EndMem;
};

int captionAddr;
bool dlgFirst[] = {true, true};

// Заголовок в каждом диалоге
int __stdcall saveCaption(LoHook* h, HookContext* c)
{
    captionAddr = c->ecx;
    return EXEC_DEFAULT;
}

int __stdcall captionFix(LoHook* h, HookContext* c)
{
    *(int*)(c->ebp - 0x14) = captionAddr;
    return EXEC_DEFAULT;
}

int showSpellDlg(_Hero_* hero, int spells[], int nPics)
{
    if ( !nPics ) return 0;

    List picList;

    // Динамический массив картинок
    // Первый и последний элемент резервируем для полей Creation и EndData/EndMem соответственно
    PicStruc* pic = new PicStruc[nPics + 2];

    for (int i = 0; i < nPics; ++i) {
        pic[i + 1].type = 9;
        pic[i + 1].id = spells[i];
    }

    picList.Creation = (_ptr_)pic + 4;
    picList.Data = pic + 1; // Адрес первого элемента в списке
    picList.EndData = picList.Data + nPics; // Адрес следующего за последним элементом в списке байта
    picList.EndMem = (_ptr_)picList.EndData;

    sprintf(o_TextBuffer, "Благодаря навыку {Орлиный глаз}, {%s} выучил%s следующ%s заклинан%s:",
        hero->name, hero->sex ? "а" : "", nPics > 1 ? "ие" : "ее", nPics > 1 ? "ия" : "ие");
    CALL_5(unsigned int, __fastcall, 0x4F7D20, o_TextBuffer, &picList, -1, -1, 0);

    delete [] pic;

    return 0;
}

int getEagleEyeSpells(_Hero_* hero, _Hero_* heroDonor, int spells[])
{
    int n = 0;
    unsigned int eagleEyeProb = (unsigned int)(CALL_1(float, __thiscall, 0x4E4690, hero) * 100.0);

    for (_Spell_* iSpell = o_Spell + SPL_QUICKSAND; iSpell <= o_Spell + SPL_AIR_ELEMENTAL; ++iSpell)
    {
        int i = iSpell - o_Spell;
        if ( heroDonor->spell_level[i] && !hero->spell[i] )
        {
            if ( iSpell->level <= hero->second_skill[HSS_EAGLE_EYE] + 1 )
            {
                unsigned int dice;
                rand_s(&dice);
                dice = (unsigned int)((double)dice / ((double)UINT_MAX + 1) * 100.0) + 1;
                if ( dice <= eagleEyeProb )
                {
                    spells[n++] = i;
                    hero->spell[i] = 1;
                    hero->spell_level[i] = 1;
                }
            }
        }
    }

    return n;
}

int __stdcall eagleEyeMain(LoHook* h, HookContext* c)
{
    _Hero_* hero[] = {o_BattleMgr->hero[ATTACKER], o_BattleMgr->hero[DEFENDER]};

    if ( hero[ATTACKER] && hero[DEFENDER] )
    {
        int spells[70];

        for (int i = ATTACKER; i <= DEFENDER; ++i)
        {
            if ( dlgFirst[i] && o_BattleMgr->current_side == i && hero[i]->second_skill[HSS_EAGLE_EYE] &&
                hero[i]->doll_art[AS_SPELL_BOOK].id == AID_SPELL_BOOK )
            {
                dlgFirst[i] = false;

                // Учим заклинания всегда.
                int n = getEagleEyeSpells(hero[i], hero[1 - i], spells);

                // Но диалог показываем только для игрока-человека:
                // в хотсите - диалог для обоих героев, в сетевой игре - только для своего героя.
                if ( o_GameMgr->GetPlayer(hero[i]->owner_id)->IsHuman() ) {
                    int id = o_GameMgr->GetMeID();
                    if ( !o_NetworkGame || hero[i]->owner_id == id ) {
                        o_ActivePlayerID = hero[i]->owner_id;
                        showSpellDlg(hero[i], spells, n);
                        o_ActivePlayerID = id;
                    }
                }
            }
        }
    }

    return EXEC_DEFAULT;
}

int __stdcall eagleEyeSetGlobalFlags(LoHook* h, HookContext* c)
{
    dlgFirst[ATTACKER] = true;
    dlgFirst[DEFENDER] = true;

    return EXEC_DEFAULT;
}

BOOL APIENTRY DllMain(HMODULE hModule, DWORD  ul_reason_for_call, LPVOID lpReserved)
{
    if ( DLL_PROCESS_ATTACH == ul_reason_for_call )
    {
        if ( !plugin_On )
        {
            plugin_On = 1;
            _P = GetPatcher();
            _PI = _P->CreateInstance("HD.Plugin.NewEagleEye");

            // Меняем коэффициенты
            float eagleEyeCoefs[] = {0.00f, 0.30f, 0.35f, 0.40f};

            _PI->WriteDword(0x63EA2C, (int&)eagleEyeCoefs[1]);
            _PI->WriteDword(0x63EA30, (int&)eagleEyeCoefs[2]);
            _PI->WriteDword(0x63EA34, (int&)eagleEyeCoefs[3]);

            // Убираем оригинальный эффект
            _PI->WriteHexPatch(0x469C23, "EB");
            _PI->WriteHexPatch(0x476996, "E9 DD 01 00 00");

            // Фиксим заголовок диалога
            _PI->WriteLoHook(0x4F7D49, saveCaption);
            _PI->WriteLoHook(0x4F7D54, captionFix);

            _PI->WriteLoHook(0x462C7D, eagleEyeSetGlobalFlags);
            _PI->WriteLoHook(0x477C00, eagleEyeMain);
        }
    }

    return TRUE;
}

AlexSpl писал(а):

Например, если в начале боя ослепить единственный вражеский отряд, то до тех пор, пока эффект заклинания не пройдёт, диалог Eagle Eye показан не будет, что логично.

Как бы это сказать, это цинично малость

Нашёл ещё один глюк HD. Если у компа есть Тактика (и выше, чем у нас, если у нас тоже есть), то во время тактической фазы компа, когда он расставляет свои отряды, получаем такой графический глюк:



Без HD его нет.

Цитата:

Как бы это сказать, это цинично малость

Игра пошаговая, поэтому герой учит заклинания, когда до него доходит ход.

Вообще, когда я смотрел краем глаза ChangeHistory HD мода (с постоянным залатыванием багов), то подумывал о том, более ли он лечит от глюков SoD или калечит.
Если честно, все что мне нужно от HD мода - это багфиксы и патчер. Как правило, кроме багфиксов, все прочие твики я выставляю в 0.
Кстати, предполагается, что в планируемом Ботвинник моде в силу параметров игры действий по взаимодействию героев будет меньше (HD мод здорово облегчает рутину, когда таких действий много).

А каким-то образом можно вообще патчер использовать отдельно от HD мода ?

А зачем, кстати, у Вас это условие ?

Код: Выделить всё

if ( !o_NetworkGame || hero[i]->owner_id == id )


Не сработает оно, только если игра сетевая И id каким-то чудесным образом не совпало.
Это перестраховка ?

Цитата:

А каким-то образом можно вообще патчер использовать отдельно от HD мода ?

Цитата из поста автора:

Цитата:

Патчер - это инструмент для модификации любого исполняемого кода (не только героев). Патчер делает модинг максимально стандартизованным, удобным и безопасным.

А вот как это сделать - лучше у автора спросить.

[ Неактуально. См. пост ]

AlexSpl писал(а):

Цитата:

А вот как это сделать - лучше у автора спросить.

Я так, просто полюбопытствовал. Лицензия у HD мода не GPL и не BSD, так я полагаю. Но у данного автора вообще-то как правило бесполезно что-то спрашивать - отвечает он крайне избирательно. Так что я даже не осуждаю тех, кто на своих сайтах размещает старые версии HD мода (учитывая то, что на сайте автора все старые версии были удалены).