Похожие Темы

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

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

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

---

Номер карты для тех, кто хочет отблагодарить разработчика:
2200 2804 1201 4898

---

[DinarMayor]

Скрипт сдачи осажденного поселения

Код (Раскрыть)

Фрагмент кода из "возрождение фракции"

function capture_settlements(fac, sett)
	for f=0, 30 do
		local ourFac = stratmap.game.getFaction(f);

		for i=0, ourFac.settlementsNum-1 do
			local ourSett = ourFac:getSettlement(i);

			if ourSett.name==sett then
				for d=0, 30 do
					local deadFac = stratmap.game.getFaction(d);
					if deadFac:getFactionName()==fac then
						log_always("emergent_factions capture_settlements "..fac.." "..sett);
						ourSett:changeOwner(deadFac);
					end
				end
			end
		end
	end
end

Сдача поселения

function onSettlementScrollAdviceRequested(sett, scrollName)
	for i = 0, sett.siegesNum-1 do
		local siege=sett:getSiege(i);

		capture_settlements(siege.besieger.faction:getFactionName(), sett.name);
		siege.besieger.leader:moveToTile(sett.xCoord,sett.yCoord);
	end
end

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

[DinarMayor]

DinarMayor

Скрипт сдачи осажденного поселения

Доделал скрипт для ИИ + добавил бонусы к стенам поселений.

---

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

export_descr_buildings.txt (Раскрыть)

				;--- Недовольства от сдачи поселения: --- 
				armour 11 requires event_counter surrend_settlement 1 and not event_counter is_the_ai 1 and not event_counter hod_vassala 1 
				happiness_bonus bonus -2 requires event_counter surrend_settlement 1 and not event_counter is_the_ai 1 and not event_counter hod_vassala 1 and not event_counter hod_vassala 1 
				;--- Недовольства от проигранной битвы: --- 
				armour 12 requires event_counter not_I_WonBattle 1 and not event_counter is_the_ai 1 and not event_counter hod_vassala 1 
				happiness_bonus bonus -1 requires event_counter not_I_WonBattle 1 and not event_counter is_the_ai 1 and not event_counter hod_vassala 1 
				;--- Ликование от выигранной битвы: --- 
				armour 13 requires event_counter I_WonBattle 1 and not event_counter is_the_ai 1 and not event_counter hod_vassala 1 
				happiness_bonus bonus 1 requires event_counter I_WonBattle 1 and not event_counter is_the_ai 1 and not event_counter hod_vassala 1 

Сам скрипт - это одни счетчики и два условия, но фрагмент выложу.

battle_EDB.lua (Раскрыть)

function battle_EDB(counter)
	--- Ликование от выигранной битвы: --- 
	-- I_WonBattle 
	if counter=="sack_ai50"
		or counter=="sack_ai100"
		or counter=="sack_ai200"
		or counter=="sack_ai300" then 

		set_event_counter("I_WonBattle",1);
		symbol.won_battle=2;
		log_always("I_WonBattle");
	end
	--- Недовольства от проигранной битвы: --- 
	-- ! I_WonBattle 
	if counter=="sack_player60"
		or counter=="sack_player100"
		or counter=="sack_player250"
		or counter=="sack_player400" then 

		set_event_counter("not_I_WonBattle",1);
		symbol.lost_battle=3;
		log_always("not_I_WonBattle");
	end
end


function EDB_batt()
	-- I_WonBattle 
	if symbol.won_battle~=nil 
		and(symbol.won_battle<=2 and symbol.won_battle>0) then 
		symbol.won_battle=symbol.won_battle-1;
		if symbol.won_battle==0 then
			symbol.won_battle=nil; 
			set_event_counter("I_WonBattle",0);
		end
	end
	-- ! I_WonBattle 
	if symbol.lost_battle~=nil 
		and(symbol.lost_battle<=3 and symbol.lost_battle>0) then 
		symbol.lost_battle=symbol.lost_battle-1;
		if symbol.lost_battle==0 then
			symbol.lost_battle=nil; 
			set_event_counter("not_I_WonBattle",0);
		end
	end
end

---

Скрипт сдачи поселения(и для игрока и для ИИ(для ИИ два варианта))
Осаждающие должны как минимум в 1,5 раза быть сильнее, иначе скрипт не сработает(так задумано).

surrend_settlement.lua (Раскрыть)

--- Скрипт сдачи осажденного поселения(игрок) --- 
function onSettlementScrollAdviceRequested(sett, scrollName)
	surrend_settlement(sett);
end

function surrend_settlement(sett)
	for i = 0, sett.siegesNum-1 do
		local siege=sett:getSiege(i);

		if siege~=nil
			and sett.ownerFaction==gDataCamp.currentFaction 
			and(siege.besieger.totalStrength>=(sett.army.totalStrength)*1.5) then

			sett:changeOwner(siege.besieger.faction);
			siege.besieger.leader.movePoints=siege.besieger.leader.movePoints+5;
			stratmap.game.callConsole("character_reset", '"'..siege.besieger.leader.namedCharacter.fullName..'"'
);
			siege.besieger.leader:moveToTile(sett.xCoord,sett.yCoord);
			set_event_counter("surrend_settlement",1);
			symbol.surr_sett=3;
			log_always("--- surrend_settlement - "..sett.name.." ---");
		end
	end
end

--- Для ЕДБ ---
function EDB_sett()
	if symbol.surr_sett~=nil 
		and(symbol.surr_sett<=3 and symbol.surr_sett>0) then 
		symbol.surr_sett=symbol.surr_sett-1;
		if symbol.surr_sett==0 then
			symbol.surr_sett=nil; 
			set_event_counter("surrend_settlement",0);
		end
	end
end


--- Скрипт сдачи осажденного поселения(ИИ) --- 
function targ_settlementAI()
	for f=0, 30 do
		local fac = stratmap.game.getFaction(f);
		for i=0, fac.settlementsNum-1 do
			local targ_sett = fac:getSettlement(i);

			if (targ_sett.xCoord==xLocCoord and targ_sett.yCoord==yLocCoord) then
				surrend_settlementAI(targ_sett);
			end
		end
	end
end

function surrend_settlementAI(sett)
	for i = 0, sett.siegesNum-1 do
		local siege=sett:getSiege(i);

		if siege~=nil
			and siege.besieger.faction==gDataCamp.currentFaction 
			and(siege.besieger.totalStrength>=(sett.army.totalStrength)*2.5) then

			local random_value = math.random(100, 500);
			gDataCamp.currentFaction.money=gDataCamp.currentFaction.money-random_value;

			if RandomPercent(9)==true then 
				sett:changeOwner(siege.besieger.faction);
				siege.besieger.leader.movePoints=siege.besieger.leader.movePoints+5;
				stratmap.game.callConsole("character_reset", '"'..siege.besieger.leader.namedCharacter.fullName..'"'
);
				siege.besieger.leader:moveToTile(sett.xCoord,sett.yCoord);
				log_always("--- surrend_settlementAI - "..sett.name.." ---");
			end
		end
	end
end


--- Скрипт сдачи осажденного поселения 2(ИИ) --- 
function targ_settlementAI2()
	for f=0, 30 do
		local fac = stratmap.game.getFaction(f);
		for i=0, fac.settlementsNum-1 do
			local targ_sett = fac:getSettlement(i);

			if targ_sett.name==symbol.surr_sett_name then
				surrend_settlementAI2(targ_sett);
				symbol.surr_sett_name=nil;
			end
		end
	end
end

function surrend_settlementAI2(sett)
	for i = 0, sett.siegesNum-1 do
		local siege=sett:getSiege(i);

		if siege~=nil
			and siege.besieger.faction==gDataCamp.currentFaction 
			and(siege.besieger.totalStrength>=(sett.army.totalStrength)*2.5) then

			if RandomPercent(15)==true then 
				sett:changeOwner(siege.besieger.faction);
				siege.besieger.leader.movePoints=siege.besieger.leader.movePoints+5;
				stratmap.game.callConsole("character_reset", '"'..siege.besieger.leader.namedCharacter.fullName..'"'
);
				siege.besieger.leader:moveToTile(sett.xCoord,sett.yCoord);
				log_always("--- surrend_settlementAI2 - "..sett.name.." ---");
			end
		end
	end
end

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

---

Почему я сюда выкладываю скрипты? Просто были заинтересованные в луа скриптах люди, а примеры очень помогают разобраться побыстрее.

[DinarMayor]

DinarMayor

Корабли теперь можно брать на абордаж

Вот так вот это выглядит. Только тут я убрал рандомность, чтоб сразу показать как работает, а так 20% вероятности захватить вражеский корабль. Это смогут делать любые адмиралы.

---

В скрипте пиратства задействованы только корабли "Наемный пиратский когг" и "Наемная пиратская галера". Только с ними можно получить трейт первого уровня, а второго уровня можно получить за победу над вражескими адмиралами и за блокады портов. Как только трюмы будут заполнены(второй уровень трейта), нужно будет плыть в любую точку, встретится там со своим купцом на берегу и покликать по флоту - совершим сделку(передадим трейт) и получим деньги от 1000 до 5000 золотых.

---

Оба скрипта(файл naval_scripts.lua - название файла может кому пригодится в будущем)) (Раскрыть)

---------------------------------------------------------------------------------

---------------------------------------------------------------------------------

---------------------------------------------------------------------------------

--- скрипт пиратства ---
function corsarBlockPort(fac)
	for i=0, fac.stacksNum-1 do
		local stack = fac:getStack(i);  

		if stack.leader~=nil then

			for un=0, stack.numOfUnits-1 do
				local ship = stack:getUnit(un);
				corsar=0;

				if ship.eduEntry.Type=="cors galley" 
					or ship.eduEntry.Type=="cors cog" then 

					corsar=corsar+1;
					ship.movePoints=ship.movePoints+25;

--					print(corsar/stack.numOfUnits*100);
				end
			end

			if((hasTrait(stack.leader.namedCharacter, "mercecors")) < 1) 
				and(corsar/stack.numOfUnits*100>50) then 

				stack.leader.namedCharacter:addTrait("mercecors",1);
				log_always("--- corsarBlockPort - "..stack.leader.namedCharacter.fullName.." mercecors 1 ---");
			end

			if stack.blockedPort~=nil 
				and((hasTrait(stack.leader.namedCharacter, "mercecors"))==1) then 

				if RandomPercent(15)==true then
					stack.leader.namedCharacter:addTrait("mercecors",2);
					log_always("--- corsarBlockPort - "..stack.leader.namedCharacter.fullName.." mercecors 2 ---");
				end
			end
		end
	end
end

--- отдаем награбленное --- 
function give_prey(selectedChar)
	if selectedChar.character:getTypeID()==3 		--admiral 
		and((hasTrait(selectedChar, "mercecors"))==2) then 

		for ch = 0, selectedChar.faction.numOfCharacters-1 do
			local ourCharacter = selectedChar.faction:getCharacter(ch);

			if ourCharacter:getTypeID()==4 then		--merchant 
				local xMerc, yMerc = ourCharacter.xCoord, ourCharacter.yCoord;
				local DistanceMerc = distanceFromPoint(selectedChar, xMerc, yMerc);

				if DistanceMerc<=1 then
					set_event_counter("give_prey",1);
					local random_value = math.random(1000, 5000);

					selectedChar.faction.money=selectedChar.faction.money+random_value;

					selectedChar:addTrait("mercecors",1);
					ourCharacter.namedCharacter:addTrait("corsarMerc",1);

					log_always("--- give_prey - "..selectedChar.fullName.." mercecors 1 ---");
				end
			end
		end
	end
end

---------------------------------------------------------------------------------

---------------------------------------------------------------------------------

---------------------------------------------------------------------------------

--- взятm на абордаж! --- onPostBattle 
function boardingStack2(character)
	if(character.character.armyLeaded~=nil and character.character:getTypeID()==3) then 

		for un=0, character.character.armyLeaded.numOfUnits-1 do
			local ship = character.character.armyLeaded:getUnit(un);
			symbol.ships.numUnitsAi=un;
			symbol.ships.shipsAI[un]=ship.eduEntry.Type;
			symbol.ships.shipsExp[un]=ship.exp;
			symbol.ships.shipsArm[un]=ship.armourLVL;
			symbol.ships.shipsWap[un]=ship.weaponLVL;
			symbol.ships.shipsCou[un]=ship.soldierCountStratMap;
			name=character.fullName;
		end
		---
		for u=0, symbol.ships.numUnitsAi do
			log_always("boardingStack2 - "..name.." "..symbol.ships.shipsAI[u].." "..symbol.ships.shipsExp[u].." "..symbol.ships.shipsArm[u].." "..symbol.ships.shipsWap[u].." "..symbol.ships.shipsCou[u].." --- "); 
		end
	end
end

function give_ship(character)		
	if symbol.ships.numUnitsAi~=nil 
--		and character.faction.isPlayerControlled==1 
		and character.character:getTypeID()==3
		and((hasTrait(character, "winner"))==1) 
		and RandomPercent(100)==true then 
--		and RandomPercent(21)==true then 

		local rand = math.random(0, symbol.ships.numUnitsAi);
		local newShip=character.character.armyLeaded:createUnit(symbol.ships.shipsAI[rand]
,symbol.ships.shipsExp[rand],symbol.ships.shipsArm[rand],symbol.ships.
shipsWap[rand]);

		newShip.soldierCountStratMap=symbol.ships.shipsCou[rand];
		newShip.alias="(взят на абордаж)";
		character:removeTrait("winner");
		set_event_counter("boardingStack",1);
		log_always("give_ship - "..character.fullName.." "..symbol.ships.shipsAI[rand].." "..symbol.ships.shipsExp[rand].." "..symbol.ships.shipsArm[rand].." "..symbol.ships.shipsWap[rand].." "..symbol.ships.shipsCou[rand].." --- "); 
	end
	removeWinner(character)
end

function removeWinner(character)		
	if((hasTrait(character, "winner"))==1) 
		and character.character:getTypeID()==3 then 
		character:removeTrait("winner");
		log_always("winner");
		print("winner");
	end
end


--- скрипт пиратства - взятm на абордаж!(мятежники) --- onGeneralAssaultsGeneral 
function boardingStack(attacker, defender)
	if(attacker.faction.isPlayerControlled~=1 and defender.faction.isPlayerControlled==1 and attacker.character.armyLeaded~=nil and attacker.character:getTypeID()==3) then 

		for un=0, attacker.character.armyLeaded.numOfUnits-1 do
			local ship = attacker.character.armyLeaded:getUnit(un);
			symbol.ships.numUnitsAi=un;
			symbol.ships.shipsAI[un]=ship.eduEntry.Type;
			symbol.ships.shipsExp[un]=ship.exp;
			symbol.ships.shipsArm[un]=ship.armourLVL;
			symbol.ships.shipsWap[un]=ship.weaponLVL;
			symbol.ships.shipsCou[un]=ship.soldierCountStratMap;
			name=attacker.fullName;
		end
		---
		for u=0, symbol.ships.numUnitsAi do
			log_always("boardingStack - мятежники "..name.." "..symbol.ships.shipsAI[u].." "..symbol.ships.shipsExp[u].." "..symbol.ships.shipsArm[u].." "..symbol.ships.shipsWap[u].." "..symbol.ships.shipsCou[u].." --- "); 
		end
	end
	---
	if(defender.faction.isPlayerControlled~=1 and attacker.faction.isPlayerControlled==1 and defender.character.armyLeaded~=nil and defender.character:getTypeID()==3) then 

		for un=0, defender.character.armyLeaded.numOfUnits-1 do
			local ship = defender.character.armyLeaded:getUnit(un);
			symbol.ships.numUnitsAi=un;
			symbol.ships.shipsAI[un]=ship.eduEntry.Type;
			symbol.ships.shipsExp[un]=ship.exp;
			symbol.ships.shipsArm[un]=ship.armourLVL;
			symbol.ships.shipsWap[un]=ship.weaponLVL;
			symbol.ships.shipsCou[un]=ship.soldierCountStratMap;
			name=defender.fullName;
		end
		---
		for u=0, symbol.ships.numUnitsAi do
			log_always("boardingStack - мятежники "..name.." "..symbol.ships.shipsAI[u].." "..symbol.ships.shipsExp[u].." "..symbol.ships.shipsArm[u].." "..symbol.ships.shipsWap[u].." "..symbol.ships.shipsCou[u].." --- "); 
		end
	end
end
---------------------------------------------------------------------------------

---------------------------------------------------------------------------------

---------------------------------------------------------------------------------

[DinarMayor]

Добавил небольшой скрипт пополнения армии в фортах.

-теперь все войска в фортах автоматически пополняются(от 1 до 5 человек)
-за это снимается небольшая плата: (от 1 до 10 монет)*(от 1 до 5 человек)=рандом)
-войска пополняются во всех фортах, в независимости в своих землях или нет
-в фортах можно бесплатно содержать до 5 юнитов
-в связи со всем, что выше, поднял стоимость строительства фортов на 15000
-пустые форты теперь разрушаются(но у ИИ они всегда непустые, кроме тех случаев, когда фракция погибла, но этот момент я подкручу, может быть)

Спойлер (раскрыть)

function replenishment_army_in_fort()
	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 = stack_unit.soldierCountStratMapMax;
				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.." ---");
				end
				if (unit_soldier_max-(unit_soldier + random_value) < 2) then
					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

---

Также подкорректировал скрипт автовойны - теперь Папа не так сильно беспределит) Т.е. получалось, что все соседи Папской области были вынуждены воевать с Папой. Теперь война не объявляется если:
-католики перешли границу Папской области
-Папские войска перешли границу католиков

Посмотрим, что выйдет)

[DinarMayor]

Запилил небольшой скрипт, который будет проверять армию защитника на юниты "CE Wagon Fort", "Gulay Gorod" и "Hussites", и если они есть в составе его армии, то будет заменятся пользовательская плитка под его ногами. Скорее для красоты, но все же разнообразие хоть)

Код (Раскрыть)

function onGeneralAssaultsGeneral(attacker, defender)
	testWagon(attacker, defender);
end

function testWagon(attacker, defender)
	if defender.faction.isPlayerControlled==1 or attacker.faction.isPlayerControlled==1 then

		for un=0, defender.character.armyLeaded.numOfUnits-1 do
			local wagon = defender.character.armyLeaded:getUnit(un);

			if wagon.eduEntry.Type=="CE Wagon Fort"
				or wagon.eduEntry.Type=="Gulay Gorod"
				or wagon.eduEntry.Type=="Hussites" then 

				stratmap.objects.replaceTile("WagonFort",defender.character.xCoord,defender.
character.yCoord,"War_Wagons2.wfc","clear","midday");

				log_always("custom_tiles - WagonFort");
			end
		end
	end
end

[DinarMayor]

В программу M2TWEOP завезли много чего интересного. Одно из них - структура портов.
Теперь роспуск флота в порту и роспуск армии на корабле в порту возвращает население городу, которому пренадлежит этот самый порт.

Фрагмент кода (Раскрыть)

		--- распустили корабль в порту --- 
		if unit.army.leader~=nil
			and unit.army.leader:getTypeID()==3 then	--admiral 

			disbandedInPort(unit.army, unit, "port", unitName, FacName);
		end
		--- распустили арми на корабле в порту --- 
		if unit.army.shipArmy~=nil then 
			disbandedInPort(unit.army.shipArmy, unit, "shipArmy", unitName, FacName);
		end

function disbandedInPort(stack, unit, str, unitName, FacName)
	for p = 0, stack.faction.portsNum-1 do
		local ourPort = stack.faction:getPort(p);

		if ourPort:getDockCoords()~=nil
			and ourPort:getDockCoords().x==stack.leader.xCoord and ourPort:getDockCoords().y==stack.leader.yCoord then 

			ourPort.settlement.populationSize=ourPort.settlement.populationSize+unit.soldierCountStratMap;

			log_always("onUnitDisbanded "..FacName.." "..ourPort.settlement.name.." "..unitName.." - DockCoords "..str.." - "..ourPort:getDockCoords().x..", "..ourPort:getDockCoords().y);
		end
	end
end

Лог выдает вот такие данные(log_always - это для меня и для отслеживания вылетов и багов)

DenMod.lua.game.script.txt (Раскрыть)

Wed Oct 19 16:32:09 2022 [lua.game.script] onUnitDisbanded milan Genoa Italian Spear Militia - CharacterCoords - 227, 186
Wed Oct 19 16:32:17 2022 [lua.game.script] onUnitDisbanded milan Genoa Italian Militia - FortCoords - 226, 183
Wed Oct 19 16:32:26 2022 [lua.game.script] onUnitDisbanded milan Genoa galley - DockCoords port - 232, 184
Wed Oct 19 16:32:34 2022 [lua.game.script] onUnitDisbanded milan Genoa Mounted Sergeants - DockCoords shipArmy - 232, 184

Следующие, что хочу сделать с портами - это пополнение флота в портах(примерно так же, как и с армиями).

[DinarMayor]

Написал скрипт, при помощи которого можно будет унаследовать фракцию через династический брак.
Как работает:
-ведется журнал(таблица в луа) со списком детей королевских особ:
     -на старте кампании все несовершеннолетние сыновья заносятся в таблицу
     -при рождение новых детей проверяется их пол и трейт отца на королевскую кровь(династию) и тоже заносятся в таблицу
     -при совершеннолетие соответствующие дети вычеркиваются из таблицы
-сам скрипт активизируется на момент смерти правителя фракции:
     -если новый правитель не королевской крови
     -если у фракции кончились члены семьи королевской крови(трейт "Французская кровь", Английская и т.д. - та династия, что со старта правители), то
     -проверяется таблица с детьми у этой фракции и если там их нет, то
     -проверяется есть ли выданная замуж принцесса(королевских кровей, разумеется ) и за какую фракцию и если такая есть, то
     -это фракция полностью становится частью той, где принцесса. Мужу этой принцессы, скорее всего, сделаю анчи "правитель Франции" и т.п.
-ИИ так же может унаследовать фракцию ИИ, но не игрока. Игрок может унаследовать все фракции, кроме мятежников, Папу, ацтеков, моголов и тимуридов.

На видео еще не прописаны исторические события, а в конце видео я показываю, что у персонажа появился анч(нужно будет придумать какие-нибудь)

faction_legacy.lua (Раскрыть)

function give_everything_to_faction(fac)
	local facName = fac:getFactionName();
	if facName~="slave" 
		and facName~="papal_states" 
		and facName~="aztecs" 
		and facName~="mongols" 
		and facName~="timurids" then

		if our_character_is_royal(fac, facName)~=true then
			log_always("give_everything_to_faction "..facName)
			check_royal_famaly_table(facName)
		end
	end
end

function our_character_is_royal(fac, facName)
	for ch = 0, fac.numOfCharacters-1 do
		local ourCharacter = fac:getCharacter(ch);
		if ourCharacter:getTypeID()==7	 												-- named character (чтоб всех не перебирать) 
			and ourCharacter:getTypeID()~=6
			and (((hasTrait(ourCharacter.namedCharacter, "Royal_Blood_"..facName))==1)or((hasTrait(ourCharacter.namedCharacter, "Royal_Founder"))==1)) then
			log_always("our_character_is_royal - "..ourCharacter.namedCharacter.fullName)
			return true
		end
	end
--	return false
end

function check_royal_famaly_table(facName)
	log_always("check_royal_famaly_table "..facName)
	if is_our_faction_there(facName)~=true then
		royalWifes(facName)
	end
end

function is_our_faction_there(facName)
	for x=1, characters.factions.numOfChilds do 
		if characters.factions[x]~=nil
			and facName==characters.factions[x] then 	-- если наша фракция в таблице, то возвращаем true 
--			log_always(characters.factions[x].." "..characters.factions.fatherName[x].." "..characters.factions.fatherName.childName[x].." "..characters.factions.fatherName.age[x]) 
			log_always("is_our_faction_there "..facName)
			return true
		end
	end
--	return false
end

function royalWifes(homeFac)
	log_always("royalWifes "..homeFac)
	for f=0, 30 do
		local fac = stratmap.game.getFaction(f);
		local targF = fac:getFactionName();

		if targF~="slave" 
			and targF~="papal_states" 
			and targF~="aztecs" 
			and targF~="mongols" 
			and targF~="timurids" then

			for ch = 0, fac.numOfCharacters-1 do
				local ourCharacter = fac:getCharacter(ch);

				if ourCharacter:getTypeID()==7 
					and ourCharacter:getTypeID()~=6
					and ourCharacter.namedCharacter.spouse~=nil 
					and ourCharacter.namedCharacter.spouse.isMale==false 
					and ourCharacter.namedCharacter.spouse:isAlive()==true then

					if comparison_traits(ourCharacter.namedCharacter, "Princess_Royal_Blood_"..homeFac)==true then 
						set_event_counter("give_everything_to_faction_2",1);
						set_event_counter("give_everything_to_faction_"..targF.."_"..
homeFac,1);
						ourCharacter.namedCharacter:addAncillary("the_khan_of_kazan");
						log_always("give_everything_to_faction_"..targF.."_"..homeFac);

					end
				end
			end
		end
	end
end

function comparison_traits(character, str)
	local thisTrait, traitsList, index = character.spouse:getTraits(), character.spouse.fullName.." traits:", 0
	while thisTrait ~= nil do
		traitsList, thisTrait, index = traitsList.."\n\tTrait "..index.." - Name: "..thisTrait.name.." - Level: "..thisTrait.level, thisTrait.nextTrait, index + 1

		if thisTrait~=nil then
			if str==thisTrait.name then
				log_always(
				"---------------------------comparison_traits-------------------------------
------\n"..
				" фракция мужа - "..character.faction:getFactionName().." фракция жены - "..character.spouse.faction:getFactionName()..
				" wife full name - "..character.spouse.fullName.."\n"..traitsList.." "..character.spouse.fullName..
				"\n--------------------------------------------------------------------
-------------"
				)
				return true
			end
		end
	end
	return false
end

function royal_famaly_table()
	for f=0, 30 do
		local fac = stratmap.game.getFaction(f);
		local facName = fac:getFactionName();

		if fac:getFactionName()~="slave" 
			and fac:getFactionName()~="papal_states" 
			and fac:getFactionName()~="aztecs" 
			and fac:getFactionName()~="mongols" 
			and fac:getFactionName()~="timurids" then

			for ch = 0, fac.numOfCharacters-1 do
				local ourCharacter = fac:getCharacter(ch);
				local father = ourCharacter.namedCharacter

				for i=1, 4 do
					if(((hasTrait(ourCharacter.namedCharacter, "Royal_Blood_"..facName))==1)or((hasTrait(ourCharacter.namedCharacter, "Royal_Founder"))==1)) 
						and father.childs~=nil then

						if father.childs[i]~=nil 
							and father.childs[i].isMale==true 
							and father.childs[i]:isAlive()==true 
							and father.childs[i].age<15 
							and father.childs[i].parent==father then 

							x=x+1
							print(x)
							characters.factions[x]=fac:getFactionName()
							characters.factions.numOfChilds=x
							characters.factions.fatherName[x]=father.childs[i].parent.fullName
							characters.factions.fatherName.childName[x]=father.childs[i].fullName
							characters.factions.fatherName.age[x]=father.childs[i].age

---							log_always("\n---------------------------------------------------------
------------------------\n "
---							..f.." "..ch.." "..i.." "..father.faction:getFactionName().." . "..
---							father.fullName.." . childs: "..father.childs[i].fullName.." - "..father.childs[i].age.."\n "..
---							comparison_traits11(father)..
---							"\n--------------------------------------------------------------------
-------------")
						end
					end
				end
			end
		end
	end
--x=0
end

function royal_famaly_table_cleare()
	characters={}
	characters['factions']={
		['fatherName']={
			['childName']={}, 
			['age']={}
		},
	}
end

function start_characters()
	if start_char==true then
		start_char = false;
		royal_famaly_table_cleare()
		royal_famaly_table()
		log_always("start_characters")
	end
end

function royal_famaly_table_cleare_ComesOfAge(facName, charName)
	for x=1, characters.factions.numOfChilds do 
		if characters.factions[x]~=nil
			and characters.factions[x]==facName
			and characters.factions.fatherName.childName[x]==charName then 

			log_always("royal_famaly_table_cleare_ComesOfAge: Character - "..characters.factions.fatherName.childName[x].." Parent - "..characters.factions.fatherName[x].." Faction - "..characters.factions[x])

			characters.factions[x]=nil
			characters.factions.fatherName[x]=nil
			characters.factions.fatherName.childName[x]=nil
			characters.factions.fatherName.age[x]=nil
		end
	end
end

function royal_famaly_table_birth(child)
--	log_always("royal_famaly_table_birth")
	if child.isMale==true 
		and(((hasTrait(child.parent, "Royal_Blood_"..child.faction:getFactionName()))==1)or((hasTrait(child.
parent, "Royal_Founder"))==1)) 
		and child.faction:getFactionName()~="slave" 
		and child.faction:getFactionName()~="papal_states" 
		and child.faction:getFactionName()~="aztecs" 
		and child.faction:getFactionName()~="mongols" 
		and child.faction:getFactionName()~="timurids" then

		characters.factions.numOfChilds=characters.factions.numOfChilds+1
		x=characters.factions.numOfChilds
		characters.factions[x]=child.faction:getFactionName()
		characters.factions.fatherName[x]=child.parent.fullName
		characters.factions.fatherName.childName[x]=child.fullName
		characters.factions.fatherName.age[x]=child.age

		log_always("royal_famaly_table_birth: Child - "..child.fullName.." Parent - "..child.parent.fullName.." Faction - "..child.faction:getFactionName())
	end
end

function test_log_function()
	log_always(characters.factions.numOfChilds) 
	for i=1, characters.factions.numOfChilds do
		if characters.factions[i]~=nil then
--			print(characters.factions.fatherName[i].." "..characters.factions.fatherName.childName[i].." "..characters.factions.fatherName.age[i]) 
			log_always(characters.factions[i].." "..characters.factions.fatherName[i].." "..characters.factions.fatherName.childName[i].." "..characters.factions.fatherName.age[i]) 
		end
	end
end

function comparison_traits11(character, traitsList)
	local thisTrait, traitsList = character:getTraits(), " "
	while thisTrait ~= nil do
		traitsList, thisTrait = traitsList.."\n"..thisTrait.name, thisTrait.nextTrait
		characters.factions.fatherName.fathTraits[x]=traitsList, thisTrait
		return traitsList, thisTrait
	end
--	log_always(traitsList);
end

give_everything_to_faction.txt(аккуратнее - много текста)) (Раскрыть)

script
	declare_show_me


	;--- пример Франция поглащает Турцию 
	;-- give_everything_to_faction turks france false

	if I_EventCounter give_everything_to_faction_abbasids_abbasids = 1
		set_event_counter give_everything_to_faction_abbasids_abbasids 0
		give_everything_to_faction abbasids abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_france_france = 1
		set_event_counter give_everything_to_faction_france_france 0
		give_everything_to_faction france france false
	end_if
	if I_EventCounter give_everything_to_faction_france_england = 1
		set_event_counter give_everything_to_faction_france_england 0
		give_everything_to_faction england france false
	end_if
	if I_EventCounter give_everything_to_faction_france_hre = 1
		set_event_counter give_everything_to_faction_france_hre 0
		give_everything_to_faction hre france false
	end_if
	if I_EventCounter give_everything_to_faction_france_scotland = 1
		set_event_counter give_everything_to_faction_france_scotland 0
		give_everything_to_faction scotland france false
	end_if
	if I_EventCounter give_everything_to_faction_france_ireland = 1
		set_event_counter give_everything_to_faction_france_ireland 0
		give_everything_to_faction ireland france false
	end_if
	if I_EventCounter give_everything_to_faction_france_denmark = 1
		set_event_counter give_everything_to_faction_france_denmark 0
		give_everything_to_faction denmark france false
	end_if
	if I_EventCounter give_everything_to_faction_france_norway = 1
		set_event_counter give_everything_to_faction_france_norway 0
		give_everything_to_faction norway france false
	end_if
	if I_EventCounter give_everything_to_faction_france_poland = 1
		set_event_counter give_everything_to_faction_france_poland 0
		give_everything_to_faction poland france false
	end_if
	if I_EventCounter give_everything_to_faction_france_hungary = 1
		set_event_counter give_everything_to_faction_france_hungary 0
		give_everything_to_faction hungary france false
	end_if
	if I_EventCounter give_everything_to_faction_france_novgorod = 1
		set_event_counter give_everything_to_faction_france_novgorod 0
		give_everything_to_faction novgorod france false
	end_if
	if I_EventCounter give_everything_to_faction_france_lithuania = 1
		set_event_counter give_everything_to_faction_france_lithuania 0
		give_everything_to_faction lithuania france false
	end_if
	if I_EventCounter give_everything_to_faction_france_russia = 1
		set_event_counter give_everything_to_faction_france_russia 0
		give_everything_to_faction russia france false
	end_if
	if I_EventCounter give_everything_to_faction_france_georgia = 1
		set_event_counter give_everything_to_faction_france_georgia 0
		give_everything_to_faction georgia france false
	end_if
	if I_EventCounter give_everything_to_faction_france_spain = 1
		set_event_counter give_everything_to_faction_france_spain 0
		give_everything_to_faction spain france false
	end_if
	if I_EventCounter give_everything_to_faction_france_portugal = 1
		set_event_counter give_everything_to_faction_france_portugal 0
		give_everything_to_faction portugal france false
	end_if
	if I_EventCounter give_everything_to_faction_france_normans = 1
		set_event_counter give_everything_to_faction_france_normans 0
		give_everything_to_faction normans france false
	end_if
	if I_EventCounter give_everything_to_faction_france_venice = 1
		set_event_counter give_everything_to_faction_france_venice 0
		give_everything_to_faction venice france false
	end_if
	if I_EventCounter give_everything_to_faction_france_milan = 1
		set_event_counter give_everything_to_faction_france_milan 0
		give_everything_to_faction milan france false
	end_if
	if I_EventCounter give_everything_to_faction_france_saxons = 1
		set_event_counter give_everything_to_faction_france_saxons 0
		give_everything_to_faction saxons france false
	end_if
	if I_EventCounter give_everything_to_faction_france_sicily = 1
		set_event_counter give_everything_to_faction_france_sicily 0
		give_everything_to_faction sicily france false
	end_if
	if I_EventCounter give_everything_to_faction_france_byzantium = 1
		set_event_counter give_everything_to_faction_france_byzantium 0
		give_everything_to_faction byzantium france false
	end_if
	if I_EventCounter give_everything_to_faction_france_tatar = 1
		set_event_counter give_everything_to_faction_france_tatar 0
		give_everything_to_faction tatar france false
	end_if
	if I_EventCounter give_everything_to_faction_france_moors = 1
		set_event_counter give_everything_to_faction_france_moors 0
		give_everything_to_faction moors france false
	end_if
	if I_EventCounter give_everything_to_faction_france_turks = 1
		set_event_counter give_everything_to_faction_france_turks 0
		give_everything_to_faction turks france false
	end_if
	if I_EventCounter give_everything_to_faction_france_egypt = 1
		set_event_counter give_everything_to_faction_france_egypt 0
		give_everything_to_faction egypt france false
	end_if
	if I_EventCounter give_everything_to_faction_france_abbasids = 1
		set_event_counter give_everything_to_faction_france_abbasids 0
		give_everything_to_faction abbasids france false
	end_if
	if I_EventCounter give_everything_to_faction_england_france = 1
		set_event_counter give_everything_to_faction_england_france 0
		give_everything_to_faction france england false
	end_if
	if I_EventCounter give_everything_to_faction_england_england = 1
		set_event_counter give_everything_to_faction_england_england 0
		give_everything_to_faction england england false
	end_if
	if I_EventCounter give_everything_to_faction_england_hre = 1
		set_event_counter give_everything_to_faction_england_hre 0
		give_everything_to_faction hre england false
	end_if
	if I_EventCounter give_everything_to_faction_england_scotland = 1
		set_event_counter give_everything_to_faction_england_scotland 0
		give_everything_to_faction scotland england false
	end_if
	if I_EventCounter give_everything_to_faction_england_ireland = 1
		set_event_counter give_everything_to_faction_england_ireland 0
		give_everything_to_faction ireland england false
	end_if
	if I_EventCounter give_everything_to_faction_england_denmark = 1
		set_event_counter give_everything_to_faction_england_denmark 0
		give_everything_to_faction denmark england false
	end_if
	if I_EventCounter give_everything_to_faction_england_norway = 1
		set_event_counter give_everything_to_faction_england_norway 0
		give_everything_to_faction norway england false
	end_if
	if I_EventCounter give_everything_to_faction_england_poland = 1
		set_event_counter give_everything_to_faction_england_poland 0
		give_everything_to_faction poland england false
	end_if
	if I_EventCounter give_everything_to_faction_england_hungary = 1
		set_event_counter give_everything_to_faction_england_hungary 0
		give_everything_to_faction hungary england false
	end_if
	if I_EventCounter give_everything_to_faction_england_novgorod = 1
		set_event_counter give_everything_to_faction_england_novgorod 0
		give_everything_to_faction novgorod england false
	end_if
	if I_EventCounter give_everything_to_faction_england_lithuania = 1
		set_event_counter give_everything_to_faction_england_lithuania 0
		give_everything_to_faction lithuania england false
	end_if
	if I_EventCounter give_everything_to_faction_england_russia = 1
		set_event_counter give_everything_to_faction_england_russia 0
		give_everything_to_faction russia england false
	end_if
	if I_EventCounter give_everything_to_faction_england_georgia = 1
		set_event_counter give_everything_to_faction_england_georgia 0
		give_everything_to_faction georgia england false
	end_if
	if I_EventCounter give_everything_to_faction_england_spain = 1
		set_event_counter give_everything_to_faction_england_spain 0
		give_everything_to_faction spain england false
	end_if
	if I_EventCounter give_everything_to_faction_england_portugal = 1
		set_event_counter give_everything_to_faction_england_portugal 0
		give_everything_to_faction portugal england false
	end_if
	if I_EventCounter give_everything_to_faction_england_normans = 1
		set_event_counter give_everything_to_faction_england_normans 0
		give_everything_to_faction normans england false
	end_if
	if I_EventCounter give_everything_to_faction_england_venice = 1
		set_event_counter give_everything_to_faction_england_venice 0
		give_everything_to_faction venice england false
	end_if
	if I_EventCounter give_everything_to_faction_england_milan = 1
		set_event_counter give_everything_to_faction_england_milan 0
		give_everything_to_faction milan england false
	end_if
	if I_EventCounter give_everything_to_faction_england_saxons = 1
		set_event_counter give_everything_to_faction_england_saxons 0
		give_everything_to_faction saxons england false
	end_if
	if I_EventCounter give_everything_to_faction_england_sicily = 1
		set_event_counter give_everything_to_faction_england_sicily 0
		give_everything_to_faction sicily england false
	end_if
	if I_EventCounter give_everything_to_faction_england_byzantium = 1
		set_event_counter give_everything_to_faction_england_byzantium 0
		give_everything_to_faction byzantium england false
	end_if
	if I_EventCounter give_everything_to_faction_england_tatar = 1
		set_event_counter give_everything_to_faction_england_tatar 0
		give_everything_to_faction tatar england false
	end_if
	if I_EventCounter give_everything_to_faction_england_moors = 1
		set_event_counter give_everything_to_faction_england_moors 0
		give_everything_to_faction moors england false
	end_if
	if I_EventCounter give_everything_to_faction_england_turks = 1
		set_event_counter give_everything_to_faction_england_turks 0
		give_everything_to_faction turks england false
	end_if
	if I_EventCounter give_everything_to_faction_england_egypt = 1
		set_event_counter give_everything_to_faction_england_egypt 0
		give_everything_to_faction egypt england false
	end_if
	if I_EventCounter give_everything_to_faction_england_abbasids = 1
		set_event_counter give_everything_to_faction_england_abbasids 0
		give_everything_to_faction abbasids england false
	end_if
	if I_EventCounter give_everything_to_faction_hre_france = 1
		set_event_counter give_everything_to_faction_hre_france 0
		give_everything_to_faction france hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_england = 1
		set_event_counter give_everything_to_faction_hre_england 0
		give_everything_to_faction england hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_hre = 1
		set_event_counter give_everything_to_faction_hre_hre 0
		give_everything_to_faction hre hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_scotland = 1
		set_event_counter give_everything_to_faction_hre_scotland 0
		give_everything_to_faction scotland hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_ireland = 1
		set_event_counter give_everything_to_faction_hre_ireland 0
		give_everything_to_faction ireland hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_denmark = 1
		set_event_counter give_everything_to_faction_hre_denmark 0
		give_everything_to_faction denmark hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_norway = 1
		set_event_counter give_everything_to_faction_hre_norway 0
		give_everything_to_faction norway hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_poland = 1
		set_event_counter give_everything_to_faction_hre_poland 0
		give_everything_to_faction poland hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_hungary = 1
		set_event_counter give_everything_to_faction_hre_hungary 0
		give_everything_to_faction hungary hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_novgorod = 1
		set_event_counter give_everything_to_faction_hre_novgorod 0
		give_everything_to_faction novgorod hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_lithuania = 1
		set_event_counter give_everything_to_faction_hre_lithuania 0
		give_everything_to_faction lithuania hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_russia = 1
		set_event_counter give_everything_to_faction_hre_russia 0
		give_everything_to_faction russia hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_georgia = 1
		set_event_counter give_everything_to_faction_hre_georgia 0
		give_everything_to_faction georgia hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_spain = 1
		set_event_counter give_everything_to_faction_hre_spain 0
		give_everything_to_faction spain hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_portugal = 1
		set_event_counter give_everything_to_faction_hre_portugal 0
		give_everything_to_faction portugal hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_normans = 1
		set_event_counter give_everything_to_faction_hre_normans 0
		give_everything_to_faction normans hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_venice = 1
		set_event_counter give_everything_to_faction_hre_venice 0
		give_everything_to_faction venice hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_milan = 1
		set_event_counter give_everything_to_faction_hre_milan 0
		give_everything_to_faction milan hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_saxons = 1
		set_event_counter give_everything_to_faction_hre_saxons 0
		give_everything_to_faction saxons hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_sicily = 1
		set_event_counter give_everything_to_faction_hre_sicily 0
		give_everything_to_faction sicily hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_byzantium = 1
		set_event_counter give_everything_to_faction_hre_byzantium 0
		give_everything_to_faction byzantium hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_tatar = 1
		set_event_counter give_everything_to_faction_hre_tatar 0
		give_everything_to_faction tatar hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_moors = 1
		set_event_counter give_everything_to_faction_hre_moors 0
		give_everything_to_faction moors hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_turks = 1
		set_event_counter give_everything_to_faction_hre_turks 0
		give_everything_to_faction turks hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_egypt = 1
		set_event_counter give_everything_to_faction_hre_egypt 0
		give_everything_to_faction egypt hre false
	end_if
	if I_EventCounter give_everything_to_faction_hre_abbasids = 1
		set_event_counter give_everything_to_faction_hre_abbasids 0
		give_everything_to_faction abbasids hre false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_france = 1
		set_event_counter give_everything_to_faction_scotland_france 0
		give_everything_to_faction france scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_england = 1
		set_event_counter give_everything_to_faction_scotland_england 0
		give_everything_to_faction england scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_hre = 1
		set_event_counter give_everything_to_faction_scotland_hre 0
		give_everything_to_faction hre scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_scotland = 1
		set_event_counter give_everything_to_faction_scotland_scotland 0
		give_everything_to_faction scotland scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_ireland = 1
		set_event_counter give_everything_to_faction_scotland_ireland 0
		give_everything_to_faction ireland scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_denmark = 1
		set_event_counter give_everything_to_faction_scotland_denmark 0
		give_everything_to_faction denmark scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_norway = 1
		set_event_counter give_everything_to_faction_scotland_norway 0
		give_everything_to_faction norway scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_poland = 1
		set_event_counter give_everything_to_faction_scotland_poland 0
		give_everything_to_faction poland scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_hungary = 1
		set_event_counter give_everything_to_faction_scotland_hungary 0
		give_everything_to_faction hungary scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_novgorod = 1
		set_event_counter give_everything_to_faction_scotland_novgorod 0
		give_everything_to_faction novgorod scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_lithuania = 1
		set_event_counter give_everything_to_faction_scotland_lithuania 0
		give_everything_to_faction lithuania scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_russia = 1
		set_event_counter give_everything_to_faction_scotland_russia 0
		give_everything_to_faction russia scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_georgia = 1
		set_event_counter give_everything_to_faction_scotland_georgia 0
		give_everything_to_faction georgia scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_spain = 1
		set_event_counter give_everything_to_faction_scotland_spain 0
		give_everything_to_faction spain scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_portugal = 1
		set_event_counter give_everything_to_faction_scotland_portugal 0
		give_everything_to_faction portugal scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_normans = 1
		set_event_counter give_everything_to_faction_scotland_normans 0
		give_everything_to_faction normans scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_venice = 1
		set_event_counter give_everything_to_faction_scotland_venice 0
		give_everything_to_faction venice scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_milan = 1
		set_event_counter give_everything_to_faction_scotland_milan 0
		give_everything_to_faction milan scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_saxons = 1
		set_event_counter give_everything_to_faction_scotland_saxons 0
		give_everything_to_faction saxons scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_sicily = 1
		set_event_counter give_everything_to_faction_scotland_sicily 0
		give_everything_to_faction sicily scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_byzantium = 1
		set_event_counter give_everything_to_faction_scotland_byzantium 0
		give_everything_to_faction byzantium scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_tatar = 1
		set_event_counter give_everything_to_faction_scotland_tatar 0
		give_everything_to_faction tatar scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_moors = 1
		set_event_counter give_everything_to_faction_scotland_moors 0
		give_everything_to_faction moors scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_turks = 1
		set_event_counter give_everything_to_faction_scotland_turks 0
		give_everything_to_faction turks scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_egypt = 1
		set_event_counter give_everything_to_faction_scotland_egypt 0
		give_everything_to_faction egypt scotland false
	end_if
	if I_EventCounter give_everything_to_faction_scotland_abbasids = 1
		set_event_counter give_everything_to_faction_scotland_abbasids 0
		give_everything_to_faction abbasids scotland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_france = 1
		set_event_counter give_everything_to_faction_ireland_france 0
		give_everything_to_faction france ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_england = 1
		set_event_counter give_everything_to_faction_ireland_england 0
		give_everything_to_faction england ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_hre = 1
		set_event_counter give_everything_to_faction_ireland_hre 0
		give_everything_to_faction hre ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_scotland = 1
		set_event_counter give_everything_to_faction_ireland_scotland 0
		give_everything_to_faction scotland ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_ireland = 1
		set_event_counter give_everything_to_faction_ireland_ireland 0
		give_everything_to_faction ireland ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_denmark = 1
		set_event_counter give_everything_to_faction_ireland_denmark 0
		give_everything_to_faction denmark ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_norway = 1
		set_event_counter give_everything_to_faction_ireland_norway 0
		give_everything_to_faction norway ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_poland = 1
		set_event_counter give_everything_to_faction_ireland_poland 0
		give_everything_to_faction poland ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_hungary = 1
		set_event_counter give_everything_to_faction_ireland_hungary 0
		give_everything_to_faction hungary ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_novgorod = 1
		set_event_counter give_everything_to_faction_ireland_novgorod 0
		give_everything_to_faction novgorod ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_lithuania = 1
		set_event_counter give_everything_to_faction_ireland_lithuania 0
		give_everything_to_faction lithuania ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_russia = 1
		set_event_counter give_everything_to_faction_ireland_russia 0
		give_everything_to_faction russia ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_georgia = 1
		set_event_counter give_everything_to_faction_ireland_georgia 0
		give_everything_to_faction georgia ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_spain = 1
		set_event_counter give_everything_to_faction_ireland_spain 0
		give_everything_to_faction spain ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_portugal = 1
		set_event_counter give_everything_to_faction_ireland_portugal 0
		give_everything_to_faction portugal ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_normans = 1
		set_event_counter give_everything_to_faction_ireland_normans 0
		give_everything_to_faction normans ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_venice = 1
		set_event_counter give_everything_to_faction_ireland_venice 0
		give_everything_to_faction venice ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_milan = 1
		set_event_counter give_everything_to_faction_ireland_milan 0
		give_everything_to_faction milan ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_saxons = 1
		set_event_counter give_everything_to_faction_ireland_saxons 0
		give_everything_to_faction saxons ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_sicily = 1
		set_event_counter give_everything_to_faction_ireland_sicily 0
		give_everything_to_faction sicily ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_byzantium = 1
		set_event_counter give_everything_to_faction_ireland_byzantium 0
		give_everything_to_faction byzantium ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_tatar = 1
		set_event_counter give_everything_to_faction_ireland_tatar 0
		give_everything_to_faction tatar ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_moors = 1
		set_event_counter give_everything_to_faction_ireland_moors 0
		give_everything_to_faction moors ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_turks = 1
		set_event_counter give_everything_to_faction_ireland_turks 0
		give_everything_to_faction turks ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_egypt = 1
		set_event_counter give_everything_to_faction_ireland_egypt 0
		give_everything_to_faction egypt ireland false
	end_if
	if I_EventCounter give_everything_to_faction_ireland_abbasids = 1
		set_event_counter give_everything_to_faction_ireland_abbasids 0
		give_everything_to_faction abbasids ireland false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_france = 1
		set_event_counter give_everything_to_faction_denmark_france 0
		give_everything_to_faction france denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_england = 1
		set_event_counter give_everything_to_faction_denmark_england 0
		give_everything_to_faction england denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_hre = 1
		set_event_counter give_everything_to_faction_denmark_hre 0
		give_everything_to_faction hre denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_scotland = 1
		set_event_counter give_everything_to_faction_denmark_scotland 0
		give_everything_to_faction scotland denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_ireland = 1
		set_event_counter give_everything_to_faction_denmark_ireland 0
		give_everything_to_faction ireland denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_denmark = 1
		set_event_counter give_everything_to_faction_denmark_denmark 0
		give_everything_to_faction denmark denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_norway = 1
		set_event_counter give_everything_to_faction_denmark_norway 0
		give_everything_to_faction norway denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_poland = 1
		set_event_counter give_everything_to_faction_denmark_poland 0
		give_everything_to_faction poland denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_hungary = 1
		set_event_counter give_everything_to_faction_denmark_hungary 0
		give_everything_to_faction hungary denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_novgorod = 1
		set_event_counter give_everything_to_faction_denmark_novgorod 0
		give_everything_to_faction novgorod denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_lithuania = 1
		set_event_counter give_everything_to_faction_denmark_lithuania 0
		give_everything_to_faction lithuania denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_russia = 1
		set_event_counter give_everything_to_faction_denmark_russia 0
		give_everything_to_faction russia denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_georgia = 1
		set_event_counter give_everything_to_faction_denmark_georgia 0
		give_everything_to_faction georgia denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_spain = 1
		set_event_counter give_everything_to_faction_denmark_spain 0
		give_everything_to_faction spain denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_portugal = 1
		set_event_counter give_everything_to_faction_denmark_portugal 0
		give_everything_to_faction portugal denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_normans = 1
		set_event_counter give_everything_to_faction_denmark_normans 0
		give_everything_to_faction normans denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_venice = 1
		set_event_counter give_everything_to_faction_denmark_venice 0
		give_everything_to_faction venice denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_milan = 1
		set_event_counter give_everything_to_faction_denmark_milan 0
		give_everything_to_faction milan denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_saxons = 1
		set_event_counter give_everything_to_faction_denmark_saxons 0
		give_everything_to_faction saxons denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_sicily = 1
		set_event_counter give_everything_to_faction_denmark_sicily 0
		give_everything_to_faction sicily denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_byzantium = 1
		set_event_counter give_everything_to_faction_denmark_byzantium 0
		give_everything_to_faction byzantium denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_tatar = 1
		set_event_counter give_everything_to_faction_denmark_tatar 0
		give_everything_to_faction tatar denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_moors = 1
		set_event_counter give_everything_to_faction_denmark_moors 0
		give_everything_to_faction moors denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_turks = 1
		set_event_counter give_everything_to_faction_denmark_turks 0
		give_everything_to_faction turks denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_egypt = 1
		set_event_counter give_everything_to_faction_denmark_egypt 0
		give_everything_to_faction egypt denmark false
	end_if
	if I_EventCounter give_everything_to_faction_denmark_abbasids = 1
		set_event_counter give_everything_to_faction_denmark_abbasids 0
		give_everything_to_faction abbasids denmark false
	end_if
	if I_EventCounter give_everything_to_faction_norway_france = 1
		set_event_counter give_everything_to_faction_norway_france 0
		give_everything_to_faction france norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_england = 1
		set_event_counter give_everything_to_faction_norway_england 0
		give_everything_to_faction england norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_hre = 1
		set_event_counter give_everything_to_faction_norway_hre 0
		give_everything_to_faction hre norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_scotland = 1
		set_event_counter give_everything_to_faction_norway_scotland 0
		give_everything_to_faction scotland norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_ireland = 1
		set_event_counter give_everything_to_faction_norway_ireland 0
		give_everything_to_faction ireland norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_denmark = 1
		set_event_counter give_everything_to_faction_norway_denmark 0
		give_everything_to_faction denmark norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_norway = 1
		set_event_counter give_everything_to_faction_norway_norway 0
		give_everything_to_faction norway norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_poland = 1
		set_event_counter give_everything_to_faction_norway_poland 0
		give_everything_to_faction poland norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_hungary = 1
		set_event_counter give_everything_to_faction_norway_hungary 0
		give_everything_to_faction hungary norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_novgorod = 1
		set_event_counter give_everything_to_faction_norway_novgorod 0
		give_everything_to_faction novgorod norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_lithuania = 1
		set_event_counter give_everything_to_faction_norway_lithuania 0
		give_everything_to_faction lithuania norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_russia = 1
		set_event_counter give_everything_to_faction_norway_russia 0
		give_everything_to_faction russia norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_georgia = 1
		set_event_counter give_everything_to_faction_norway_georgia 0
		give_everything_to_faction georgia norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_spain = 1
		set_event_counter give_everything_to_faction_norway_spain 0
		give_everything_to_faction spain norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_portugal = 1
		set_event_counter give_everything_to_faction_norway_portugal 0
		give_everything_to_faction portugal norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_normans = 1
		set_event_counter give_everything_to_faction_norway_normans 0
		give_everything_to_faction normans norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_venice = 1
		set_event_counter give_everything_to_faction_norway_venice 0
		give_everything_to_faction venice norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_milan = 1
		set_event_counter give_everything_to_faction_norway_milan 0
		give_everything_to_faction milan norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_saxons = 1
		set_event_counter give_everything_to_faction_norway_saxons 0
		give_everything_to_faction saxons norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_sicily = 1
		set_event_counter give_everything_to_faction_norway_sicily 0
		give_everything_to_faction sicily norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_byzantium = 1
		set_event_counter give_everything_to_faction_norway_byzantium 0
		give_everything_to_faction byzantium norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_tatar = 1
		set_event_counter give_everything_to_faction_norway_tatar 0
		give_everything_to_faction tatar norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_moors = 1
		set_event_counter give_everything_to_faction_norway_moors 0
		give_everything_to_faction moors norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_turks = 1
		set_event_counter give_everything_to_faction_norway_turks 0
		give_everything_to_faction turks norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_egypt = 1
		set_event_counter give_everything_to_faction_norway_egypt 0
		give_everything_to_faction egypt norway false
	end_if
	if I_EventCounter give_everything_to_faction_norway_abbasids = 1
		set_event_counter give_everything_to_faction_norway_abbasids 0
		give_everything_to_faction abbasids norway false
	end_if
	if I_EventCounter give_everything_to_faction_poland_france = 1
		set_event_counter give_everything_to_faction_poland_france 0
		give_everything_to_faction france poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_england = 1
		set_event_counter give_everything_to_faction_poland_england 0
		give_everything_to_faction england poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_hre = 1
		set_event_counter give_everything_to_faction_poland_hre 0
		give_everything_to_faction hre poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_scotland = 1
		set_event_counter give_everything_to_faction_poland_scotland 0
		give_everything_to_faction scotland poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_ireland = 1
		set_event_counter give_everything_to_faction_poland_ireland 0
		give_everything_to_faction ireland poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_denmark = 1
		set_event_counter give_everything_to_faction_poland_denmark 0
		give_everything_to_faction denmark poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_norway = 1
		set_event_counter give_everything_to_faction_poland_norway 0
		give_everything_to_faction norway poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_poland = 1
		set_event_counter give_everything_to_faction_poland_poland 0
		give_everything_to_faction poland poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_hungary = 1
		set_event_counter give_everything_to_faction_poland_hungary 0
		give_everything_to_faction hungary poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_novgorod = 1
		set_event_counter give_everything_to_faction_poland_novgorod 0
		give_everything_to_faction novgorod poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_lithuania = 1
		set_event_counter give_everything_to_faction_poland_lithuania 0
		give_everything_to_faction lithuania poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_russia = 1
		set_event_counter give_everything_to_faction_poland_russia 0
		give_everything_to_faction russia poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_georgia = 1
		set_event_counter give_everything_to_faction_poland_georgia 0
		give_everything_to_faction georgia poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_spain = 1
		set_event_counter give_everything_to_faction_poland_spain 0
		give_everything_to_faction spain poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_portugal = 1
		set_event_counter give_everything_to_faction_poland_portugal 0
		give_everything_to_faction portugal poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_normans = 1
		set_event_counter give_everything_to_faction_poland_normans 0
		give_everything_to_faction normans poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_venice = 1
		set_event_counter give_everything_to_faction_poland_venice 0
		give_everything_to_faction venice poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_milan = 1
		set_event_counter give_everything_to_faction_poland_milan 0
		give_everything_to_faction milan poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_saxons = 1
		set_event_counter give_everything_to_faction_poland_saxons 0
		give_everything_to_faction saxons poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_sicily = 1
		set_event_counter give_everything_to_faction_poland_sicily 0
		give_everything_to_faction sicily poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_byzantium = 1
		set_event_counter give_everything_to_faction_poland_byzantium 0
		give_everything_to_faction byzantium poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_tatar = 1
		set_event_counter give_everything_to_faction_poland_tatar 0
		give_everything_to_faction tatar poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_moors = 1
		set_event_counter give_everything_to_faction_poland_moors 0
		give_everything_to_faction moors poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_turks = 1
		set_event_counter give_everything_to_faction_poland_turks 0
		give_everything_to_faction turks poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_egypt = 1
		set_event_counter give_everything_to_faction_poland_egypt 0
		give_everything_to_faction egypt poland false
	end_if
	if I_EventCounter give_everything_to_faction_poland_abbasids = 1
		set_event_counter give_everything_to_faction_poland_abbasids 0
		give_everything_to_faction abbasids poland false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_france = 1
		set_event_counter give_everything_to_faction_hungary_france 0
		give_everything_to_faction france hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_england = 1
		set_event_counter give_everything_to_faction_hungary_england 0
		give_everything_to_faction england hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_hre = 1
		set_event_counter give_everything_to_faction_hungary_hre 0
		give_everything_to_faction hre hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_scotland = 1
		set_event_counter give_everything_to_faction_hungary_scotland 0
		give_everything_to_faction scotland hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_ireland = 1
		set_event_counter give_everything_to_faction_hungary_ireland 0
		give_everything_to_faction ireland hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_denmark = 1
		set_event_counter give_everything_to_faction_hungary_denmark 0
		give_everything_to_faction denmark hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_norway = 1
		set_event_counter give_everything_to_faction_hungary_norway 0
		give_everything_to_faction norway hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_poland = 1
		set_event_counter give_everything_to_faction_hungary_poland 0
		give_everything_to_faction poland hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_hungary = 1
		set_event_counter give_everything_to_faction_hungary_hungary 0
		give_everything_to_faction hungary hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_novgorod = 1
		set_event_counter give_everything_to_faction_hungary_novgorod 0
		give_everything_to_faction novgorod hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_lithuania = 1
		set_event_counter give_everything_to_faction_hungary_lithuania 0
		give_everything_to_faction lithuania hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_russia = 1
		set_event_counter give_everything_to_faction_hungary_russia 0
		give_everything_to_faction russia hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_georgia = 1
		set_event_counter give_everything_to_faction_hungary_georgia 0
		give_everything_to_faction georgia hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_spain = 1
		set_event_counter give_everything_to_faction_hungary_spain 0
		give_everything_to_faction spain hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_portugal = 1
		set_event_counter give_everything_to_faction_hungary_portugal 0
		give_everything_to_faction portugal hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_normans = 1
		set_event_counter give_everything_to_faction_hungary_normans 0
		give_everything_to_faction normans hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_venice = 1
		set_event_counter give_everything_to_faction_hungary_venice 0
		give_everything_to_faction venice hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_milan = 1
		set_event_counter give_everything_to_faction_hungary_milan 0
		give_everything_to_faction milan hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_saxons = 1
		set_event_counter give_everything_to_faction_hungary_saxons 0
		give_everything_to_faction saxons hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_sicily = 1
		set_event_counter give_everything_to_faction_hungary_sicily 0
		give_everything_to_faction sicily hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_byzantium = 1
		set_event_counter give_everything_to_faction_hungary_byzantium 0
		give_everything_to_faction byzantium hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_tatar = 1
		set_event_counter give_everything_to_faction_hungary_tatar 0
		give_everything_to_faction tatar hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_moors = 1
		set_event_counter give_everything_to_faction_hungary_moors 0
		give_everything_to_faction moors hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_turks = 1
		set_event_counter give_everything_to_faction_hungary_turks 0
		give_everything_to_faction turks hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_egypt = 1
		set_event_counter give_everything_to_faction_hungary_egypt 0
		give_everything_to_faction egypt hungary false
	end_if
	if I_EventCounter give_everything_to_faction_hungary_abbasids = 1
		set_event_counter give_everything_to_faction_hungary_abbasids 0
		give_everything_to_faction abbasids hungary false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_france = 1
		set_event_counter give_everything_to_faction_novgorod_france 0
		give_everything_to_faction france novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_england = 1
		set_event_counter give_everything_to_faction_novgorod_england 0
		give_everything_to_faction england novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_hre = 1
		set_event_counter give_everything_to_faction_novgorod_hre 0
		give_everything_to_faction hre novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_scotland = 1
		set_event_counter give_everything_to_faction_novgorod_scotland 0
		give_everything_to_faction scotland novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_ireland = 1
		set_event_counter give_everything_to_faction_novgorod_ireland 0
		give_everything_to_faction ireland novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_denmark = 1
		set_event_counter give_everything_to_faction_novgorod_denmark 0
		give_everything_to_faction denmark novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_norway = 1
		set_event_counter give_everything_to_faction_novgorod_norway 0
		give_everything_to_faction norway novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_poland = 1
		set_event_counter give_everything_to_faction_novgorod_poland 0
		give_everything_to_faction poland novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_hungary = 1
		set_event_counter give_everything_to_faction_novgorod_hungary 0
		give_everything_to_faction hungary novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_novgorod = 1
		set_event_counter give_everything_to_faction_novgorod_novgorod 0
		give_everything_to_faction novgorod novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_lithuania = 1
		set_event_counter give_everything_to_faction_novgorod_lithuania 0
		give_everything_to_faction lithuania novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_russia = 1
		set_event_counter give_everything_to_faction_novgorod_russia 0
		give_everything_to_faction russia novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_georgia = 1
		set_event_counter give_everything_to_faction_novgorod_georgia 0
		give_everything_to_faction georgia novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_spain = 1
		set_event_counter give_everything_to_faction_novgorod_spain 0
		give_everything_to_faction spain novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_portugal = 1
		set_event_counter give_everything_to_faction_novgorod_portugal 0
		give_everything_to_faction portugal novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_normans = 1
		set_event_counter give_everything_to_faction_novgorod_normans 0
		give_everything_to_faction normans novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_venice = 1
		set_event_counter give_everything_to_faction_novgorod_venice 0
		give_everything_to_faction venice novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_milan = 1
		set_event_counter give_everything_to_faction_novgorod_milan 0
		give_everything_to_faction milan novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_saxons = 1
		set_event_counter give_everything_to_faction_novgorod_saxons 0
		give_everything_to_faction saxons novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_sicily = 1
		set_event_counter give_everything_to_faction_novgorod_sicily 0
		give_everything_to_faction sicily novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_byzantium = 1
		set_event_counter give_everything_to_faction_novgorod_byzantium 0
		give_everything_to_faction byzantium novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_tatar = 1
		set_event_counter give_everything_to_faction_novgorod_tatar 0
		give_everything_to_faction tatar novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_moors = 1
		set_event_counter give_everything_to_faction_novgorod_moors 0
		give_everything_to_faction moors novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_turks = 1
		set_event_counter give_everything_to_faction_novgorod_turks 0
		give_everything_to_faction turks novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_egypt = 1
		set_event_counter give_everything_to_faction_novgorod_egypt 0
		give_everything_to_faction egypt novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_novgorod_abbasids = 1
		set_event_counter give_everything_to_faction_novgorod_abbasids 0
		give_everything_to_faction abbasids novgorod false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_france = 1
		set_event_counter give_everything_to_faction_lithuania_france 0
		give_everything_to_faction france lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_england = 1
		set_event_counter give_everything_to_faction_lithuania_england 0
		give_everything_to_faction england lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_hre = 1
		set_event_counter give_everything_to_faction_lithuania_hre 0
		give_everything_to_faction hre lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_scotland = 1
		set_event_counter give_everything_to_faction_lithuania_scotland 0
		give_everything_to_faction scotland lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_ireland = 1
		set_event_counter give_everything_to_faction_lithuania_ireland 0
		give_everything_to_faction ireland lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_denmark = 1
		set_event_counter give_everything_to_faction_lithuania_denmark 0
		give_everything_to_faction denmark lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_norway = 1
		set_event_counter give_everything_to_faction_lithuania_norway 0
		give_everything_to_faction norway lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_poland = 1
		set_event_counter give_everything_to_faction_lithuania_poland 0
		give_everything_to_faction poland lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_hungary = 1
		set_event_counter give_everything_to_faction_lithuania_hungary 0
		give_everything_to_faction hungary lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_novgorod = 1
		set_event_counter give_everything_to_faction_lithuania_novgorod 0
		give_everything_to_faction novgorod lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_lithuania = 1
		set_event_counter give_everything_to_faction_lithuania_lithuania 0
		give_everything_to_faction lithuania lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_russia = 1
		set_event_counter give_everything_to_faction_lithuania_russia 0
		give_everything_to_faction russia lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_georgia = 1
		set_event_counter give_everything_to_faction_lithuania_georgia 0
		give_everything_to_faction georgia lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_spain = 1
		set_event_counter give_everything_to_faction_lithuania_spain 0
		give_everything_to_faction spain lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_portugal = 1
		set_event_counter give_everything_to_faction_lithuania_portugal 0
		give_everything_to_faction portugal lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_normans = 1
		set_event_counter give_everything_to_faction_lithuania_normans 0
		give_everything_to_faction normans lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_venice = 1
		set_event_counter give_everything_to_faction_lithuania_venice 0
		give_everything_to_faction venice lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_milan = 1
		set_event_counter give_everything_to_faction_lithuania_milan 0
		give_everything_to_faction milan lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_saxons = 1
		set_event_counter give_everything_to_faction_lithuania_saxons 0
		give_everything_to_faction saxons lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_sicily = 1
		set_event_counter give_everything_to_faction_lithuania_sicily 0
		give_everything_to_faction sicily lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_byzantium = 1
		set_event_counter give_everything_to_faction_lithuania_byzantium 0
		give_everything_to_faction byzantium lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_tatar = 1
		set_event_counter give_everything_to_faction_lithuania_tatar 0
		give_everything_to_faction tatar lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_moors = 1
		set_event_counter give_everything_to_faction_lithuania_moors 0
		give_everything_to_faction moors lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_turks = 1
		set_event_counter give_everything_to_faction_lithuania_turks 0
		give_everything_to_faction turks lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_egypt = 1
		set_event_counter give_everything_to_faction_lithuania_egypt 0
		give_everything_to_faction egypt lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_lithuania_abbasids = 1
		set_event_counter give_everything_to_faction_lithuania_abbasids 0
		give_everything_to_faction abbasids lithuania false
	end_if
	if I_EventCounter give_everything_to_faction_russia_france = 1
		set_event_counter give_everything_to_faction_russia_france 0
		give_everything_to_faction france russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_england = 1
		set_event_counter give_everything_to_faction_russia_england 0
		give_everything_to_faction england russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_hre = 1
		set_event_counter give_everything_to_faction_russia_hre 0
		give_everything_to_faction hre russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_scotland = 1
		set_event_counter give_everything_to_faction_russia_scotland 0
		give_everything_to_faction scotland russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_ireland = 1
		set_event_counter give_everything_to_faction_russia_ireland 0
		give_everything_to_faction ireland russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_denmark = 1
		set_event_counter give_everything_to_faction_russia_denmark 0
		give_everything_to_faction denmark russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_norway = 1
		set_event_counter give_everything_to_faction_russia_norway 0
		give_everything_to_faction norway russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_poland = 1
		set_event_counter give_everything_to_faction_russia_poland 0
		give_everything_to_faction poland russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_hungary = 1
		set_event_counter give_everything_to_faction_russia_hungary 0
		give_everything_to_faction hungary russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_novgorod = 1
		set_event_counter give_everything_to_faction_russia_novgorod 0
		give_everything_to_faction novgorod russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_lithuania = 1
		set_event_counter give_everything_to_faction_russia_lithuania 0
		give_everything_to_faction lithuania russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_russia = 1
		set_event_counter give_everything_to_faction_russia_russia 0
		give_everything_to_faction russia russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_georgia = 1
		set_event_counter give_everything_to_faction_russia_georgia 0
		give_everything_to_faction georgia russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_spain = 1
		set_event_counter give_everything_to_faction_russia_spain 0
		give_everything_to_faction spain russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_portugal = 1
		set_event_counter give_everything_to_faction_russia_portugal 0
		give_everything_to_faction portugal russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_normans = 1
		set_event_counter give_everything_to_faction_russia_normans 0
		give_everything_to_faction normans russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_venice = 1
		set_event_counter give_everything_to_faction_russia_venice 0
		give_everything_to_faction venice russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_milan = 1
		set_event_counter give_everything_to_faction_russia_milan 0
		give_everything_to_faction milan russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_saxons = 1
		set_event_counter give_everything_to_faction_russia_saxons 0
		give_everything_to_faction saxons russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_sicily = 1
		set_event_counter give_everything_to_faction_russia_sicily 0
		give_everything_to_faction sicily russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_byzantium = 1
		set_event_counter give_everything_to_faction_russia_byzantium 0
		give_everything_to_faction byzantium russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_tatar = 1
		set_event_counter give_everything_to_faction_russia_tatar 0
		give_everything_to_faction tatar russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_moors = 1
		set_event_counter give_everything_to_faction_russia_moors 0
		give_everything_to_faction moors russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_turks = 1
		set_event_counter give_everything_to_faction_russia_turks 0
		give_everything_to_faction turks russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_egypt = 1
		set_event_counter give_everything_to_faction_russia_egypt 0
		give_everything_to_faction egypt russia false
	end_if
	if I_EventCounter give_everything_to_faction_russia_abbasids = 1
		set_event_counter give_everything_to_faction_russia_abbasids 0
		give_everything_to_faction abbasids russia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_france = 1
		set_event_counter give_everything_to_faction_georgia_france 0
		give_everything_to_faction france georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_england = 1
		set_event_counter give_everything_to_faction_georgia_england 0
		give_everything_to_faction england georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_hre = 1
		set_event_counter give_everything_to_faction_georgia_hre 0
		give_everything_to_faction hre georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_scotland = 1
		set_event_counter give_everything_to_faction_georgia_scotland 0
		give_everything_to_faction scotland georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_ireland = 1
		set_event_counter give_everything_to_faction_georgia_ireland 0
		give_everything_to_faction ireland georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_denmark = 1
		set_event_counter give_everything_to_faction_georgia_denmark 0
		give_everything_to_faction denmark georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_norway = 1
		set_event_counter give_everything_to_faction_georgia_norway 0
		give_everything_to_faction norway georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_poland = 1
		set_event_counter give_everything_to_faction_georgia_poland 0
		give_everything_to_faction poland georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_hungary = 1
		set_event_counter give_everything_to_faction_georgia_hungary 0
		give_everything_to_faction hungary georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_novgorod = 1
		set_event_counter give_everything_to_faction_georgia_novgorod 0
		give_everything_to_faction novgorod georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_lithuania = 1
		set_event_counter give_everything_to_faction_georgia_lithuania 0
		give_everything_to_faction lithuania georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_russia = 1
		set_event_counter give_everything_to_faction_georgia_russia 0
		give_everything_to_faction russia georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_georgia = 1
		set_event_counter give_everything_to_faction_georgia_georgia 0
		give_everything_to_faction georgia georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_spain = 1
		set_event_counter give_everything_to_faction_georgia_spain 0
		give_everything_to_faction spain georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_portugal = 1
		set_event_counter give_everything_to_faction_georgia_portugal 0
		give_everything_to_faction portugal georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_normans = 1
		set_event_counter give_everything_to_faction_georgia_normans 0
		give_everything_to_faction normans georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_venice = 1
		set_event_counter give_everything_to_faction_georgia_venice 0
		give_everything_to_faction venice georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_milan = 1
		set_event_counter give_everything_to_faction_georgia_milan 0
		give_everything_to_faction milan georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_saxons = 1
		set_event_counter give_everything_to_faction_georgia_saxons 0
		give_everything_to_faction saxons georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_sicily = 1
		set_event_counter give_everything_to_faction_georgia_sicily 0
		give_everything_to_faction sicily georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_byzantium = 1
		set_event_counter give_everything_to_faction_georgia_byzantium 0
		give_everything_to_faction byzantium georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_tatar = 1
		set_event_counter give_everything_to_faction_georgia_tatar 0
		give_everything_to_faction tatar georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_moors = 1
		set_event_counter give_everything_to_faction_georgia_moors 0
		give_everything_to_faction moors georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_turks = 1
		set_event_counter give_everything_to_faction_georgia_turks 0
		give_everything_to_faction turks georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_egypt = 1
		set_event_counter give_everything_to_faction_georgia_egypt 0
		give_everything_to_faction egypt georgia false
	end_if
	if I_EventCounter give_everything_to_faction_georgia_abbasids = 1
		set_event_counter give_everything_to_faction_georgia_abbasids 0
		give_everything_to_faction abbasids georgia false
	end_if
	if I_EventCounter give_everything_to_faction_spain_france = 1
		set_event_counter give_everything_to_faction_spain_france 0
		give_everything_to_faction france spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_england = 1
		set_event_counter give_everything_to_faction_spain_england 0
		give_everything_to_faction england spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_hre = 1
		set_event_counter give_everything_to_faction_spain_hre 0
		give_everything_to_faction hre spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_scotland = 1
		set_event_counter give_everything_to_faction_spain_scotland 0
		give_everything_to_faction scotland spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_ireland = 1
		set_event_counter give_everything_to_faction_spain_ireland 0
		give_everything_to_faction ireland spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_denmark = 1
		set_event_counter give_everything_to_faction_spain_denmark 0
		give_everything_to_faction denmark spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_norway = 1
		set_event_counter give_everything_to_faction_spain_norway 0
		give_everything_to_faction norway spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_poland = 1
		set_event_counter give_everything_to_faction_spain_poland 0
		give_everything_to_faction poland spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_hungary = 1
		set_event_counter give_everything_to_faction_spain_hungary 0
		give_everything_to_faction hungary spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_novgorod = 1
		set_event_counter give_everything_to_faction_spain_novgorod 0
		give_everything_to_faction novgorod spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_lithuania = 1
		set_event_counter give_everything_to_faction_spain_lithuania 0
		give_everything_to_faction lithuania spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_russia = 1
		set_event_counter give_everything_to_faction_spain_russia 0
		give_everything_to_faction russia spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_georgia = 1
		set_event_counter give_everything_to_faction_spain_georgia 0
		give_everything_to_faction georgia spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_spain = 1
		set_event_counter give_everything_to_faction_spain_spain 0
		give_everything_to_faction spain spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_portugal = 1
		set_event_counter give_everything_to_faction_spain_portugal 0
		give_everything_to_faction portugal spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_normans = 1
		set_event_counter give_everything_to_faction_spain_normans 0
		give_everything_to_faction normans spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_venice = 1
		set_event_counter give_everything_to_faction_spain_venice 0
		give_everything_to_faction venice spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_milan = 1
		set_event_counter give_everything_to_faction_spain_milan 0
		give_everything_to_faction milan spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_saxons = 1
		set_event_counter give_everything_to_faction_spain_saxons 0
		give_everything_to_faction saxons spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_sicily = 1
		set_event_counter give_everything_to_faction_spain_sicily 0
		give_everything_to_faction sicily spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_byzantium = 1
		set_event_counter give_everything_to_faction_spain_byzantium 0
		give_everything_to_faction byzantium spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_tatar = 1
		set_event_counter give_everything_to_faction_spain_tatar 0
		give_everything_to_faction tatar spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_moors = 1
		set_event_counter give_everything_to_faction_spain_moors 0
		give_everything_to_faction moors spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_turks = 1
		set_event_counter give_everything_to_faction_spain_turks 0
		give_everything_to_faction turks spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_egypt = 1
		set_event_counter give_everything_to_faction_spain_egypt 0
		give_everything_to_faction egypt spain false
	end_if
	if I_EventCounter give_everything_to_faction_spain_abbasids = 1
		set_event_counter give_everything_to_faction_spain_abbasids 0
		give_everything_to_faction abbasids spain false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_france = 1
		set_event_counter give_everything_to_faction_portugal_france 0
		give_everything_to_faction france portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_england = 1
		set_event_counter give_everything_to_faction_portugal_england 0
		give_everything_to_faction england portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_hre = 1
		set_event_counter give_everything_to_faction_portugal_hre 0
		give_everything_to_faction hre portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_scotland = 1
		set_event_counter give_everything_to_faction_portugal_scotland 0
		give_everything_to_faction scotland portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_ireland = 1
		set_event_counter give_everything_to_faction_portugal_ireland 0
		give_everything_to_faction ireland portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_denmark = 1
		set_event_counter give_everything_to_faction_portugal_denmark 0
		give_everything_to_faction denmark portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_norway = 1
		set_event_counter give_everything_to_faction_portugal_norway 0
		give_everything_to_faction norway portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_poland = 1
		set_event_counter give_everything_to_faction_portugal_poland 0
		give_everything_to_faction poland portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_hungary = 1
		set_event_counter give_everything_to_faction_portugal_hungary 0
		give_everything_to_faction hungary portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_novgorod = 1
		set_event_counter give_everything_to_faction_portugal_novgorod 0
		give_everything_to_faction novgorod portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_lithuania = 1
		set_event_counter give_everything_to_faction_portugal_lithuania 0
		give_everything_to_faction lithuania portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_russia = 1
		set_event_counter give_everything_to_faction_portugal_russia 0
		give_everything_to_faction russia portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_georgia = 1
		set_event_counter give_everything_to_faction_portugal_georgia 0
		give_everything_to_faction georgia portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_spain = 1
		set_event_counter give_everything_to_faction_portugal_spain 0
		give_everything_to_faction spain portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_portugal = 1
		set_event_counter give_everything_to_faction_portugal_portugal 0
		give_everything_to_faction portugal portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_normans = 1
		set_event_counter give_everything_to_faction_portugal_normans 0
		give_everything_to_faction normans portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_venice = 1
		set_event_counter give_everything_to_faction_portugal_venice 0
		give_everything_to_faction venice portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_milan = 1
		set_event_counter give_everything_to_faction_portugal_milan 0
		give_everything_to_faction milan portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_saxons = 1
		set_event_counter give_everything_to_faction_portugal_saxons 0
		give_everything_to_faction saxons portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_sicily = 1
		set_event_counter give_everything_to_faction_portugal_sicily 0
		give_everything_to_faction sicily portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_byzantium = 1
		set_event_counter give_everything_to_faction_portugal_byzantium 0
		give_everything_to_faction byzantium portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_tatar = 1
		set_event_counter give_everything_to_faction_portugal_tatar 0
		give_everything_to_faction tatar portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_moors = 1
		set_event_counter give_everything_to_faction_portugal_moors 0
		give_everything_to_faction moors portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_turks = 1
		set_event_counter give_everything_to_faction_portugal_turks 0
		give_everything_to_faction turks portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_egypt = 1
		set_event_counter give_everything_to_faction_portugal_egypt 0
		give_everything_to_faction egypt portugal false
	end_if
	if I_EventCounter give_everything_to_faction_portugal_abbasids = 1
		set_event_counter give_everything_to_faction_portugal_abbasids 0
		give_everything_to_faction abbasids portugal false
	end_if
	if I_EventCounter give_everything_to_faction_normans_france = 1
		set_event_counter give_everything_to_faction_normans_france 0
		give_everything_to_faction france normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_england = 1
		set_event_counter give_everything_to_faction_normans_england 0
		give_everything_to_faction england normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_hre = 1
		set_event_counter give_everything_to_faction_normans_hre 0
		give_everything_to_faction hre normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_scotland = 1
		set_event_counter give_everything_to_faction_normans_scotland 0
		give_everything_to_faction scotland normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_ireland = 1
		set_event_counter give_everything_to_faction_normans_ireland 0
		give_everything_to_faction ireland normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_denmark = 1
		set_event_counter give_everything_to_faction_normans_denmark 0
		give_everything_to_faction denmark normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_norway = 1
		set_event_counter give_everything_to_faction_normans_norway 0
		give_everything_to_faction norway normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_poland = 1
		set_event_counter give_everything_to_faction_normans_poland 0
		give_everything_to_faction poland normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_hungary = 1
		set_event_counter give_everything_to_faction_normans_hungary 0
		give_everything_to_faction hungary normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_novgorod = 1
		set_event_counter give_everything_to_faction_normans_novgorod 0
		give_everything_to_faction novgorod normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_lithuania = 1
		set_event_counter give_everything_to_faction_normans_lithuania 0
		give_everything_to_faction lithuania normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_russia = 1
		set_event_counter give_everything_to_faction_normans_russia 0
		give_everything_to_faction russia normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_georgia = 1
		set_event_counter give_everything_to_faction_normans_georgia 0
		give_everything_to_faction georgia normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_spain = 1
		set_event_counter give_everything_to_faction_normans_spain 0
		give_everything_to_faction spain normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_portugal = 1
		set_event_counter give_everything_to_faction_normans_portugal 0
		give_everything_to_faction portugal normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_normans = 1
		set_event_counter give_everything_to_faction_normans_normans 0
		give_everything_to_faction normans normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_venice = 1
		set_event_counter give_everything_to_faction_normans_venice 0
		give_everything_to_faction venice normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_milan = 1
		set_event_counter give_everything_to_faction_normans_milan 0
		give_everything_to_faction milan normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_saxons = 1
		set_event_counter give_everything_to_faction_normans_saxons 0
		give_everything_to_faction saxons normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_sicily = 1
		set_event_counter give_everything_to_faction_normans_sicily 0
		give_everything_to_faction sicily normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_byzantium = 1
		set_event_counter give_everything_to_faction_normans_byzantium 0
		give_everything_to_faction byzantium normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_tatar = 1
		set_event_counter give_everything_to_faction_normans_tatar 0
		give_everything_to_faction tatar normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_moors = 1
		set_event_counter give_everything_to_faction_normans_moors 0
		give_everything_to_faction moors normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_turks = 1
		set_event_counter give_everything_to_faction_normans_turks 0
		give_everything_to_faction turks normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_egypt = 1
		set_event_counter give_everything_to_faction_normans_egypt 0
		give_everything_to_faction egypt normans false
	end_if
	if I_EventCounter give_everything_to_faction_normans_abbasids = 1
		set_event_counter give_everything_to_faction_normans_abbasids 0
		give_everything_to_faction abbasids normans false
	end_if
	if I_EventCounter give_everything_to_faction_venice_france = 1
		set_event_counter give_everything_to_faction_venice_france 0
		give_everything_to_faction france venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_england = 1
		set_event_counter give_everything_to_faction_venice_england 0
		give_everything_to_faction england venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_hre = 1
		set_event_counter give_everything_to_faction_venice_hre 0
		give_everything_to_faction hre venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_scotland = 1
		set_event_counter give_everything_to_faction_venice_scotland 0
		give_everything_to_faction scotland venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_ireland = 1
		set_event_counter give_everything_to_faction_venice_ireland 0
		give_everything_to_faction ireland venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_denmark = 1
		set_event_counter give_everything_to_faction_venice_denmark 0
		give_everything_to_faction denmark venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_norway = 1
		set_event_counter give_everything_to_faction_venice_norway 0
		give_everything_to_faction norway venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_poland = 1
		set_event_counter give_everything_to_faction_venice_poland 0
		give_everything_to_faction poland venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_hungary = 1
		set_event_counter give_everything_to_faction_venice_hungary 0
		give_everything_to_faction hungary venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_novgorod = 1
		set_event_counter give_everything_to_faction_venice_novgorod 0
		give_everything_to_faction novgorod venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_lithuania = 1
		set_event_counter give_everything_to_faction_venice_lithuania 0
		give_everything_to_faction lithuania venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_russia = 1
		set_event_counter give_everything_to_faction_venice_russia 0
		give_everything_to_faction russia venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_georgia = 1
		set_event_counter give_everything_to_faction_venice_georgia 0
		give_everything_to_faction georgia venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_spain = 1
		set_event_counter give_everything_to_faction_venice_spain 0
		give_everything_to_faction spain venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_portugal = 1
		set_event_counter give_everything_to_faction_venice_portugal 0
		give_everything_to_faction portugal venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_normans = 1
		set_event_counter give_everything_to_faction_venice_normans 0
		give_everything_to_faction normans venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_venice = 1
		set_event_counter give_everything_to_faction_venice_venice 0
		give_everything_to_faction venice venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_milan = 1
		set_event_counter give_everything_to_faction_venice_milan 0
		give_everything_to_faction milan venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_saxons = 1
		set_event_counter give_everything_to_faction_venice_saxons 0
		give_everything_to_faction saxons venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_sicily = 1
		set_event_counter give_everything_to_faction_venice_sicily 0
		give_everything_to_faction sicily venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_byzantium = 1
		set_event_counter give_everything_to_faction_venice_byzantium 0
		give_everything_to_faction byzantium venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_tatar = 1
		set_event_counter give_everything_to_faction_venice_tatar 0
		give_everything_to_faction tatar venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_moors = 1
		set_event_counter give_everything_to_faction_venice_moors 0
		give_everything_to_faction moors venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_turks = 1
		set_event_counter give_everything_to_faction_venice_turks 0
		give_everything_to_faction turks venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_egypt = 1
		set_event_counter give_everything_to_faction_venice_egypt 0
		give_everything_to_faction egypt venice false
	end_if
	if I_EventCounter give_everything_to_faction_venice_abbasids = 1
		set_event_counter give_everything_to_faction_venice_abbasids 0
		give_everything_to_faction abbasids venice false
	end_if
	if I_EventCounter give_everything_to_faction_milan_france = 1
		set_event_counter give_everything_to_faction_milan_france 0
		give_everything_to_faction france milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_england = 1
		set_event_counter give_everything_to_faction_milan_england 0
		give_everything_to_faction england milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_hre = 1
		set_event_counter give_everything_to_faction_milan_hre 0
		give_everything_to_faction hre milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_scotland = 1
		set_event_counter give_everything_to_faction_milan_scotland 0
		give_everything_to_faction scotland milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_ireland = 1
		set_event_counter give_everything_to_faction_milan_ireland 0
		give_everything_to_faction ireland milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_denmark = 1
		set_event_counter give_everything_to_faction_milan_denmark 0
		give_everything_to_faction denmark milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_norway = 1
		set_event_counter give_everything_to_faction_milan_norway 0
		give_everything_to_faction norway milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_poland = 1
		set_event_counter give_everything_to_faction_milan_poland 0
		give_everything_to_faction poland milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_hungary = 1
		set_event_counter give_everything_to_faction_milan_hungary 0
		give_everything_to_faction hungary milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_novgorod = 1
		set_event_counter give_everything_to_faction_milan_novgorod 0
		give_everything_to_faction novgorod milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_lithuania = 1
		set_event_counter give_everything_to_faction_milan_lithuania 0
		give_everything_to_faction lithuania milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_russia = 1
		set_event_counter give_everything_to_faction_milan_russia 0
		give_everything_to_faction russia milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_georgia = 1
		set_event_counter give_everything_to_faction_milan_georgia 0
		give_everything_to_faction georgia milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_spain = 1
		set_event_counter give_everything_to_faction_milan_spain 0
		give_everything_to_faction spain milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_portugal = 1
		set_event_counter give_everything_to_faction_milan_portugal 0
		give_everything_to_faction portugal milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_normans = 1
		set_event_counter give_everything_to_faction_milan_normans 0
		give_everything_to_faction normans milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_venice = 1
		set_event_counter give_everything_to_faction_milan_venice 0
		give_everything_to_faction venice milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_milan = 1
		set_event_counter give_everything_to_faction_milan_milan 0
		give_everything_to_faction milan milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_saxons = 1
		set_event_counter give_everything_to_faction_milan_saxons 0
		give_everything_to_faction saxons milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_sicily = 1
		set_event_counter give_everything_to_faction_milan_sicily 0
		give_everything_to_faction sicily milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_byzantium = 1
		set_event_counter give_everything_to_faction_milan_byzantium 0
		give_everything_to_faction byzantium milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_tatar = 1
		set_event_counter give_everything_to_faction_milan_tatar 0
		give_everything_to_faction tatar milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_moors = 1
		set_event_counter give_everything_to_faction_milan_moors 0
		give_everything_to_faction moors milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_turks = 1
		set_event_counter give_everything_to_faction_milan_turks 0
		give_everything_to_faction turks milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_egypt = 1
		set_event_counter give_everything_to_faction_milan_egypt 0
		give_everything_to_faction egypt milan false
	end_if
	if I_EventCounter give_everything_to_faction_milan_abbasids = 1
		set_event_counter give_everything_to_faction_milan_abbasids 0
		give_everything_to_faction abbasids milan false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_france = 1
		set_event_counter give_everything_to_faction_saxons_france 0
		give_everything_to_faction france saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_england = 1
		set_event_counter give_everything_to_faction_saxons_england 0
		give_everything_to_faction england saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_hre = 1
		set_event_counter give_everything_to_faction_saxons_hre 0
		give_everything_to_faction hre saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_scotland = 1
		set_event_counter give_everything_to_faction_saxons_scotland 0
		give_everything_to_faction scotland saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_ireland = 1
		set_event_counter give_everything_to_faction_saxons_ireland 0
		give_everything_to_faction ireland saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_denmark = 1
		set_event_counter give_everything_to_faction_saxons_denmark 0
		give_everything_to_faction denmark saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_norway = 1
		set_event_counter give_everything_to_faction_saxons_norway 0
		give_everything_to_faction norway saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_poland = 1
		set_event_counter give_everything_to_faction_saxons_poland 0
		give_everything_to_faction poland saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_hungary = 1
		set_event_counter give_everything_to_faction_saxons_hungary 0
		give_everything_to_faction hungary saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_novgorod = 1
		set_event_counter give_everything_to_faction_saxons_novgorod 0
		give_everything_to_faction novgorod saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_lithuania = 1
		set_event_counter give_everything_to_faction_saxons_lithuania 0
		give_everything_to_faction lithuania saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_russia = 1
		set_event_counter give_everything_to_faction_saxons_russia 0
		give_everything_to_faction russia saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_georgia = 1
		set_event_counter give_everything_to_faction_saxons_georgia 0
		give_everything_to_faction georgia saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_spain = 1
		set_event_counter give_everything_to_faction_saxons_spain 0
		give_everything_to_faction spain saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_portugal = 1
		set_event_counter give_everything_to_faction_saxons_portugal 0
		give_everything_to_faction portugal saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_normans = 1
		set_event_counter give_everything_to_faction_saxons_normans 0
		give_everything_to_faction normans saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_venice = 1
		set_event_counter give_everything_to_faction_saxons_venice 0
		give_everything_to_faction venice saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_milan = 1
		set_event_counter give_everything_to_faction_saxons_milan 0
		give_everything_to_faction milan saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_saxons = 1
		set_event_counter give_everything_to_faction_saxons_saxons 0
		give_everything_to_faction saxons saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_sicily = 1
		set_event_counter give_everything_to_faction_saxons_sicily 0
		give_everything_to_faction sicily saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_byzantium = 1
		set_event_counter give_everything_to_faction_saxons_byzantium 0
		give_everything_to_faction byzantium saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_tatar = 1
		set_event_counter give_everything_to_faction_saxons_tatar 0
		give_everything_to_faction tatar saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_moors = 1
		set_event_counter give_everything_to_faction_saxons_moors 0
		give_everything_to_faction moors saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_turks = 1
		set_event_counter give_everything_to_faction_saxons_turks 0
		give_everything_to_faction turks saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_egypt = 1
		set_event_counter give_everything_to_faction_saxons_egypt 0
		give_everything_to_faction egypt saxons false
	end_if
	if I_EventCounter give_everything_to_faction_saxons_abbasids = 1
		set_event_counter give_everything_to_faction_saxons_abbasids 0
		give_everything_to_faction abbasids saxons false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_france = 1
		set_event_counter give_everything_to_faction_sicily_france 0
		give_everything_to_faction france sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_england = 1
		set_event_counter give_everything_to_faction_sicily_england 0
		give_everything_to_faction england sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_hre = 1
		set_event_counter give_everything_to_faction_sicily_hre 0
		give_everything_to_faction hre sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_scotland = 1
		set_event_counter give_everything_to_faction_sicily_scotland 0
		give_everything_to_faction scotland sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_ireland = 1
		set_event_counter give_everything_to_faction_sicily_ireland 0
		give_everything_to_faction ireland sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_denmark = 1
		set_event_counter give_everything_to_faction_sicily_denmark 0
		give_everything_to_faction denmark sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_norway = 1
		set_event_counter give_everything_to_faction_sicily_norway 0
		give_everything_to_faction norway sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_poland = 1
		set_event_counter give_everything_to_faction_sicily_poland 0
		give_everything_to_faction poland sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_hungary = 1
		set_event_counter give_everything_to_faction_sicily_hungary 0
		give_everything_to_faction hungary sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_novgorod = 1
		set_event_counter give_everything_to_faction_sicily_novgorod 0
		give_everything_to_faction novgorod sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_lithuania = 1
		set_event_counter give_everything_to_faction_sicily_lithuania 0
		give_everything_to_faction lithuania sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_russia = 1
		set_event_counter give_everything_to_faction_sicily_russia 0
		give_everything_to_faction russia sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_georgia = 1
		set_event_counter give_everything_to_faction_sicily_georgia 0
		give_everything_to_faction georgia sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_spain = 1
		set_event_counter give_everything_to_faction_sicily_spain 0
		give_everything_to_faction spain sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_portugal = 1
		set_event_counter give_everything_to_faction_sicily_portugal 0
		give_everything_to_faction portugal sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_normans = 1
		set_event_counter give_everything_to_faction_sicily_normans 0
		give_everything_to_faction normans sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_venice = 1
		set_event_counter give_everything_to_faction_sicily_venice 0
		give_everything_to_faction venice sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_milan = 1
		set_event_counter give_everything_to_faction_sicily_milan 0
		give_everything_to_faction milan sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_saxons = 1
		set_event_counter give_everything_to_faction_sicily_saxons 0
		give_everything_to_faction saxons sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_sicily = 1
		set_event_counter give_everything_to_faction_sicily_sicily 0
		give_everything_to_faction sicily sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_byzantium = 1
		set_event_counter give_everything_to_faction_sicily_byzantium 0
		give_everything_to_faction byzantium sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_tatar = 1
		set_event_counter give_everything_to_faction_sicily_tatar 0
		give_everything_to_faction tatar sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_moors = 1
		set_event_counter give_everything_to_faction_sicily_moors 0
		give_everything_to_faction moors sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_turks = 1
		set_event_counter give_everything_to_faction_sicily_turks 0
		give_everything_to_faction turks sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_egypt = 1
		set_event_counter give_everything_to_faction_sicily_egypt 0
		give_everything_to_faction egypt sicily false
	end_if
	if I_EventCounter give_everything_to_faction_sicily_abbasids = 1
		set_event_counter give_everything_to_faction_sicily_abbasids 0
		give_everything_to_faction abbasids sicily false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_france = 1
		set_event_counter give_everything_to_faction_byzantium_france 0
		give_everything_to_faction france byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_england = 1
		set_event_counter give_everything_to_faction_byzantium_england 0
		give_everything_to_faction england byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_hre = 1
		set_event_counter give_everything_to_faction_byzantium_hre 0
		give_everything_to_faction hre byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_scotland = 1
		set_event_counter give_everything_to_faction_byzantium_scotland 0
		give_everything_to_faction scotland byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_ireland = 1
		set_event_counter give_everything_to_faction_byzantium_ireland 0
		give_everything_to_faction ireland byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_denmark = 1
		set_event_counter give_everything_to_faction_byzantium_denmark 0
		give_everything_to_faction denmark byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_norway = 1
		set_event_counter give_everything_to_faction_byzantium_norway 0
		give_everything_to_faction norway byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_poland = 1
		set_event_counter give_everything_to_faction_byzantium_poland 0
		give_everything_to_faction poland byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_hungary = 1
		set_event_counter give_everything_to_faction_byzantium_hungary 0
		give_everything_to_faction hungary byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_novgorod = 1
		set_event_counter give_everything_to_faction_byzantium_novgorod 0
		give_everything_to_faction novgorod byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_lithuania = 1
		set_event_counter give_everything_to_faction_byzantium_lithuania 0
		give_everything_to_faction lithuania byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_russia = 1
		set_event_counter give_everything_to_faction_byzantium_russia 0
		give_everything_to_faction russia byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_georgia = 1
		set_event_counter give_everything_to_faction_byzantium_georgia 0
		give_everything_to_faction georgia byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_spain = 1
		set_event_counter give_everything_to_faction_byzantium_spain 0
		give_everything_to_faction spain byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_portugal = 1
		set_event_counter give_everything_to_faction_byzantium_portugal 0
		give_everything_to_faction portugal byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_normans = 1
		set_event_counter give_everything_to_faction_byzantium_normans 0
		give_everything_to_faction normans byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_venice = 1
		set_event_counter give_everything_to_faction_byzantium_venice 0
		give_everything_to_faction venice byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_milan = 1
		set_event_counter give_everything_to_faction_byzantium_milan 0
		give_everything_to_faction milan byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_saxons = 1
		set_event_counter give_everything_to_faction_byzantium_saxons 0
		give_everything_to_faction saxons byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_sicily = 1
		set_event_counter give_everything_to_faction_byzantium_sicily 0
		give_everything_to_faction sicily byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_byzantium = 1
		set_event_counter give_everything_to_faction_byzantium_byzantium 0
		give_everything_to_faction byzantium byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_tatar = 1
		set_event_counter give_everything_to_faction_byzantium_tatar 0
		give_everything_to_faction tatar byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_moors = 1
		set_event_counter give_everything_to_faction_byzantium_moors 0
		give_everything_to_faction moors byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_turks = 1
		set_event_counter give_everything_to_faction_byzantium_turks 0
		give_everything_to_faction turks byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_egypt = 1
		set_event_counter give_everything_to_faction_byzantium_egypt 0
		give_everything_to_faction egypt byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_byzantium_abbasids = 1
		set_event_counter give_everything_to_faction_byzantium_abbasids 0
		give_everything_to_faction abbasids byzantium false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_france = 1
		set_event_counter give_everything_to_faction_tatar_france 0
		give_everything_to_faction france tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_england = 1
		set_event_counter give_everything_to_faction_tatar_england 0
		give_everything_to_faction england tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_hre = 1
		set_event_counter give_everything_to_faction_tatar_hre 0
		give_everything_to_faction hre tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_scotland = 1
		set_event_counter give_everything_to_faction_tatar_scotland 0
		give_everything_to_faction scotland tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_ireland = 1
		set_event_counter give_everything_to_faction_tatar_ireland 0
		give_everything_to_faction ireland tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_denmark = 1
		set_event_counter give_everything_to_faction_tatar_denmark 0
		give_everything_to_faction denmark tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_norway = 1
		set_event_counter give_everything_to_faction_tatar_norway 0
		give_everything_to_faction norway tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_poland = 1
		set_event_counter give_everything_to_faction_tatar_poland 0
		give_everything_to_faction poland tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_hungary = 1
		set_event_counter give_everything_to_faction_tatar_hungary 0
		give_everything_to_faction hungary tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_novgorod = 1
		set_event_counter give_everything_to_faction_tatar_novgorod 0
		give_everything_to_faction novgorod tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_lithuania = 1
		set_event_counter give_everything_to_faction_tatar_lithuania 0
		give_everything_to_faction lithuania tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_russia = 1
		set_event_counter give_everything_to_faction_tatar_russia 0
		give_everything_to_faction russia tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_georgia = 1
		set_event_counter give_everything_to_faction_tatar_georgia 0
		give_everything_to_faction georgia tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_spain = 1
		set_event_counter give_everything_to_faction_tatar_spain 0
		give_everything_to_faction spain tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_portugal = 1
		set_event_counter give_everything_to_faction_tatar_portugal 0
		give_everything_to_faction portugal tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_normans = 1
		set_event_counter give_everything_to_faction_tatar_normans 0
		give_everything_to_faction normans tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_venice = 1
		set_event_counter give_everything_to_faction_tatar_venice 0
		give_everything_to_faction venice tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_milan = 1
		set_event_counter give_everything_to_faction_tatar_milan 0
		give_everything_to_faction milan tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_saxons = 1
		set_event_counter give_everything_to_faction_tatar_saxons 0
		give_everything_to_faction saxons tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_sicily = 1
		set_event_counter give_everything_to_faction_tatar_sicily 0
		give_everything_to_faction sicily tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_byzantium = 1
		set_event_counter give_everything_to_faction_tatar_byzantium 0
		give_everything_to_faction byzantium tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_tatar = 1
		set_event_counter give_everything_to_faction_tatar_tatar 0
		give_everything_to_faction tatar tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_moors = 1
		set_event_counter give_everything_to_faction_tatar_moors 0
		give_everything_to_faction moors tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_turks = 1
		set_event_counter give_everything_to_faction_tatar_turks 0
		give_everything_to_faction turks tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_egypt = 1
		set_event_counter give_everything_to_faction_tatar_egypt 0
		give_everything_to_faction egypt tatar false
	end_if
	if I_EventCounter give_everything_to_faction_tatar_abbasids = 1
		set_event_counter give_everything_to_faction_tatar_abbasids 0
		give_everything_to_faction abbasids tatar false
	end_if
	if I_EventCounter give_everything_to_faction_moors_france = 1
		set_event_counter give_everything_to_faction_moors_france 0
		give_everything_to_faction france moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_england = 1
		set_event_counter give_everything_to_faction_moors_england 0
		give_everything_to_faction england moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_hre = 1
		set_event_counter give_everything_to_faction_moors_hre 0
		give_everything_to_faction hre moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_scotland = 1
		set_event_counter give_everything_to_faction_moors_scotland 0
		give_everything_to_faction scotland moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_ireland = 1
		set_event_counter give_everything_to_faction_moors_ireland 0
		give_everything_to_faction ireland moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_denmark = 1
		set_event_counter give_everything_to_faction_moors_denmark 0
		give_everything_to_faction denmark moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_norway = 1
		set_event_counter give_everything_to_faction_moors_norway 0
		give_everything_to_faction norway moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_poland = 1
		set_event_counter give_everything_to_faction_moors_poland 0
		give_everything_to_faction poland moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_hungary = 1
		set_event_counter give_everything_to_faction_moors_hungary 0
		give_everything_to_faction hungary moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_novgorod = 1
		set_event_counter give_everything_to_faction_moors_novgorod 0
		give_everything_to_faction novgorod moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_lithuania = 1
		set_event_counter give_everything_to_faction_moors_lithuania 0
		give_everything_to_faction lithuania moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_russia = 1
		set_event_counter give_everything_to_faction_moors_russia 0
		give_everything_to_faction russia moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_georgia = 1
		set_event_counter give_everything_to_faction_moors_georgia 0
		give_everything_to_faction georgia moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_spain = 1
		set_event_counter give_everything_to_faction_moors_spain 0
		give_everything_to_faction spain moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_portugal = 1
		set_event_counter give_everything_to_faction_moors_portugal 0
		give_everything_to_faction portugal moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_normans = 1
		set_event_counter give_everything_to_faction_moors_normans 0
		give_everything_to_faction normans moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_venice = 1
		set_event_counter give_everything_to_faction_moors_venice 0
		give_everything_to_faction venice moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_milan = 1
		set_event_counter give_everything_to_faction_moors_milan 0
		give_everything_to_faction milan moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_saxons = 1
		set_event_counter give_everything_to_faction_moors_saxons 0
		give_everything_to_faction saxons moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_sicily = 1
		set_event_counter give_everything_to_faction_moors_sicily 0
		give_everything_to_faction sicily moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_byzantium = 1
		set_event_counter give_everything_to_faction_moors_byzantium 0
		give_everything_to_faction byzantium moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_tatar = 1
		set_event_counter give_everything_to_faction_moors_tatar 0
		give_everything_to_faction tatar moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_moors = 1
		set_event_counter give_everything_to_faction_moors_moors 0
		give_everything_to_faction moors moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_turks = 1
		set_event_counter give_everything_to_faction_moors_turks 0
		give_everything_to_faction turks moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_egypt = 1
		set_event_counter give_everything_to_faction_moors_egypt 0
		give_everything_to_faction egypt moors false
	end_if
	if I_EventCounter give_everything_to_faction_moors_abbasids = 1
		set_event_counter give_everything_to_faction_moors_abbasids 0
		give_everything_to_faction abbasids moors false
	end_if
	if I_EventCounter give_everything_to_faction_turks_france = 1
		set_event_counter give_everything_to_faction_turks_france 0
		give_everything_to_faction france turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_england = 1
		set_event_counter give_everything_to_faction_turks_england 0
		give_everything_to_faction england turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_hre = 1
		set_event_counter give_everything_to_faction_turks_hre 0
		give_everything_to_faction hre turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_scotland = 1
		set_event_counter give_everything_to_faction_turks_scotland 0
		give_everything_to_faction scotland turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_ireland = 1
		set_event_counter give_everything_to_faction_turks_ireland 0
		give_everything_to_faction ireland turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_denmark = 1
		set_event_counter give_everything_to_faction_turks_denmark 0
		give_everything_to_faction denmark turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_norway = 1
		set_event_counter give_everything_to_faction_turks_norway 0
		give_everything_to_faction norway turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_poland = 1
		set_event_counter give_everything_to_faction_turks_poland 0
		give_everything_to_faction poland turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_hungary = 1
		set_event_counter give_everything_to_faction_turks_hungary 0
		give_everything_to_faction hungary turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_novgorod = 1
		set_event_counter give_everything_to_faction_turks_novgorod 0
		give_everything_to_faction novgorod turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_lithuania = 1
		set_event_counter give_everything_to_faction_turks_lithuania 0
		give_everything_to_faction lithuania turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_russia = 1
		set_event_counter give_everything_to_faction_turks_russia 0
		give_everything_to_faction russia turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_georgia = 1
		set_event_counter give_everything_to_faction_turks_georgia 0
		give_everything_to_faction georgia turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_spain = 1
		set_event_counter give_everything_to_faction_turks_spain 0
		give_everything_to_faction spain turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_portugal = 1
		set_event_counter give_everything_to_faction_turks_portugal 0
		give_everything_to_faction portugal turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_normans = 1
		set_event_counter give_everything_to_faction_turks_normans 0
		give_everything_to_faction normans turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_venice = 1
		set_event_counter give_everything_to_faction_turks_venice 0
		give_everything_to_faction venice turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_milan = 1
		set_event_counter give_everything_to_faction_turks_milan 0
		give_everything_to_faction milan turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_saxons = 1
		set_event_counter give_everything_to_faction_turks_saxons 0
		give_everything_to_faction saxons turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_sicily = 1
		set_event_counter give_everything_to_faction_turks_sicily 0
		give_everything_to_faction sicily turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_byzantium = 1
		set_event_counter give_everything_to_faction_turks_byzantium 0
		give_everything_to_faction byzantium turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_tatar = 1
		set_event_counter give_everything_to_faction_turks_tatar 0
		give_everything_to_faction tatar turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_moors = 1
		set_event_counter give_everything_to_faction_turks_moors 0
		give_everything_to_faction moors turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_turks = 1
		set_event_counter give_everything_to_faction_turks_turks 0
		give_everything_to_faction turks turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_egypt = 1
		set_event_counter give_everything_to_faction_turks_egypt 0
		give_everything_to_faction egypt turks false
	end_if
	if I_EventCounter give_everything_to_faction_turks_abbasids = 1
		set_event_counter give_everything_to_faction_turks_abbasids 0
		give_everything_to_faction abbasids turks false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_france = 1
		set_event_counter give_everything_to_faction_egypt_france 0
		give_everything_to_faction france egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_england = 1
		set_event_counter give_everything_to_faction_egypt_england 0
		give_everything_to_faction england egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_hre = 1
		set_event_counter give_everything_to_faction_egypt_hre 0
		give_everything_to_faction hre egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_scotland = 1
		set_event_counter give_everything_to_faction_egypt_scotland 0
		give_everything_to_faction scotland egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_ireland = 1
		set_event_counter give_everything_to_faction_egypt_ireland 0
		give_everything_to_faction ireland egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_denmark = 1
		set_event_counter give_everything_to_faction_egypt_denmark 0
		give_everything_to_faction denmark egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_norway = 1
		set_event_counter give_everything_to_faction_egypt_norway 0
		give_everything_to_faction norway egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_poland = 1
		set_event_counter give_everything_to_faction_egypt_poland 0
		give_everything_to_faction poland egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_hungary = 1
		set_event_counter give_everything_to_faction_egypt_hungary 0
		give_everything_to_faction hungary egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_novgorod = 1
		set_event_counter give_everything_to_faction_egypt_novgorod 0
		give_everything_to_faction novgorod egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_lithuania = 1
		set_event_counter give_everything_to_faction_egypt_lithuania 0
		give_everything_to_faction lithuania egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_russia = 1
		set_event_counter give_everything_to_faction_egypt_russia 0
		give_everything_to_faction russia egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_georgia = 1
		set_event_counter give_everything_to_faction_egypt_georgia 0
		give_everything_to_faction georgia egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_spain = 1
		set_event_counter give_everything_to_faction_egypt_spain 0
		give_everything_to_faction spain egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_portugal = 1
		set_event_counter give_everything_to_faction_egypt_portugal 0
		give_everything_to_faction portugal egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_normans = 1
		set_event_counter give_everything_to_faction_egypt_normans 0
		give_everything_to_faction normans egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_venice = 1
		set_event_counter give_everything_to_faction_egypt_venice 0
		give_everything_to_faction venice egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_milan = 1
		set_event_counter give_everything_to_faction_egypt_milan 0
		give_everything_to_faction milan egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_saxons = 1
		set_event_counter give_everything_to_faction_egypt_saxons 0
		give_everything_to_faction saxons egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_sicily = 1
		set_event_counter give_everything_to_faction_egypt_sicily 0
		give_everything_to_faction sicily egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_byzantium = 1
		set_event_counter give_everything_to_faction_egypt_byzantium 0
		give_everything_to_faction byzantium egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_tatar = 1
		set_event_counter give_everything_to_faction_egypt_tatar 0
		give_everything_to_faction tatar egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_moors = 1
		set_event_counter give_everything_to_faction_egypt_moors 0
		give_everything_to_faction moors egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_turks = 1
		set_event_counter give_everything_to_faction_egypt_turks 0
		give_everything_to_faction turks egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_egypt = 1
		set_event_counter give_everything_to_faction_egypt_egypt 0
		give_everything_to_faction egypt egypt false
	end_if
	if I_EventCounter give_everything_to_faction_egypt_abbasids = 1
		set_event_counter give_everything_to_faction_egypt_abbasids 0
		give_everything_to_faction abbasids egypt false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_france = 1
		set_event_counter give_everything_to_faction_abbasids_france 0
		give_everything_to_faction france abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_england = 1
		set_event_counter give_everything_to_faction_abbasids_england 0
		give_everything_to_faction england abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_hre = 1
		set_event_counter give_everything_to_faction_abbasids_hre 0
		give_everything_to_faction hre abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_scotland = 1
		set_event_counter give_everything_to_faction_abbasids_scotland 0
		give_everything_to_faction scotland abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_ireland = 1
		set_event_counter give_everything_to_faction_abbasids_ireland 0
		give_everything_to_faction ireland abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_denmark = 1
		set_event_counter give_everything_to_faction_abbasids_denmark 0
		give_everything_to_faction denmark abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_norway = 1
		set_event_counter give_everything_to_faction_abbasids_norway 0
		give_everything_to_faction norway abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_poland = 1
		set_event_counter give_everything_to_faction_abbasids_poland 0
		give_everything_to_faction poland abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_hungary = 1
		set_event_counter give_everything_to_faction_abbasids_hungary 0
		give_everything_to_faction hungary abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_novgorod = 1
		set_event_counter give_everything_to_faction_abbasids_novgorod 0
		give_everything_to_faction novgorod abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_lithuania = 1
		set_event_counter give_everything_to_faction_abbasids_lithuania 0
		give_everything_to_faction lithuania abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_russia = 1
		set_event_counter give_everything_to_faction_abbasids_russia 0
		give_everything_to_faction russia abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_georgia = 1
		set_event_counter give_everything_to_faction_abbasids_georgia 0
		give_everything_to_faction georgia abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_spain = 1
		set_event_counter give_everything_to_faction_abbasids_spain 0
		give_everything_to_faction spain abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_portugal = 1
		set_event_counter give_everything_to_faction_abbasids_portugal 0
		give_everything_to_faction portugal abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_normans = 1
		set_event_counter give_everything_to_faction_abbasids_normans 0
		give_everything_to_faction normans abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_venice = 1
		set_event_counter give_everything_to_faction_abbasids_venice 0
		give_everything_to_faction venice abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_milan = 1
		set_event_counter give_everything_to_faction_abbasids_milan 0
		give_everything_to_faction milan abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_saxons = 1
		set_event_counter give_everything_to_faction_abbasids_saxons 0
		give_everything_to_faction saxons abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_sicily = 1
		set_event_counter give_everything_to_faction_abbasids_sicily 0
		give_everything_to_faction sicily abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_byzantium = 1
		set_event_counter give_everything_to_faction_abbasids_byzantium 0
		give_everything_to_faction byzantium abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_tatar = 1
		set_event_counter give_everything_to_faction_abbasids_tatar 0
		give_everything_to_faction tatar abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_moors = 1
		set_event_counter give_everything_to_faction_abbasids_moors 0
		give_everything_to_faction moors abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_turks = 1
		set_event_counter give_everything_to_faction_abbasids_turks 0
		give_everything_to_faction turks abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_egypt = 1
		set_event_counter give_everything_to_faction_abbasids_egypt 0
		give_everything_to_faction egypt abbasids false
	end_if
	if I_EventCounter give_everything_to_faction_abbasids_abbasids = 1
		set_event_counter give_everything_to_faction_abbasids_abbasids 0
		give_everything_to_faction abbasids abbasids false
	end_if



	set_event_counter give_everything_to_faction_2 0
end_script

---

Еще один скрипт, автоматически меняющий наследника на кровного(трейт "Французская кровь", Английская и т.д. - та династия, что со старта правители), т.е. теперь, если комп будет назначать наследником приемыша, то скрипт быстро вернет наследную корону кому надо Работает для всех фракций.

Спойлер (раскрыть)

function onBecomesFactionHeir(heir)
	if gDataCamp.passedTurnsNum>0 then 

		if ((hasTrait(heir, "Royal_Blood_"..heir.faction:getFactionName()))~=1) then 
			for ch = 0, heir.faction.numOfCharacters-1 do
				local ourCharacter = heir.faction:getCharacter(ch);

				if ourCharacter:getTypeID()==7 
					and ourCharacter:getTypeID()~=6
					and ourCharacter.namedCharacter:isAlive()==true 
					and ourCharacter.namedCharacter.status==0	--ordinary character
					and ourCharacter.namedCharacter.status~=5	--leader
					and ourCharacter.namedCharacter.status~=2	--heir
					and((hasTrait(ourCharacter.namedCharacter, "Royal_Blood_"..heir.faction:getFactionName()))==1) then 

					ourCharacter.namedCharacter:setAsHeir(false);
					ourCharacter.namedCharacter:setAsHeir(true);
					log_always("Наследник королевской крови . "..heir.faction:getFactionName().." . "..ourCharacter.namedCharacter.fullName);
				end
			end
		end

	end
end

---

Еще скрипт "Автоматического пополнения флота в портах" (вроде еще не писал)
Автоматически будет пополнятся по несколько человек или ни одного - рандом

Спойлер (раскрыть)

function replenishment_fleet()
	for f=0, 30 do
		local fac = stratmap.game.getFaction(f);

		for i=0, fac.stacksNum-1 do
			local stack = fac:getStack(i);  

			for p = 0, stack.faction.portsNum-1 do
				local ourPort = stack.faction:getPort(p);

				if ourPort:getDockCoords()~=nil
					and stack.leader~=nil
					and ourPort:getDockCoords().x==stack.leader.xCoord and ourPort:getDockCoords().y==stack.leader.yCoord then 

					for un=0, stack.numOfUnits-1 do
						local stack_unit = stack:getUnit(un);
						local unit_soldier = stack_unit.soldierCountStratMap;
						local unit_soldier_max = stack_unit.soldierCountStratMapMax;
						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 - "..gDataCamp.currentFaction:getFactionName().." "..stack.leader.namedCharacter.fullName.." "..stack_unit.eduEntry.Type.." "..random_value.." "..random_value*random_cost.." ---");
						end
						if (unit_soldier_max-(unit_soldier + random_value) < 2) then
							stack_unit.soldierCountStratMap=unit_soldier_max;
							gDataCamp.currentFaction.money=gDataCamp.currentFaction.money-random_value*random_cost;

							log_always("--- пополнение армии2 - "..gDataCamp.currentFaction:getFactionName().." "..stack.leader.namedCharacter.fullName.." "..stack_unit.eduEntry.Type.." "..random_value.." "..random_value*random_cost.." ---");
						end 
					end
				end
			end
		end
	end
end

---

Вроде еще что-то мелкое было, но не помню уже) Пока, думаю скриптами все. Теперь начну тащить юниты +500 и думать как реализовать их наем. Так-то Юней обещал помочь с этим, даже что-то уже сделал. В общем, если все будет норм, то будет новая система найма для этих юнитов. Будет наем в городах, в поле наемников, и третье, новое, скорее всего в фортах. На край сделаю их пока скриптовыми - наем через евент какой-нибудь

[DinarMayor]

Объяснил камраду как перетащить скрипт дезертирства в свой мод. Может кому-нибудь пригодиться. Я тут не все нюансы прописал, т.к. инфы разом будет много - там просто дальше в файле deserters.lua нужно будет под себя, под мод, еще поменять название и кол-во фракций и кол-во отнимаемых солдат.

Ты скачал уже мод?
Если да, то нужно сделать следующие:
-скачай Для просмотра ссылки Зарегистрируйтесь и установи в папку своего мода

Спойлер (раскрыть)

-должно получиться примерно вот так

Спойлер (раскрыть)

-запусти M2TWEOP GUI.exe(далее играть/запускать игру только через него)
-пропиши свой cfg файл мода

Спойлер (раскрыть)

-открой в моем моде папку DenMod_v.1.0\youneuoy_Data\plugins\lua\DenMod
-найди файл deserters.lua и скопируй ее в свой мод в папку youneuoy_Data\plugins\lua.
-открой файл luaPluginScript.lua и добавь почти в начале файла строку

	require('deserters')

Спойлер (раскрыть)

а вот это в самом конце этого же файла

function hasTrait(namedChar, trait)
	local currTrait = namedChar:getTraits()
	if (currTrait ~= nil) then
		while currTrait ~= nil do
			if (currTrait.name == trait) then 
				local lvl = currTrait.level
					return lvl            
				else currTrait = currTrait.nextTrait
			end
		end
	end
	return 0
end

function onChangeTurnNum(turnNum)
	deserters();
end

-попробуй запустить и промотать ходы. Войска будут дезертировать, если будут находиться на нейтральных или враждебных землях.


Попробуй сперва сделать это, если все получиться(или нет), то объясню дальше.

[DinarMayor]

DinarMayor (03 декабря 2022, 20:37):

Xamax (03 декабря 2022, 20:23):

монголы жалко не могут религию менять
хотя бы ходов через 30 после оседания в первой провинции

Это можно устроить ,кстати - я об этом думал. Можно сделать, например, если городов штуки три и прошло, как ты говоришь, ходов 30, то скрипт смены религии будет и на них работать(тимуриды тоже). Если до НГ успею - сделаю.

Добавил монголов и тимуридов в скрипт смены религии. Плюс немного переписал сам скрипт. Монголы и тимуриды будут менять религию:
-если прошло примерно 40 ходов после их вторжения
-и если у них не меньше пяти провинций

Остальное работает также, как и раньше

Цитата

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

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

Сам скрипт

new_religion.lua (Раскрыть)

function setFacReligion(fac)
	--log_always("--- setFacReligion --- ")

	stratmap.game.setScriptCounter("is_the_catholic",0);
	stratmap.game.setScriptCounter("is_the_orthodox",0);
	stratmap.game.setScriptCounter("is_the_islam",0);
	stratmap.game.setScriptCounter("is_the_pagan",0);
	stratmap.game.setScriptCounter("is_the_heretic",0);
	stratmap.game.setScriptCounter("is_the_shaman",0);
	stratmap.game.setScriptCounter("is_the_sun_god",0);

	if fac:getFactionName()~="slave"
		and fac:getFactionName()~="papal_states"
		and fac:getFactionName()~="mongols"
		and fac:getFactionName()~="timurids" then

		checkSettlementReligion(fac);
	end
	if fac:getFactionName()=="mongols"
		and gDataCamp.passedTurnsNum>184
		and fac.settlementsNum>=5 then

		checkSettlementReligion(fac);
	end
	if fac:getFactionName()=="timurids"
		and gDataCamp.passedTurnsNum>344
		and fac.settlementsNum>=5 then

		checkSettlementReligion(fac);
	end
end

function checkSettlementReligion(fac)
	ca = 0;		--- catholic
	ot = 0;		--- orthodox
	is = 0;		--- islam
	pa = 0;		--- pagan
	he = 0;		--- heretic
	sh = 0;		--- shaman
	su = 0;		--- sun_god
	for i=0, fac.settlementsNum-1 do
		local settlement = fac:getSettlement(i);

		if (settlement:getReligion(0)>=0.55) then
			ca = ca + 1;
			if ca==fac.settlementsNum
				and settlement.ownerFaction.religion~=0 then
				settlement.ownerFaction.religion=0;
				destroyReligionBuilding(fac);
				ca = 0;
				stratmap.game.setScriptCounter("catholic_"..fac:getFactionName(),1);
			end
		end
		if (settlement:getReligion(1)>=0.55) then
			ot = ot + 1;
			if ot==fac.settlementsNum
				and settlement.ownerFaction.religion~=1 then
				settlement.ownerFaction.religion=1;
				destroyReligionBuilding(fac);
				ot = 0;
				stratmap.game.setScriptCounter("orthodox_"..fac:getFactionName(),1);
			end
		end
		if (settlement:getReligion(2)>=0.55) then
			is = is + 1;
			if is==fac.settlementsNum
				and settlement.ownerFaction.religion~=2 then
				settlement.ownerFaction.religion=2;
				destroyReligionBuilding(fac);
				is = 0;
				stratmap.game.setScriptCounter("islam_"..fac:getFactionName(),1);
			end
		end
		if (settlement:getReligion(3)>=0.55) then
			pa = pa + 1;
			if pa==fac.settlementsNum
				and settlement.ownerFaction.religion~=3 then
				settlement.ownerFaction.religion=3;
				destroyReligionBuilding(fac);
				pa = 0;
				stratmap.game.setScriptCounter("pagan_"..fac:getFactionName(),1);
			end
		end
		if (settlement:getReligion(4)>=0.55) then
			he = he + 1;
			if he==fac.settlementsNum
				and settlement.ownerFaction.religion~=4 then
				settlement.ownerFaction.religion=4;
				destroyReligionBuilding(fac);
				he = 0;
				stratmap.game.setScriptCounter("heretic_"..fac:getFactionName(),1);
			end
		end
		if (settlement:getReligion(5)>=0.55) then
			sh = sh + 1;
			if sh==fac.settlementsNum
				and settlement.ownerFaction.religion~=5 then
				settlement.ownerFaction.religion=5;
				destroyReligionBuilding(fac);
				sh = 0;
				stratmap.game.setScriptCounter("shaman_"..fac:getFactionName(),1);
			end
		end
		if (settlement:getReligion(6)>=0.55) then
			su = su + 1;
			if su==fac.settlementsNum
				and settlement.ownerFaction.religion~=6 then
				settlement.ownerFaction.religion=6;
				destroyReligionBuilding(fac);
				su = 0;
				stratmap.game.setScriptCounter("sun_god_"..fac:getFactionName(),1);
			end
		end
	end
end

function destroyReligionBuilding(fac)
	for i=0, fac.settlementsNum-1 do
		local settlement = fac:getSettlement(i);

		settlement:destroyBuilding("temple_catholic",false);
		settlement:destroyBuilding("temple_catholic_castle",false);
		settlement:destroyBuilding("guild_templars_chapter_house",false);
		settlement:destroyBuilding("guild_st_johns_chapter_house",false);
		settlement:destroyBuilding("guild_teutonic_knights_chapter_house",false);

		settlement:destroyBuilding("guild_knights_of_santiago_chapter_house",false);

		settlement:destroyBuilding("casa_teutonici",false);
		settlement:destroyBuilding("casa_templari",false);
		settlement:destroyBuilding("casa_ospitallieri",false);

		settlement:destroyBuilding("temple_orthodox",false);
		settlement:destroyBuilding("temple_orthodox_castle",false);
		settlement:destroyBuilding("icon_art",false);

		settlement:destroyBuilding("temple_muslim",false);
		settlement:destroyBuilding("temple_muslim_castle",false);

		settlement:destroyBuilding("temple_pagan",false);

		settlement:destroyBuilding("temple_dievas",false);
		settlement:destroyBuilding("temple_dievas_castle",false);

		settlement:destroyBuilding("temple_perkunas",false);
		settlement:destroyBuilding("temple_perkunas_castle",false);

		settlement:destroyBuilding("temple_giltine",false);
		settlement:destroyBuilding("temple_giltine_castle",false);

		settlement:destroyBuilding("temple_tengir",false);
	end
end

--- Для ЕДБ
function getFacReligion(fac)
	if fac.religion==0 then
		stratmap.game.setScriptCounter("is_the_catholic",1);
	end
	if fac.religion==1 then
		stratmap.game.setScriptCounter("is_the_orthodox",1);
	end
	if fac.religion==2 then
		stratmap.game.setScriptCounter("is_the_islam",1);
	end
	if fac.religion==3 then
		stratmap.game.setScriptCounter("is_the_pagan",1);
	end
	if fac.religion==4 then
		stratmap.game.setScriptCounter("is_the_heretic",1);
	end
	if fac.religion==5 then
		stratmap.game.setScriptCounter("is_the_shaman",1);
	end
	if fac.religion==6 then
		stratmap.game.setScriptCounter("is_the_sun_god",1);
	end
end