[DinarMayor]

---

Скрипты мода DenMod

---

---

В этой теме будут выкладываться и обсуждаться новые скрипты мода. Также буду рад предложениям и идеям для скриптов - возможно что-то хотели бы увидеть в моде, а может исправить/изменить уже имеющейся скрипт. В шапке темы будут описания только тех скриптов, которые внедрены в текущую(доступную) версию мода, а все новые будут в этой теме.

---

Описание скриптов (Reveal)

В моде параллельно работают три вида скриптов: обычные скрипты меди2, скрипты советника, скрипты на языке Lua.
В основном все написано именно на луа, что расширяет возможности скриптинга в меди и уменьшает скорость перехода хода. Сейчас это от 15-ти секунд до 2 минут - зависит от кол-ва персонажей на страт карте. Вот примерно как меняется время перехода хода:

2 ход	- 00:15
34 ход	- 00:37
121 ход - 01:58
159 ход - 01:25
186 ход - 02:01
199 ход - 01:35
229 ход - 02:05

В следующей версии будет еще быстрее - будут переписаны оставшиеся скрипты меди и советника, а также триггеры трейтов и анчей. Но вернуть скорость ванилы не получиться, т.к. увеличен параметр, отвечающий за построение маршрута для ИИ. Если вернуть ванильное значение, то ИИ будет на много тупее.

Итак, собственно, некоторые скрипты:

Контроль над вассалами (Reveal)

Если у игрока появился вассал, то он может включить передачу ходов своему вассалу, т.е. во время перехода хода будет возможность делать ходы еще и за них. По умолчанию отключен. Включить можно нажатием кнопки "Установить контроль над вассалами" в меню найма поселения. Если вассалов будет слишком много и не хочется за каждого из них ходить, то можно включать/отключать передачу хода индивидуально для каждого из них - кнопка F5.

Spoiler (expand)

Не стоит на одном и том же ходу объявлять войну союзнику или вассалу и сразу делать его вассалом - скрипт может не сработать для этой фракции. Также не рекомендую получать отказ в дип.переговорах играя за вассала - скрипт может перестать работать для этой фракции. Это очередные причуды движка.

Увольнение персонажа (Reveal)

В моде есть возможность уволить(убить) некоторых агентов. Для этого нужно открыть свиток персонажа, он должен быть вне города и т.п., нажать на кнопку вопроса, а дальше по инструкции

Spoiler (expand)

Смена наследника (Reveal)

Есть возможность сменить наследника. Для этого нужно открыть семейное древо. Выбрать нужного персонажа, нажать на кнопку вопроса и в появившемся советнике нажать кнопку "Урок". За каждую смену наследника будет изыматься некоторая сумма из казны.

Spoiler (expand)

Вид на город (Reveal)

Можно посмотреть на город на тактике.

Скрипт дезертирства и пополнение армии (Reveal)

Дезертирство армии будет происходить автоматически на нейтральных или враждебных землях - каждый ход с каждого отряда будет дезертировать по несколько человек.
Поставить армию на пополнение можно только в своих или союзных землях. Для этого нужно нажать на кнопку "Просмотр сведений об охране полководца" и следовать инструкции. Должен появиться трейт "Пополнение армии", но учтите, что в меди есть один глюк, когда последний трейт не виден. Поэтому может повторить по несколько раз - деньги за пополнение снимаются не сразу.

Spoiler (expand)

Гарнизонный скрипт и скрипт ГФ(гарнизон в фортах) (Reveal)

Первый скрипт штампует гарнизон в городах и фортах ИИ при штурме, вылазке или при атаке снаружи у города - состав гарнизона зависит от владельца. Второй обеспечивает постоянное присутствие гарнизона в фортах, отчего ИИ на них охотно нападает - состав один и тот же отряд(временно).

Авто объявление войны (Reveal)

Теперь при пересечение границы нейтральной фракции автоматически рандомно будет объявляется война.
Если армия в походе, то нет. Крестоносцы получают право прохода по землям католиков, а участники джихада по землям мусульман.
При исключение из церкви автоматически объявляется война Папе.

Наем войск - население (Reveal)

Теперь население города напрямую зависит от найма и обратно. Если в поселения меньше или равно 1000 человек, то нанимать уже будет нельзя. При найме вычитается население из поселения и обратно прибавляется при роспуске, причем роспуск в чужих землях прибавит население им, т.е, проще говоря, где распустил, там и плюс к населению. Это не касается флота - роспуск не пополняет население.

Смена религии (Reveal)

Если у какой-то фракции в каждом поселение одновременно та или иная религия больше или равно 55%, то фракция обращается в новую веру, все прежние постройки рушатся и появляются новые. Внешний вид священнослужителей остается, пока, тем же. Это действует на все фракции, кроме Папы, Монголов, Тимуридов и мятежников.

Штурм с ходу (Reveal)

Этот скрипт заставляет ИИ штурмовать города без осады, т.е. если у ИИ в стеке есть осадные орудия(баллисты, катапульты и прочее), то он может решить штурмовать с ходу, без предварительных ласк.

Это были основные скрипты. Также в моде присутствую и другие скрипты, но их не нужно объяснять. Скрипты будут обновляться и добавляться новые - это основа этого мода.

---

Номер карты для тех, кто хочет отблагодарить разработчика:
СберБанк: 2202 2063 6114 3568

---

[DinarMayor]

Сергей_Тумаков

Здравствуйте, есть желание этот скрипт адаптировать для дака5, т.к там есть постоянные форты, подскажите что для этого нужно, я предполагаю что где пропущенны координаты фортов их просто вбить и всё готово? И в каком файле этой программы нужно вставить этот код? И на какой версии этой программы этот код будет работать? Прошу прощения за кол-во вопросов, я просто в модинге так сказать новичок. Сделаю для себя, и хотел спросить могу ли я это выложить в общий доступ здесь на форуме.

Для начала скачайте и установите версию проги M2TWEOP-2.2.1 или M2TWEOP-2.2.0. Ссылки To view the link Register я уже скидывал.

После установки:
-скачайте этот файл To view the link Register
-нужно распаковать архив и закинуть файл в папку ВАШ_МОД\youneuoy_Data\plugins\lua и прописать в файле luaPluginScript.lua строку

require('replenishment_army_in_fort')

Или скопировать все содержимое скаченного файла и вставить в конце luaPluginScript.lua.

---

Сам скрипт универсальный, т.е. не нужно его адаптировать под конкретный мод.

replenishment_army_in_fort (Reveal)

function log_always(text)
    stratmap.game.scriptCommand("log", "[lua] "..text);
end

function onButtonPressed(buttonName)
    if buttonName=="end_turn" then 
        replenishment_army_in_fort();
    end
    log_always("--- onButtonPressed --- " .. buttonName);    print("--- onButtonPressed --- " .. buttonName);
end

function replenishment_army_in_fort()
    gDataCamp=gameDataAll.get().campaignStruct;
    for i=0, gDataCamp.currentFaction.fortsNum-1 do
        local fort = gDataCamp.currentFaction:getFort(i)
        if fort.army~=nil and fort.siege==nil then 
            for un=0, fort.army.numOfUnits-1 do
                local stack_unit = fort.army:getUnit(un);
                local unit_soldier = stack_unit.soldierCountStratMap;
                local unit_soldier_max = math.floor(stack_unit.eduEntry.SoldierCount*coefficient());
                local random_value = math.random(1, 5);
                local random_cost = math.random(1, 10);

                if (unit_soldier + random_value < unit_soldier_max) then
                    stack_unit.soldierCountStratMap=unit_soldier + random_value;
                    gDataCamp.currentFaction.money=gDataCamp.currentFaction.money-random_value*random_cost;

                    log_always("--- пополнение армии форт1("..fort.xCoord.." "..fort.yCoord..") - "..gDataCamp.currentFaction:getFactionName().." "..stack_unit.eduEntry.Type.." "..random_value.." "..random_value*random_cost.." ---");
                elseif (unit_soldier_max - unit_soldier <= 3) and (unit_soldier_max - unit_soldier > 0) then
                    local random_value = unit_soldier_max - unit_soldier;
                    stack_unit.soldierCountStratMap=unit_soldier_max;
                    gDataCamp.currentFaction.money=gDataCamp.currentFaction.money-random_value*random_cost;

                    log_always("--- пополнение армии форт2("..fort.xCoord.." "..fort.yCoord..") - "..gDataCamp.currentFaction:getFactionName().." "..stack_unit.eduEntry.Type.." "..random_value.." "..random_value*random_cost.." ---");
                end 
            end
        end
    end
end

function coefficient()
    if gDataCamp:GetUnitSize()==0 then        -- мини 
        return 1.0;
    elseif gDataCamp:GetUnitSize()==1 then    -- сред 
        return 1.25;
    elseif gDataCamp:GetUnitSize()==2 then    -- боль 
        return 1.875;
    elseif gDataCamp:GetUnitSize()==3 then    -- макс 
        return 2.5;
    end
    return 2.5;
end

Лог будет писать вот такое

Spoiler (expand)

11:38:19.125 [game.script] [always] [lua] --- onButtonPressed --- end_turn
11:38:21.774 [game.script] [always] [lua] --- пополнение армии форт2(109 159) - england Peasant Archers 3 21 ---
11:38:21.774 [game.script] [always] [lua] --- пополнение армии форт2(109 159) - england Spear Militia 1 10 ---
11:38:21.774 [game.script] [always] [lua] --- пополнение армии форт1(109 159) - england Spear Militia 2 8 ---

---

Quote

Сделаю для себя, и хотел спросить могу ли я это выложить в общий доступ здесь на форуме.

Про это я писал

DinarMayor

Скрипты можете брать без разрешения

А прогу использовать автор разрешает, по идее, всех, кому ранее не запрещал.
Главное не забудьте упомянуть в благодарностях авторов проги и мода и/или название мода(откуда скрипт) и прогу.

[DinarMayor]

To view the link Register

ENG (Reveal)

sully1 27 May 2023, 19:09

Does anyone know to go over the unit cap through m2tweop? I have it but idk how to go past 500 units. I tried to search it up but no use so far. Can someone give me any tips and advice on how to do so?

To get started, download and install the version of the program M2TWEOP-2.2.1 or M2TWEOP-2.2.0.
To view the link Register

Spoiler (expand)

You can ask questions about Lua scripts on Discord. To view the link Register

Spoiler (expand)

The units themselves are added as follows

function onReadGameDbsAtStart()    
    M2TWEOPDU.addEopEduEntryFromFile(M2TWEOP.getModPath().."/youneuoy_Data/unitTypes/
rus2_bulgars/Samoedes.txt",1114);
end

Spoiler (expand)

Samoedes.txt file

Spoiler (expand)

type             Samoedes
dictionary       Samoedes      ; Samoedes
category         infantry
class            missile
voice_type       Light
accent           Arabic
banner faction   main_missile
banner holy      crusade
soldier          merc_samoedes, 80, 0, 1.05
attributes       sea_faring, hide_forest, hide_improved_forest, can_withdraw, start_not_skirmishing, mercenary_unit, stakes, stakes
formation        1.2, 1.2, 2.4, 2.4, 3, square
stat_health      1, 0
stat_pri         4, 1, composite_arrow, 220, 15, missile, missile_mechanical, piercing, none, 25, 1
stat_pri_attr    no
stat_sec         4, 5, no, 0, 0, melee, melee_blade, slashing, axe, 10, 1
stat_sec_attr    no
stat_pri_armour  4, 3, 0, flesh
stat_sec_armour  0, 0, flesh
stat_heat        3
stat_ground      1, -2, 4, 2
stat_mental      7, disciplined, untrained
stat_charge_dist 30
stat_fire_delay  0
stat_food        60, 300
stat_cost        2, 800, 800, 500, 500, 2000, 0, 0
armour_ug_levels 198
armour_ug_models merc_samoedes
ownership        slave, tatar
;recruit_priority_offset    48

The unit itself on the strat map needs to be created by a script

newArmy:createEOPUnit(1114,0,0,0)

Spoiler (expand)

Script Example

Spoiler (expand)

function startGameGarrison()
    for f=0, 30 do
        local fac = stratmap.game.getFaction(f);
        for i=0, fac.settlementsNum-1 do
            local settlement = fac:getSettlement(i);
            if(settlement.name=="Caernarvon" or settlement.name=="Cardiff") and settlement.governor~=nil then
                local oldBG = settlement.governor.bodyguards;
                local settlementArmy = stratmap.game.createArmyInSettlement(settlement);
                local newBG = settlementArmy:createEOPUnit(5001,5,2,1);
                settlement.governor:setBodyguardUnit(newBG);
                oldBG.alias="-удалить-";    oldBG:kill();
                settlementArmy:createEOPUnit(5000,2,1,1);
                settlementArmy:createEOPUnit(5002,2,1,1);
                settlementArmy:createEOPUnit(5003,2,1,1);
                settlementArmy:createEOPUnit(5004,2,1,1);
                settlementArmy:createEOPUnit(5005,2,1,1);
                settlementArmy:createEOPUnit(5006,2,1,1);
                settlementArmy:createEOPUnit(5007,2,1,1);
                settlementArmy:createEOPUnit(5008,2,1,1);
            end
        end
        for i=0, fac.fortsNum-1 do
            local fort = fac:getFort(i)
            if fort.army~=nil then
                if fort.xCoord==173 and fort.yCoord==280 then
                    fort.army:createEOPUnit(5000,2,1,1);
                    fort.army:createEOPUnit(5002,2,1,1);
                    fort.army:createEOPUnit(5003,2,1,1);
                    fort.army:createEOPUnit(5004,2,1,1);
                end
                if fort.xCoord==169 and fort.yCoord==266 then
                    fort.army:createEOPUnit(5005,2,1,1);
                    fort.army:createEOPUnit(5006,2,1,1);
                    fort.army:createEOPUnit(5007,2,1,1);
                    fort.army:createEOPUnit(5008,2,1,1);
                end
            end
        end
    end
end

Or add in the form of mercenaries

region.mercPool:addMercUnit(1114, 0, 930, 0.08, 0.17, 1, 1, 0, 0, 0);

Spoiler (expand)

Script Example

Spoiler (expand)

function newMercs3()
    for r = 0, 199 do
        local region = gDataCampStratmap.getRegion(r);
        -- mercPool:addMercUnit (idx, exp, cost, repmin, repmax, maxunits, startpool, startyear, endyear, crusading)
        if region.regionName=="Moscow_Province" or region.regionName=="Sarkel_Province" then
            local mercUnit = region.mercPool:addMercUnit(1907, 0, 930, 0.08, 0.17, 1, 1, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(1908, 0, 875, 0.15, 0.35, 2, 1, 0, 0, 0);        logMercs(region,mercUnit)
        end
        if region.regionName=="Vilnius_Province" then
            local mercUnit = region.mercPool:addMercUnit(1600, 0, 570, 0.15, 0.35, 3, 1, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(1604, 0, 650, 0.15, 0.35, 3, 0, 0, 0, 0);        logMercs(region,mercUnit)
        end
        if region.regionName=="Caernarvon_Province" then
            local mercUnit = region.mercPool:addMercUnit(5000, 0, 870, 0.08, 0.17, 2, 1, 0, 0, 0);        logMercs(region,mercUnit)
        -- local mercUnit = region.mercPool:addMercUnit(5001, 0, 770, 0.15, 0.35, 3, 1, 0, 0, 0)        -- Охрана 
            local mercUnit = region.mercPool:addMercUnit(5002, 0, 990, 0.08, 0.17, 2, 0, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5003, 0, 1150, 0.06, 0.17, 1, 0, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5004, 0, 580, 0.15, 0.35, 3, 1, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5005, 0, 675, 0.15, 0.35, 3, 1, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5006, 0, 935, 0.08, 0.17, 2, 0, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5007, 0, 1000, 0.08, 0.17, 1, 0, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5008, 0, 1070, 0.06, 0.17, 1, 0, 0, 0, 0);        logMercs(region,mercUnit)
        end
        -- etc 
    end
end

Read the Lua scripting documentation. To view the link Register
All examples are taken from the mod To view the link Register. 161 units have been added there.

RU (Reveal)

Quote

Кто-нибудь знает, как через m2tweop пройтись по юнит-кепке? У меня есть, но не знаю, как пройти 500 единиц. Пробовал искать, но пока бесполезно. Может ли кто-нибудь дать мне какие-либо советы и рекомендации о том, как это сделать?

Для начала скачайте и установите версию программы M2TWEOP-2.2.1 или M2TWEOP-2.2.0.
To view the link Register

Spoiler (expand)

Вы можете задавать вопросы о Lua-скриптах в Discord. To view the link Register

Spoiler (expand)

Сами юниты добавляются следующим образом

function onReadGameDbsAtStart()    
    M2TWEOPDU.addEopEduEntryFromFile(M2TWEOP.getModPath().."/youneuoy_Data/unitTypes/
rus2_bulgars/Samoedes.txt",1114);
end

Spoiler (expand)

Файл Samoedes.txt

Spoiler (expand)

type             Samoedes
dictionary       Samoedes      ; Samoedes
category         infantry
class            missile
voice_type       Light
accent           Arabic
banner faction   main_missile
banner holy      crusade
soldier          merc_samoedes, 80, 0, 1.05
attributes       sea_faring, hide_forest, hide_improved_forest, can_withdraw, start_not_skirmishing, mercenary_unit, stakes, stakes
formation        1.2, 1.2, 2.4, 2.4, 3, square
stat_health      1, 0
stat_pri         4, 1, composite_arrow, 220, 15, missile, missile_mechanical, piercing, none, 25, 1
stat_pri_attr    no
stat_sec         4, 5, no, 0, 0, melee, melee_blade, slashing, axe, 10, 1
stat_sec_attr    no
stat_pri_armour  4, 3, 0, flesh
stat_sec_armour  0, 0, flesh
stat_heat        3
stat_ground      1, -2, 4, 2
stat_mental      7, disciplined, untrained
stat_charge_dist 30
stat_fire_delay  0
stat_food        60, 300
stat_cost        2, 800, 800, 500, 500, 2000, 0, 0
armour_ug_levels 198
armour_ug_models merc_samoedes
ownership        slave, tatar
;recruit_priority_offset    48

Сам юнит на страт карте нужно создавать скриптом

newArmy:createEOPUnit(1114,0,0,0)

Spoiler (expand)

Пример скрипта

Spoiler (expand)

function startGameGarrison()
    for f=0, 30 do
        local fac = stratmap.game.getFaction(f);
        for i=0, fac.settlementsNum-1 do
            local settlement = fac:getSettlement(i);
            if(settlement.name=="Caernarvon" or settlement.name=="Cardiff") and settlement.governor~=nil then
                local oldBG = settlement.governor.bodyguards;
                local settlementArmy = stratmap.game.createArmyInSettlement(settlement);
                local newBG = settlementArmy:createEOPUnit(5001,5,2,1);
                settlement.governor:setBodyguardUnit(newBG);
                oldBG.alias="-удалить-";    oldBG:kill();
                settlementArmy:createEOPUnit(5000,2,1,1);
                settlementArmy:createEOPUnit(5002,2,1,1);
                settlementArmy:createEOPUnit(5003,2,1,1);
                settlementArmy:createEOPUnit(5004,2,1,1);
                settlementArmy:createEOPUnit(5005,2,1,1);
                settlementArmy:createEOPUnit(5006,2,1,1);
                settlementArmy:createEOPUnit(5007,2,1,1);
                settlementArmy:createEOPUnit(5008,2,1,1);
            end
        end
        for i=0, fac.fortsNum-1 do
            local fort = fac:getFort(i)
            if fort.army~=nil then
                if fort.xCoord==173 and fort.yCoord==280 then
                    fort.army:createEOPUnit(5000,2,1,1);
                    fort.army:createEOPUnit(5002,2,1,1);
                    fort.army:createEOPUnit(5003,2,1,1);
                    fort.army:createEOPUnit(5004,2,1,1);
                end
                if fort.xCoord==169 and fort.yCoord==266 then
                    fort.army:createEOPUnit(5005,2,1,1);
                    fort.army:createEOPUnit(5006,2,1,1);
                    fort.army:createEOPUnit(5007,2,1,1);
                    fort.army:createEOPUnit(5008,2,1,1);
                end
            end
        end
    end
end

Или добавить в виде наемников

region.mercPool:addMercUnit(1114, 0, 930, 0.08, 0.17, 1, 1, 0, 0, 0);

Spoiler (expand)

Пример скрипта

Spoiler (expand)

function newMercs3()
    for r = 0, 199 do
        local region = gDataCampStratmap.getRegion(r);
        -- mercPool:addMercUnit (idx, exp, cost, repmin, repmax, maxunits, startpool, startyear, endyear, crusading)
        if region.regionName=="Moscow_Province" or region.regionName=="Sarkel_Province" then
            local mercUnit = region.mercPool:addMercUnit(1907, 0, 930, 0.08, 0.17, 1, 1, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(1908, 0, 875, 0.15, 0.35, 2, 1, 0, 0, 0);        logMercs(region,mercUnit)
        end
        if region.regionName=="Vilnius_Province" then
            local mercUnit = region.mercPool:addMercUnit(1600, 0, 570, 0.15, 0.35, 3, 1, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(1604, 0, 650, 0.15, 0.35, 3, 0, 0, 0, 0);        logMercs(region,mercUnit)
        end
        if region.regionName=="Caernarvon_Province" then
            local mercUnit = region.mercPool:addMercUnit(5000, 0, 870, 0.08, 0.17, 2, 1, 0, 0, 0);        logMercs(region,mercUnit)
        -- local mercUnit = region.mercPool:addMercUnit(5001, 0, 770, 0.15, 0.35, 3, 1, 0, 0, 0)        -- Охрана 
            local mercUnit = region.mercPool:addMercUnit(5002, 0, 990, 0.08, 0.17, 2, 0, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5003, 0, 1150, 0.06, 0.17, 1, 0, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5004, 0, 580, 0.15, 0.35, 3, 1, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5005, 0, 675, 0.15, 0.35, 3, 1, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5006, 0, 935, 0.08, 0.17, 2, 0, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5007, 0, 1000, 0.08, 0.17, 1, 0, 0, 0, 0);        logMercs(region,mercUnit)
            local mercUnit = region.mercPool:addMercUnit(5008, 0, 1070, 0.06, 0.17, 1, 0, 0, 0, 0);        logMercs(region,mercUnit)
        end
        -- etc 
    end
end

Изучите документацию по Луа скриптингу. To view the link Register

Все примеры взяты из мода To view the link Register. Там добавлен 161 юнит.

[Сергей_Тумаков]

А рекрутирование для ии будет минусовать население или это работает только для игрока

[DinarMayor]

Скрипт населения - наем, что сейчас в моде, работает и для ИИ. В моде в игре прям заметно, как у ИИ города не растут там, где вечно идет война, а рядом, где спокойнее уже до цитаделей развиваются, например. Но у ИИ есть бонусы в ЕДБ - без них бы вообще на уровне деревни застряли бы) т.к. ИИ часто нанимается без особой нужды.

[-Добавлено к сообщению-]

Вот списочек что для кого работает. To view the link Register

DinarMayor 09 April 2023, 00:16

Xamax 09 April 2023, 00:05

ИИ ничем из скриптов не пользуется? ну кроме гарнизонного)

Так) Пользуется:
Юниты выше лимита +
Автообъединение армий ИИ +
Два вида фортов +
Просмотр тактики(фишка программы) -
Спешивание юнитов -
Генерация объектов на тактике +(если они атакуют игрока)
Унаследование фракции через династический брак +
Скрипт абордажа +
Скрипт пиратства -
Скрипт сдачи осажденного поселения -
Контроль над вассалами -
Увольнение персонажа -
Смена наследника -(но у них автоматически меняется на кровного, в шапке забыл про этот скрипт написать)
Скрипт дезертирства и пополнение армии +/-(только дезертирство)
Гарнизонный скрипт и скрипт ГФ(гарнизон в фортах) +/+
Авто объявление войны +
Наем войск - население +
Смена религии +
Штурм с ходу +

И еще что-то)

[DinarMayor]

Небольшой To view the link Register - может где пригодится

function get_totalS(facN)
    totalS = 0
    for f=0, 30 do
        local fac = stratmap.game.getFaction(f);
        if fac:getFactionName()==facN then
            for i=0, fac.stacksNum-1 do
                local stack = fac:getStack(i);    
                totalS = totalS + stack.totalStrength
            end
            return totalS;
        end
    end
end

Spoiler (expand)

[DinarMayor]

Скрипт старения без привязки к смене сезонов.

Простой скрипт, изменяющий возраст всех персонажей вне зависимости от сезона. Это не для моего мода, но как пример выложу.

Spoiler (expand)

function onChangeTurnNum(turnNum)
    log_always("Номер хода - "..turnNum);
    age_the_character(turnNum);
end

function age_the_character(turnNum)
    local numTimesYear = 1;            -- раз в сколько ходов 
    for f = 0, stratmap.game.getFactionsCount()-1 do
        local fac = stratmap.game.getFaction(f);
        if checkInteger((turnNum+1)/numTimesYear)==true then
            for c = 0, fac.numOfCharacters-1 do
                local ourCharacter = fac:getCharacter(c);
                local namedChar = ourCharacter.namedCharacter
                namedChar.age=namedChar.age+1
                --log_always("fac: "..fac:getFactionName()..", char: "..namedChar.fullName..", age: "..namedChar.age..", turnNum: "..turnNum)
                -- жены 
                if namedChar.spouse~=nil and namedChar.spouse.isMale==false and namedChar.spouse:isAlive()==true then
                    namedChar.spouse.age=namedChar.spouse.age+1
                    --log_always("fac(spouse): "..fac:getFactionName()..", char: "..namedChar.spouse.fullName..", age: "..namedChar.spouse.age..", turnNum: "..turnNum)
                end
                -- несовершеннолетние дети(указать возраст совершеннолетия) 
                for i=1, 4 do
                    if namedChar.childs[i]~=nil and namedChar.childs[i]:isAlive()==true and namedChar.childs[i].age<16 then -- 16 - возраст совершеннолетия
                        namedChar.childs[i].age=namedChar.childs[i].age+1
                        --log_always("fac(childs): "..fac:getFactionName()..", char: "..namedChar.childs[i].fullName..", age: "..namedChar.childs[i].age..", turnNum: "..turnNum)
                    end
                end
            end
        end
    end
end

function checkInteger(number)
    local a, b = math.modf(number);
    if b==0 then
        return true; else return false;
    end
    return false;
end

function log_always(text)
    stratmap.game.scriptCommand("log", "[lua] "..text);
end

Главное указать возраст совершеннолетия

and namedChar.childs[i].age<16 then -- 16 - возраст совершеннолетия

и как часто менять возраст

local numTimesYear = 1;            -- раз в сколько ходов 

[DinarMayor]

To view the link Register

Благодоря камраду Jukoman в моде To view the link Register. За что ему огромное спасибо!

На координатах башни (Reveal)

Сверху (Reveal)

Снизу (Reveal)

Справа (Reveal)

Слева (Reveal)

Фрагмент скрипта

Spoiler (expand)

function watchtowersTile(defender)
    local cultureID = checkCulture(defender.faction);
    --print("watchtowersTile 1")
    for f = 0, stratmap.game.getFactionsCount()-1 do
        local fac = stratmap.game.getFaction(f);
        --print("watchtowersTile 2")
        for i = 0, fac.watchtowersNum - 1 do
            local thisTower = fac:getWatchtower(i)
            local xWatchtower, yWatchtower = thisTower.xCoord, thisTower.yCoord
            --print("watchtowersTile 3")
            if defender.character.xCoord==xWatchtower and defender.character.yCoord==yWatchtower then
                log_always("watchtowerTiles: watchtower coords - "..xWatchtower.." "..yWatchtower..", battle coords - "..defender.character.xCoord.." "..defender.character.yCoord);
                stratmap.objects.replaceTile("watchtower",defender.character.xCoord,defender.
character.yCoord,file_wfc(cultureID,"/watchtower.wfc"),weath,times);
                return true
            elseif inSquarLeft(defender.character.xCoord, defender.character.yCoord ,xWatchtower, yWatchtower)==true then
                log_always("watchtowerTiles on left: watchtower coords - "..xWatchtower.." "..yWatchtower..", battle coords - "..defender.character.xCoord.." "..defender.character.yCoord);
                stratmap.objects.replaceTile("watchtower_on_the_left",defender.character.
xCoord,defender.character.yCoord,file_wfc(cultureID,"/watchtower_on_the_left.
wfc"),weath,times);
                return true
            elseif inSquarRight(defender.character.xCoord, defender.character.yCoord ,xWatchtower, yWatchtower)==true then
                log_always("watchtowerTiles on right: watchtower coords - "..xWatchtower.." "..yWatchtower..", battle coords - "..defender.character.xCoord.." "..defender.character.yCoord);
                stratmap.objects.replaceTile("watchtower_on_the_right",defender.character.
xCoord,defender.character.yCoord,file_wfc(cultureID,"/watchtower_on_the_right.
wfc"),weath,times);
                return true
            elseif inSquarTop(defender.character.xCoord, defender.character.yCoord ,xWatchtower, yWatchtower)==true then
                log_always("watchtowerTiles on top: watchtower coords - "..xWatchtower.." "..yWatchtower..", battle coords - "..defender.character.xCoord.." "..defender.character.yCoord);
                stratmap.objects.replaceTile("watchtower_on_the_top",defender.character.
xCoord,defender.character.yCoord,file_wfc(cultureID,"/watchtower_on_the_top.wfc"
),weath,times);
                return true
            elseif inSquarBottom(defender.character.xCoord, defender.character.yCoord ,xWatchtower, yWatchtower)==true then
                log_always("watchtowerTiles on bottom: watchtower coords - "..xWatchtower.." "..yWatchtower..", battle coords - "..defender.character.xCoord.." "..defender.character.yCoord);
                stratmap.objects.replaceTile("watchtower_on_the_bottom",defender.character.
xCoord,defender.character.yCoord,file_wfc(cultureID,"/watchtower_on_the_bottom.
wfc"),weath,times);
                return true
            end
        end
    end
end

[DinarMayor]

Quote

замены тайлов, жадина, что эьо такое)

Ну, это плитки под ногами полководцев на страт карте, которые создаются на тактике.
Скрипт проверяет башни и меняет плитку на заранее сделанную. Это как с фортами и кораблями, с городами было ранее To view the link Register, To view the link Register и To view the link Register.

Quote

Круто получилось! И спасибо за плюсы)

Спасибо! Самое сложное, для меня точно, сделал Jukoman - создал модельку. И не за что!

[Ravelin]

DinarMayor 24 July 2023, 23:41

на срат карте

Бедная карта

[unknown_unknown]

Несколько проблем
-Русь нельзя обратить в Ислам
-ИИ уходит в слишком большой плюс по деньгам даже при наличии только 1 города(казна с пометкой "Необозримая")
-При наличии даже 1 города ИИ имеют 3 полных стака (и не бичей вовсе)и бонусом бесконечная казна

Может добавите скрипт альтернативной экономике как в булатке? который вот что дает:
Альтернативная экономика (система найма) ИИ. Теперь он будет больше строить, а кол-во войск будет пропорционального его доходам, но не выше 75%.
*Пояснение:
если доход 1000, а расходы 750, то рекрутинг ИИ ОТКЛЮЧАЕТСЯ.