PON2-scripting recurrent revolt events - Poland and Hungary

[Christophe.Barot]

[color="#40E0D0"]this is a big incitement to Prussia (and Russia) to keep Polish stability
it ends with Pangermanism, has little probability to occur, but reflects the reasoning and fear of Prussia at the time[/color]

SelectFaction = $POL
SelectRegion = $Mazowsze
StartEvent = evt_nam_POL_Recurrent_Polish_Unrest|999|2|evt_txt_POL_Recurrent_Polish_Unrest|Event-img_POL_Recurrent_Polish_Unrest|$Mazowsze|NULL

Conditions

MinDate = 1863/01/01
MaxDate = 1889/12/31
Probability = 1

//not high but recurrent

SelectFaction = $RUS
EvalRgnOwned = $Mazowsze;NOT
EvalEvent = evt_nam_RUS_PolishUprising1863;=;1
EvalEvent = evt_nam_AUS_Compromise1867;=;1
[color="#40E0D0"]
// this time Austria is out of the mess, compromise signed with Hungarians means two things
//a) Empire is comparatively liberal, with Poles as well as with Hungarians, and
//b) alternative to Austrian rule is Hungarian rule (harsher)or Russia's so better make low profile for Poles patriots

// due to date Pangermanism did not happen yet
// logic of this event is that lack of solidarity between opressors encourage Poles to unrest, even if not uprising
// so before Pangermanism, Warsaw (and Poland, in general) must not be controlled by rebellious Poles, Prussia itself
// (lack of unity, Poles hope draw advantage of a conflict - or a third party Russian hostile so more favourable to Poland
[/color]

Actions

SelectFaction = $GER
DescEvent = evt_desc_POL_Recurrent_Polish_Unrest
ChangeFacMorale = -5
ChgFacRelationships = USA;-5
ChgFacRelationships = FRA;-5
ChgFacRelationships = GBR;-5
ChgFacRelationships = AUS;-5

SelectFaction = $RUS
DescEvent = evt_desc_POL_Recurrent_Polish_Unrest
ChangeFacMorale = -5
ChgFacRelationships = USA;-5
ChgFacRelationships = FRA;-5
ChgFacRelationships = GBR;-5
ChgFacRelationships = AUS;-5

// you'll note the loss odf sympathy in liberal nations opinion, including Austria, especially if Poles have influence

SelectFaction = $RUS

SelectRegion = $Mazowsze
ChangeLoyaltyFac = -10
SelectRegion = $Wielkopolska
ChangeLoyaltyFac = -10
SelectRegion = $Modlin
ChangeLoyaltyFac = -10
SelectRegion = $Ostrowa
ChangeLoyaltyFac = -10
SelectRegion = $Slonim
ChangeLoyaltyFac = -10
SelectRegion = $Radom
ChangeLoyaltyFac = -10

SelectFaction = $GER

SelectRegion = $Ostmark
ChangeLoyaltyFac = -10
SelectRegion = $Posen
ChangeLoyaltyFac = -10
SelectRegion = $Weichsel
ChangeLoyaltyFac = -10

SelectFaction = $REB

SelectRegion = $Mazowsze
ChangeLoyaltyFac = 5
SelectRegion = $Wielkopolska
ChangeLoyaltyFac = 5
SelectRegion = $Modlin
ChangeLoyaltyFac = 5
SelectRegion = $Ostrowa
ChangeLoyaltyFac = 5
SelectRegion = $Slonim
ChangeLoyaltyFac = 5
SelectRegion = $Radom
ChangeLoyaltyFac = 5

SelectRegion = $Ostmark
ChangeLoyaltyFac = 5
SelectRegion = $Posen
ChangeLoyaltyFac = 5
SelectRegion = $Weichsel
ChangeLoyaltyFac = 5

SelectFaction = $POL

SelectRegion = $Mazowsze
ChangeLoyaltyFac = 5
SelectRegion = $Wielkopolska
ChangeLoyaltyFac = 5
SelectRegion = $Modlin
ChangeLoyaltyFac = 5
SelectRegion = $Ostrowa
ChangeLoyaltyFac = 5
SelectRegion = $Slonim
ChangeLoyaltyFac = 5
SelectRegion = $Radom
ChangeLoyaltyFac = -5

SelectRegion = $Ostmark
ChangeLoyaltyFac = 5
SelectRegion = $Posen
ChangeLoyaltyFac = 5
SelectRegion = $Weichsel
ChangeLoyaltyFac = 5

EndEvent

[color="#40E0D0"]this one is with Austria supposedly having a lenient (and attractive) minorities policy, true Habsburg multi nationalism fashion

we evaluate this, as design choice, according to 1867 compromise, for sake of simplicity (we have other events)

now let's see the reverse hypothesis - Austria having a strict (repressive) minorities policy .... true Habsburg authoritarian centralized fashion [/color]

[Christophe.Barot]

[color="#40E0D0"]this time Austria is less lenient with nationalities (would they be Hungarians or Poles) , same but with Austria with policies like Bülow germanization or Pobedonovtsev Russianisation[/color]


SelectFaction = $POL
SelectRegion = $Mazowsze
StartEvent = evt_nam_POL_Recurrent_Polish_Unrest-gen|999|2|evt_txt_POL_Recurrent_Polish_Unrest-gen|Event-img_POL_Recurrent_Polish_Unrest-gen|$Mazowsze|NULL

Conditions

MinDate = 1863/01/01
MaxDate = 1889/12/31
Probability = 1

//not high but recurrent

SelectFaction = $RUS
EvalRgnOwned = $Mazowsze;NOT
EvalEvent = evt_nam_RUS_PolishUprising1863;=;1
EvalEvent = evt_nam_AUS_Compromise1867;=;0
[color="#40E0D0"]// last one means Austrian Empire is nationalwise authoritarian, and Poles situation in Austria is comparable to Prussia's or Russia's

// due to date Pangermanism did not happen yet
// logic of this event is that lack of solidarity between opressors encourage Poles to unrest, even if not uprising
// so before Pangermanism, Warsaw (and Poland, in general) must not be controlled by rebellious Poles, Prussia itself
// (lack of unity, Poles hope draw advantage of a conflict - or a third party Russian hostile so more favourable to Poland [/color]


Actions

SelectFaction = $GER
DescEvent = evt_desc_POL_Recurrent_Polish_Unrest-gen
ChangeFacMorale = -5
ChgFacRelationships = USA;-5
ChgFacRelationships = FRA;-5
ChgFacRelationships = GBR;-5

SelectFaction = $RUS
DescEvent = evt_desc_POL_Recurrent_Polish_Unrest-gen
ChangeFacMorale = -5
ChgFacRelationships = USA;-5
ChgFacRelationships = FRA;-5
ChgFacRelationships = GBR;-5

SelectFaction = $AUS
DescEvent = evt_desc_POL_Recurrent_Polish_Unrest-gen
ChangeFacMorale = -5
ChgFacRelationships = USA;-5
ChgFacRelationships = FRA;-5
ChgFacRelationships = GBR;-5

SelectFaction = $RUS

SelectRegion = $Mazowsze
ChangeLoyaltyFac = -10
SelectRegion = $Wielkopolska
ChangeLoyaltyFac = -10
SelectRegion = $Modlin
ChangeLoyaltyFac = -10
SelectRegion = $Ostrowa
ChangeLoyaltyFac = -10
SelectRegion = $Slonim
ChangeLoyaltyFac = -10
SelectRegion = $Radom
ChangeLoyaltyFac = -10

SelectFaction = $GER

SelectRegion = $Ostmark
ChangeLoyaltyFac = -10
SelectRegion = $Posen
ChangeLoyaltyFac = -10
SelectRegion = $Weichsel
ChangeLoyaltyFac = -10

SelectFaction = $AUS

SelectRegion = $Lemberg
ChangeLoyaltyFac = -10
SelectRegion = $Radom
ChangeLoyaltyFac = -10
SelectRegion = $KleinPolen
ChangeLoyaltyFac = -10

SelectFaction = $REB

SelectRegion = $Mazowsze
ChangeLoyaltyFac = 5
SelectRegion = $Wielkopolska
ChangeLoyaltyFac = 5
SelectRegion = $Modlin
ChangeLoyaltyFac = 5
SelectRegion = $Ostrowa
ChangeLoyaltyFac = 5
SelectRegion = $Slonim
ChangeLoyaltyFac = 5
SelectRegion = $Radom
ChangeLoyaltyFac = 5

SelectRegion = $Ostmark
ChangeLoyaltyFac = 5
SelectRegion = $Posen
ChangeLoyaltyFac = 5
SelectRegion = $Weichsel
ChangeLoyaltyFac = 5

SelectRegion = $Lemberg
ChangeLoyaltyFac = 5
SelectRegion = $Radom
ChangeLoyaltyFac = 5
SelectRegion = $KleinPolen
ChangeLoyaltyFac = 5

SelectFaction = $POL

SelectRegion = $Mazowsze
ChangeLoyaltyFac = 5
SelectRegion = $Wielkopolska
ChangeLoyaltyFac = 5
SelectRegion = $Modlin
ChangeLoyaltyFac = 5
SelectRegion = $Ostrowa
ChangeLoyaltyFac = 5
SelectRegion = $Slonim
ChangeLoyaltyFac = 5
SelectRegion = $Radom
ChangeLoyaltyFac = -5

SelectRegion = $Ostmark
ChangeLoyaltyFac = 5
SelectRegion = $Posen
ChangeLoyaltyFac = 5
SelectRegion = $Weichsel
ChangeLoyaltyFac = 5

SelectRegion = $Lemberg
ChangeLoyaltyFac = 5
SelectRegion = $Radom
ChangeLoyaltyFac = 5
SelectRegion = $KleinPolen
ChangeLoyaltyFac = 5

EndEvent

[Christophe.Barot]

if you like it, Kensai, please help yourself, copy, paste, adapt


[color="#40E0D0"]// the [color="#FF0000"]Historical compromise should be a choice of Austrian player (automatically taken if AI)[/color]
// advantages : faithfulness of Hungarians - improved relations and alliance chances with germany and Italy - is neutral for Britain
// VP gained value of balkan objectives increased - drawbacks worsened relations with Russia, loss of western objectives,
// may trigger more irredentism, especially linked with Serbia (deliberately not annexable, or temptation will be too strong)[/color]

SelectFaction = $AUS
SelectRegion = $Ungarn
StartEvent = evt_nam_AUS_Recurrent_Hungarian_Unrest|999|2|evt_txt_AUS_Recurrent_Hungarian_Unrest|Event-

img_AUS_Recurrent_Hungarian_Unrest|$Ungarn|NULL

Conditions

MinDate = 1870/01/01
MaxDate = 1889/12/31
Probability = 1

[color="#40E0D0"]//not high but recurrent[/color]

SelectFaction = $AUS
EvalEvent = evt_nam_AUS_Compromise1867;=;0

[color="#40E0D0"]// compromise NOT signed with Hungarians means two things
//a) Empire is nationalities wise Authoritarian
//b) Austria remains western oriented, with some interest in Balkans, but not prevalent, and still interest to
//German and Italian events
[/color]

Actions

SelectFaction = $AUS
DescEvent = evt_desc_AUS_Recurrent_Hungarian_Unrest
ChangeFacMorale = -10
ChgFacRelationships = GER;-5
ChgFacRelationships = ITA;-5
ChgPopMilitancyEx = 5;5;5;5;5;5;5
[color="#40E0D0"]// is to take account of Hungarian discontent in average in Austria for rebellion mechanisms
// giving areas to rebels will not directly favour Hungarians and I don't want to reward autistic Austrian emperor
// with free targets to train his generals - plus, historical likeliness, after 1848 experience, passive resistance
// ,more subtle is more likely
// militancy widespread for everyone from nobles to peasants - assumed ideologically backwards and very fond of their nobles
// (see K. Marx, a 19th century social minded author)- irrational but traditionnalists

// btw what is the order of social groups, from nobility to slaves, or first one is upper capitalists/managers ?[/color]

SelectFaction = $AUS
SelectSubUnits = $Area_Hungary;FactionTags AUS
AlterCuSubUnit = ApplytoList;probability 25;Kill;
SelectFaction = $AUS
SelectSubUnits = $Area_Transylvania;FactionTags AUS
AlterCuSubUnit = ApplytoList;probability 25;Kill;
[color="#40E0D0"]// add some desertions, for simplicity sake, I took a part of all units, not the one Hungarians, can be refined
// simulates influence of hostility of unhabitants, homesickness in hostile land, attrition due to partisans
// if there is a simple way to target Hungarian ethnic units, we can tune the effect[/color]


SelectFaction = $AUS

SelectRegion = $Ostungarn
ChangeLoyaltyFac = -10
SelectRegion = $Westungarn
ChangeLoyaltyFac = -10
SelectRegion = $Pressburg
ChangeLoyaltyFac = -10
SelectRegion = $Hultschiner_Laendchen
ChangeLoyaltyFac = -10
SelectRegion = $Slowakei
ChangeLoyaltyFac = -10
SelectRegion = $Ruthenien
ChangeLoyaltyFac = -10
SelectRegion = $Grosswardein
ChangeLoyaltyFac = -10
SelectRegion = $Transsilvanien
ChangeLoyaltyFac = -10
SelectRegion = $Banat
ChangeLoyaltyFac = -10
SelectRegion = $Batschka
ChangeLoyaltyFac = -10
SelectRegion = $Siebenbuergen
ChangeLoyaltyFac = -10
SelectRegion = $Kreischgebiet
ChangeLoyaltyFac = -10


SelectFaction = $REB

SelectRegion = $Ungarn
ChangeLoyaltyFac = 5
SelectRegion = $Westungarn
ChangeLoyaltyFac = 5
SelectRegion = $Pressburg
ChangeLoyaltyFac = 5
SelectRegion = $Hultschiner_Laendchen
ChangeLoyaltyFac = 5
SelectRegion = $Slowakei
ChangeLoyaltyFac = 5
SelectRegion = $Ruthenien
ChangeLoyaltyFac = 5
SelectRegion = $Grosswardein
ChangeLoyaltyFac = 5
SelectRegion = $Transsilvanien
ChangeLoyaltyFac = 5
SelectRegion = $Banat
ChangeLoyaltyFac = 5
SelectRegion = $Batschka
ChangeLoyaltyFac = 5
SelectRegion = $Siebenbuergen
ChangeLoyaltyFac = 5
SelectRegion = $Kreischgebiet
ChangeLoyaltyFac = 5

SelectFaction = $HUN

SelectRegion = $Ungarn
ChangeLoyaltyFac = 5
SelectRegion = $Westungarn
ChangeLoyaltyFac = 5
SelectRegion = $Pressburg
ChangeLoyaltyFac = 5
SelectRegion = $Hultschiner_Laendchen
ChangeLoyaltyFac = 5
SelectRegion = $Slowakei
ChangeLoyaltyFac = 5
SelectRegion = $Ruthenien
ChangeLoyaltyFac = 5
SelectRegion = $Grosswardein
ChangeLoyaltyFac = 5
SelectRegion = $Transsilvanien
ChangeLoyaltyFac = 5
SelectRegion = $Banat
ChangeLoyaltyFac = 5
SelectRegion = $Batschka
ChangeLoyaltyFac = 5
SelectRegion = $Siebenbuergen
ChangeLoyaltyFac = 5
SelectRegion = $Kreischgebiet
ChangeLoyaltyFac = 5

[color="#40E0D0"]// that's what I call "incitement" or "deterrent" - [color="#FF0000"]see possibility of an Austrian regional decision
// "sign compromise with Hungarians"[/color] - better late than never[/color]

EndEvent







[color="#FF0000"]// we'll need more balkan events to take makedonia and bosnia revolts into account (one for each)
// + Alsace-Lorraine unrest, of course
[/color]