Wake of Gods Forum | Форум Во Имя Богов - Исправление скрипта "capture mills and gardens"

Актуально.

Повторяю просьбу.

Нужно модифицировать скрипт так, чтобы стало возможым совместное владение Мельницами и Садами Лепреконов для союзников.

erm (Click to View)

ert (Click to View)

ArKan, разве до сих пор можно захватывать объект союзника?

А, так ты очень старую версию скрипта запостил... Зачем?

Исправленный ещё хуже, к нему союзники липнут как мухи.

ArKan, в такое слабо верится. При захвате объекта ему присваивается флаг "посещено" и для игрока, и для его союзников.

Увы, так и есть. По крайней мере у меня. Или у меня была другая версия нового скрипта.

ArKan, что за версия игры у тебя?

Вот текущий скрипт, который публично распространяется
(Click to View)

Code:

ZVSE2

** Author orig.  : DracoLich

** Updated by    : Archer30

** Name          : Capture the mills and leprechaun's gardens

** Options       : 879

** Dialogs       : -

** Variables     : -

** Tmp variables : v1-v3, z1

** Timers        : -

** Functions     : -

** PO-values     : V0, V1 (mills and leprechaun's gardens squares)

28.07.2022 Fully rewritten by daemon_n

15.10.2023 Updated by daemon_n: Added graphics with flags;

15.10.2023 Updated by daemon_n: Now supported capture status in MP game during enemy turn but not added in replay turn;

Jun 18 2025 Updated by daemon_n: Added "warehouses" object support, rewritten visit and auto visit logic / graphics is by @JackSlater

!#DC(ES_OBJ_WAREHOUSE) = 142;

!?FU(ES_CreateERMHook);

!#VA(address:x);

!!UN:P879/?(isCaptureObjOpt:y);

!!if&(isCaptureObjOpt);

  !!SN:E(address)/1/4882852/(ES_OnPlayerVisitObject); [Trigger on player visiting Any Object] 4A81A4]

  !!SN:E(address)/1/4263804/(ES_OnMapItem_GetOwner);

  !!SN:E(address)/1/4263370/(ES_OnMapItem_Draw);

  !!SN:E(address)/1/5183597/(ES_Hook_OnPlayerDefeated);

  !!SN:E(address)/1/4239726/(ES_HOOK_OnObjectHintGetType);

  !!SN:E(address)/1/4274460/(ES_HOOK_OnObjectRmcHintGetType);

  !!SN:E(address)/1/4283008/(ES_HOOH_OnObjectRmcHintMsgBox);

!!en;

!?FU(OnGameEnter);

!!UN:P879/?(isCaptureObjOpt:y);

!!if&(isCaptureObjOpt);

  //replace wind mill grass

  !!re i/0/7;                           [(end_value);]

    !!SN:R^AVMwndd0.def:0_%i.png^/^Data\Defs\ESwind00.def\0_%i.png^; [;]

  !!en;

  //replace wind mill snow

  !!re i/0/7;                           [(end_value);]

    !!SN:R^AVMwmsn0.def:0_%i.png^/^Data\Defs\ESwind10.def\0_%i.png^; [;]

  !!en;

  //replace OBJ_WATER_WHEEL

  !!re i/0/7;                           [(end_value);]

    !!SN:R^AVMwwhl0.def:0_%i.png^/^Data\Defs\ESwtr00.def\0_%i.png^; [;]

  !!en;

    //replace OBJ_WATER_WHEEL snow

  !!SN:R^AVMwwsn0.def:0_0.png^/^Data\Defs\ESwtr10.def\0_0.png^; [;]

  //replace OBJ_MYSTICAL_GARDEN

  !!re i/0/13;                          [(end_value);]

    !!SN:R^avtmyst0.def:0_%i.png^/^Data\Defs\ESmyst0.def\0_%i.png^; [;]

    !!SN:R^avtmystd0.def:0_%i.png^/^Data\Defs\ESmystd0.def\0_%i.png^; [;]

  !!en;

  //replace warehouses

  //wood

  !!SN:R^avwrhswd.def:0_0.png^/^Data\Defs\ESwrhswd.def\0_0.png^;

  //mercury

  !!re i/0/7;                           [(end_value);]

    !!SN:R^avwrhsmc.def:0_%i.png^/^Data\Defs\ESwrhsmc.def\0_%i.png^;

  !!en; 

  //ore

  !!SN:R^avwrhsor.def:0_0.png^/^Data\Defs\ESwrhsor.def\0_0.png^;

  //sulfur

  !!re i/0/11;                          [(end_value);]

    !!SN:R^avwrhssf.def:0_%i.png^/^Data\Defs\ESwrhssf.def\0_%i.png^;

  !!en; 

  //crystall

  !!re i/0/7;                           [(end_value);]

    !!SN:R^avwrhscr.def:0_%i.png^/^Data\Defs\ESwrhscr.def\0_%i.png^;

  !!en;  

  //gem

  !!re i/0/7;                           [(end_value);]

    !!SN:R^avwrhsgm.def:0_%i.png^/^Data\Defs\ESwrhsgm.def\0_%i.png^;

  !!en;

  //gold

  !!re i/0/5;                           [(end_value);]

    !!SN:R^avwrhsgl.def:0_%i.png^/^Data\Defs\ESwrhsgl.def\0_%i.png^;

  !!en;

  // mithril

  !!re i/0/6;                           [(end_value);]

    !!SN:R^avwrhsmt.def:0_%i.png^/^Data\Defs\ESwrhsmt.def\0_%i.png^;

  !!en;

!!en;

!?FU(ES_OnMapItem_GetOwner)&i^ES_879_DrawObjectType^;

  !!UN:Cx1/(STRUCT_HOOK_CONTEXT_EBP)/4/?(ebp:y) C(ebp)/-68/4/?(coords:y);

  !!FU(ES_UnPackedCoords):P?(x:y)/?(y:y)/?(z:y)/(coords);

  !!if&(x)>-1/(y)>-1/(z)>-1;            [This check is required for some maps]

    !!PO(x)/(y)/(z):O?(owner:y);

    !!UN:Cx1/(STRUCT_HOOK_CONTEXT_EAX)/4/(owner);

    !!VRi^ES_879_DrawObjectType^:S(NULL);

  !!en;

!?FU(ES_OnMapItem_Draw);

!!UN:Cx1/(STRUCT_HOOK_CONTEXT_EDI)/4/?(mapitem:y) C(mapitem:y)/56/4/?(objType:y);

!!if|(objType)=(OBJ_WATER_WHEEL)/(objType)=(OBJ_MYSTICAL_GARDEN)/(objType)=(OBJ_WINDMILL)/(objType)=(ES_OBJ_WAREHOUSE);

  !!UN:C6916676/4/?(noShowObjectcts:y);

  !!if&(noShowObjectcts)=0;

    !!VRi^ES_879_DrawObjectType^:S(objType);

    !!SN:X?t/0;

    !!UN:Cx1/(STRUCT_HOOK_CONTEXT_RET)/4/4263617;

  !!en; 

!!en;

!?FU(ES_OnPlayerVisitObject)&i^ES_879_isAuto^=(FALSE); [4A81A4]

  !!UN:Cx1/(STRUCT_HOOK_CONTEXT_EBX)/(UNC_INT)/?(objType:y);

  !!if|(objType)=(OBJ_WATER_WHEEL)/(objType)=(OBJ_MYSTICAL_GARDEN)/(objType)=(OBJ_WINDMILL)/(objType)=(ES_OBJ_WAREHOUSE);

    !!UN:Cx1/(STRUCT_HOOK_CONTEXT_EBP)/(UNC_INT)/?(ebp:y) C(ebp)/16/(UNC_INT)/?(packedCoords:y);

    !!FU(ES_UnPackedCoords):P?(x:y)/?(y:y)/?(z:y)/(packedCoords);

    !!PO(x)/(y)/(z):O?(oldOwner:y);

    !!VR(ownerChanged:y):S(FALSE);

    !!if&(oldOwner)=(NO_OWNER);

      !!PO(x)/(y)/(z):V0/0 V1/0;          [res type and num]

      !!VR(ownerChanged):S(TRUE);

    !!el;

      !!OW:T(oldOwner)/?(team:y) Ti^timerOwner^/?(newTeam:y);

      !!if&(team)<>(newTeam);

        !!PO(x)/(y)/(z):V0/0 V1/0;        [res type and num]

        !!VR(ownerChanged):S(TRUE);

      !!en;

    !!en;

    !!if&(ownerChanged);

      !!IP:D(ANY_PLAYER);

      !!FU(ES_879_MP_SetObjectOwner):D(x)/(y)/(z)/i^timerOwner^ P(x)/(y)/(z)/i^timerOwner^;

    !!en;

  !!en;

!?FU(ES_879_MP_SetObjectOwner);

!#VA (packedCoords[3]:x) (newOwner:x);

!!POx1/x2/x3:O(newOwner);

!?FU(OnEveryDay)&i^timerWeekday^=1/i^timerDay^>1/i^timerOnce^; [поставка ресурсов владельцам мельниц/садов каждый первый день недели, начина€ с 8го дн€]

  !!UN:P879/?(wogOption:y);             [провер€ем включена ли опци€ в y1]

  !!FU&(wogOption)<>(TRUE):E;           [выход, если опци€ не включена]

  !!FU(ES_879_CollectResources):P;

!?FU(ES_Hook_OnPlayerDefeated);

  !!FU(ES_879_CollectResources):P;

!?FU(ES_879_CollectResources);

  !!FU(NewIntArray):P8/?(liveArr:y); 

  !!re (playerID:y)/0/(PLAYER_LAST);

    !!OW:I(playerID)/d/?(isDead:y);

    !!SN&(isDead)=(FALSE):V(liveArr)/(playerID)/(TRUE);

  !!en;

  !!re i/0/(HERO_LAST_WOG);

    !!HEi:O?(owner:y);

    !!if&(owner)=(NO_OWNER);

      !!HEi:Z?(hero:y);

      !!br;

    !!en;

  !!en;

  !!VRi^ES_879_isAuto^:S(TRUE);

  !!FU(ES_879_IterateObjects):P(OBJ_MYSTICAL_GARDEN)/(hero)/(liveArr);

  !!FU(ES_879_IterateObjects):P(OBJ_WATER_WHEEL)/(hero)/(liveArr);

  !!FU(ES_879_IterateObjects):P(OBJ_WINDMILL)/(hero)/(liveArr);

  !!FU(ES_879_IterateObjects):P(ES_OBJ_WAREHOUSE)/(hero)/(liveArr);

  !!UN:C(hero)/34/1/(NO_OWNER);

  !!VRi^ES_879_isAuto^:S(FALSE);

!?FU(ES_879_IterateObjects); 

!#VA(objType:x) (hero:x) (liveArr:x);

!#VA(x:y) (y:y) (z:y); 

!!VR(x):S-1;                            [init as start]

!!UN:C(ADV_MANAGER)/4/?(advMgr:y);

!!re i;                                 [endless loop]

  !!UN:U(objType)/(ANY_OBJ)/-1/(x)/(y)/(z); 

  !!br&(x)<0;                           [exit loop if nothing found]

  !!PO(x)/(y)/(z):O?(owner:y);          [get obj owner]

  !!if&(owner)<>(NO_OWNER);             [if there is one]

    !!SN:V(liveArr)/(owner)/?(isAlive:y);[check if lives]

    !!if&(isAlive);

      !!UN:C(hero)/34/1/(owner);        [set hero as obj owner color]

      !!OB(x)/(y)/(z):T?(heroCheck:y);

      !!if&(heroCheck)=(OBJ_HERO);

        !!FU(ES_AdvMgr_HideHero):P(x)/(y)/(z); [hide hero if it is there]

      !!en;

      !!FU(ES_879_AdjustStoredRes):P(x)/(y)/(z)/(objType);

      !!FU(ES_879_AdvMgr_HeroEnterObjectAsAi):P(x)/(y)/(z)/(hero);

    !!el;

      !!PO(x)/(y)/(z):O(NO_OWNER) V0/0 V1/0; [set no owner if is dead]

      !!FU(ES_879_MP_SetObjectOwner):P(x)/(y)/(z)/(NO_OWNER);

    !!en;

  !!en;

!!en;

!?FU(ES_879_AdvMgr_HeroEnterObjectAsAi);

!#VA(x:x) (y:x) (z:x) (hero:x);

!#VA(storedOpp[5]:y);

!!re i/0/4;

  !!UN:Ci/4882831/(UNC_INT8)/?(storedOpp[i]) Ci/4882831/(UNC_INT8)/(OPCODE_NOP_1);

!!en;

!!FU(ES_PackedCoords):P(x)/(y)/(z)/?(packed:y);

!!FU(ES_AdvMgr_GetMapItem):P(x)/(y)/(z)/?(mapItem:y);

!!UN:C(ADV_MANAGER)/(UNC_UINT32)/?(advMgr:y);

!!UN:C(mapItem)/(UNC_UINT32)/?(objSetup:y) C(mapItem)/30/(UNC_UINT32)/?(objType:y);

!!SN:E4882784/(CALLCONV_THISCALL)/(advMgr)/(hero)/(mapItem)/(packed)/(FALSE); [AdvMgr_Enter2Object_Player]

!!re i/0/4;

  !!UN:Ci/4882831/(UNC_INT8)/(storedOpp[i]);

!!en;

!?FU(ES_879_AdjustStoredRes);

!#VA(x:x) (y:x) (z:x) (objType:x); 

!!if&(objType)=(OBJ_MYSTICAL_GARDEN);

  !!GD(x)/(y)/(z):B?(resType:y);

  !!VR(value:y):S5;

  !!VR(value)&(resType)=(RES_GOLD):S500;

!!el&(objType)=(OBJ_WATER_WHEEL);

  !!WM(x)/(y)/(z):B?(resCoeff:y);

  !!VR(value:y):S(resCoeff)*500;

  !!VR(resType):S(RES_GOLD);

!!el&(objType)=(OBJ_WINDMILL);

  !!ML(x)/(y)/(z):B?(resType:y)/?(value:y);

!!el&(objType)=(ES_OBJ_WAREHOUSE);

  !!OB(x)/(y)/(z):C?(cWord:y);

  !!VR(resType):S(cWord) &(BITS_5_MASK);

  !!VR(value):S(cWord) Sd>>13 &(BITS_10_MASK);

  !!if&(resType)=(RES_MITHRIL);         [replace resType with gold if there is no mithril]

    !!UN:B0/?(mithrilEnabled:y);

    !!if&(mithrilEnabled)=(FALSE);

      !!VR(resType):S(RES_GOLD);

    !!en;

  !!en;

  !!if&(resType)=(RES_GOLD);

    !!VR(value):*500;

  !!en;

!!en;

!!PO(x)/(y)/(z):V0/(resType) V1/(value);

!?FU(ES_HOOK_OnObjectHintGetType);

!!UN:Cx1/(STRUCT_HOOK_CONTEXT_EBX)/4/?(ebx:y) C(ebx)/30/2/?t; [(objType:y);]

!!if|t=(OBJ_MYSTICAL_GARDEN)/t=(OBJ_WATER_WHEEL)/t=(OBJ_WINDMILL)/t=(ES_OBJ_WAREHOUSE);

  !!VRi^es_879_hint_object_type^:St;

!!en;

!?FU(OnAdventureMapTileHint)&i^es_879_hint_object_type^;

!#VA(x:x) (y:x) (z:x);                  [Object entrance coordinates]

!!PO(x)/(y)/(z):O?(owner:y);

!!if&(owner)>(NO_OWNER);

  !!VR(ownerStrIndex:y):S(owner) +23;

  !!FU(GetTextFileString):P^arraytxt^/(ownerStrIndex)/?(ownerStr:z);

  !!VR(newHint:z):S^ - %(ownerStr)^;

  !!MM:M?(hint:z) M^%(hint:z)%(newHint:z)^;

!!en;

!!VRi^es_879_hint_object_type^:S0;

!?FU(ES_HOOK_OnObjectRmcHintGetType);

!!UN:Cx1/(STRUCT_HOOK_CONTEXT_EBX)/4/?(mapItem:y);

!!if&(mapItem)>(BIT_16);

  !!UN:C(mapItem:y)/30/2/?t;            [(objType:y);]

  !!if|t=(OBJ_MYSTICAL_GARDEN)/t=(OBJ_WATER_WHEEL)/t=(OBJ_WINDMILL)/t=(ES_OBJ_WAREHOUSE);

    !!VRi^es_879_rmc_hint_object_type^:St;

  !!en;

!!en;

!?FU(ES_HOOH_OnObjectRmcHintMsgBox)&i^es_879_rmc_hint_object_type^;

!!UN:Cx1/(STRUCT_HOOK_CONTEXT_EBP)/4/?(ebp:y) C(ebp)/-32/4/?(coords:y);

!!FU(ES_UnPackedCoords):P?(x:y)/?(y:y)/?(z:y)/(coords);

!!SN:O?(x:y)/?(y:y)/?(z:y);

!!VRt:Si^es_879_rmc_hint_object_type^;

!!VRi^es_879_rmc_hint_object_type^:S0;

!!PO(x)/(y)/(z):O?(owner:y);

!!if&(owner)<>(NO_OWNER);

  !!UN:Cx1/(STRUCT_HOOK_CONTEXT_ECX)/4/?(textBuffer:y);

  !!FU(ES_GameMgr_GetObjOwnerStr):P(owner)/?(ownerStr:z);

  !!SN:B(textBuffer)/d/?(currHint:z) B(textBuffer)/d/^%(currHint:z)%T(es.endl)%(ownerStr:z)^;

!!en;

; Reveal the area for owners every day (in case it's covered by Cover of Darkness)

; Warning: must not use OnEveryDay and UN:S as they don't work exactly the same as native behaviours

!?FU(ES_OnNewDay);

!!UN:P879/?(wogOption:y);

!!FU&(wogOption)<>(TRUE):E;

!!UN:C(GAME_MANAGER)/4/?(gameMgr:y);

; get size of the map

!!UN:X?(mapSize:y)/?(hasUnderground:y); 

; pass once through all cells of the map

!!re l/0/(hasUnderground)/1;            [coord z]

  !!re k/0/(mapSize)/1/-1;              [coord y]

    !!re i/0/(mapSize)/1/-1;            [coord x]

      !!OBi/k/l:T?(objType:y);

      !!if|(objType)=(OBJ_WATER_WHEEL)/(objType)=(OBJ_MYSTICAL_GARDEN)/(objType)=(OBJ_WINDMILL)/(objType)=(ES_OBJ_WAREHOUSE);

        !!TRi/k/l:E?(isYellowSquare:y); 

        !!VR(isYellowSquare):X(TRUE);   [reverse param isYellowSquare]

        !!if&(isYellowSquare);

          !!FU(ES_AdvMgr_GetMapItem):Pi/k/l/?(mapItem:y);

          !!POi/k/l:O?(owner:y);

          !!SN:E4836816/(CALLCONV_THISCALL)/(gameMgr)/i/k/l/(owner)/3/0;

        !!en;

      !!en;

    !!en;

  !!en;

!!en;

; Reveal the area when an object is captured with Sorcery I (WoG Scripts)

!?FU(WOG_23_OnAfterEnterObject);

!#VA(x:x) (y:x) (z:x);

!#VA(objType:x);

!#VA(owner:x);

!!UN:P879/?(isCaptureObjOpt:y);

!!if&(isCaptureObjOpt);

  !!if|(objType)=(OBJ_WATER_WHEEL)/(objType)=(OBJ_MYSTICAL_GARDEN)/(objType)=(OBJ_WINDMILL)/(objType)=(ES_OBJ_WAREHOUSE);

    !!UN:C(GAME_MANAGER)/4/?(gameMgr:y);

    !!SN:E4836816/(CALLCONV_THISCALL)/(gameMgr)/(x)/(y)/(z)/(owner)/3/0;

  !!en;

!!en;

3.9.2

Для этой версии скрипта нужны дополнительные ресурсы (изображения объектов с флагами)?

(03.12.2025 14:27)ArKan Wrote: [ -> ]3.9.2

Игра точно установлена через Heroes Launcher и обновлена?

ArKan, да.
И как заметил Elmore, твоя версия установлена не через лаунчер.

Точно нет.

ArKan, имеется в виду новый Heroes Launcher.
В нём версия игры намного выше. Так что обнови, чтобы иметь доступ к исправленному, улучшенному и новому контенту.

Там вроде много вырезано было?

ArKan, нет. Почти ничего не вырезано

Уже и не припомню причину, почему я к старой версии вернулся....