;
;events for part one: 'The Hunters'
;

@BEGINEVENTS

@IF
NOSCHISM
defender=ANYBODY
@THEN
@ENDIF

@IF
SCENARIOLOADED
@THEN
DONTPLAYWONDERS
@ENDIF

@IF
NEGOTIATION
talker=ANYBODY
talkertype=HumanOrComputer
listener=ANYBODY
listenertype=HumanOrComputer
@THEN
@ENDIF

@IF
UNITKILLED
unit=Freighter
attacker=Germans
defender=English
@THEN
CHANGEMONEY
receiver=English
amount=-100
MOVEUNIT
unit=Freighter
owner=English
maprect
87,45,91,45,91,57,87,57
moveto
42,64
numbertomove=ALL
@ENDIF

@IF
UNITKILLED
unit=Tanker
attacker=Germans
defender=English
@THEN
CHANGEMONEY
receiver=English
amount=-200
MOVEUNIT
unit=Tanker
owner=English
maprect
87,45,91,45,91,57,87,57
moveto
42,64
numbertomove=ALL
@ENDIF

@IF
RANDOMTURN
denominator=2
@THEN
CREATEUNIT
unit=Tanker
owner=English
veteran=no
homecity=NONE
locations
49,99
48,98
50,98
50,100
48,100
0,0
0,0
0,0
0,0
0,0
endlocations
MOVEUNIT
unit=Tanker
owner=English
maprect
47,97,51,97,51,101,47,101
moveto
86,36
numbertomove=ALL
@ENDIF

@IF
RANDOMTURN
denominator=3
@THEN
CREATEUNIT
unit=Freighter
owner=English
veteran=no
homecity=NONE
locations
27,97
29,97
31,97
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

; Freetown-UK convoys

@IF
RANDOMTURN
denominator=2
@THEN
CREATEUNIT
unit=Freighter
owner=English
veteran=yes
homecity=NONE
locations
79,113
78,112
80,112
80,114
78,113
0,0
0,0
0,0
0,0
endlocations
MOVEUNIT
unit=Freighter
owner=English
maprect
77,111,81,111,81,115,77,115
moveto
79,37
numbertomove=ALL
@ENDIF

@IF
TURN
turn=-1
@THEN
CREATEUNIT
unit=Freighter
owner=English
veteran=no
homecity=NONE
locations
47,53
50,54
52,54
52,56
50,56
0,0
0,0
0,0
0,0
endlocations
@ENDIF

; Halifax-UK convoys

@IF
TURN
turn=-1
@THEN
CREATEUNIT
unit=Freighter
owner=English
veteran=yes
homecity=NONE
locations
51,55
50,54
52,54
52,56
50,56
0,0
0,0
0,0
0,0
endlocations
MOVEUNIT
unit=Freighter
owner=English
maprect
49,53,53,53,53,57,49,57
moveto
85,33
numbertomove=ALL
@ENDIF

; UK-Halifax Convoys

@IF
TURN
turn=-1
@THEN
CREATEUNIT
unit=Freighter
owner=English
veteran=no
homecity=NONE
locations
85,31
84,30
86,30
86,32
84,32
0,0
0,0
0,0
0,0
endlocations
MOVEUNIT
unit=Freighter
owner=English
maprect
83,29,87,29,87,33,83,33
moveto
41,59
numbertomove=ALL
@ENDIF

@IF
TURN
turn=12
@THEN
TEXT
On June 22 the German Army invades the Soviet Union. The German Navy and Air Force also
launch attacks on the Soviet Navy.
ENDTEXT
MAKEAGGRESSION
who=Germans
whom=Soviets
@ENDIF

@IF
TURN
turn=18
@THEN
TEXT
On the 7th of December the Imperial Japanese Navy raids the US Pacific Fleet's main base at 
Pearl Harbour. 
In an act of solidarity with Japan Hitler declares war on the United States.
ENDTEXT
MAKEAGGRESSION
who=Germans
whom=Americans
@ENDIF

@IF
TURN
turn=18
@THEN
GIVETECHNOLOGY
receiver=Americans
technology=87
@ENDIF

@IF
TURN
turn=18
@THEN
GIVETECHNOLOGY
receiver=English
technology=87
@ENDIF

@IF
TURN
turn=18
@THEN
GIVETECHNOLOGY
receiver=Germans
technology=87
@ENDIF

;Americans can build destroyers after Pearl Harbour

@IF
TURN
turn=18
@THEN
GIVETECHNOLOGY
receiver=Americans
technology=57
@ENDIF

@IF
UNITKILLED
unit=Bismarck Class
attacker=ANYBODY
defender=Germans
@THEN
TEXT
Following the loss of the Battleship Bismarck, Hitler orders the Kiegsmarine cease sending surface 
warships to raid Allied shipping. All construction of heavy warships is also cancelled. 
ENDTEXT
CHANGEMONEY
receiver=TRIGGERATTACKER
amount=1000
JUSTONCE
GIVETECHNOLOGY
receiver=Germans
technology=80
@ENDIF

@IF
RANDOMTURN
denominator=3
@THEN
CREATEUNIT
unit=RCN Corvette
owner=English
veteran=yes
homecity=NONE
locations
55,57
0,0
0,0
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

; US-UK

@IF
RECEIVEDTECHNOLOGY
technology=87
receiver=Americans
@THEN
CREATEUNIT
unit=Liberty Ship
owner=Americans
veteran=yes
homecity=NONE
locations
50,58
49,57
51,57
51,59
49,59
0,0
0,0
0,0
0,0
endlocations
MOVEUNIT
unit=Liberty Ship
owner=Americans
maprect
48,56,52,56,52,60,48,60
moveto
89,35
numbertomove=ALL
@ENDIF

; Iceland-US

@IF
RECEIVEDTECHNOLOGY
technology=87
receiver=Americans
@THEN
CREATEUNIT
unit=Liberty Ship
owner=Americans
veteran=yes
homecity=NONE
locations
75,27
74,26
76,26
76,28
74,28
0,0
0,0
0,0
0,0
endlocations
MOVEUNIT
unit=Liberty Ship
owner=Americans
maprect
73,25,77,25,77,29,73,29
moveto
30,84
numbertomove=ALL
@ENDIF

@ENDIF

@IF
TURN
turn=9
@THEN
TEXT
The Lend Lease Bill is passed by the US Congress and is signed into law by President Roosevelt.
ENDTEXT
GIVETECHNOLOGY
receiver=English
technology=58
@ENDIF

@IF
TURN
turn=13
@THEN
TEXT
The United States takes over the defence of Iceland.
ENDTEXT
CREATEUNIT
unit=PBY-Catalina
owner=Americans
veteran=yes
homecity=NONE
locations
76,24
0,0
0,0
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=US Battleship
owner=Americans
veteran=yes
homecity=NONE
locations
82,18
0,0
0,0
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=13
@THEN
CREATEUNIT
unit=Fleet Destroyer
owner=Americans
veteran=yes
homecity=NONE
locations
82,18
82,16
82,14
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=15
@THEN
TEXT
At a meeting at Placentia Bay in Newfoundland, President Roosevelt and Prime Minister Churchill 
sign the Atlantic Charter on board the British battleship 'Prince of Wales'.
ENDTEXT
CREATEUNIT
unit=King George V
owner=English
veteran=yes
homecity=NONE
locations
50,50
48,50
50,52
52,50
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=16
@THEN
TEXT
The United States Navy begins escorting British convoys in the western Atlantic.
ENDTEXT
GIVETECHNOLOGY
receiver=English
technology=26
CREATEUNIT
unit=US Destroyer
owner=English
veteran=yes
homecity=NONE
locations
50,56
0,0
0,0
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=58
receiver=English
@THEN
CHANGEMONEY
receiver=English
amount=150
@ENDIF

@IF
UNITKILLED
unit=Training Range
attacker=Germans
defender=English
@THEN
CREATEUNIT
unit=Training Range
owner=English
veteran=yes
homecity=NONE
locations
120,24
0,0
0,0
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=20
@THEN
TEXT
Following the formal entry of the United States into the war Admiral Donitz launches Operation 
Drumbeat, the deployment of U-Boats along the East Coast of the United States. German 
Skippers find rich hunting, and label this period the 'second happy time' (the first having taken 
place in early 1940 in British home waters).
ENDTEXT
CREATEUNIT
unit=Type IX
owner=Germans
veteran=yes
homecity=NONE
locations
41,63
42,62
40,66
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=20
@THEN
CREATEUNIT
unit=Type IX
owner=Germans
veteran=yes
homecity=NONE
locations
35,75
35,77
35,73
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=20
@THEN
CREATEUNIT
unit=Type IX
owner=Germans
veteran=yes
homecity=NONE
locations
36,88
0,0
0,0
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=-1
@THEN
MAKEAGGRESSION
who=Germans
whom=English
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=87
receiver=Germans
@THEN
MAKEAGGRESSION
who=Germans
whom=Americans
@ENDIF

@IF
TURN
turn=7
@THEN
TEXT
President Roosevelt is re-elected to a record third term.
ENDTEXT
@ENDIF

@IF
TURN
turn=8
@THEN
TEXT
In a 'fireside chat' on the Lend Lease Bill that he his proposing, President Roosevelt calls for the 
United States to become the "arsenal of democracy". Opinion polls indicate that a majority of 
Americans support the Lend Lease Bill.
ENDTEXT
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=1
receiver=ANYBODY
@THEN
TEXT
The Allies begin the production of the B-24 Liberator. This aircraft, fitted with airborne radar and 
a powerful armament of depth charges and rockets, quickly establishes itself as the most successful 
anti-submarine aircraft in the Allies ever expanding arsenal.
ENDTEXT
JUSTONCE
GIVETECHNOLOGY
receiver=English
technology=1
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=87
receiver=Germans
@THEN
CREATEUNIT
unit=Type IX
owner=Germans
veteran=yes
homecity=NONE
locations
52,64
49,75
50,96
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
RANDOMTURN
denominator=6
@THEN
TEXT
British naval reinforcements arrive in the Mediterranean via the Suez Canal
ENDTEXT
CREATEUNIT
unit=Battleship
owner=English
veteran=yes
homecity=NONE
locations
131,73
133,73
129,73
131,71
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
RANDOMTURN
denominator=6
@THEN
CREATEUNIT
unit=Type IX
owner=Germans
veteran=no
homecity=NONE
locations
57,85
57,87
57,89
57,83
59,83
55,83
0,0
0,0
0,0
endlocations
@ENDIF

@IF
RANDOMTURN
denominator=10
@THEN
TEXT
Another German blockade runner arrives in the Atlantic.
ENDTEXT
CREATEUNIT
unit=Blockade Runner
owner=Germans
veteran=yes
homecity=NONE
locations
62,124
64,124
66,124
68,124
0,0
0,0
0,0
0,0
0,0
endlocations
CHANGEMONEY
receiver=Germans
amount=500
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=1
receiver=ANYBODY
@THEN
TEXT
To counter the growing threat from Allied aircraft the Luftwaffe agrees to provide some long ranged Me-110 fighters to escort German submarines and aircraft. In addition, Donitz orders German naval engineers to begin working on plans to convert Type VII subs into anti-aircraft submarines
ENDTEXT
JUSTONCE
CREATEUNIT
unit=Me-110
owner=Germans
veteran=yes
homecity=NONE
locations
101,49
0,0
0,0
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
GIVETECHNOLOGY
receiver=Germans
technology=77
@ENDIF

@IF
RANDOMTURN
denominator=3
@THEN
CREATEUNIT
unit=Type VII
owner=Germans
veteran=no
homecity=NONE
locations
115,37
113,41
118,32
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
UNITKILLED
unit=Blockade Runner
attacker=ANYBODY
defender=Germans
@THEN
TEXT
Another blockade runner is intercepted at sea by Allied naval forces.
ENDTEXT
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=59
receiver=Germans
@THEN
TEXT
The Schnorchel is a tube which brings fresh air into submarines and allows them to operate their 
engines while submerged, thereby greatly limiting their vulnerability to aircraft.
ENDTEXT
JUSTONCE
@ENDIF

@IF
UNITKILLED
unit=RCN Corvette
attacker=Germans
defender=English
@THEN
TEXT
The Royal Canadian Navy experienced the most dramatic growth of any of the worlds armed 
forces during the Second World War. Canada entered the war with just 6 naval vessels, and 
ended the war with an amazing 600! This huge force was almost exclusively employed in 
escorting convoys, with the RCN providing half of the Allies escort forces.
ENDTEXT
JUSTONCE
@ENDIF

@IF
UNITKILLED
unit=Destroyer
attacker=Germans
defender=English
@THEN
TEXT
The Germans sink yet another British destroyer. During the early years of the war, these vital 
ships suffered near catastrophic losses, and by June 1940 the RN had only 74 operational 
destroyers available out of the pre-war fleet of 202 destroyers. 
With the shortage of destroyers greatly undermining Britain's ability to escort convoys and attack 
the feared German invasion fleet, the British Government begins negotiations with the United 
States in the hopes of acquiring some of the USN's mothballed WW1 era destroyers...
ENDTEXT
CHANGEMONEY
receiver=English
amount=-200
JUSTONCE
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=2
receiver=Americans
@THEN
CREATEUNIT
unit=LST
owner=Americans
veteran=yes
homecity=NONE
locations
36,68
31,75
51,53
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
RANDOMTURN
denominator=6
@THEN
TEXT
Another German submarine arrives in the Mediterranean. However, passing through the Straits 
of Gibraltar continues to be costly.
ENDTEXT
CREATEUNIT
unit=Type VII
owner=Germans
veteran=yes
homecity=NONE
locations
122,60
122,64
115,59
113,55
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
RANDOMTURN
denominator=4
@THEN
TEXT
German radar detects RAF bombers performing 'gardening' mine laying missions over the Baltic 
Sea.
ENDTEXT
CREATEUNIT
unit=Air Dropped Mine
owner=English
veteran=no
homecity=NONE
locations
109,35
110,36
115,37
118,32
112,38
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
UNITKILLED
unit=Destroyer
attacker=Germans
defender=English
@THEN
CREATEUNIT
unit=Old Destroyer
owner=English
veteran=yes
homecity=NONE
locations
41,61
49,53
47,61
39,79
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
UNITKILLED
unit=New York City
attacker=Germans
defender=Americans
@THEN
TEXT
Upon hearing the news of the Kiegsmarine's bombardment of New York City Hitler authorises a 
dramatic expansion of the Kiegsmarine and the construction of the 'H Project' super battleships. Meanwhile, the American government belatedly improves 
New York's defences.
ENDTEXT
CREATEUNIT
unit=City Defences
owner=Americans
veteran=yes
homecity=NONE
locations
34,62
0,0
0,0
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
UNITKILLED
unit=New York City
attacker=Germans
defender=Americans
@THEN
GIVETECHNOLOGY
receiver=Germans
technology=73
CHANGEMONEY
receiver=Germans
amount=1500
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=16
receiver=Americans
@THEN
CREATEUNIT
unit=Patrol Boat
owner=Americans
veteran=yes
homecity=NONE
locations
16,84
14,86
22,82
30,78
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF


@IF
TURN
turn=21
@THEN
TEXT
In February 1942 the German U-boat command adopts a new and complex cipher, by adding a 
fourth  rotor to the enigma machines used in German Submarines. This change effectively blinds the 
Allied code breakers who have previously been able to decode all messages sent using the three 
rotor enigma machine. 
(The Germans should now build the Shark Code wonder)
ENDTEXT
GIVETECHNOLOGY
receiver=Germans
technology=11
@ENDIF


@IF
TURN
turn=23
@THEN
TEXT
As a result of heavy casualties from U-Boat attacks, the United States Navy belatedly begins 
convoy operations along the American East Coast.
This marks the end of part 1 of this scenario. You must now save your game as SEA.sav (you must use this exact name for the new events to load), exit Civ 2, run cruelsea.bat in the cruel sea scenario directory and select part 2. Then load SEA.sav and continue playing.
ENDTEXT
GIVETECHNOLOGY
receiver=Americans
technology=16
@ENDIF

@IF
TURN
turn=24
@THEN
TEXT
If you're reading this, then new events didn't load. You must save your game as SEA.sav (you must use this exact name (and case) for the new events to load), exit Civ 2, run cruelsea.bat in the Cruel Sea scenario directory and select part 2. Then load SEA.sav and continue playing.
ENDTEXT
@ENDIF

@IF
RECEIVEDTECHNOLOGY
technology=26
receiver=English
@THEN
CREATEUNIT
unit=US Destroyer
owner=English
veteran=yes
homecity=NONE
locations
52,58
54,58
52,56
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
RANDOMTURN
denominator=3
@THEN
TEXT
Another Italian submarine breaks out into the Atlantic
ENDTEXT
CREATEUNIT
unit=Marconi Class
owner=Germans
veteran=no
homecity=no
locations
76,70
76,72
76,74
74,70
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
TURN
turn=-1
@THEN
MOVEUNIT
unit=Ocean Liner
owner=Americans
maprect
87,45,91,45,91,57,87,57
moveto
36,64
numbertomove=ALL
@ENDIF

UNITKILLED
unit=Freighter
attacker=Germans
defender=English
@THEN
MOVEUNIT
unit=Destroyer
owner=English
maprect
87,45,91,45,91,57,87,57
moveto
74,40
numbertomove=ALL
@ENDIF

UNITKILLED
unit=Freighter
attacker=Germans
defender=English
@THEN
MOVEUNIT
unit=Fleet Destroyer
owner=English
maprect
87,45,91,45,91,57,87,57
moveto
74,40
numbertomove=ALL
@ENDIF

UNITKILLED
unit=Freighter
attacker=Germans
defender=Americans
@THEN
MOVEUNIT
unit=Destroyer
owner=Americans
maprect
87,45,91,45,91,57,87,57
moveto
74,40
numbertomove=ALL
@ENDIF

UNITKILLED
unit=Freighter
attacker=Germans
defender=Americans
@THEN
MOVEUNIT
unit=Fleet Destroyer
owner=Americans
maprect
87,45,91,45,91,57,87,57
moveto
53,73
numbertomove=ALL
@ENDIF

@IF
RANDOMTURN
denominator=2
@THEN
CREATEUNIT
unit=Freighter
owner=English
veteran=no
homecity=NONE
locations
29,105
29,103
29,101
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF

@IF
RANDOMTURN
denominator=3
@THEN
CREATEUNIT
unit=Freighter
owner=English
veteran=yes
homecity=NONE
locations
70,32
70,34
70,36
0,0
0,0
0,0
0,0
0,0
0,0
endlocations
@ENDIF


@IF
UNITKILLED
unit=Destroyer
attacker=Germans
defender=English
@THEN
CHANGEMONEY
receiver=English
amount=-75
@ENDIF

@IF
UNITKILLED
unit=Fleet Destroyer
attacker=Germans
defender=English
@THEN
CHANGEMONEY
receiver=English
amount=-100
@ENDIF

@ENDEVENTS
