;Events file for 'The Lost Paradise'
;Authored by Stefan Hrtel (Stefan.Haertel@t-online.de)
;http://www.alexanderthegreat.de/civ2
;

@BEGINEVENTS
@IF
NOSCHISM
DEFENDER=Anybody
@THEN
@ENDIF
@IF
SCENARIOLOADED
@THEN
PLAYWAVEFILE
begin.wav
@ENDIF
@IF
SCENARIOLOADED
@THEN
DONTPLAYWONDERS
@ENDIF
;Floods
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
30,50,30,50,30,50,30,50
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
16,80,16,80,16,80,16,80
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
41,87,41,87,41,87,41,87
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
55,107,55,107,55,107,55,107
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
66,66,66,66,66,66,66,66
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
changeterrain
terraintype=8
maprect
75,93,75,93,75,93,75,93
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
79,57,79,57,79,57,79,57
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
91,73,91,73,91,73,91,73
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
92,72,92,72,92,72,92,72
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
139,79,139,79,139,79,139,79
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
122,24,122,24,122,24,122,24
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
145,19,145,19,145,19,145,19
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
PLAYWAVEFILE
flood.wav
changeterrain
terraintype=8
maprect
81,107,81,107,81,107,81,107
@ENDIF
;Volcanoes
@IF
RANDOMTURN
denominator=45
@THEN
PLAYWAVEFILE
volcano.wav
changeterrain
terraintype=7
maprect
49,95,49,95,49,95,49,95
JUSTONCE
@ENDIF
@IF
RANDOMTURN
denominator=45
@THEN
PLAYWAVEFILE
volcano.wav
changeterrain
terraintype=7
maprect
48,114,49,115,48,116,47,115
JUSTONCE
@ENDIF
@IF
RANDOMTURN
denominator=45
@THEN
changeterrain
terraintype=7
maprect
62,86,62,86,62,86,62,86
JUSTONCE
@ENDIF
@IF
RANDOMTURN
denominator=45
@THEN
PLAYWAVEFILE
volcano.wav
changeterrain
terraintype=7
maprect
55,87,55,87,55,87,55,87
JUSTONCE
@ENDIF
@IF
RANDOMTURN
denominator=45
@THEN
PLAYWAVEFILE
volcano.wav
changeterrain
terraintype=7
maprect
75,97,75,97,75,97,75,97
JUSTONCE
@ENDIF
@IF
RANDOMTURN
denominator=45
@THEN
PLAYWAVEFILE
volcano.wav
changeterrain
terraintype=7
maprect
81,107,81,107,81,107,81,107
JUSTONCE
@ENDIF
@IF
RANDOMTURN
denominator=45
@THEN
PLAYWAVEFILE
volcano.wav
changeterrain
terraintype=7
maprect
119,85,119,85,119,85,119,85
JUSTONCE
@ENDIF
@IF
RANDOMTURN
denominator=45
@THEN
PLAYWAVEFILE
volcano.wav
changeterrain
terraintype=7
maprect
108,66,108,66,108,66,108,66
JUSTONCE
@ENDIF
@IF
RANDOMTURN
denominator=45
@THEN
PLAYWAVEFILE
volcano.wav
changeterrain
terraintype=7
maprect
29,115,30,116,29,117,28,116
JUSTONCE
@ENDIF
;Storms etc.
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
86,88
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
73,53
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
50,74
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
110,48
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
121,73
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
88,114
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
66,100
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
9,13
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
@IF
RANDOMTURN
denominator=15
@THEN
CREATEUNIT
unit=Storm
owner=Barbarians
veteran=false
homecity=none
locations
22,68
endlocations
PLAYWAVEFILE
storm.wav
@ENDIF
;Villages
@IF
UNITKILLED
unit=Village
attacker=polynesians
defender=barbarians
@THEN
TEXT
A local village is destroyed. The loot is worth 250 gold.
endtext
CHANGEMONEY
amount=250
receiver=polynesians
@ENDIF
@IF
UNITKILLED
unit=Village
attacker=melanesians
defender=barbarians
@THEN
TEXT
A local village is destroyed. The loot is worth 250 gold.
endtext
CHANGEMONEY
amount=250
receiver=melanesians
@ENDIF
@IF
UNITKILLED
unit=Village
attacker=micronesians
defender=barbarians
@THEN
TEXT
A local village is destroyed. The loot is worth 250 gold.
endtext
CHANGEMONEY
amount=250
receiver=micronesians
@ENDIF
@IF
UNITKILLED
unit=Village
attacker=papua
defender=barbarians
@THEN
TEXT
A local village is destroyed. The loot is worth 250 gold.
endtext
CHANGEMONEY
amount=250
receiver=papua
@ENDIF
@IF
UNITKILLED
unit=Village
attacker=maori
defender=barbarians
@THEN
TEXT
A local village is destroyed. The loot is worth 250 gold.
endtext
CHANGEMONEY
amount=250
receiver=maori
@ENDIF
@IF
UNITKILLED
unit=Village
attacker=anybody
defender=barbarians
@THEN
PLAYWAVEFILE
destroy.wav
@ENDIF
@IF
UNITKILLED
unit=cannibal village
attacker=anybody
defender=barbarians
@THEN
TEXT
A village inhabitated by merciless cannibals is destroyed! The loot is worth 100 gold.
endtext
CHANGEMONEY
amount=100
receiver=triggerattacker
@ENDIF
@IF
UNITKILLED
attacker=anybody
defender=barbarians
unit=cannibal village
@THEN
PLAYWAVEFILE
destroy.wav
@ENDIF
;Text Messages
@IF
TURN
turn=0
@THEN
TEXT
^^THE LOST PARADISE
^
^^A scenario by Stefan Hrtel
^
^^Special thanks to Javier Muoz Kirschberg (yaroslav) and Vincent Frachebourg (Cyrion)
endtext
@ENDIF

@IF
UNITKILLED
unit=Humpback Whale
attacker=Polynesians
defender=Barbarians
@THEN
TEXT
Polynesian whale catchers catch a humpback whale and bring back the flesh.
endtext
createunit
unit=Whale Flesh
owner=Polynesians
veteran=false
homecity=NONE
locations
94,80
106,76
101,59
endlocations
@ENDIF
@IF
UNITKILLED
unit=Humpback Whale
attacker=Micronesians
defender=Barbarians
@THEN
TEXT
Micronesian whale catchers catch a humpback whale and bring back the flesh.
endtext
createunit
unit=Whale Flesh
owner=Micronesians
veteran=false
homecity=NONE
locations
70,42
endlocations
@ENDIF
@IF
UNITKILLED
unit=Humpback Whale
attacker=Melanesians
defender=Barbarians
@THEN
TEXT
Melanesian whale catchers catch a humpback whale and bring back the flesh.
endtext
createunit
unit=Whale Flesh
owner=Melanesians
veteran=false
homecity=NONE
locations
47,85
endlocations
@ENDIF
@IF
UNITKILLED
unit=Humpback Whale
attacker=Maori
defender=Barbarians
@THEN
TEXT
Maori whale catchers catch a humpback whale and bring back the flesh.
endtext
createunit
unit=Whale Flesh
owner=Maori
veteran=false
homecity=NONE
locations
101,107
endlocations
@ENDIF
@IF
UNITKILLED
unit=Humpback Whale
attacker=Papua
defender=Barbarians
@THEN
TEXT
Papua whale catchers catch a humpback whale and bring back the flesh.
endtext
createunit
unit=Whale Flesh
owner=Papua
veteran=false
homecity=NONE
locations
46,108
endlocations
@ENDIF
@IF
UNITKILLED
unit=Blue Whale
attacker=Polynesians
defender=Barbarians
@THEN
TEXT
Polynesian whale catchers catch a blue whale!
endtext
changemoney
receiver=Polynesians
amount=500
@ENDIF
@IF
UNITKILLED
unit=Blue Whale
attacker=Micronesians
defender=Barbarians
@THEN
TEXT
Micronesians whale catchers catch a blue whale!
endtext
changemoney
receiver=Micronesians
amount=500
@ENDIF
@IF
UNITKILLED
unit=Blue Whale
attacker=Melanesians
defender=Barbarians
@THEN
TEXT
Melanesian whale catchers catch a blue whale!
endtext
changemoney
receiver=Melanesians
amount=500
@ENDIF
@IF
UNITKILLED
unit=Blue Whale
attacker=Maori
defender=Barbarians
@THEN
TEXT
Maori whale catchers catch a blue whale!
endtext
changemoney
receiver=Maori
amount=500
@ENDIF
@IF
UNITKILLED
unit=Blue Whale
attacker=Papua
defender=Barbarians
@THEN
TEXT
Papua whale catchers catch a blue whale!
endtext
changemoney
receiver=Papua
amount=500
@ENDIF
@IF
RANDOMTURN
denominator=20
@THEN
CREATEUNIT
unit=Humpback Whale
owner=Barbarians
veteran=false
homecity=none
locations
28,68
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=20
@THEN
CREATEUNIT
unit=Humpback Whale
owner=Barbarians
veteran=false
homecity=none
locations
46,75
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=20
@THEN
CREATEUNIT
unit=Humpback Whale
owner=Barbarians
veteran=false
homecity=none
locations
67,75
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=20
@THEN
CREATEUNIT
unit=Humpback Whale
owner=Barbarians
veteran=false
homecity=none
locations
11,97
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=20
@THEN
CREATEUNIT
unit=Humpback Whale
owner=Barbarians
veteran=false
homecity=none
locations
93,97
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=20
@THEN
CREATEUNIT
unit=Humpback Whale
owner=Barbarians
veteran=false
homecity=none
locations
143,39
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=20
@THEN
CREATEUNIT
unit=Humpback Whale
owner=Barbarians
veteran=false
homecity=none
locations
100,18
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
CREATEUNIT
unit=Blue Whale
owner=Barbarians
veteran=false
homecity=none
locations
128,56
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
CREATEUNIT
unit=Blue Whale
owner=Barbarians
veteran=false
homecity=none
locations
63,5
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
CREATEUNIT
unit=Blue Whale
owner=Barbarians
veteran=false
homecity=none
locations
3,7
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
CREATEUNIT
unit=Blue Whale
owner=Barbarians
veteran=false
homecity=none
locations
136,100
endlocations
@ENDIF
@IF
RANDOMTURN
denominator=35
@THEN
CREATEUNIT
unit=Blue Whale
owner=Barbarians
veteran=false
homecity=none
locations
88,100
endlocations
@ENDIF
@IF
NEGOTIATIONS
talker=rapa nui
listener=ANYBODY
talkertype=humanorcomputer
listenertype=humanorcomputer
@THEN
@ENDIF
@IF
NEGOTIATIONS
talker=anybody
listener=rapa nui
talkertype=humanorcomputer
listenertype=humanorcomputer
@THEN
@ENDIF
@ENDEVENTS