; The War to End All Wars
;    Copyright (c)1998
;         St. Leo

@beginevents

@if
citytaken
city=Washington
attacker=Triple Alliance
defender=United States
@then
JustOnce
changemoney
receiver=Triple Alliance
amount=10000
TEXT
^The city of Washington is sacked
^by the Triple Alliance.
ENDTEXT
@endif

@if
citytaken
city=Berlin
attacker=anybody
defender=Triple Alliance
@then
JustOnce
changemoney
receiver=Great Britain
amount=10000
changemoney
receiver=United States
amount=10000
changemoney
receiver=French
amount=10000
changemoney
receiver=Russia
amount=10000
changemoney
receiver=Neutral Nations
amount=10000
TEXT
^The city of Berlin is taken
^and Germany forced to pay
^reparations.
ENDTEXT
@endif

@if
citytaken
city=St. Petersburg
attacker=anybody
defender=Russian Empire
@then
JustOnce
TEXT
^The capital of the tsar falls.
ENDTEXT
@endif

@if
citytaken
city=London
attacker=Triple Alliance
defender=Great Britain
@then
JustOnce
changemoney
receiver=Triple Alliance
amount=10000
TEXT
^The city of London is pillaged
^by the Triple Alliance.
ENDTEXT
@endif

@if
Turn=2
@then
Text
^Enthusiastic Canadians enlist in British armed forces.
^(Check Halifax)
EndText
CreateUnit
owner=Great Britain
unit=Riflemen
veteran=yes
homecity=none
locations
6, 14
7, 13
6, 12
endlocations
makeagression
who=Great Britain
whom=Triple Alliance
changemoney
receiver=Great Britain
amount=1000
@endif

@if
Turn=2
@then
makeagression
who=Triple Alliance
whom=France
@endif

@if
Turn=2
@then
makeagression
who=Russian Empire
whom=Triple Alliance
@endif

@if
Turn=2
@then
CreateUnit
owner=Great Britain
unit=Cavalry
veteran=yes
homecity=none
locations
6, 14
7, 13
6, 12
endlocations
@endif

@if
Turn=2
@then
CreateUnit
owner=Great Britain
unit=Cavalry
veteran=yes
homecity=none
locations
6, 14
7, 13
6, 12
endlocations
@endif

@if
Turn=2
@then
CreateUnit
owner=Great Britain
unit=Cavalry
veteran=yes
homecity=none
locations
6, 14
7, 13
6, 12
endlocations
@endif

@if
Turn=2
@then
CreateUnit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
6, 14
7, 13
6, 12
endlocations
@endif

@if
Turn=2
@then
CreateUnit
owner=Great Britain
unit=Cannon
veteran=yes
homecity=none
locations
6, 14
7, 13
6, 12
endlocations
@endif

@if
Turn=2
@then
CreateUnit
owner=Great Britain
unit=Cannon
veteran=yes
homecity=none
locations
6, 14
7, 13
6, 12
endlocations
@endif

@if
Turn=2
@then
CreateUnit
owner=Great Britain
unit=Cannon
veteran=yes
homecity=none
locations
6, 14
7, 13
6, 12
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
41, 31
40, 24
37, 21
34, 26
34, 36
35, 45
30, 46
27, 37
28, 30
endlocations
TEXT
^Germany launches more submarines
^in order to blockade the British
^Isles.
ENDTEXT
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
40, 24
37, 21
34, 26
34, 36
35, 45
30, 46
27, 37
28, 30
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
37, 21
34, 26
34, 36
35, 45
30, 46
27, 37
28, 30
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
34, 26
34, 36
35, 45
30, 46
27, 37
28, 30
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
34, 36
35, 45
30, 46
27, 37
28, 30
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
35, 45
30, 46
27, 37
28, 30
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
30, 46
27, 37
28, 30
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
30, 46
27, 37
28, 30
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
27, 37
28, 30
endlocations
@endif

@if
Turn=24
@then
createunit
owner=Triple Alliance
unit=Submarine
veteran=yes
homecity=none
locations
28, 30
endlocations
@endif

@if
Turn=21
@then
Text
^Wheat prices soar and thousands buy
^land in Canada to reap the profits.
ENDTEXT
CreateUnit
owner=Great Britain
unit=Engineers
veteran=yes
homecity=none
locations
4, 14
3, 13
38, 30
32, 32
endlocations
changemoney
receiver=Great Britain
amount=1000
@endif

@if
Turn=21
@then
CreateUnit
owner=Great Britain
unit=Engineers
veteran=yes
homecity=none
locations
3, 13
4, 14
38, 30
32, 32
endlocations
@endif

@if
Turn=21
@then
CreateUnit
owner=Great Britain
unit=Engineers
veteran=yes
homecity=none
locations
38, 30
3, 13
4, 14
32, 32
endlocations
@endif

@if
Turn=21
@then
CreateUnit
owner=Great Britain
unit=Engineers
veteran=yes
homecity=none
locations
38, 30
3, 13
4, 14
32, 32
endlocations
@endif

@if
Turn=21
@then
Text
^Demand for munitions rises and
^British profiteers notice.
ENDTEXT
CreateUnit
owner=Great Britain
unit=Artillery
veteran=yes
homecity=none
locations
38, 30
32, 32
endlocations
changemoney
receiver=Great Britain
amount=-500
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
55, 45
52, 36
62, 38
59, 41
71, 71
62, 92
53, 89
47, 87
39, 93
endlocations
TEXT
^Britain launches more dreadnoughts
^to counter-blockade the Triple
^Alliance.
ENDTEXT
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
52, 36
62, 38
59, 41
71, 71
62, 92
53, 89
47, 87
39, 93
endlocations
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
62, 38
59, 41
71, 71
62, 92
53, 89
47, 87
39, 93
endlocations
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
59, 41
71, 71
62, 92
53, 89
47, 87
39, 93
endlocations
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
71, 71
62, 92
53, 89
47, 87
39, 93
endlocations
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
62, 92
53, 89
47, 87
39, 93
endlocations
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
53, 89
47, 87
39, 93
endlocations
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
47, 87
39, 93
endlocations
@endif

@if
Turn=36
@then
createunit
owner=Great Britain
unit=Dreadnought
veteran=yes
homecity=none
locations
39, 93
endlocations
@endif

@if
Turn=39
@then
makeaggression
Who=United States
Whom=Triple Alliance
TEXT
^Enraged over unrestricted submarine
^warfare, US declares war on the Triple
^Alliance. The balance of power changes
^once again.
ENDTEXT
@endif

@if
Turn=39
@then
createunit
owner=barbarians
unit=Heavy Jeep
veteran=true
homecity=none
locations
69, 29
68, 26
66, 30
endlocations
TEXT
^Communist Red Army is at the
^gates of St. Petersburg.
ENDTEXT
@endif

@if
Turn=48
@then
changemoney
receiver=Great Britain
amount=5000
TEXT
^Government of Britain is extremely
^succesful in selling war bonds.
ENDTEXT
@endif

@if
Turn=47
@then
changemoney
receiver=Great Britain
amount=-1000
TEXT
^Disaster strikes the city of
^Hamilton. Two ships carrying
^munitions collide and explode,
^destroying most of the city.
^Governments throughout the
^British Empire donate money.
ENDTEXT
createunit
owner=barbarians
unit=Nuclear Msl.
veteran=yes
homecity=none
locations
7, 13
6, 12
5, 13
4, 14
endlocations
@endif

@if
Turn=48
@then
createunit
owner=Great Britain
unit=fighter
veteran=yes
homecity=none
locations
41, 43
35, 47
37, 91
endlocations
TEXT
^Billy Bishop Enlists in the Royal
^Air Force. During the War he will
^shoot down 72 enemy aircraft. 
ENDTEXT
@endif

@if
Turn=48
@then
createunit
owner=Great Britain
unit=fighter
veteran=yes
homecity=none
locations
41, 43
35, 47
37, 91
endlocations
@endif

@if
Turn=48
@then
createunit
owner=Great Britain
unit=fighter
veteran=yes
homecity=none
locations
41, 43
35, 47
37, 91
endlocations
@endif

@if
Turn=52
@then
createunit
owner=Triple Alliance
unit=fighter
veteran=yes
homecity=none
locations
48, 52
48, 50
46, 50
46, 52
endlocations
TEXT
^The Triple Alliance has begun its last desperate
^campaign.
ENDTEXT
@endif

@if
Turn=52
@then
createunit
owner=Triple Alliance
unit=Artillery
veteran=yes
homecity=none
locations
48, 52
48, 50
46, 50
46, 52
endlocations
@endif

@endevents