[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]

Евгений_Хмельницкий275618

local tile = M2TW.stratMap.getTile(xLocCoord,yLocCoord);

Хорошо, я посмотрю, но я уже понял в чем дело.

[DinarMayor]

Евгений_Хмельницкий275618

local tile = M2TW.stratMap.getTile(xLocCoord,yLocCoord);

Вот файл: To view the link Register

To view the link Register для версии проги 3.3.1:

clickAtMap={["isClicked"]=false,["xTile"]=0,
["yTile"]=0}
function onClickAtTile(x,y)
    clickAtMap.isClicked=true;
    clickAtMap.xTile=x;
    clickAtMap.yTile=y;
    xLocCoord, yLocCoord = clickAtMap.xTile, clickAtMap.yTile;
    print(xLocCoord..", "..yLocCoord)

	local M2TW = gameDataAll.get();
    local tile = M2TW.stratMap.getTile(xLocCoord,yLocCoord);
    if tile then
        local character = tile.character;
        if character then
            local selectedChar = character.namedCharacter;
            print("selectedChar: fullName: "..selectedChar.fullName..", localizedDisplayName: "..selectedChar.localizedDisplayName..", label: "..selectedChar.label..", subFaction: "..selectedChar.subFaction..", index: "..selectedChar.index);
            test_character=selectedChar;
        end

        local settlement = tile.settlement;
        if settlement then
            print("settlement: name: "..settlement.name..", level: "..settlement.level..", regionID: "..settlement.regionID..", localizedName: "..settlement.localizedName..", creatorFactionID: "..tostring(settlement.creatorFactionID)..", capital: "..tostring(M2TW.stratMap.getRegion(settlement.regionID).settlementName).."
, gatesAreOpened: "..tostring(settlement.gatesAreOpened)..", isCastle: "..settlement.isCastle);
            test_settlement=settlement;
        end
    end
end

[Евгений_Хмельницкий2]

DinarMayor 13 August 2025, 18:17

Вот файл: To view the link Register

ОГРОМНОЕ спасибо за помощь! Всё работает и даже больше чем я хотел)

Хотел ещё Вам написать в личку здесь, но т.к. профиль у меня новый, форум не даёт этого сделать, написал в Дискорд. Вы там сидите?

[Seydlitz]

DinarMayor 17 March 2023, 10:55

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

То есть у игрока будет выбор между конным отрядом в виде не очень сильных арбалетчиков и пешим аналогом в виде полноценных арбалетчиков.

dismountedMounted.lua (Reveal)

function dismountedMounted()
    for i = 1, gDataBatt.sidesNum do
        local ourSide = gDataBatt.sides[i]
		for a = 1, ourSide.armiesNum do
			local stack = ourSide.armies[a].army
			if stack.faction.isPlayerControlled==1 then 
				for u=stack.numOfUnits-1, 0, -1 do
					local unit = stack:getUnit(u);
					local unitName = unit.eduEntry.Type;
					if stack.leader:getTypeID()==7 and(unitName=="Mounted Crossbowmen" or unitName=="Polish Shooters" or unitName=="Granadine CB Cav") then
						local unitCount = unit.soldierCountStratMap;
						local unitExp = unit.exp;
						local unitArm = unit.armourLVL;
						local unitWeap = unit.weaponLVL;
						if unitName=="Mounted Crossbowmen" then newUnitID = 6100; end
						if unitName=="Polish Shooters" then newUnitID = 6101; end
						if unitName=="Granadine CB Cav" then newUnitID = 6102; end
						unit.alias="-удалить-";	unit:kill();
						local newUnit = stack:createEOPUnit(newUnitID,unitExp,unitArm,unitWeap);	newUnitID=nil;
						newUnit.alias="=спешившийся отряд=";
						newUnit.soldierCountStratMap=unitCount;
						log_always("dismountedMounted - "..ourSide.armies[a].army.leader.namedCharacter.fullName..", "..unitName..", "..newUnit.eduEntry.Type);
						return true;
					end
				end
			end
		end
	end
end

function back_dismountedMounted(character,str)
	if character.armyLeaded~=nil then
		for u=character.armyLeaded.numOfUnits-1, 0, -1 do
			local unit = character.armyLeaded:getUnit(u);
			local unitIndex = unit.eduEntry.Index;
			if (unitIndex==6100 or unitIndex==6101 or unitIndex==6102) then
				local unitNameOld = unit.eduEntry.Type;
				local unitCount = unit.soldierCountStratMap;
				local unitExp = unit.exp;
				local unitArm = unit.armourLVL;
				local unitWeap = unit.weaponLVL;
				if unitIndex==6100 then newUnitN = "Mounted Crossbowmen"; end
				if unitIndex==6101 then newUnitN = "Polish Shooters"; end
				if unitIndex==6102 then newUnitN = "Granadine CB Cav"; end
				unit.alias="-удалить-";	unit:kill();
				local newUnit = character.armyLeaded:createUnit(newUnitN,unitExp,unitArm,unitWeap);		newUnitN=nil;
				newUnit.soldierCountStratMap=unitCount;
				log_always("back_dismountedMounted "..str.." - "..character.namedCharacter.fullName..", "..unitNameOld..", "..newUnit.eduEntry.Type);
			end
		end
	end
end

function batWith_back_dismountedMounted()
    for i = 1, gDataBatt.sidesNum do
        local ourSide = gDataBatt.sides[i]
		for a = 1, ourSide.armiesNum do
			local stack = ourSide.armies[a].army
			if stack.leader~=nil and stack.faction.isPlayerControlled==1 then
				back_dismountedMounted(stack.leader,"prebattle_withdraw_button")
			end
		end
	end
end

[/notice][/announ]

Я вот установил EOP 3.3.1 специально, чтобы попробовать повторить этот скрипт. В качестве "котиков" для эксперимента выбраны "feudal knights" и "dismounted feudal knights" (UnitID соотв. поменял на UnitName, где это по логике должно быть, и все упоминания данного скрипта в других местах - кнопки и т.п. - повторил).
Ошибка вылезла после жмякания на кнопку советника перед битвой:
.../units/dismountedMounted.lua:3: attempt to index global 'gDataBatt' (a nil value)
Можно подсказать, куда копать?

[Seydlitz]

Надо было, пожалуй, уточнить, что сделано:
1. dismountedMounted.lua перенесен полностью с сохранением пути и скорректирован:

Spoiler (expand)

function dismountedMounted()
    for i = 1, gDataBatt.sidesNum do
        local ourSide = gDataBatt.sides[i]
		for a = 1, ourSide.armiesNum do
			local stack = ourSide.armies[a].army
			if stack.faction.isPlayerControlled==1 then 
				for u=stack.numOfUnits-1, 0, -1 do
					local unit = stack:getUnit(u);
					local unitName = unit.eduEntry.Type;
					if stack.leader:getTypeID()==7 and(unitName=="Feudal Knights" or unitName=="Boyars") then
						local unitCount = unit.soldierCountStratMap;
						local unitExp = unit.exp;
						local unitArm = unit.armourLVL;
						local unitWeap = unit.weaponLVL;
						if unitName=="Feudal Knights" then newUnitN = "Dismounted Feudal Knights"; end
						if unitName=="Boyars" then newUnitN = "Dismounted Boyars"; end
						unit.alias="-удалить-";	unit:kill();
						local newUnit = stack:createUnit(newUnitN,unitExp,unitArm,unitWeap);	newUnitN=nil;
						newUnit.alias="=спешившийся отряд=";
						newUnit.soldierCountStratMap=unitCount;
						log_always("dismountedMounted - "..stack.leader.namedCharacter.fullName..", "..unitName..", "..newUnit.eduEntry.Type);
						return true;
					end
				end
			end
		end
	end
end

function back_dismountedMounted(character,str)
	if character.armyLeaded~=nil then
		for u=character.armyLeaded.numOfUnits-1, 0, -1 do
			local unit = character.armyLeaded:getUnit(u);
			local unitName = unit.eduEntry.Type;
			if (unitName=="Dismounted Feudal Knights" or unitName=="Dismounted Boyars") then
				local unitNameOld = unit.eduEntry.Type;
				local unitCount = unit.soldierCountStratMap;
				local unitExp = unit.exp;
				local unitArm = unit.armourLVL;
				local unitWeap = unit.weaponLVL;
				if unitName=="Dismounted Feudal Knights" then newUnitN = "Feudal Knights"; end
				if unitName=="Dismounted Boyars" then newUnitN = "Boyars"; end
				unit.alias="-удалить-";	unit:kill();
				local newUnit = character.armyLeaded:createUnit(newUnitN,unitExp,unitArm,unitWeap);		newUnitN=nil;
				newUnit.soldierCountStratMap=unitCount;
				log_always("back_dismountedMounted "..str.." - "..character.namedCharacter.fullName..", "..unitNameOld..", "..newUnit.eduEntry.Type);
			end
		end
	end
end

function batWith_back_dismountedMounted()
    for i = 1, gDataBatt.sidesNum do
        local ourSide = gDataBatt.sides[i]
		for a = 1, ourSide.armiesNum do
			local stack = ourSide.armies[a].army
			if stack.leader~=nil and stack.faction.isPlayerControlled==1 then
				back_dismountedMounted(stack.leader,"prebattle_withdraw_button")
			end
		end
	end
end

2. В luaPluginScript.lua внесено:

Spoiler (expand)

В самом начале после require('myconfigs') добавлено require('DenMod/units/dismountedMounted')
В самом конце:

function onPreBattleScrollAdviceRequested()
	dismountedMounted();		-- dismountedMounted.lua
end

function onButtonPressed(buttonName)
	if(buttonName=="prebattle_withdraw_button") then
		batWith_back_dismountedMounted();	-- dismountedMounted.lua
	end
end

function onPostBattle(character)
	if character.faction.isPlayerControlled==1 then
		back_dismountedMounted(character.character,"onPostBattle");		-- dismountedMounted.lua
	end
end

[DinarMayor]

Seydlitz

Можно подсказать, куда копать?

Это глобальная переменная gDataBatt. Можно просто добавить в начале функции вот это:

if not gDataBatt then gDataBatt=gameDataAll.get().battleStruct; end

А вообще, вот я с ходу переделал немного - должен подойти и для версии 4.0 и для более ранних версий:

Spoiler (expand)

local disMountedNew = {
    ["Mounted Crossbowmen"]     = "Dis_Mounted_Crossbowmen";
    ["Polish Shooters"]         = "Dis_Polish_Shooters";
    ["Granadine CB Cav"]        = "Dis_Granadine_CB_Cav";
    -- и т.д.   
}

local disMountedOld = {
    ["Dis_Mounted_Crossbowmen"] = "Mounted Crossbowmen";
    ["Dis_Polish_Shooters"]     = "Polish Shooters";
    ["Dis_Granadine_CB_Cav"]    = "Granadine CB Cav";
    -- и т.д.   
}

function dismountedMounted()
    if not gDataBatt then gDataBatt=gameDataAll.get().battleStruct; end
    for i = 1, gDataBatt.sidesNum do
        local ourSide = gDataBatt.sides[i]
        for a = 1, ourSide.armiesNum do
            local stack = ourSide.armies[a].army
            if stack.faction.isPlayerControlled==1 then 
                for u=stack.numOfUnits-1, 0, -1 do
                    local unit = stack:getUnit(u);
                    local unitName = unit.eduEntry.Type;
                    if not unitName then unitName = unit.eduEntry.eduType; end
                    if disMountedNew[unitName] then
                        local unitCount = unit.soldierCountStratMap;
                        local unitExp = unit.exp;
                        local unitArm = unit.armourLVL;
                        local unitWeap = unit.weaponLVL;
                        unit.alias="-удалить-"; unit:kill();
                        local newUnit = stack:createUnit(disMountedNew[unitName],unitExp,unitArm,unitWeap);
                        newUnit.alias="=спешившийся отряд=";
                        newUnit.soldierCountStratMap=unitCount;
                  --    log_always("dismountedMounted - "..stack.leader.namedCharacter.fullName..", "..unitName..", "..newUnit.eduEntry.Type);
                        return true;
                    end
                end
            end
        end
    end
end

function back_dismountedMounted(character,str)
    if not character.armyLeaded then return end
    for u=character.armyLeaded.numOfUnits-1, 0, -1 do
        local unit = character.armyLeaded:getUnit(u);
        local unitName = unit.eduEntry.Type;
        if not unitName then unitName = unit.eduEntry.eduType; end
        if disMountedOld[unitName] then
            local unitCount = unit.soldierCountStratMap;
            local unitExp = unit.exp;
            local unitArm = unit.armourLVL;
            local unitWeap = unit.weaponLVL;
            unit.alias="-удалить-"; unit:kill();
            local newUnit = character.armyLeaded:createUnit(disMountedOld[unitName],unitExp,unitArm,unitWeap);

            newUnit.soldierCountStratMap=unitCount;
      --    log_always("back_dismountedMounted "..str.." - "..character.namedCharacter.fullName..", "..unitName..", "..newUnit.eduEntry.Type);
        end
    end
end

function batWith_back_dismountedMounted()
    if not gDataBatt then gDataBatt=gameDataAll.get().battleStruct; end
    for i = 1, gDataBatt.sidesNum do
        local ourSide = gDataBatt.sides[i]
        for a = 1, ourSide.armiesNum do
            local stack = ourSide.armies[a].army
            if stack and stack.leader and stack.faction.isPlayerControlled==1 then
                back_dismountedMounted(stack.leader,"prebattle_withdraw_button")
            end
        end
    end
end

В таблице disMountedNew слева - какой юнит, справа - на какой юнит менять. В таблице disMountedOld наоборот. Можно добавлять сколько угодно.
В версии 4.0 все работает. Проверь у себя.

[Seydlitz]

DinarMayor 11 September 2025, 01:31

Проверь у себя.

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

[DinarMayor]

Seydlitz

должно сработать и в обратную сторону?

Спешенные меняются обратно либо при нажатии "белого флага", либо после битвы.

Seydlitz

выкупленные спешенные рыцари возвращаются именно пешими.

Для этого нужно делать новые функции. А так, они обратно поменяются после следующей битвы/отступления - лошадей не отдали при выкупе)))

Seydlitz

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

Это отдельная история. Если и когда сделаю это - напишу. Скорее когда, т.к. действительно монголам это не помешает, да и остальным тоже. Тут нужен новый скрипт. Проверять составы армии ИИ и если он идёт на штурм преимущественно конницей, то часть смешиваем. Как-то так примерно. Для текущей версии мода я не буду этого делать не т.к. я сейчас готовлю мод к релизу и в основном занимаюсь отслеживанием и лечением багов, а добавление новых скриптов потребует времени и новых тестов, а значит релиз задержится.

[Seydlitz]

DinarMayor 11 September 2025, 14:18

Спешенные меняются обратно либо при нажатии "белого флага", либо после битвы.

Вот, кстати, у меня вообще обратно не вернулись. Ни после битвы ни при белом флаге.
Опять, небось, что-то не предусмотрел, типа gDataBatt.
Про обратное действие я только скопировал в luaPluginScript.lua следующие строки:

function onButtonPressed(buttonName)
	if(buttonName=="prebattle_withdraw_button") then
		batWith_back_dismountedMounted();	-- dismountedMounted.lua
	end
end

function onPostBattle(character)
	if character.faction.isPlayerControlled==1 then
		back_dismountedMounted(character.character,"onPostBattle");		-- dismountedMounted.lua
	end
end

[DinarMayor]

Seydlitz

у меня вообще обратно не вернулись

В версии 3.3.1 чуть иначе:

function onButtonPressed(eventData)
    local buttonName = eventData.resourceDescription;
    if buttonName=="prebattle_withdraw_button" then
        batWith_back_dismountedMounted();   -- dismountedMounted.lua
    end
end

function onPostBattle(eventData)
    local character = eventData.character;
    if character.faction.isPlayerControlled==1 then
        back_dismountedMounted(character.character,"onPostBattle");   -- dismountedMounted.lua
    end
end

Как вообще во время onPostBattle не было ошибки(окошка Луа с исключением).
И еще очень важный момент: вот эти To view the link Register(например onPostBattle) не должны повторяться нигде, т.е. если один раз где-то в luaPluginScript.lua прописано, то больше нигде, ни в одном файле, этой функции быть не должно - сработает только последняя. Это касается вообще всех глобальных функций.

Если хочешь на самом деле разобраться в скриптинге на Луа, то тебе нужно самому попробовать написать какой-нибудь простенький скрипт, для начала. Пока ты будешь это делать, по-любому будешь какие-то ошибки получать, и решая их, ты наберешься опыта и в будущем уже будешь знать как правильно. Конечно, нужно прочитать/изучить основы Луа(в инете много инфы), но лично я считаю, что лучше всего так: начинаешь практику и при необходимости читаешь теорию - тогда ты уже и теорию больше понимаешь. Лично для меня это так работает - я только на теории не вывожу.)

К тому же есть куча готовых примеров(как тут, так и в дискорде), где можно подсмотреть. Ссылку на документацию ЕОР кидал уже выше, но вот еще раз: To view the link Register

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