; Events file
; Civ II ToT Original Game extension
; Copyright 1999 MicroProse Software
;
;
; 
;



;
; Initialization
; --------------

@BEGINEVENTS
@INITFLAG
;@DEBUG


@IF
ScenarioLoaded
@THEN
PlayWaveFile
Begin.wav
@ENDIF

@IF
NOSCHISM
defender=ANYBODY
@THEN
@ENDIF

;
;Nobody can talk to anybody
;
@IF
Negotiation
talkermask=0b00000000000000101001000011010100
listenermask=0b00000000000000101001000011010100
@THEN
@ENDIF


;1
@IF
NEGOTIATION
talker=Prussians
talkertype=HumanOrComputer
listener=British
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=British
talkertype=HumanOrComputer
listener=Prussians
listenertype=HumanOrComputer
@THEN
@ENDIF

;2
@IF
NEGOTIATION
talker=French
talkertype=HumanOrComputer
listener=Austrians
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Austrians
talkertype=HumanOrComputer
listener=French
listenertype=HumanOrComputer
@THEN
@ENDIF

;3
@IF
NEGOTIATION
talker=Imperials
talkertype=HumanOrComputer
listener=Austrians
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Austrians
talkertype=HumanOrComputer
listener=Imperials
listenertype=HumanOrComputer
@THEN
@ENDIF

;4
@IF
NEGOTIATION
talker=Swedes
talkertype=HumanOrComputer
listener=Austrians
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Austrians
talkertype=HumanOrComputer
listener=Swedes
listenertype=HumanOrComputer
@THEN
@ENDIF


;5
@IF
NEGOTIATION
talker=French
talkertype=HumanOrComputer
listener=Russians
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Russians
talkertype=HumanOrComputer
listener=French
listenertype=HumanOrComputer
@THEN
@ENDIF

;6
@IF
NEGOTIATION
talker=French
talkertype=HumanOrComputer
listener=Imperials
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Imperials
talkertype=HumanOrComputer
listener=French
listenertype=HumanOrComputer
@THEN
@ENDIF

;7
@IF
NEGOTIATION
talker=French
talkertype=HumanOrComputer
listener=Swedes
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Swedes
talkertype=HumanOrComputer
listener=French
listenertype=HumanOrComputer
@THEN
@ENDIF

;8
@IF
NEGOTIATION
talker=Russians
talkertype=HumanOrComputer
listener=Imperials
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Imperials
talkertype=HumanOrComputer
listener=Russians
listenertype=HumanOrComputer
@THEN
@ENDIF

;9
@IF
NEGOTIATION
talker=Russians
talkertype=HumanOrComputer
listener=Swedes
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Swedes
talkertype=HumanOrComputer
listener=Russians
listenertype=HumanOrComputer
@THEN
@ENDIF

;10
@IF
NEGOTIATION
talker=Swedes
talkertype=HumanOrComputer
listener=Imperials
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
NEGOTIATION
talker=Imperials
talkertype=HumanOrComputer
listener=Swedes
listenertype=HumanOrComputer
@THEN
@ENDIF




;MOVEUNIT Events

@IF
ScenarioLoaded
@THEN
FLAG
continuous
who=French
State=On
Mask=0b00000000000000000000000000000111
@ENDIF

;If Pruss gets T of St. P
;Russian MU cancelled

@IF
ReceivedTechnology
receiver=Prussians
technology=80
@THEN
FLAG
continuous
flag=0
Who=French
state=off
@ENDIF

;Swedish MU cancelled

@IF
ReceivedTechnology
receiver=Prussians
technology=80
@THEN
FLAG
continuous
flag=1
Who=French
state=off
@ENDIF


;If Pruss gets T of Paris
;French MU cancelled

@IF
ReceivedTechnology
receiver=Prussians
technology=83
@THEN
FLAG
continuous
flag=2
Who=French
state=off
@ENDIF

;Austrians - SE grid, to Breslau

@IF
TURN
turn=Every
@THEN
MOVEUNIT
unit=AnyUnit
owner=Austrians
maprect
47,29,71,29,71,55,47,55
moveto
52,28
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@THEN
MOVEUNIT
unit=AnyUnit
owner=Austrians
maprect
47,29,71,29,71,55,47,55
moveto
52,28
numbertomove=all
@ENDIF

;Austrians - NE grid, to Berlin

@IF
TURN
turn=Every
@THEN
MOVEUNIT
unit=AnyUnit
owner=Austrians
maprect
46,2,70,2,70,28,46,28
moveto
38,18
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@THEN
MOVEUNIT
unit=AnyUnit
owner=Austrians
maprect
46,2,70,2,70,28,46,28
moveto
38,18
numbertomove=all
@ENDIF

;Austrians - W grid, to Berlin

@IF
TURN
turn=Every
@THEN
MOVEUNIT
unit=AnyUnit
owner=Austrians
maprect
0,18,46,18,46,54,0,54
moveto
38,18
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@THEN
MOVEUNIT
unit=AnyUnit
owner=Austrians
maprect
0,18,46,18,46,54,0,54
moveto
38,18
numbertomove=all
@ENDIF

;Russians - E grid, to Berlin

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=Russians
maprect
39,1,71,1,71,41,39,41
moveto
38,18
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=Russians
maprect
39,1,71,1,71,41,39,41
moveto
38,18
numbertomove=all
@ENDIF

;Russians - Retreat to E edge of map

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000001
Threshold=1
State=Off
@THEN
MOVEUNIT
unit=AnyUnit
owner=Russians
maprect
0,0,70,0,70,54,0,54
moveto
71,25
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000001
Threshold=1
State=Off
@THEN
MOVEUNIT
unit=AnyUnit
owner=Russians
maprect
0,0,70,0,70,54,0,54
moveto
71,25
numbertomove=all
@ENDIF

;French - SW grid, to Emden

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
6,12,14,12,14,26,6,26
moveto
16,14
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
6,12,14,12,14,26,6,26
moveto
16,14
numbertomove=all
@ENDIF

;French - W grid, to Minden

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
15,9,21,9,21,29,15,29
moveto
22,20
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
15,9,21,9,21,29,15,29
moveto
22,20
numbertomove=all
@ENDIF

;French - W grid, to Hanover

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
22,10,24,10,24,28,22,28
moveto
25,19
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
22,10,24,10,24,28,22,28
moveto
25,19
numbertomove=all
@ENDIF

;French - W grid, to Brunswick

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
25,7,29,7,29,25,25,25
moveto
31,19
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
25,7,29,7,29,25,25,25
moveto
31,19
numbertomove=all
@ENDIF

;French - SW grid, to Weimar

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
18,30,30,30,30,50,18,50
moveto
31,27
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
18,30,30,30,30,50,18,50
moveto
31,27
numbertomove=all
@ENDIF

;French - W grid, to Berlin

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
30,6,38,6,38,30,30,30
moveto
40,18
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
30,6,38,6,38,30,30,30
moveto
40,18
numbertomove=all
@ENDIF

;French - Retreat to Rheims

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=Off
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
0,0,70,0,70,54,0,54
moveto
3,35
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000100
Threshold=1
State=Off
@THEN
MOVEUNIT
unit=AnyUnit
owner=French
maprect
0,0,70,0,70,54,0,54
moveto
3,35
numbertomove=all
@ENDIF

;Swedes - N grid, to Berlin

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000010
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=Swedes
maprect
33,7,43,7,43,17,33,17
moveto
38,18
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000010
Threshold=1
State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=Swedes
maprect
33,7,43,7,43,17,33,17
moveto
38,18
numbertomove=all
@ENDIF

;Swedes - Retreat to Stralsund

@IF
TURN
turn=Every
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000010
Threshold=1
State=Off
@THEN
MOVEUNIT
unit=AnyUnit
owner=Swedes
maprect
0,0,70,0,70,54,0,54
moveto
37,7
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@AND
Checkflag
Who=French
Mask=0b00000000000000000000000000000010
Threshold=1
State=Off
@THEN
MOVEUNIT
unit=AnyUnit
owner=Swedes
maprect
0,0,70,0,70,54,0,54
moveto
37,7
numbertomove=all
@ENDIF

;British - E grid, to Munster

@IF
TURN
turn=Every
@THEN
MOVEUNIT
unit=AnyUnit
owner=British
maprect
20,8,32,8,32,26,20,26
moveto
19,21
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@THEN
MOVEUNIT
unit=AnyUnit
owner=British
maprect
20,8,32,8,32,26,20,26
moveto
19,21
numbertomove=all
@ENDIF

;Imperial moveunit

@IF
TURN
turn=Every
@THEN
MOVEUNIT
unit=AnyUnit
owner=Imperials
maprect
25,19,43,19,43,41,25,41
moveto
38,18
numbertomove=all
@ENDIF

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Anybody
Defender=Anybody
@THEN
MOVEUNIT
unit=AnyUnit
owner=Imperials
maprect
25,19,43,19,43,41,25,41
moveto
38,18
numbertomove=all
@ENDIF


;Prussian reinf. Spring, 1757

@IF
TURN
turn=10
@THEN
TEXT
Both Prussia and Austria mobilize new armies.
Frederick faces his greatest challenge as France, 
Russia and Sweden join the war.
ENDTEXT
CREATEUNIT
unit=Prince Henry
owner=Prussians
veteran=no
Count=1
homecity=none
locations
38,18
33,21
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Seydlitz
owner=Prussians
veteran=yes
Count=1
homecity=none
locations
38,18
33,21
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=General (Pr)
owner=Prussians
veteran=no
Count=1
homecity=none
locations
52,28
42,14
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Musketeer (Pr)
owner=Prussians
veteran=yes
Count=7
homecity=none
randomize
locations
38,18
38,18
38,18
33,21
33,21
52,28
52,28
65,5
42,14
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Grenadier (Pr)
owner=Prussians
veteran=yes
Count=2
homecity=none
randomize
locations
38,18
38,18
38,18
33,21
33,21
52,28
52,28
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Artillery (Pr)
owner=Prussians
veteran=yes
Count=2
homecity=none
randomize
locations
38,18
38,18
38,18
33,21
33,21
52,28
52,28
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Hussar (Pr)
owner=Prussians
veteran=no
Count=3
homecity=none
randomize
locations
38,18
38,18
38,18
33,21
33,21
52,28
52,28
65,5
42,14
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Kurassier (Pr)
owner=Prussians
veteran=no
Count=2
homecity=none
randomize
locations
38,18
38,18
38,18
33,21
33,21
52,28
52,28
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Horse Art. (Pr)
owner=Prussians
veteran=no
Count=1
homecity=none
randomize
locations
38,18
38,18
38,18
33,21
33,21
52,28
52,28
65,5
42,14
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Howitzer (Pr)
owner=Prussians
veteran=no
Count=1
homecity=none
randomize
locations
38,18
38,18
38,18
33,21
33,21
52,28
52,28
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Jaeger (Pr)
owner=Prussians
veteran=no
Count=2
homecity=none
randomize
locations
33,21
48,24
52,28
50,10
65,5
endlocations
@ENDIF

;British reinf. Spring, 1757

@IF
TURN
turn=11
@THEN
CREATEUNIT
unit=General (Br)
owner=British
veteran=no
Count=1
homecity=none
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

@IF
TURN
turn=11
@THEN
CREATEUNIT
unit=Artillery (Ha)
owner=British
veteran=no
Count=2
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

@IF
TURN
turn=11
@THEN
CREATEUNIT
unit=Horse Gren. (Ha)
owner=British
veteran=no
Count=2
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

@IF
TURN
turn=11
@THEN
CREATEUNIT
unit=Hussar (Ha)
owner=British
veteran=no
Count=2
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

@IF
TURN
turn=11
@THEN
CREATEUNIT
unit=Musketeer (Ha)
owner=British
veteran=no
Count=8
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

;Austrian reinf. Spring, 1757

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Feld-Marshal (Au)
owner=Austrians
veteran=no
Count=1
homecity=none
locations
41,35
41,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Feld-Marshal (Au)
owner=Austrians
veteran=yes
Count=1
homecity=none
locations
53,39
49,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=General (Au)
owner=Austrians
veteran=no
Count=2
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF


@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Kurassier (Au)
owner=Austrians
veteran=yes
Count=6
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Hussar (Au)
owner=Austrians
veteran=yes
Count=8
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Grenadier (Au)
owner=Austrians
veteran=no
Count=4
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Fusilier (Au)
owner=Austrians
veteran=no
Count=10
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Hungarian (Au)
owner=Austrians
veteran=no
Count=10
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Pandour (Au)
owner=Austrians
veteran=yes
Count=6
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Artillery (Au)
owner=Austrians
veteran=yes
Count=6
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Siege Battery
owner=Austrians
veteran=no
Count=4
homecity=none
randomize
locations
41,35
41,41
41,35
41,41
53,39
49,41
53,39
49,41
50,43
62,52
endlocations
@ENDIF

;French reinf. Spring, 1757
;at Venlo

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Marshal (Fr)
owner=French
veteran=no
Count=1
homecity=none
locations
10,24
3,35
2,44
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=General (Fr)
owner=French
veteran=no
Count=1
homecity=none
locations
10,24
3,35
2,44
endlocations
@ENDIF



@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Cuirassier (Fr)
owner=French
veteran=no
Count=4
homecity=none
locations
10,24
3,35
2,44
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Hussar (Fr)
owner=French
veteran=no
Count=6
homecity=none
locations
10,24
3,35
2,44
endlocations
@ENDIF


@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Grenadier (Fr)
owner=French
veteran=no
Count=4
homecity=none
locations
10,24
3,35
2,44
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Fusilier (Fr)
owner=French
veteran=no
Count=10
homecity=none
locations
10,24
3,35
2,44
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Artillery (Fr)
owner=French
veteran=no
Count=6
homecity=none
locations
10,24
3,35
2,44
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Horse Art. (Fr)
owner=French
veteran=no
Count=4
homecity=none
locations
10,24
3,35
2,44
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Siege Battery
owner=French
veteran=no
Count=3
homecity=none
randomize
locations
10,24
10,22
10,20
endlocations
@ENDIF


;at Cologne

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=General (Fr)
owner=French
veteran=no
Count=1
homecity=none
locations
16,26
16,32
12,36
1,49
endlocations
@ENDIF



@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Cuirassier (Fr)
owner=French
veteran=no
Count=2
homecity=none
locations
16,26
16,32
12,36
1,49
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Hussar (Fr)
owner=French
veteran=no
Count=6
homecity=none
locations
16,26
16,32
12,36
1,49
endlocations
@ENDIF


@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Grenadier (Fr)
owner=French
veteran=yes
Count=2
homecity=none
locations
16,26
16,32
12,36
1,49
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Fusilier (Fr)
owner=French
veteran=no
Count=8
homecity=none
locations
16,26
16,32
12,36
1,49
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Artillery (Fr)
owner=French
veteran=no
Count=6
homecity=none
locations
16,26
16,32
12,36
1,49
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Horse Art. (Fr)
owner=French
veteran=no
Count=4
homecity=none
locations
16,26
16,32
12,36
1,49
endlocations
@ENDIF

@IF
TURN
turn=10
@THEN
CREATEUNIT
unit=Siege Battery
owner=French
veteran=no
Count=2
homecity=none
locations
16,26
16,32
12,36
1,49
endlocations
@ENDIF

;French reinf. Summer, 1757
;at Frankfurt

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Marshal (Fr)
owner=French
veteran=no
Count=1
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=General (Fr)
owner=French
veteran=no
Count=1
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF



@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Cuirassier (Fr)
owner=French
veteran=yes
Count=4
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Hussar (Fr)
owner=French
veteran=no
Count=8
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF


@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Grenadier (Fr)
owner=French
veteran=no
Count=6
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Fusilier (Fr)
owner=French
veteran=no
Count=12
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Artillery (Fr)
owner=French
veteran=no
Count=6
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Horse Art. (Fr)
owner=French
veteran=yes
Count=4
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Siege Battery
owner=French
veteran=no
Count=3
homecity=none
locations
22,34
9,35
16,40
5,49
endlocations
@ENDIF


;Imperial reinforcements
;Summer, 1757 Nuremburg

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=General (Ba)
owner=Imperials
veteran=no
Count=2
homecity=none
locations
29,37
32,40
30,46
24,44
endlocations
@AND
FLAG
flag=0
Who=Imperials
state=on
continuous
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Fusilier (Ba)
owner=Imperials
veteran=no
Count=10
homecity=none
locations
29,37
32,40
30,46
24,44
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Dragoon (Ba)
owner=Imperials
veteran=no
Count=6
homecity=none
locations
29,37
32,40
30,46
24,44
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Artillery (Ba)
owner=Imperials
veteran=no
Count=6
homecity=none
locations
29,37
32,40
30,46
24,44
endlocations
@ENDIF

;Russian reinforcements
;Summer, 1757 E. Prussia


@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Marshal (Ru)
owner=Russians
veteran=yes
Count=2
homecity=none
randomize
locations
71,1
71,11
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=General (Ru)
owner=Russians
veteran=no
Count=2
homecity=none
randomize
locations
71,1
71,11
endlocations
@ENDIF



@IF
TURN
turn=14
@THEN
CREATEUNIT
unit=Cuirassier (Ru)
owner=Russians
veteran=no
Count=4
homecity=none
randomize
locations
71,1
71,11
endlocations
@ENDIF

@IF
TURN
turn=14
@THEN
CREATEUNIT
unit=Hussar (Ru)
owner=Russians
veteran=no
Count=8
homecity=none
randomize
locations
71,1
71,11
endlocations
@ENDIF


@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Grenadier (Ru)
owner=Russians
veteran=yes
Count=6
homecity=none
randomize
locations
71,1
71,11
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Musketeer (Ru)
owner=Russians
veteran=no
Count=20
homecity=none
randomize
locations
71,1
71,11
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Artillery (Ru)
owner=Russians
veteran=yes
Count=10
homecity=none
randomize
locations
71,1
71,11
endlocations
@ENDIF

@IF
TURN
turn=14
@THEN
CREATEUNIT
unit=Cossack (Ru)
owner=Russians
veteran=no
Count=10
homecity=none
randomize
locations
71,1
71,11
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Siege Battery
owner=Russians
veteran=no
Count=4
homecity=none
locations
71,1
71,11
endlocations
@ENDIF

;Annual reinforcements
;

;1757

@IF
TURN
turn=10
@THEN
FLAG
flag=1
Who=Austrians
state=on
@ENDIF

;1758

@IF
TURN
turn=22
@THEN
FLAG
flag=0
Who=Austrians
state=on
@ENDIF

;1759

@IF
TURN
turn=34
@THEN
FLAG
flag=0
Who=Austrians
state=on
@ENDIF

;1760

@IF
TURN
turn=46
@THEN
FLAG
flag=0
Who=Austrians
state=on
@ENDIF

;1761

@IF
TURN
turn=58
@THEN
FLAG
flag=0
Who=Austrians
state=on
@ENDIF

;1762

@IF
TURN
turn=70
@THEN
FLAG
flag=0
Who=Austrians
state=on
@ENDIF

;1763

@IF
TURN
turn=82
@THEN
FLAG
flag=0
Who=Austrians
state=on
@ENDIF


@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000011
Threshold=1
State=On
@THEN
PlayWaveFile
Spring.wav
TEXT
Spring arrives, and with it, the campaigning season.
The Coalition armies are reinforced, and ready to march.
ENDTEXT
@ENDIF

;Prussians

@IF
RandomTurn
denominator=2
@AND
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=General (Pr)
owner=Prussians
veteran=no
Count=1
homecity=none
randomize
locations
38,18
38,18
38,18
33,21
33,21
52,28
52,28
65,5
42,14
endlocations
@ENDIF


;Prussians (British, Hanoverians, Hessians)

;Prince Ferdinand

@IF
CityTaken
city=Hanover
attacker=Anybody
defender=British
@THEN
JUSTONCE
GiveTechnology
technology=97
receiver=British
@ENDIF

@IF
ReceivedTechnology
receiver=British
technology=97
@THEN
JustOnce
FLAG
continuous
flag=31
Who=Austrians
state=on
@ENDIF

@IF
ReceivedTechnology
receiver=British
technology=97
@THEN
JustOnce
FLAG
flag=30
Who=Austrians
state=on
@ENDIF


@IF
Checkflag
Who=Austrians
Mask=0b01000000000000000000000000000000
Threshold=1
State=On
@THEN
JUSTONCE
TEXT
King George II accepts Frederick II's plan
for an "Army of Observation" made up of German troops 
paid by the British. Ferdinand of Brunswick, 
a Prussian general, will command.
ENDTEXT
CREATEUNIT
unit=Prince Ferdinand
owner=Prussians
veteran=yes
Count=1
homecity=none
locations
29,19
25,19
22,14
22,20
endlocations
@ENDIF


@IF
RandomTurn
denominator=4
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=General (Br)
owner=Prussians
veteran=no
Count=1
homecity=none
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

@IF
RandomTurn
denominator=3
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Lt. Dragoon (Br)
owner=Prussians
veteran=no
Count=1
homecity=none
locations
25,19
29,19
22,14
endlocations
@ENDIF

@IF
RandomTurn
denominator=3
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Grenadier (Br)
owner=Prussians
veteran=no
Count=1
homecity=none
locations
25,19
29,19
22,14
endlocations
@ENDIF

@IF
RandomTurn
denominator=3
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Jaeger (Ha)
owner=Prussians
veteran=no
Count=1
homecity=none
locations
25,19
29,19
22,14
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Artillery (Ha)
owner=Prussians
veteran=no
Count=1
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Horse Gren. (Ha)
owner=Prussians
veteran=no
Count=1
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Hussar (Ha)
owner=Prussians
veteran=no
Count=1
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Musketeer (Ha)
owner=Prussians
veteran=no
Count=3
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

;Hessians

@IF
RandomTurn
denominator=2
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Musketeer (H-K)
owner=Prussians
veteran=no
Count=2
homecity=none
locations
24,28
29,19
25,19
22,14
22,20
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Dragoon (H-K)
owner=Prussians
veteran=no
Count=1
homecity=none
locations
24,28
29,19
25,19
22,14
22,20
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Artillery (H-K)
owner=Prussians
veteran=no
Count=1
homecity=none
locations
24,28
29,19
25,19
22,14
22,20
endlocations
@ENDIF


;
;Austrians

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Feld-Marshal (Au)
owner=Austrians
veteran=yes
Count=1
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=General (Au)
owner=Austrians
veteran=no
Count=2
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF


@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Kurassier (Au)
owner=Austrians
veteran=yes
Count=4
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Hussar (Au)
owner=Austrians
veteran=yes
Count=6
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Grenadier (Au)
owner=Austrians
veteran=no
Count=4
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Fusilier (Au)
owner=Austrians
veteran=no
Count=6
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Hungarian (Au)
owner=Austrians
veteran=no
Count=4
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Pandour (Au)
owner=Austrians
veteran=yes
Count=4
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Artillery (Au)
owner=Austrians
veteran=yes
Count=6
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Siege Battery
owner=Austrians
veteran=no
Count=2
homecity=none
randomize
locations
41,35
41,35
41,35
53,39
53,39
53,39
41,41
49,41
50,48
62,52
endlocations
@ENDIF

;French


@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Marshal (Fr)
owner=French
veteran=no
Count=1
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=General (Fr)
owner=French
veteran=no
Count=1
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF



@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Cuirassier (Fr)
owner=French
veteran=no
Count=4
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Hussar (Fr)
owner=French
veteran=no
Count=6
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF


@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Grenadier (Fr)
owner=French
veteran=no
Count=4
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Fusilier (Fr)
owner=French
veteran=no
Count=8
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Artillery (Fr)
owner=French
veteran=no
Count=6
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Horse Art. (Fr)
owner=French
veteran=no
Count=4
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Siege Battery
owner=French
veteran=no
Count=2
homecity=none
randomize
locations
10,24
10,24
10,24
10,24
16,26
16,26
16,26
16,26
16,26
0,26
endlocations
@ENDIF

;
;Russians

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Marshal (Ru)
owner=Russians
veteran=no
Count=1
homecity=none
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=General (Ru)
owner=Russians
veteran=no
Count=1
homecity=none
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF



@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Cuirassier (Ru)
owner=Russians
veteran=no
Count=4
homecity=none
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Hussar (Ru)
owner=Russians
veteran=no
Count=6
homecity=none
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Grenadier (Ru)
owner=Russians
veteran=no
Count=4
homecity=none
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Musketeer (Ru)
owner=Russians
veteran=no
Count=8
homecity=none
locations
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Artillery (Ru)
owner=Russians
veteran=yes
Count=6
homecity=none
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Siege Battery
owner=Russians
veteran=yes
Count=2
homecity=none
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Cossack (Ru)
owner=Russians
veteran=no
Count=8
homecity=none
randomize
locations
71,1
71,11
71,25
71,25
71,35
endlocations
@ENDIF

;
;Swedes

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000011
Threshold=1
State=On
@THEN
CREATEUNIT
unit=General (Sw)
owner=Swedes
veteran=no
Count=1
homecity=none
locations
37,7
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000011
Threshold=1
State=On
@AND
RandomTurn
denominator=2
@THEN
CREATEUNIT
unit=Grenadier (Sw)
owner=Swedes
veteran=no
Count=2
homecity=none
locations
37,7
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000011
Threshold=1
State=On
@AND
RandomTurn
denominator=2
@THEN
CREATEUNIT
unit=Dragoon (Sw)
owner=Swedes
veteran=no
Count=2
homecity=none
locations
37,7
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000011
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Musketeer (Sw)
owner=Swedes
veteran=no
Count=4
homecity=none
locations
37,7
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000011
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Hussar (Sw)
owner=Swedes
veteran=no
Count=4
homecity=none
locations
37,7
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000011
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Artillery (Sw)
owner=Swedes
veteran=no
Count=2
homecity=none
locations
37,7
endlocations
@ENDIF

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000011
Threshold=1
State=On
@AND
RandomTurn
denominator=2
@THEN
CREATEUNIT
unit=Siege Battery
owner=Swedes
veteran=no
Count=1
homecity=none
locations
37,7
endlocations
@ENDIF

;Russian Cossacks

@IF
TURN
turn=22
@THEN
Continuous
FLAG
flag=0
Who=Russians
state=on
@ENDIF

@IF
ReceivedTechnology
receiver=Russians
technology=80
@THEN
continuous
FLAG
flag=0
Who=Russians
state=off
@ENDIF

@IF
Checkflag
Who=Russians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@AND
RandomTurn
denominator=4
@THEN
CREATEUNIT
unit=Cossack (Ru)
owner=Russians
veteran=no
Count=2
homecity=none
randomize
locations
58,18
61,27
71,25
71,35
71,11
71,25
71,35
71,11
71,25
71,35
endlocations
@ENDIF

;Re-create Fortresses
;Prussia

@IF
CityTaken
city=Berlin
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
38,18
endlocations
@ENDIF

@IF
CityTaken
city=Magdeburg
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
33,21
endlocations
@ENDIF

@IF
CityTaken
city=Stettin
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
42,14
endlocations
@ENDIF

@IF
CityTaken
city=Kustrin
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
44,20
endlocations
@ENDIF

@IF
CityTaken
city=Glogau
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
48,24
endlocations
@ENDIF

@IF
CityTaken
city=Breslau
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
52,28
endlocations
@ENDIF

@IF
CityTaken
city=Kolberg
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
50,10
endlocations
@ENDIF

@IF
CityTaken
city=Konigsberg
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
65,5
endlocations
@ENDIF

@IF
CityTaken
city=Wesel
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
13,21
endlocations
@ENDIF

@IF
CityTaken
city=Schweidenitz
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
49,29
endlocations
@ENDIF

@IF
CityTaken
city=Neisse
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
52,32
endlocations
@ENDIF

@IF
CityTaken
city=Brieg
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
55,31
endlocations
@ENDIF

@IF
CityTaken
city=Kosel
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
57,35
endlocations
@ENDIF

;
;Fortresses -Britain

@IF
CityTaken
city=Bremen
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
22,14
endlocations
@ENDIF

;

@IF
CityTaken
city=Minden
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
22,20
endlocations
@ENDIF

;

@IF
CityTaken
city=Hanover
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
25,19
endlocations
@ENDIF


;

@IF
CityTaken
city=Brunswick
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
29,19
endlocations
@ENDIF

;

;Austria



@IF
CityTaken
city=Prague
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
41,35
endlocations
@ENDIF

;



@IF
CityTaken
city=Pilzen
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
37,37
endlocations
@ENDIF

;



@IF
CityTaken
city=Linz
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
41,47
endlocations
@ENDIF

;



@IF
CityTaken
city=Konigsgratz
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
47,33
endlocations
@ENDIF

;



@IF
CityTaken
city=Olmutz
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
53,39
endlocations
@ENDIF

;



@IF
CityTaken
city=Brunn
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
49,41
endlocations
@ENDIF

;

@IF
CityTaken
city=Vienna
attacker=Anybody
defender=Prussians
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
50,48
endlocations
TakeTechnology
whom=Austrians
technology=96
@ENDIF

@IF
CityTaken
city=Vienna
attacker=Prussians
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
50,48
endlocations
GiveTechnology
technology=96
receiver=Austrians
@ENDIF


@ENDIF

@IF
CityTaken
city=Raab
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
57,51
endlocations
@ENDIF

;

@IF
CityTaken
city=Budapest
attacker=Anybody
defender=Prussians
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
62,52
endlocations
TakeTechnology
whom=Austrians
technology=93
@ENDIF

@IF
CityTaken
city=Budapest
attacker=Prussians
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
62,52
endlocations
GiveTechnology
technology=93
receiver=Austrians
@ENDIF

;



@IF
CityTaken
city=Freiburg
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
17,45
endlocations
@ENDIF

;



@IF
CityTaken
city=Antwerp
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
6,20
endlocations
@ENDIF

;



@IF
CityTaken
city=Brussels
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
5,25
endlocations
@ENDIF

;



@IF
CityTaken
city=Liege
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
8,28
endlocations
@ENDIF

;
;Fortresses- Holy Roman Empire
;



@IF
CityTaken
city=Venlo
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
10,24
endlocations
@ENDIF

;



@IF
CityTaken
city=Cologne
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
16,26
endlocations
@ENDIF

;



@IF
CityTaken
city=Koblenz
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
16,32
endlocations
@ENDIF

;



@IF
CityTaken
city=Mainz
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
19,35
endlocations
@ENDIF

;



@IF
CityTaken
city=Frankfurt
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
22,34
endlocations
@ENDIF

;



@IF
CityTaken
city=Munster
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
19,21
endlocations
@ENDIF

;



@IF
CityTaken
city=Hamburg
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
26,10
endlocations
@ENDIF

;



@IF
CityTaken
city=Torgau
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
37,25
endlocations
@ENDIF

;


@IF
CityTaken
city=Dresden
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
39,31
endlocations
@ENDIF

;



@IF
CityTaken
city=Kassel
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
24,28
endlocations
@ENDIF

;



@IF
CityTaken
city=Passau
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
35,43
endlocations
@ENDIF

;



@IF
CityTaken
city=Munich
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
30,46
endlocations
@ENDIF

;



@IF
CityTaken
city=Ulm
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
24,44
endlocations
@ENDIF

;



@IF
CityTaken
city=Stuttgart
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
22,40
endlocations
@ENDIF

;



@IF
CityTaken
city=Amsterdam
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
6,16
endlocations
@ENDIF

;



@IF
CityTaken
city=Nuremburg
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
29,37
endlocations
@ENDIF

;
;Fortresses - France


@IF
CityTaken
city=Lille
attacker=Anybody
defender=Prussians
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
0,26
endlocations
TakeTechnology
whom=French
technology=92
@ENDIF

@IF
CityTaken
city=Lille
attacker=Prussians
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
0,26
endlocations
GiveTechnology
technology=92
receiver=Austrians
@ENDIF

;

@IF
CityTaken
city=Rheims
attacker=Anybody
defender=Prussians
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
3,35
endlocations
TakeTechnology
whom=French
technology=95
@ENDIF

@IF
CityTaken
city=Rheims
attacker=Prussians
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
3,35
endlocations
GiveTechnology
technology=95
receiver=Austrians
@ENDIF

;



@IF
CityTaken
city=Verdun
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
8,36
endlocations
@ENDIF

;



@IF
CityTaken
city=Metz
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
12,36
endlocations
@ENDIF

;



@IF
CityTaken
city=Strasbourg
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
16,40
endlocations
@ENDIF

;



@IF
CityTaken
city=Colmar
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
14,44
endlocations
@ENDIF

;



@IF
CityTaken
city=Belfort
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
12,48
endlocations
@ENDIF

;



@IF
CityTaken
city=Besancon
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
5,49
endlocations
@ENDIF

;
;Fortresses - Sweden
;



@IF
CityTaken
city=Stralsund
attacker=Anybody
defender=Anybody
@THEN
CreateUnit
owner=TriggerAttacker
unit=Fortress*
veteran=no
homecity=None
locations
37,7
endlocations
@ENDIF

;
;Prussian raids

@IF
UNITKILLED
Unit=Convoy
Attacker=Prussians
Defender=Anybody
@THEN
CREATEUNIT
unit=Convoy
owner=Prussians
veteran=no
Count=1
homecity=none
randomize
locations
38,18
38,18
33,21
52,28
42,14
40,10
65,5
16,14
endlocations
@ENDIF

;
;Prussian aggression

@IF
UNITKILLED
Unit=AnyUnit
Attacker=Prussians
Defender=Imperials
@THEN
JUSTONCE
GiveTechnology
technology=26
receiver=Russians
@ENDIF

;British Subsidy (Hanoverian Succession)

@IF
ReceivedTechnology
receiver=Prussians
technology=99
@THEN
JUSTONCE
TakeTechnology
whom=Prussians
technology=98
@ENDIF

@IF
ReceivedTechnology
receiver=Prussians
technology=94
@THEN
JUSTONCE
GiveTechnology
technology=98
receiver=Prussians
@ENDIF

;
;End of the Game

;"Peace" to Prussia
;Turn 66

@IF
TURN
turn=66
@THEN
FLAG
continuous
flag=0
Who=Prussians
state=on
@ENDIF


;If Pruss gets T of St. P

@IF
ReceivedTechnology
receiver=Prussians
technology=80
@THEN
FLAG
continuous
flag=1
Who=Prussians
state=on
@ENDIF


;If Pruss gets T of Paris

@IF
ReceivedTechnology
receiver=Prussians
technology=83
@THEN
FLAG
continuous
flag=2
Who=Prussians
state=on
@ENDIF

;If Pruss gets T. of Hubertsburg

@IF
ReceivedTechnology
receiver=Prussians
technology=87
@THEN
FLAG
continuous
flag=3
Who=Prussians
state=on
@ENDIF

;Russ gets D of Elisabeth

@IF
RandomTurn
denominator=12
@AND
Checkflag
Who=Prussians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
JUSTONCE
GiveTechnology
technology=77
receiver=Russians
TEXT
Tsarina Elisabeth dies in St. Petersburg.
Her heir,Tsar Paul, wants peace with Prussia.
ENDTEXT
PlayWaveFile
Funeral.wav
@ENDIF

;Elis dies, Russ can talk, Prussia gets T. of St. Petersburg

@IF
ReceivedTechnology
receiver=Russians
technology=77
@THEN
JUSTONCE
Negotiator
who=Russians
type=Talker
state=Clear
GiveTechnology
technology=80
receiver=Prussians
@ENDIF


@IF
ReceivedTechnology
receiver=Russians
technology=77
@THEN
JUSTONCE
Negotiator
who=Russians
type=Listener
state=Clear
@ENDIF

;Elis dies, Swedes can talk

@IF
ReceivedTechnology
receiver=Russians
technology=77
@THEN
JUSTONCE
Negotiator
who=Swedes
type=Talker
state=Clear
@ENDIF

@IF
ReceivedTechnology
receiver=Russians
technology=77
@THEN
JUSTONCE
Negotiator
who=Swedes
type=Listener
state=Clear
@ENDIF

;British

;Pruss gets Pitt's Defeat
@IF
RandomTurn
denominator=11
@AND
Checkflag
Who=Prussians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
JUSTONCE
GiveTechnology
technology=94
receiver=Prussians
TEXT
Pitt's government falls in London.
The new Prime Minister cuts the subsidies
to Prussia and begins negotiations with France.
ENDTEXT
@ENDIF


;if Pruss gets Pitt's D, then French can talk and Prussians get T of Paris (dnw)

@IF
ReceivedTechnology
receiver=Prussians
technology=94
@THEN
JUSTONCE
Negotiator
who=French
type=Talker
state=Clear
GiveTechnology
technology=83
receiver=Prussians
@ENDIF

@IF
ReceivedTechnology
receiver=Prussians
technology=94
@THEN
JUSTONCE
Negotiator
who=French
type=Listener
state=Clear
@ENDIF

;if Pruss gets Pitt's D, then Empire can talk

@IF
ReceivedTechnology
receiver=Prussians
technology=94
@THEN
JUSTONCE
Negotiator
who=Imperials
type=Talker
state=Clear
@ENDIF

@IF
ReceivedTechnology
receiver=Prussians
technology=94
@THEN
JUSTONCE
Negotiator
who=Imperials
type=Listener
state=Clear
@ENDIF

;Prussia gets T of Huberts, Austria can talk

@IF
Checkflag
Who=Prussians
Mask=0b00000000000000000000000000000111
Threshold=3
State=On
@AND
CityTaken
city=Anycity
attacker=Prussians
defender=Austrians
@THEN
JUSTONCE
GiveTechnology
technology=87
receiver=Prussians
TEXT
Maria Theresa, abandoned by her allies and
at the end of her resources, agrees to 
negotiate with her nemesis, Frederick the Great.
ENDTEXT
@ENDIF

@IF
ReceivedTechnology
receiver=Prussians
technology=87
@THEN
JUSTONCE
Negotiator
who=Austrians
type=Talker
state=Clear
@ENDIF

@IF
ReceivedTechnology
receiver=Prussians
technology=87
@THEN
JUSTONCE
Negotiator
who=Austrians
type=Listener
state=Clear
@ENDIF

;Pruss gets das Ende

@IF
Checkflag
Who=Prussians
Mask=0b00000000000000000000000000001111
Threshold=4
State=On
@THEN
JUSTONCE
GiveTechnology
technology=74
receiver=Prussians
@ENDIF

;Pruss gets das Ende

@IF
TURN
turn=88
@THEN
GiveTechnology
technology=74
receiver=Prussians
@ENDIF

@IF
CityTaken
city=Berlin
attacker=Anybody
defender=Prussians
@THEN
FLAG
continuous
flag=4
Who=Prussians
state=on
@ENDIF

@IF
CityTaken
city=Berlin
attacker=Prussians
defender=Anybody
@THEN
FLAG
continuous
flag=4
Who=Prussians
state=off
@ENDIF

@IF
CityTaken
city=Magdeburg
attacker=Anybody
defender=Prussians
@THEN
FLAG
continuous
flag=5
Who=Prussians
state=on
@ENDIF

@IF
CityTaken
city=Magdeburg
attacker=Prussians
defender=Anybody
@THEN
FLAG
continuous
flag=5
Who=Prussians
state=off
@ENDIF

@IF
CityTaken
city=Stettin
attacker=Anybody
defender=Prussians
@THEN
FLAG
continuous
flag=6
Who=Prussians
state=on
@ENDIF

@IF
CityTaken
city=Stettin
attacker=Prussians
defender=Anybody
@THEN
FLAG
continuous
flag=6
Who=Prussians
state=off
@ENDIF

@IF
CityTaken
city=Breslau
attacker=Anybody
defender=Prussians
@THEN
FLAG
continuous
flag=7
Who=Prussians
state=on
@ENDIF

@IF
CityTaken
city=Breslau
attacker=Prussians
defender=Anybody
@THEN
FLAG
continuous
flag=7
Who=Prussians
state=off
@ENDIF

@IF
CityTaken
city=Konigsberg
attacker=Anybody
defender=Prussians
@THEN
FLAG
continuous
flag=8
Who=Prussians
state=on
@ENDIF

@IF
CityTaken
city=Konigsberg
attacker=Prussians
defender=Anybody
@THEN
FLAG
continuous
flag=8
Who=Prussians
state=off
@ENDIF

@IF
CityTaken
city=Hanover
attacker=Anybody
defender=Prussians
@THEN
FLAG
continuous
flag=9
Who=Prussians
state=on
@ENDIF

@IF
CityTaken
city=Hanover
attacker=Prussians
defender=Anybody
@THEN
FLAG
continuous
flag=9
Who=Prussians
state=off
@ENDIF

@IF
UNITKILLED
Unit=Frederick II
Attacker=Anybody
Defender=Prussians
@THEN
TEXT
Frederick, King of Prussia, is dead.
ENDTEXT
PlayWaveFile
Funeral.wav
FLAG
continuous
who=Prussians
state=On
Mask=0b00000000000000000001110000000000
@ENDIF

;Pruss gets das Ende

@IF
ReceivedTechnology
receiver=Prussians
technology=74
@AND
Checkflag
Who=Prussians
Mask=0b00000000000000000001111111110000
Threshold=5
State=Off
@THEN
EndGame
endscreens=On
JUSTONCE
PlayWaveFile
Victory.wav
TEXT
Prussia has survived. Everafter, you will be
known as Frederick THE GREAT! Congratulations, 
you have won the game.
ENDTEXT
@ENDIF

;Prussia gets das Ende

@IF
ReceivedTechnology
receiver=Prussians
technology=74
@AND
Checkflag
Who=Prussians
Mask=0b00000000000000000001111111110000
Threshold=5
State=On
@THEN
EndGame
endscreens=On
JUSTONCE
PlayWaveFile
Funeral.wav
TEXT
Prussia has been defeated. Everafter, you will be
known as Frederick, the last king of Prussia. 
You have lost the game.
ENDTEXT
@ENDIF

@ENDEVENTS