; 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
;


;Experimental NOTALK events


;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
;Checkflag
;Who=Imperials
;Mask=0b00000000000000000000000000000001
;Threshold=1
;State=On
@THEN
MOVEUNIT
unit=AnyUnit
owner=Imperials
maprect
25,19,43,19,43,41,25,41
moveto
38,18
numbertomove=all
@ENDIF

@IF
;Checkflag
;Who=Imperials
;Mask=0b00000000000000000000000000000001
;Threshold=1
;State=On
;@AND
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
It is the Spring of 1757. Both Prussia and Austria mobilize new armies.
France sends two armies against Prussia. To the east, the Russians are on
the march as well. Frederick faces his greatest challenge.
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=4
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=2
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=4
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=2
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=1
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=2
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=2
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=1
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=4
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=4
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=8
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=2
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


;Prussians (British, Hanoverians, Hessians)

;Prince Ferdinand


@IF
CITYTAKEN
city=Minden
attacker=ANYBODY
defender=British
@THEN
FLAG
continuous
flag=0
Who=British
state=on
@ENDIF

@IF
CITYTAKEN
city=Hanover
attacker=ANYBODY
defender=British
@THEN
FLAG
continuous
flag=1
Who=British
state=off
@ENDIF

@IF
CITYTAKEN
city=Bremen
attacker=ANYBODY
defender=British
@THEN
FLAG
continuous
flag=2
Who=British
state=on
@ENDIF

@IF
CITYTAKEN
city=Brunswick
attacker=ANYBODY
defender=British
@THEN
FLAG
continuous
flag=3
Who=British
state=off
@ENDIF

@IF
Checkflag
Who=British
Mask=0b00000000000000000000000000001111
Threshold=2
State=On
@THEN
JUSTONCE
GiveTechnology
technology=97
receiver=British
TEXT
The Duke of Cumberland is defeated. He signs the
Convention of Klosterseven, demoblizing his army,
and ceding control of Hanover to the French.
ENDTEXT
@ENDIF

@IF
ReceivedTechnology
receiver=British
technology=97
@THEN
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 refuses to ratify the Convention 
of Klosterseven. He 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
Randomize
locations
22,14
22,20
25,19
29,19
endlocations
@ENDIF


@IF
RandomTurn
denominator=3
@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
endlocations
@ENDIF

@IF
RandomTurn
denominator=2
@AND
Checkflag
Who=Austrians
Mask=0b11000000000000000000000000000001
Threshold=2
State=On
@THEN
CREATEUNIT
unit=Lt. Dragoon (Br)
owner=Prussians
veteran=no
Count=2
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=Grenadier (Br)
owner=Prussians
veteran=no
Count=2
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=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=2
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=2
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=Hussar (Ha)
owner=Prussians
veteran=no
Count=2
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=6
homecity=none
randomize
locations
25,19
29,19
22,14
22,20
endlocations
@ENDIF

;Hessians

@IF
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
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
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=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=Siege Battery
owner=Austrians
veteran=no
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

;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=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=Horse Art. (Fr)
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

@IF
Checkflag
Who=Austrians
Mask=0b00000000000000000000000000000001
Threshold=1
State=On
@THEN
CREATEUNIT
unit=Siege Battery
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

;
;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=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=Hussar (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=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=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=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=6
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=1
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=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=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

;Russians

;"Peace" to Prussia
;Turn 66

@IF
TURN
turn=66
@THEN
FLAG
continuous
flag=0
Who=Prussians
state=on
GiveTechnology
technology=76
receiver=Russians
@ENDIF

@IF
TURN
turn=66
@THEN
GiveTechnology
technology=72
receiver=French
@ENDIF


@IF
TURN
turn=66
@THEN
GiveTechnology
technology=73
receiver=Austrians
@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
JUSTONCE
PlayWaveFile
Victory.wav
TEXT
Prussia has survived. Everafter, you will be
known as Frederick THE GREAT! Congratulations, 
you have won the game.
ENDTEXT
EndGame
endscreens=Off
@ENDIF

;Prussia gets das Ende
@IF
ReceivedTechnology
receiver=Prussians
technology=74
@AND
Checkflag
Who=Prussians
Mask=0b00000000000000000001111111110000
Threshold=5
State=On
JUSTONCE
@THEN
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
EndGame
endscreens=Off
@ENDIF

@ENDEVENTS