User avatar
Christophe.Barot
Posts: 1138
Joined: Fri Jan 26, 2007 10:55 pm
Location: Paris (France)

PON2- Subforum scripting AI reaction - Austrian reaction versus Pru attack on minor

Wed Nov 13, 2013 1:20 am

This is meant to guide Austrian AI in case either a player (mostly) plays weird and attacks a German minor outright
or German AI attacks a minor for whatever reason (erraticand agressive setting)
Austria is natural protector of German minors and surely would intervene in defence if can afford it
crisis in 19th century were interactive, with a slow pace, weeks or months where proposals, promises and threats came and went forth and back were not uncommon
during this time, it could happen that a quick war created a fait accompli, but then winner faced stronger diplomatic opposition - in short, if Prussia can win a war against Saxony or Hannover or Bavaria in 2-3 weeks, Austria won't have time to react - this is perfectly historical and therefore OK - anyway game system hardly allows for quick peaces ...
I tried to convey all this in my crisis treatment

[ATTACH]25690[/ATTACH]

so here it is :

[color="#40E0D0"]a) step one creating a generic german crisis from possible different agressions

//this group of events trigger a crisis if Prussia is at war with a german minor and austria is interested in Germany
// TurnIndex = 0;4;8;12;16;20 are for warning TurnIndex = 3;7;11;15;19;23 are for war declaration
[/color]

SelectFaction = $AUS
SelectRegion = $Sachsen
StartEvent = evt_nam_Prussian_attacks_Saxony|999|0|NULL|NULL|$Sachsen|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 0;3;4;7;8;11;12;15;16;19;20;23
EvalEvent = evt_nam_AUS_Compromise1867;=;0

SelectFaction = $AUS
CheckAILevel = 1

SelectFaction = $AUS
EvalIsAtPeaceWith = GER

SelectFaction = $SAX
EvalIsAtwarWith = GER

Actions
SetEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;999;1

EndEvent


SelectFaction = $AUS
SelectRegion = $Hannover
StartEvent = evt_nam_Prussian_attacks_Hannover|999|0|NULL|NULL|$Hannover|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 0;3;4;7;8;11;12;15;16;19;20;23
EvalEvent = evt_nam_AUS_Compromise1867;=;0

SelectFaction = $AUS
CheckAILevel = 1

SelectFaction = $AUS
EvalIsAtPeaceWith = GER

SelectFaction = $HAN
EvalIsAtwarWith = GER

Actions
SetEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;999;1

EndEvent

SelectFaction = $AUS
SelectRegion = $Hessen-Kassel
StartEvent = evt_nam_Prussian_attacks_Hessen-Kassel|999|0|NULL|NULL|$Hessen-Kassel|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 0;3;4;7;8;11;12;15;16;19;20;23
EvalEvent = evt_nam_AUS_Compromise1867;=;0

SelectFaction = $AUS
CheckAILevel = 1

SelectFaction = $AUS
EvalIsAtPeaceWith = GER

SelectFaction = $HEK
EvalIsAtwarWith = GER

Actions
SetEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;999;1

EndEvent

SelectFaction = $AUS
SelectRegion = $Hessen-Darmstadt
StartEvent = evt_nam_Prussian_attacks_Hessen-Kassel|999|0|NULL|NULL|$Hessen-Darmstadt|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 0;3;4;7;8;11;12;15;16;19;20;23
EvalEvent = evt_nam_AUS_Compromise1867;=;0

SelectFaction = $AUS
CheckAILevel = 1

SelectFaction = $AUS
EvalIsAtPeaceWith = GER

SelectFaction = $HED
EvalIsAtwarWith = GER

Actions
SetEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;999;1

EndEvent


SelectFaction = $AUS
SelectRegion = $Bayern
StartEvent = evt_nam_Prussian_attacks_Bavaria|999|0|NULL|NULL|$Bayern|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 0;3;4;7;8;11;12;15;16;19;20;23
EvalEvent = evt_nam_AUS_Compromise1867;=;0

SelectFaction = $AUS
CheckAILevel = 1

SelectFaction = $AUS
EvalIsAtPeaceWith = GER

SelectFaction = $BAV
EvalIsAtwarWith = GER

Actions
SetEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;999;1

EndEvent

SelectFaction = $AUS
SelectRegion = $Bayern
StartEvent = evt_nam_Prussian_attacks_Wurtemberg|999|0|NULL|NULL|$Bayern|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 0;3;4;7;8;11;12;15;16;19;20;23
EvalEvent = evt_nam_AUS_Compromise1867;=;0

SelectFaction = $AUS
CheckAILevel = 1

SelectFaction = $AUS
EvalIsAtPeaceWith = GER

SelectFaction = $WUR
EvalIsAtwarWith = GER

Actions
SetEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;999;1

EndEvent

SelectFaction = $AUS
SelectRegion = $Baden
StartEvent = evt_nam_Prussian_attacks_Baden|999|0|NULL|NULL|$Baden|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 0;3;4;7;8;11;12;15;16;19;20;23
EvalEvent = evt_nam_AUS_Compromise1867;=;0

SelectFaction = $AUS
CheckAILevel = 1

SelectFaction = $AUS
EvalIsAtPeaceWith = GER

SelectFaction = $BAD
EvalIsAtwarWith = GER

Actions
SetEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;999;1

EndEvent


[color="#FF0000"]Everyone will note that condition has some meaning IF Austria is not already at war with Prussia; also one condition is that the Hungarian element is not prevalent in Austria, else it's such a brake in internal policy (Hungarians have no interest in German position of Austria Hungary, and, conversely, are keen on blocking Russians, preferentially with Prussian support; after much thought, it's simplest to test state of war rather than a military situation[/color]
Attachments
austrian recruitment.jpeg
[color="#FF0000"]- (ordnance) Your Lordship, sorry to awake you, but The french are at our door !

- Alarm, alarm, how did you let this happen and not awake me ! repel them, counterattack at once !

- err, your Lordship, ahem... French are our allies, Marshal de St Arnaud is expected to attend to a conference with you !

- ahem, well, .... very well ..let them in !

(charge of the light brigade movie)
[/color]

User avatar
Christophe.Barot
Posts: 1138
Joined: Fri Jan 26, 2007 10:55 pm
Location: Paris (France)

step 2 - the austrian reaction :

Wed Nov 13, 2013 1:23 am

[ATTACH]25688[/ATTACH]



[color="#40E0D0"]// this event is a marker of current crisis, and used to reset former tyriggers so we can check if prussia is still at war with minor
[/color]
SelectFaction = $AUS
SelectRegion = $Osterreich
StartEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890|999|0|NULL|NULL|$Osterreich|NULL

Conditions

Actions
ChgEvtOccurs = evt_nam_Prussian_attacks_Saxony;CuOccurs;0
ChgEvtOccurs = evt_nam_Prussian_attacks_Hessen-Kassel;CuOccurs;0
ChgEvtOccurs = evt_nam_Prussian_attacks_Hessen-Darmstadt;CuOccurs;0
ChgEvtOccurs = evt_nam_Prussian_attacks_Hannover;CuOccurs;0
ChgEvtOccurs = evt_nam_Prussian_attacks_Bavaria;CuOccurs;0
ChgEvtOccurs = evt_nam_Prussian_attacks_Baden;CuOccurs;0
ChgEvtOccurs = evt_nam_Prussian_attacks_Wurtemberg;CuOccurs;0

EndEvent

[color="#40E0D0"]// here austria reacts and proposal of peace sent to prussian PLAYER
[/color]
SelectFaction = $AUS
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_GERplayer|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckIsPlayer = NULL

SelectFaction = $AUS
CheckAILevel = 1

SelectFaction = $AUS
EvalIsAtPeaceWith = FRA
EvalIsAtPeaceWith = RUS
EvalIsAtPeaceWith = GBR
EvalIsAtPeaceWith = GER

SelectFaction = $AUS
RegInit = 1
SelectSubUnits = Area $Continents_Europe;FactionTags AUS;Domains $Land
SelectFaction = $GER
RegInit = 2
SelectSubUnits = Area $Continents_Europe;FactionTags GER;Domains $Land
RegEval = 1;>=;2
RegDeactivate = NULL

Actions
ChgEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;CuOccurs;0
SetEvtOccurs = evt_nam_PRU_Austrian-warning-about-german-minors1890;999;1

DescEvent = evt_desc_Austria_reacts
SelectFaction = $CMN
GenTextMsg = AUS_warning-about-german-minors-TEXT;1;NULL;NULL;NULL // text and image about warning to write
[color="#40E0D0"]// send warning message [/color]-[color="#FF0000"] I need technical help to convert expanded excel file in usable file by game - can't incorporate em in sct, don't know to convert [/color]


SelectFaction = $AUS
ChgFacRelationships = GER;-50
ChangeFacMorale = 10
RemDiploItem = GER;$diDefensiveTreaty

AddDiploItem = SAX;$diDefensiveTreaty
AddDiploItem = HAN;$diDefensiveTreaty
AddDiploItem = HEK;$diDefensiveTreaty
AddDiploItem = HED;$diDefensiveTreaty
AddDiploItem = BAV;$diDefensiveTreaty
AddDiploItem = BAD;$diDefensiveTreaty
AddDiploItem = WUR;$diDefensiveTreaty

AddDiploItem = GER;$diCBShort;CURRENT

SelectFaction = $GER
ChangeFacMorale = -10

EndEvent
Attachments
austrian army.jpeg
[color="#FF0000"]- (ordnance) Your Lordship, sorry to awake you, but The french are at our door !

- Alarm, alarm, how did you let this happen and not awake me ! repel them, counterattack at once !

- err, your Lordship, ahem... French are our allies, Marshal de St Arnaud is expected to attend to a conference with you !

- ahem, well, .... very well ..let them in !

(charge of the light brigade movie)
[/color]

User avatar
Christophe.Barot
Posts: 1138
Joined: Fri Jan 26, 2007 10:55 pm
Location: Paris (France)

here I separated peace offers

Wed Nov 13, 2013 1:32 am

I had to get peace offers out of the former event to have peace offers ONLY from german minors at war with Prussia, and not send peace offers from nations not at war :neener:

My idea was to send a loser peace and offer the minimum (a handful of money during the minimium time, matter becomes "do Prussia wants /is she ready) to fight Austria abount German minors - I red terms are necessary for a losing peace -- Help ! I need some hand for the syntax and samples, couldn't find it either in eventys, diplomatic agenda, or agewiki :p leure:


// peace is offered by minors only if they're at war

SelectFaction = $SAX
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_SAXPeaceofferGERplayer|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckIsPlayer = NULL

SelectFaction = $AUS
CheckAILevel = 1
EvalIsAtPeaceWith = GER

SelectFaction = $SAX
CheckAILevel = 1
EvalIsAtWarWith = GER

Actions
SelectFaction = $SAX
[color="#FF0000"] AddDiploItem = GER;$diOfferPeaceDefeat;CURRENT[/color]
[color="#40E0D0"]would a AddDiploItem = GER;$diOfferPeaceDefeat;*GiveReparations*;1;1;CURRENT syntax do, else can someone correct me ?[/color]
ChangeFacMorale = 20

Endevent

SelectFaction = $HAN
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_HANPeaceofferGERplayer|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckIsPlayer = NULL

SelectFaction = $AUS
CheckAILevel = 1
EvalIsAtPeaceWith = GER

SelectFaction = $HAN
CheckAILevel = 1
EvalIsAtWarWith = GER

Actions
SelectFaction = $HAN
AddDiploItem = GER;$diOfferPeaceDefeat;CURRENT
ChangeFacMorale = 20

Endevent

SelectFaction = $HED
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_HEDPeaceofferGERplayer|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckIsPlayer = NULL

SelectFaction = $AUS
CheckAILevel = 1
EvalIsAtPeaceWith = GER

SelectFaction = $HED
CheckAILevel = 1
EvalIsAtWarWith = GER

Actions
SelectFaction = $HED
AddDiploItem = GER;$diOfferPeaceDefeat;CURRENT
ChangeFacMorale = 20

Endevent

SelectFaction = $HEK
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_HEKPeaceofferGERplayer|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckIsPlayer = NULL

SelectFaction = $AUS
CheckAILevel = 1
EvalIsAtPeaceWith = GER

SelectFaction = $HEK
CheckAILevel = 1
EvalIsAtWarWith = GER

Actions
SelectFaction = $HEK
AddDiploItem = GER;$diOfferPeaceDefeat;CURRENT
ChangeFacMorale = 20

Endevent

SelectFaction = $BAV
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_BAVPeaceofferGERplayer|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckIsPlayer = NULL

SelectFaction = $AUS
CheckAILevel = 1
EvalIsAtPeaceWith = GER

SelectFaction = $BAV
CheckAILevel = 1
EvalIsAtWarWith = GER

Actions
SelectFaction = $BAV
AddDiploItem = GER;$diOfferPeaceDefeat;CURRENT
ChangeFacMorale = 20

Endevent

SelectFaction = $WUR
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_WURPeaceofferGERplayer|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckIsPlayer = NULL

SelectFaction = $AUS
CheckAILevel = 1
EvalIsAtPeaceWith = GER

SelectFaction = $WUR
CheckAILevel = 1
EvalIsAtWarWith = GER

Actions
SelectFaction = $WUR
AddDiploItem = GER;$diOfferPeaceDefeat;CURRENT
ChangeFacMorale = 20

Endevent

SelectFaction = $BAD
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_BADPeaceofferGERplayer|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckIsPlayer = NULL

SelectFaction = $AUS
CheckAILevel = 1
EvalIsAtPeaceWith = GER

SelectFaction = $BAD
CheckAILevel = 1
EvalIsAtWarWith = GER

Actions
SelectFaction = $BAD
AddDiploItem = GER;$diOfferPeaceDefeat;CURRENT
ChangeFacMorale = 20

Endevent
[color="#FF0000"]- (ordnance) Your Lordship, sorry to awake you, but The french are at our door !

- Alarm, alarm, how did you let this happen and not awake me ! repel them, counterattack at once !

- err, your Lordship, ahem... French are our allies, Marshal de St Arnaud is expected to attend to a conference with you !

- ahem, well, .... very well ..let them in !

(charge of the light brigade movie)
[/color]

User avatar
Christophe.Barot
Posts: 1138
Joined: Fri Jan 26, 2007 10:55 pm
Location: Paris (France)

Conversely, here is German AI treated by Austria

Wed Nov 13, 2013 1:35 am

[color="#40E0D0"]// here austria reacts and proposal of peace examined by prussian AI - we saw the case of a german player, here is just a trigger for a german AI[/color]

SelectFaction = $AUS
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_reacts_GER_AI|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 1;5;9;13;17;21
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $GER
CheckAILevel = 1

SelectFaction = $AUS
CheckAILevel = 1

EvalIsAtPeaceWith = FRA
EvalIsAtPeaceWith = RUS
EvalIsAtPeaceWith = GBR
EvalIsAtPeaceWith = GER

SelectFaction = $AUS
RegInit = 1
SelectSubUnits = Area $Continents_Europe;FactionTags AUS;Domains $Land
SelectFaction = $GER
RegInit = 2
SelectSubUnits = Area $Continents_Europe;FactionTags GER;Domains $Land
RegEval = 1;>=;2
RegDeactivate = NULL

Actions
ChgEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;CuOccurs;0
SetEvtOccurs = evt_nam_PRU_Austrian-warning-about-german-minors1890;999;1

DescEvent = evt_desc_Austria_reacts
SelectFaction = $CMN
GenTextMsg = AUS_warning-about-Saxony-TEXT;1;NULL;NULL;NULL
[color="#40E0D0"]// text and image about warning to write
// send warning message[/color]

[color="#FF0000"]btw a warning/ultimatum diplomatic order would be handy : effect : downgrade target relationship, downgrade target morale (one shot), create CB and makes declaration chaper in 2 turns if target not at peace (no way to be more specific)[/color]


SelectFaction = $HAN
ChangeFacMorale = 20

SelectFaction = $HEK
ChangeFacMorale = 20

SelectFaction = $HED
ChangeFacMorale = 20

SelectFaction = $SAX
ChangeFacMorale = 20

SelectFaction = $BAV
ChangeFacMorale = 20

SelectFaction = $BAD
ChangeFacMorale = 20

SelectFaction = $WUR
ChangeFacMorale = 20

SelectFaction = $AUS
ChgFacRelationships = GER;-50
ChangeFacMorale = 10
RemDiploItem = GER;$diDefensiveTreaty

AddDiploItem = SAX;$diDefensiveTreaty
AddDiploItem = HAN;$diDefensiveTreaty
AddDiploItem = HEK;$diDefensiveTreaty
AddDiploItem = HED;$diDefensiveTreaty
AddDiploItem = BAV;$diDefensiveTreaty
AddDiploItem = BAD;$diDefensiveTreaty
AddDiploItem = WUR;$diDefensiveTreaty

AddDiploItem = GER;$diCBShort;CURRENT

SelectFaction = $GER
ChangeFacMorale = -10

EndEvent
[color="#FF0000"]- (ordnance) Your Lordship, sorry to awake you, but The french are at our door !

- Alarm, alarm, how did you let this happen and not awake me ! repel them, counterattack at once !

- err, your Lordship, ahem... French are our allies, Marshal de St Arnaud is expected to attend to a conference with you !

- ahem, well, .... very well ..let them in !

(charge of the light brigade movie)
[/color]

User avatar
Christophe.Barot
Posts: 1138
Joined: Fri Jan 26, 2007 10:55 pm
Location: Paris (France)

here is reaction from German AI

Wed Nov 13, 2013 1:38 am

[color="#40E0D0"]// now reaction of German AI
// IF Prussia not allied to either France or Russia or Italy and Prussia has less than 80% of Aus Army (for taking either Qualitative factors or Italy, 80% is enough) , they back up
[/color]

SelectFaction = $GER
SelectRegion = $$Brandenburg
StartEvent = evt_nam_Prussian_AI_backdown_facing_Austrian_threat|999|0|NULL|NULL|$Brandenburg|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 2;6;10;14;18;22
EvalEvent = evt_nam_Austria_reacts_GER_AI;=;1

SelectFaction = $GER
CheckAILevel = 1

EvalIsAtPeaceWith = AUS
EvalDiploItem = FRA;$diDefensiveTreaty;NOT
EvalDiploItem = RUS;$diDefensiveTreaty;NOT
EvalDiploItem = ITA;$diDefensiveTreaty;NOT

SelectFaction = $AUS
RegInit = 1
SelectSubUnits = Area $Continents_Europe;FactionTags AUS;Domains $Land
SelectFaction = $GER
RegInit = 2
SelectSubUnits = Area $Continents_Europe;FactionTags GER;Domains $Land
RegInit = 3
RegSum = Registry 1 1 1 1
RegInit = 4
RegSum = Registry 2 2 2 2 2
RegEval = 4;<;3
RegDeactivate = NULL

Actions

SelectFaction = $GER

SettleWhitePeace = SAX
SettleWhitePeace = HAN
SettleWhitePeace = HED
SettleWhitePeace = HEK
SettleWhitePeace = BAV
SettleWhitePeace = BAD
SettleWhitePeace = WUR

SetEvtOccurs = evt_nam_PRU_Austrian-warning-about-german-minors1890;999;0
SetEvtOccurs = evt_nam_Austria_reacts_GER_AI;999;0

EndEvent
[color="#FF0000"]- (ordnance) Your Lordship, sorry to awake you, but The french are at our door !

- Alarm, alarm, how did you let this happen and not awake me ! repel them, counterattack at once !

- err, your Lordship, ahem... French are our allies, Marshal de St Arnaud is expected to attend to a conference with you !

- ahem, well, .... very well ..let them in !

(charge of the light brigade movie)
[/color]

User avatar
Christophe.Barot
Posts: 1138
Joined: Fri Jan 26, 2007 10:55 pm
Location: Paris (France)

Reactions of other Powers

Wed Nov 13, 2013 1:40 am

/[color="#40E0D0"]/ reactions of Britain France and Russia to crisis - Italy is Pro german by principle
// note Britain approve of balance but does not downgrade relationships with Prussia though
note that I don't have change DiploItem Bias - would be handy - values are compared to natural situation in 1860 (Diplo Item Bias)[/color]

[color="#FF0000"]a Change DiploItemBias in addition to set would be handy there
[/color]

SelectFaction = $FRA
SelectRegion = $Osterreich
StartEvent = evt_nam_France_reacts_AUS_warning|1|2|NULL|NULL|$Osterreich|NULL

Conditions
EvalEvent = evt_nam_PRU_Austrian-warning-about-german-minors1890;=;1
EvalDiploItem = GER;$diDefensiveTreaty;NOT
EvalDiploItem = GER;$diShowSupport;NOT

Actions
SelectFaction = $FRA
ChgFacRelationships = AUS;10
ChgFacRelationships = GER;-10
AI.SetDiploItemBias = AUS;*War*;120;*DipSupport*;90;*Military*;50
AI.SetDiploItemBias = GER;*War*;250;*DipSupport*;50;*Military*;50

EndEvent

SelectFaction = $RUS
SelectRegion = $Osterreich
StartEvent = evt_nam_Russia_reacts_AUS_warning|1|2|NULL|NULL|$Osterreich|NULL

Conditions
EvalEvent = evt_nam_PRU_Austrian-warning-about-german-minors1890;=;1
EvalDiploItem = GER;$diDefensiveTreaty;NOT
EvalDiploItem = GER;$diShowSupport;NOT

Actions
SelectFaction = $RUS
ChgFacRelationships = AUS;10
ChgFacRelationships = GER;-10
AI.SetDiploItemBias = AUS;*War*;110;*DipSupport*;150;*Military*;60
AI.SetDiploItemBias = GER;*War*;110;*DipSupport*;50;*Military*;90

EndEvent


SelectFaction = $GBR
SelectRegion = $Osterreich
StartEvent = evt_nam_Britain_reacts_AUS_warning|1|2|NULL|NULL|$Osterreich|NULL

Conditions
EvalEvent = evt_nam_PRU_Austrian-warning-about-german-minors1890;=;1
EvalDiploItem = GER;$diDefensiveTreaty;NOT
EvalDiploItem = GER;$diShowSupport;NOT

Actions
SelectFaction = $RUS
ChgFacRelationships = AUS;10
AI.SetDiploItemBias = AUS;*War*;50;*DipSupport*;150;*Military*;90
AI.SetDiploItemBias = GER;*War*;80;*DipSupport*;50;*Military*;50

EndEvent
[color="#FF0000"]- (ordnance) Your Lordship, sorry to awake you, but The french are at our door !

- Alarm, alarm, how did you let this happen and not awake me ! repel them, counterattack at once !

- err, your Lordship, ahem... French are our allies, Marshal de St Arnaud is expected to attend to a conference with you !

- ahem, well, .... very well ..let them in !

(charge of the light brigade movie)
[/color]

User avatar
Christophe.Barot
Posts: 1138
Joined: Fri Jan 26, 2007 10:55 pm
Location: Paris (France)

and last step, Austria declares war

Wed Nov 13, 2013 1:52 am

[ATTACH]25689[/ATTACH]


[color="#40E0D0"]// here austria declares war if warning disregarded and Prussia did not accept peace with minors[/color]
here too, [color="#FF0000"]I need some advice to convert the excel file (I will make additions) into executable [/color]- it's impossible to add it directly because of size (and likely not the good method)
[color="#FF0000"]also can someone tell me if they have a tool to put pictures in the good format, I have pictures of Austrian army, but they're not in correct format, I'd like to create a few generic pictures, thanks
[/color]
SelectFaction = $AUS
SelectRegion = $Osterreich
StartEvent = evt_nam_Austria_declares_war_on_Prussia_about_Germany|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 3;7;11;15;19;23
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1

SelectFaction = $AUS
CheckAILevel = 1

EvalIsAtPeaceWith = FRA
EvalIsAtPeaceWith = RUS
EvalIsAtPeaceWith = GBR
EvalIsAtPeaceWith = GER

SelectFaction = $FRA

EvalDiploItem = GER;$diDefensiveTreaty;NOT
EvalDiploItem = GER;$diShowSupport;NOT

SelectFaction = $RUS

EvalDiploItem = GER;$diDefensiveTreaty;NOT
EvalDiploItem = GER;$diShowSupport;NOT

SelectFaction = $AUS
RegInit = 1
SelectSubUnits = Area $Continents_Europe;FactionTags AUS;Domains $Land
SelectFaction = $GER
RegInit = 2
SelectSubUnits = Area $Continents_Europe;FactionTags GER;Domains $Land
RegEval = 1;>=;2
RegDeactivate = NULL

Actions
ChgEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;CuOccurs;0
SetEvtOccurs = evt_nam_PRU_Austrian-warning-about-german-minors1890;CuOccurs;0

DescEvent = evt_nam_Austria_declares_war_on_Prussia_about_Germany
SelectFaction = $CMN
GenTextMsg = evt_nam_Austria_declares_war_on_Prussia_about_Germany;1;NULL;NULL;NULL
[color="#40E0D0"]// text and image about DOW to write
// send DOW information - need the technical help to expand file
[/color]

SelectFaction = $AUS

RemDiploItem = GER;$diDefensiveTreaty
AddDiploItem = GER;$diDeclareWar;CURRENT

EndEvent


[color="#40E0D0"]did I reset all the events for the next crisis in all the cases (war and no war) - can somebody else cross-check ? after some time, things tend to mix a bit [/color] ;)
Attachments
Deffilierung der Deutschmeister.jpg
[color="#FF0000"]- (ordnance) Your Lordship, sorry to awake you, but The french are at our door !

- Alarm, alarm, how did you let this happen and not awake me ! repel them, counterattack at once !

- err, your Lordship, ahem... French are our allies, Marshal de St Arnaud is expected to attend to a conference with you !

- ahem, well, .... very well ..let them in !

(charge of the light brigade movie)
[/color]

User avatar
Christophe.Barot
Posts: 1138
Joined: Fri Jan 26, 2007 10:55 pm
Location: Paris (France)

ensuring full reset of counters

Sat Dec 14, 2013 11:42 pm

[color="#40E0D0"]// there was an oversignt in case Austria and germany were at war, so reset must happen in all cases If I am not mistaken[/color]

SelectFaction = $AUS
SelectRegion = $Osterreich
StartEvent = evt_nam_Austrian_Prussian_reset|999|0|NULL|NULL|$Osterreich|NULL

Conditions
MinDate = 1850/01/01
MaxDate = 1890/01/01
TurnIndex = 3;7;11;15;19;23
EvalEvent = evt_nam_PRU_Austrian-minorGermanCrisis1890;=;1


EvalIsAtWarWith = GER


Actions
ChgEvtOccurs = evt_nam_PRU_Austrian-minorGermanCrisis1890;CuOccurs;0
SetEvtOccurs = evt_nam_PRU_Austrian-warning-about-german-minors1890;CuOccurs;0

EndEvent

[color="#FF0000"]now I really would like you folks to test the event[/color], [color="#40E0D0"]tell me if it works for you, and tell me your feeling, does it improves game reactivity, satisfactory, chrome (ok, I still have texts to write, will be done in typical 19th century chancelleries, be sure - I have nice images of Austrian troops or mobnilization, can someone give me hints to put them (easily) in game format[/color]
[color="#FF0000"]
as long as I don't have the full green light for this one, it is pointless to write the others ![/color]
[color="#FF0000"]- (ordnance) Your Lordship, sorry to awake you, but The french are at our door !

- Alarm, alarm, how did you let this happen and not awake me ! repel them, counterattack at once !

- err, your Lordship, ahem... French are our allies, Marshal de St Arnaud is expected to attend to a conference with you !

- ahem, well, .... very well ..let them in !

(charge of the light brigade movie)
[/color]

Return to “Help improve PON”

Who is online

Users browsing this forum: No registered users and 7 guests