Create Surplus Units in faction Homeland regions

**JMRC** · 06-20-2007, 10:46

Hi.

it is known that the AI for some unexplained reason, at some point in the game, reduces unit creation, despite having the necessary resources to do so (population and money). It seems that the AI wants the faction to stabilize the number of units at a certain level...

Anyway, to counteract that, I made some changes in the EBBS_SCRIPT.TXT (which are not yet completed, since they will be very large...) but I want to share with you to get some comments about it.

The code which I already wrote is below. The idea is to check at the EndTurn of each Settlement if it meets the following criteria:

- Is not Local
- Belongs to the faction that I'm creating the unit
- The Settlement population is not too low
- The Training Queue is Idle despite cash
- The Settlement did not produce a unit this turn

Then I check which is the factional MIC building that exists in the settlement and create a unit that I think is most appropriate for that faction. I use the rules in the EDB file, in order to create units that are legal in that faction and settlement.

Note: I think the TrainingQueueIdleDespiteCash condition doesn't work at the SettlementTurnEnd event, because in that moment, the unit has already been created, so the Training Queue is empty... Anyway I'll keep it here for now. I had to use the UnitTrained event to pass over this problem.

I only have the code for the capital settlement of a few factions. I intend to extend to each homeland settlement (even if it doesn't belong to the faction at the start of the game).

Code:

;-------------------------------------------------------------------
;Casse

;Declare unit trained settlement counters
declare_counter ut_camulosadae

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType britons
	set_counter ut_camulosadae = 0
end_monitor

monitor_event UnitTrained SettlementName Camulosadae
	and not FactionIsLocal
		set_counter ut_camulosadae 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = muster_field_D
		console_command create_unit Camulosadae "celtic infantry lugoae" 1
		console_command add_money britons, -859
		console_command add_population Camulosadae -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = militia_barracks_D1
		console_command create_unit Camulosadae "celtic infantry botroas" 1
		console_command add_money britons, -1155
		console_command add_population Camulosadae -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = city_barracks_D1
		console_command create_unit Camulosadae "celtic infantry gaeroas" 1
		console_command add_money britons, -1340
		console_command add_population Camulosadae -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = army_barracks_D1
		console_command create_unit Camulosadae "celtic chariot cidainh" 1
		console_command add_money britons, -2695
		console_command add_population Camulosadae -40
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = royal_barracks_D1
		console_command create_unit Camulosadae "celtic chariot cidainh" 1
		console_command add_money britons, -2695
		console_command add_population Camulosadae -40
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = militia_barracks_D2
		console_command create_unit Camulosadae "celtic infantry gaeroas" 1
		console_command add_money britons, -1340
		console_command add_population Camulosadae -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = city_barracks_D2
		console_command create_unit Camulosadae "celtic infantry milnaht" 1
		console_command add_money britons, -2001
		console_command add_population Camulosadae -81
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = army_barracks_D2
		console_command create_unit Camulosadae "celtic infantry calawre" 1
		console_command add_money britons, -2798
		console_command add_population Camulosadae -62
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = royal_barracks_D2
		console_command create_unit Camulosadae "celtic infantry kluddargos" 1
		console_command add_money britons, -2513
		console_command add_population Camulosadae -61
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = muster_field_E
		console_command create_unit Camulosadae "celtic infantry kluddobro" 1
		console_command add_money britons, -606
		console_command add_population Camulosadae -100
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = militia_barracks_E1
		console_command create_unit Camulosadae "celtic infantry gaeroas" 1
		console_command add_money britons, -1340
		console_command add_population Camulosadae -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = city_barracks_E1
		console_command create_unit Camulosadae "celtic infantry milnaht" 1
		console_command add_money britons, -2001
		console_command add_population Camulosadae -81
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = army_barracks_E1
		console_command create_unit Camulosadae "celtic infantry calawre" 1
		console_command add_money britons, -2798
		console_command add_population Camulosadae -62
end_monitor

monitor_event SettlementTurnEnd SettlementName Camulosadae
	  and not SettlementIsLocal
	  and I_SettlementOwner Camulosadae = britons
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_camulosadae = 0
	  and SettlementBuildingExists = royal_barracks_E1
		console_command create_unit Camulosadae "celtic infantry rycalawre" 1
		console_command add_money britons, -2720
		console_command add_population Camulosadae -61
end_monitor


;-------------------------------------------------------------------
;Aedui

;Declare unit trained settlement counters
declare_counter ut_Bibracte

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType gauls
	set_counter ut_Bibracte = 0
end_monitor

monitor_event UnitTrained SettlementName Bibracte
	and not FactionIsLocal
		set_counter ut_Bibracte 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = muster_field_D
		console_command create_unit Bibracte "celtic infantry lugoae" 1
		console_command add_money gauls, -859
		console_command add_population Bibracte -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = militia_barracks_D1
		console_command create_unit Bibracte "celtic missile iaosatae" 1
		console_command add_money gauls, -514
		console_command add_population Bibracte -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = city_barracks_D1
		console_command create_unit Bibracte "celtic infantry bataroas" 1
		console_command add_money gauls, -1428
		console_command add_population Bibracte -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = army_barracks_D1
		console_command create_unit Bibracte "celtic skirmisher cavalry leuce epos" 1
		console_command add_money gauls, -1842
		console_command add_population Bibracte -50
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = royal_barracks_D1
		console_command create_unit Bibracte "celtic infantry gaesatae" 1
		console_command add_money gauls, -3421
		console_command add_population Bibracte -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = militia_barracks_D2
		console_command create_unit Bibracte "celtic infantry gaelaiche" 1
		console_command add_money gauls, -1220
		console_command add_population Bibracte -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = city_barracks_D2
		console_command create_unit Bibracte "celtic infantry bataroas" 1
		console_command add_money gauls, -1428
		console_command add_population Bibracte -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = army_barracks_D2
		console_command create_unit Bibracte "celtic skirmisher cavalry leuce epos" 1
		console_command add_money gauls, -1842
		console_command add_population Bibracte -50
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = royal_barracks_D2
		console_command create_unit Bibracte "celtic infantry gaesatae" 1
		console_command add_money gauls, -3421
		console_command add_population Bibracte -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = muster_field_E
		console_command create_unit Bibracte "celtic infantry gaelaiche" 1
		console_command add_money gauls, -1220
		console_command add_population Bibracte -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = militia_barracks_E1
		console_command create_unit Bibracte "celtic missile iaosatae" 1
		console_command add_money gauls, -514
		console_command add_population Bibracte -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = city_barracks_E1
		console_command create_unit Bibracte "celtic infantry bataroas" 1
		console_command add_money gauls, -1428
		console_command add_population Bibracte -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = army_barracks_E1
		console_command create_unit Bibracte "celtic infantry neitos" 1
		console_command add_money gauls, -2604
		console_command add_population Bibracte -82
end_monitor

monitor_event SettlementTurnEnd SettlementName Bibracte
	  and not SettlementIsLocal
	  and I_SettlementOwner Bibracte = gauls
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Bibracte = 0
	  and SettlementBuildingExists = royal_barracks_E1
		console_command create_unit Bibracte "celtic infantry solduros" 1
		console_command add_money gauls, -3322
		console_command add_population Bibracte -61
end_monitor


;-------------------------------------------------------------------
;Arverni

;Declare unit trained settlement counters
declare_counter ut_Gergovia

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType scythia
	set_counter ut_Gergovia = 0
end_monitor

monitor_event UnitTrained SettlementName Gergovia
	and not FactionIsLocal
		set_counter ut_Gergovia 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = muster_field_D
		console_command create_unit Gergovia "celtic infantry lugoae" 1
		console_command add_money scythia, -859
		console_command add_population Gergovia -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = militia_barracks_D1
		console_command create_unit Gergovia "celtic missile iaosatae" 1
		console_command add_money scythia, -514
		console_command add_population Gergovia -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = city_barracks_D1
		console_command create_unit Gergovia "celtic infantry bataroas" 1
		console_command add_money scythia, -1428
		console_command add_population Gergovia -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = army_barracks_D1
		console_command create_unit Gergovia "celtic skirmisher cavalry leuce epos" 1
		console_command add_money scythia, -1842
		console_command add_population Gergovia -50
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = royal_barracks_D1
		console_command create_unit Gergovia "celtic infantry gaesatae" 1
		console_command add_money scythia, -3421
		console_command add_population Gergovia -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = militia_barracks_D2
		console_command create_unit Gergovia "celtic infantry gaelaiche" 1
		console_command add_money scythia, -1220
		console_command add_population Gergovia -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = city_barracks_D2
		console_command create_unit Gergovia "celtic infantry bataroas" 1
		console_command add_money scythia, -1428
		console_command add_population Gergovia -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = army_barracks_D2
		console_command create_unit Gergovia "celtic skirmisher cavalry leuce epos" 1
		console_command add_money scythia, -1842
		console_command add_population Gergovia -50
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = royal_barracks_D2
		console_command create_unit Gergovia "celtic infantry gaesatae" 1
		console_command add_money scythia, -3421
		console_command add_population Gergovia -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = muster_field_E
		console_command create_unit Gergovia "celtic infantry gaelaiche" 1
		console_command add_money scythia, -1220
		console_command add_population Gergovia -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = militia_barracks_E1
		console_command create_unit Gergovia "celtic missile iaosatae" 1
		console_command add_money scythia, -514
		console_command add_population Gergovia -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = city_barracks_E1
		console_command create_unit Gergovia "celtic infantry bataroas" 1
		console_command add_money scythia, -1428
		console_command add_population Gergovia -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = army_barracks_E1
		console_command create_unit Gergovia "celtic infantry arjos" 1
		console_command add_money scythia, -2447
		console_command add_population Gergovia -61
end_monitor

monitor_event SettlementTurnEnd SettlementName Gergovia
	  and not SettlementIsLocal
	  and I_SettlementOwner Gergovia = scythia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Gergovia = 0
	  and SettlementBuildingExists = royal_barracks_E1
		console_command create_unit Gergovia "celtic infantry solduros" 1
		console_command add_money scythia, -3322
		console_command add_population Gergovia -61
end_monitor


;-------------------------------------------------------------------
;Lusotannan

;Declare unit trained settlement counters
declare_counter ut_Oxtraca

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType spain
	set_counter ut_Oxtraca = 0
end_monitor

monitor_event UnitTrained SettlementName Oxtraca
	and not FactionIsLocal
		set_counter ut_Oxtraca 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Oxtraca
	  and not SettlementIsLocal
	  and I_SettlementOwner Oxtraca = spain
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Oxtraca = 0
	  and SettlementBuildingExists = muster_field_F
		console_command create_unit Oxtraca "iberian skirmisher iovamann" 1
		console_command add_money spain, -729
		console_command add_population Oxtraca -120
end_monitor

monitor_event SettlementTurnEnd SettlementName Oxtraca
	  and not SettlementIsLocal
	  and I_SettlementOwner Oxtraca = spain
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Oxtraca = 0
	  and SettlementBuildingExists = militia_barracks_F1
		console_command create_unit Oxtraca "iberian infantry gestikapoinann" 1
		console_command add_money spain, -1749
		console_command add_population Oxtraca -100
end_monitor

monitor_event SettlementTurnEnd SettlementName Oxtraca
	  and not SettlementIsLocal
	  and I_SettlementOwner Oxtraca = spain
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Oxtraca = 0
	  and SettlementBuildingExists = city_barracks_F1
		console_command create_unit Oxtraca "iberian infantry scortamavera" 1
		console_command add_money spain, -2072
		console_command add_population Oxtraca -80
end_monitor

monitor_event SettlementTurnEnd SettlementName Oxtraca
	  and not SettlementIsLocal
	  and I_SettlementOwner Oxtraca = spain
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Oxtraca = 0
	  and SettlementBuildingExists = army_barracks_F1
		console_command create_unit Oxtraca "iberian infantry ambakaro" 1
		console_command add_money spain, -2703
		console_command add_population Oxtraca -60
end_monitor

monitor_event SettlementTurnEnd SettlementName Oxtraca
	  and not SettlementIsLocal
	  and I_SettlementOwner Oxtraca = spain
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Oxtraca = 0
	  and SettlementBuildingExists = royal_barracks_F1
		console_command create_unit Oxtraca "iberian cavalry ambakaro epones" 1
		console_command add_money spain, -4015
		console_command add_population Oxtraca -50
end_monitor


;-------------------------------------------------------------------
;Getai

;Declare unit trained settlement counters
declare_counter ut_Buridava

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType dacia
	set_counter ut_Buridava = 0
end_monitor

monitor_event UnitTrained SettlementName Buridava
	and not FactionIsLocal
		set_counter ut_Buridava 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Buridava
	  and not SettlementIsLocal
	  and I_SettlementOwner Buridava = dacia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Buridava = 0
	  and SettlementBuildingExists = muster_field_G
		console_command create_unit Buridava "dacian skirmisher komatai" 1
		console_command add_money dacia, -670
		console_command add_population Buridava -100
end_monitor

monitor_event SettlementTurnEnd SettlementName Buridava
	  and not SettlementIsLocal
	  and I_SettlementOwner Buridava = dacia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Buridava = 0
	  and SettlementBuildingExists = militia_barracks_G1
		console_command create_unit Buridava "dacian infantry drapanai" 1
		console_command add_money dacia, -872
		console_command add_population Buridava -80
end_monitor

monitor_event SettlementTurnEnd SettlementName Buridava
	  and not SettlementIsLocal
	  and I_SettlementOwner Buridava = dacia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Buridava = 0
	  and SettlementBuildingExists = city_barracks_G1
		console_command create_unit Buridava "dacian infantry getikoi stratiotai" 1
		console_command add_money dacia, -1275
		console_command add_population Buridava -80
end_monitor

monitor_event SettlementTurnEnd SettlementName Buridava
	  and not SettlementIsLocal
	  and I_SettlementOwner Buridava = dacia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Buridava = 0
	  and SettlementBuildingExists = army_barracks_G1
		console_command create_unit Buridava "dacian missile peltastaithrakioi" 1
		console_command add_money dacia, -1387
		console_command add_population Buridava -80
end_monitor

monitor_event SettlementTurnEnd SettlementName Buridava
	  and not SettlementIsLocal
	  and I_SettlementOwner Buridava = dacia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Buridava = 0
	  and SettlementBuildingExists = royal_barracks_G1
		console_command create_unit Buridava "dacian infantry komatai thorakitai stratiotai" 1
		console_command add_money dacia, -2033
		console_command add_population Buridava -80
end_monitor


;-------------------------------------------------------------------
;Hayasdan

;Declare unit trained settlement counters
declare_counter ut_Armavir

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType romans_scipii
	set_counter ut_Armavir = 0
end_monitor

monitor_event UnitTrained SettlementName Armavir
	and not FactionIsLocal
		set_counter ut_Armavir 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Armavir
	  and not SettlementIsLocal
	  and I_SettlementOwner Armavir = romans_scipii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Armavir = 0
	  and SettlementBuildingExists = muster_field_H
		console_command create_unit Armavir "eastern infantry kavakaza sparabara" 1
		console_command add_money romans_scipii, -896
		console_command add_population Armavir -100
end_monitor

monitor_event SettlementTurnEnd SettlementName Armavir
	  and not SettlementIsLocal
	  and I_SettlementOwner Armavir = romans_scipii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Armavir = 0
	  and SettlementBuildingExists = militia_barracks_H1
		console_command create_unit Armavir "eastern infantry hai nizagamartik" 1
		console_command add_money romans_scipii, -896
		console_command add_population Armavir -120
end_monitor

monitor_event SettlementTurnEnd SettlementName Armavir
	  and not SettlementIsLocal
	  and I_SettlementOwner Armavir = romans_scipii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Armavir = 0
	  and SettlementBuildingExists = city_barracks_H1
		console_command create_unit Armavir "steppe missile cavalry ayrudzi netadzik" 1
		console_command add_money romans_scipii, -1556
		console_command add_population Armavir -50
end_monitor

monitor_event SettlementTurnEnd SettlementName Armavir
	  and not SettlementIsLocal
	  and I_SettlementOwner Armavir = romans_scipii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Armavir = 0
	  and SettlementBuildingExists = army_barracks_H1
		console_command create_unit Armavir "eastern infantry mardig swordsmen" 1
		console_command add_money romans_scipii, -1625
		console_command add_population Armavir -100
end_monitor

monitor_event SettlementTurnEnd SettlementName Armavir
	  and not SettlementIsLocal
	  and I_SettlementOwner Armavir = romans_scipii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Armavir = 0
	  and SettlementBuildingExists = royal_barracks_H1
		console_command create_unit Armavir "eastern infantry nakhararakan tiknapah" 1
		console_command add_money romans_scipii, -1469
		console_command add_population Armavir -60
end_monitor


;-------------------------------------------------------------------
;Pontos

;Declare unit trained settlement counters
declare_counter ut_Amaseia

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType carthage
	set_counter ut_Amaseia = 0
end_monitor

monitor_event UnitTrained SettlementName Amaseia
	and not FactionIsLocal
		set_counter ut_Amaseia 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Amaseia
	  and not SettlementIsLocal
	  and I_SettlementOwner Amaseia = carthage
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Amaseia = 0
	  and SettlementBuildingExists = muster_field_H
		console_command create_unit Amaseia "hellenistic infantry pantodapoi" 1
		console_command add_money carthage, -803
		console_command add_population Amaseia -121
end_monitor

monitor_event SettlementTurnEnd SettlementName Amaseia
	  and not SettlementIsLocal
	  and I_SettlementOwner Amaseia = carthage
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Amaseia = 0
	  and SettlementBuildingExists = militia_barracks_H1
		console_command create_unit Amaseia "hellenistic infantry pantodapoi phalangitai" 1
		console_command add_money carthage, -1285
		console_command add_population Amaseia -121
end_monitor

monitor_event SettlementTurnEnd SettlementName Amaseia
	  and not SettlementIsLocal
	  and I_SettlementOwner Amaseia = carthage
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Amaseia = 0
	  and SettlementBuildingExists = city_barracks_H1
		console_command create_unit Amaseia "hellenistic infantry thureophoroi" 1
		console_command add_money carthage, -1449
		console_command add_population Amaseia -82
end_monitor

monitor_event SettlementTurnEnd SettlementName Amaseia
	  and not SettlementIsLocal
	  and I_SettlementOwner Amaseia = carthage
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Amaseia = 0
	  and SettlementBuildingExists = army_barracks_H1
		console_command create_unit Amaseia "hellenistic infantry chalkaspidai" 1
		console_command add_money carthage, -3295
		console_command add_population Amaseia -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Amaseia
	  and not SettlementIsLocal
	  and I_SettlementOwner Amaseia = carthage
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Amaseia = 0
	  and SettlementBuildingExists = royal_barracks_H1
		console_command create_unit Amaseia "celtic cavalry lavotuxri" 1
		console_command add_money carthage, -3478
		console_command add_population Amaseia -50
end_monitor


;-------------------------------------------------------------------
;Epeiros

;Declare unit trained settlement counters
declare_counter ut_Apollonia

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType thrace
	set_counter ut_Apollonia = 0
end_monitor

monitor_event UnitTrained SettlementName Apollonia
	and not FactionIsLocal
		set_counter ut_Apollonia 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Apollonia
	  and not SettlementIsLocal
	  and I_SettlementOwner Apollonia = thrace
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Apollonia = 0
	  and SettlementBuildingExists = muster_field_I
		console_command create_unit Apollonia "greek infantry taxeis hoplitai" 1
		console_command add_money thrace, -802
		console_command add_population Apollonia -82
end_monitor

monitor_event SettlementTurnEnd SettlementName Apollonia
	  and not SettlementIsLocal
	  and I_SettlementOwner Apollonia = thrace
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Apollonia = 0
	  and SettlementBuildingExists = militia_barracks_I1
		console_command create_unit Apollonia "greek infantry taxeis phalangitai" 1
		console_command add_money thrace, -1401
		console_command add_population Apollonia -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Apollonia
	  and not SettlementIsLocal
	  and I_SettlementOwner Apollonia = thrace
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Apollonia = 0
	  and SettlementBuildingExists = city_barracks_I1
		console_command create_unit Apollonia "greek cavalry hippeis" 1
		console_command add_money thrace, -2272
		console_command add_population Apollonia -50
end_monitor

monitor_event SettlementTurnEnd SettlementName Apollonia
	  and not SettlementIsLocal
	  and I_SettlementOwner Apollonia = thrace
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Apollonia = 0
	  and SettlementBuildingExists = army_barracks_I1
		console_command create_unit Apollonia "illyrian infantry thorakitai" 1
		console_command add_money thrace, -2009
		console_command add_population Apollonia -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Apollonia
	  and not SettlementIsLocal
	  and I_SettlementOwner Apollonia = thrace
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Apollonia = 0
	  and SettlementBuildingExists = royal_barracks_I1
		console_command create_unit Apollonia "greek infantry chaeonian agema" 1
		console_command add_money thrace, -3552
		console_command add_population Apollonia -122
end_monitor


;-------------------------------------------------------------------
;Koinon Hellenon

;Declare unit trained settlement counters
declare_counter ut_Sparte

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType greek_cities
	set_counter ut_Sparte = 0
end_monitor

monitor_event UnitTrained SettlementName Sparte
	and not FactionIsLocal
		set_counter ut_Sparte 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Sparte
	  and not SettlementIsLocal
	  and I_SettlementOwner Sparte = greek_cities
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Sparte = 0
	  and SettlementBuildingExists = muster_field_I
		console_command create_unit Sparte "greek infantry taxeis hoplitai" 1
		console_command add_money greek_cities, -802
		console_command add_population Sparte -82
end_monitor

monitor_event SettlementTurnEnd SettlementName Sparte
	  and not SettlementIsLocal
	  and I_SettlementOwner Sparte = greek_cities
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Sparte = 0
	  and SettlementBuildingExists = militia_barracks_I1
		console_command create_unit Sparte "greek infantry ekdromoi hoplitai" 1
		console_command add_money greek_cities, -1385
		console_command add_population Sparte -100
end_monitor

monitor_event SettlementTurnEnd SettlementName Sparte
	  and not SettlementIsLocal
	  and I_SettlementOwner Sparte = greek_cities
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Sparte = 0
	  and SettlementBuildingExists = city_barracks_I1
		console_command create_unit Sparte "hellenistic infantry hoplitai" 1
		console_command add_money greek_cities, -1374
		console_command add_population Sparte -82
end_monitor

monitor_event SettlementTurnEnd SettlementName Sparte
	  and not SettlementIsLocal
	  and I_SettlementOwner Sparte = greek_cities
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Sparte = 0
	  and SettlementBuildingExists = army_barracks_I1
		console_command create_unit Sparte "greek infantry thorakitai" 1
		console_command add_money greek_cities, -2101
		console_command add_population Sparte -82
end_monitor

monitor_event SettlementTurnEnd SettlementName Sparte
	  and not SettlementIsLocal
	  and I_SettlementOwner Sparte = greek_cities
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Sparte = 0
	  and SettlementBuildingExists = royal_barracks_I1
		console_command create_unit Sparte "hellenistic infantry spartiateshoplitai" 1
		console_command add_money greek_cities, -2711
		console_command add_population Sparte -62
end_monitor


;-------------------------------------------------------------------
;Arche Seleukideia

;Declare unit trained settlement counters
declare_counter ut_Antiocheia

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType romans_julii
	set_counter ut_Antiocheia = 0
end_monitor

monitor_event UnitTrained SettlementName Antiocheia
	and not FactionIsLocal
		set_counter ut_Antiocheia 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Antiocheia
	  and not SettlementIsLocal
	  and I_SettlementOwner Antiocheia = romans_julii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Antiocheia = 0
	  and SettlementBuildingExists = muster_field_J
		console_command create_unit Antiocheia "hellenistic infantry pantodapoi" 1
		console_command add_money romans_julii, -803
		console_command add_population Antiocheia -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Antiocheia
	  and not SettlementIsLocal
	  and I_SettlementOwner Antiocheia = romans_julii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Antiocheia = 0
	  and SettlementBuildingExists = militia_barracks_J1
		console_command create_unit Antiocheia "hellenistic infantry pantodapoi phalangitai" 1
		console_command add_money romans_julii, -1285
		console_command add_population Antiocheia -121
end_monitor

monitor_event SettlementTurnEnd SettlementName Antiocheia
	  and not SettlementIsLocal
	  and I_SettlementOwner Antiocheia = romans_julii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Antiocheia = 0
	  and SettlementBuildingExists = city_barracks_J1
		console_command create_unit Antiocheia "hellenistic infantry heavy pezhetairoi" 1
		console_command add_money romans_julii, -2006
		console_command add_population Antiocheia -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Antiocheia
	  and not SettlementIsLocal
	  and I_SettlementOwner Antiocheia = romans_julii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Antiocheia = 0
	  and SettlementBuildingExists = army_barracks_J1
		console_command create_unit Antiocheia "hellenistic infantry argyraspidai" 1
		console_command add_money romans_julii, -3254
		console_command add_population Antiocheia -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Antiocheia
	  and not SettlementIsLocal
	  and I_SettlementOwner Antiocheia = romans_julii
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Antiocheia = 0
	  and SettlementBuildingExists = royal_barracks_J1
		console_command create_unit Antiocheia "greek infantry hypaspistai" 1
		console_command add_money romans_julii, -2756
		console_command add_population Antiocheia -62
end_monitor


;-------------------------------------------------------------------
;Ptolemaioi

;Declare unit trained settlement counters
declare_counter ut_Alexandreia

;Initialize unit trained settlement counters
monitor_event FactionTurnStart FactionType numidia
	set_counter ut_Alexandreia = 0
end_monitor

monitor_event UnitTrained SettlementName Alexandreia
	and not FactionIsLocal
		set_counter ut_Alexandreia 1
end_monitor

monitor_event SettlementTurnEnd SettlementName Alexandreia
	  and not SettlementIsLocal
	  and I_SettlementOwner Alexandreia = numidia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Alexandreia = 0
	  and SettlementBuildingExists = muster_field_J
		console_command create_unit Alexandreia "hellenistic infantry pantodapoi" 1
		console_command add_money numidia, -803
		console_command add_population Alexandreia -102
end_monitor

monitor_event SettlementTurnEnd SettlementName Alexandreia
	  and not SettlementIsLocal
	  and I_SettlementOwner Alexandreia = numidia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Alexandreia = 0
	  and SettlementBuildingExists = militia_barracks_J1
		console_command create_unit Alexandreia "hellenistic infantry machimoi phalangitai" 1
		console_command add_money numidia, -1285
		console_command add_population Alexandreia -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Alexandreia
	  and not SettlementIsLocal
	  and I_SettlementOwner Alexandreia = numidia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Alexandreia = 0
	  and SettlementBuildingExists = city_barracks_J1
		console_command create_unit Alexandreia "hellenistic infantry heavy pezhetairoi" 1
		console_command add_money numidia, -2006
		console_command add_population Alexandreia -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Alexandreia
	  and not SettlementIsLocal
	  and I_SettlementOwner Alexandreia = numidia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Alexandreia = 0
	  and SettlementBuildingExists = army_barracks_J1
		console_command create_unit Alexandreia "hellenistic infantry kleruchoi agemata" 1
		console_command add_money numidia, -3254
		console_command add_population Alexandreia -122
end_monitor

monitor_event SettlementTurnEnd SettlementName Alexandreia
	  and not SettlementIsLocal
	  and I_SettlementOwner Alexandreia = numidia
	  and not SettlementPopulationTooLow
	  and TrainingQueueIdleDespiteCash
	  and I_CompareCounter ut_Alexandreia = 0
	  and SettlementBuildingExists = royal_barracks_J1
		console_command create_unit Alexandreia "hellenistic infantry basilikon agemata" 1
		console_command add_money numidia, -3437
		console_command add_population Alexandreia -82
end_monitor

**LorDBulA** · 06-22-2007, 11:34

Never mind.

Thread: Create Surplus Units in faction Homeland regions

Thread Tools

Display

Create Surplus Units in faction Homeland regions

Re: Create Surplus Units in faction Homeland regions

Bookmarks

Bookmarks

Posting Permissions