;
; Events file 27/02/2000
;
; Original Game modified for Earth, Undersea, Orbit, AC.
;


@BEGINEVENTS
@INITFLAG

;
; Flags
; -----
;
; 0   not used
; 1   not used
; 2   not used
; 3   not used
; 4   not used
; 5   not used
; 6   not used
; 7   not used
; 8   not used
; 9   not used
; 10  not used
; 11  not used
; 12  not used
; 13  not used
; 14  not used
; 15  not used
; 16  not used
; 17  not used
; 18  not used
; 19  not used
; 20  not used
; 21  not used
; 22  not used
; 23  not used
; 24  not used
; 25  not used
; 26  not used
; 27  not used
; 28  not used
; 29  not used
; 30  not used
; 31  not used

;
; Prevent Interspecies Negotiations
; ---------------------------------

; prohibit negotiations between humans and aliens

@IF
Negotiation
talkermask=0b00000000000001111100111110011111
listenermask=0b00000000000110000011000001100000
@THEN
@ENDIF

; prohibit negotiations between aliens and humans

@IF
Negotiation
talkermask=0b00000000000110000011000001100000
listenermask=0b00000000000001111100111110011111
@THEN
@ENDIF

; when Trigger Tech (63) Ultrastring Theory is discovered,
; allow the discovering tribe to negotiate
; with the other species (as talker)

@IF
ReceivedTechnology
Receiver=Anybody
Technology=63
@THEN
Negotiator
who=triggerreceiver
type=talker
state=clear
@ENDIF

@IF
ReceivedTechnology
Receiver=Anybody
Technology=63
@THEN
Negotiator
who=triggerreceiver
type=listener
state=clear
@ENDIF



; when any of these special units are built
; notify the player of their special capabilities

@IF
CityProduction
builder=anybody
unit=Naval Artillery
@THEN
JustOnce
Text
The Naval Artillery unit is capable of attacking both land units and sea units. It is best placed in coastal cities which are equipped with City walls and Coastal defenses and left in 'Sleep' mode. It can be moved across the seas on a barge, but this is not recommended, as the units defense capability is very low and the barge cannot be moved out of sight of land for fear it will sink.
EndText
@ENDIF

@IF
CityProduction
builder=anybody
unit=Navy SEALS
@THEN
JustOnce
Text
The Navy SEALS unit is a 'land/sea' unit and is capable of skirting round the coastline before attacking land or sea units. It is a covert unit, meaning the enemy generally has no idea of its presence until the moment of attack. Like the trireme, it should not be moved out of sight of land for fear it will be lost.
EndText
@ENDIF


; when any of these special units are built
; notify the player of their special capabilities

@IF
CityProduction
builder=anybody
unit=Stlth Ftr.
@THEN
JustOnce
Text
The Stealth Fighter unit is almost undetectable to other units
EndText
@ENDIF

@IF
CityProduction
builder=anybody
unit=Stlth Bmbr.
@THEN
JustOnce
Text
The Stealth Bomber unit is almost undetectable to other units
EndText
@ENDIF


; when any of these intermap units are built
; notify the player of their intermap capabilities



@IF
CityProduction
builder=anybody
unit=U-Boat
@THEN
JustOnce
Text
The U-Boat naval unit can carry some units covertly
and is capable of descending below the sea and travelling
in the undersea realm, where it can sit silent and hidden,
evading other surface naval units.
Use the Teleport order to cause it to 'dive'
and to return it to the sea's surface.
EndText
@ENDIF

@IF
CityProduction
builder=anybody
unit=Killer Sub
@THEN
JustOnce
Text
The Killer Sub naval unit can see other submarines and
can carry some units covertly. Like the U-Boat it too is capable of descending
below the sea and travelling in the undersea realm,
where it can sit silent and hidden, waiting to destroy other
submarines or rise to the surface to harass enemy shipping.
Use the Teleport order to cause it to 'dive'
and to return it to the sea's surface.
EndText
@ENDIF


@IF
CityProduction
builder=anybody
unit=Missile Sub
@THEN
JustOnce
Text
The Missile Sub naval unit, as its name suggests,
can carry missiles. It too is capable of descending below the
sea and travelling in the undersea realm, where it can sit
silent and hidden, waiting to destroy other submarines
or rise to the surface to harass enemy shipping
or to launch missiles against an unsuspecting enemy.
Use the Teleport order to cause it to 'dive'
and to return it to the sea's surface.
EndText
@ENDIF

@IF
CityProduction
builder=anybody
unit=Sea-Mine
@THEN
JustOnce
Text
The Sea-Mine unit, while capable of limited movement
is best placed in strategic locations on the sea surface
or sea-floor and put to sleep so as to cripple any enemy shipping
coming into contact with it. It is almost invisible to other Units.
It is capable of descending below the sea.
Use the Teleport order to cause it to 'dive'
and to return it to the sea's surface.
EndText
@ENDIF


; when Space Flight discovered, notify
; the player of ability to build Shuttle

@IF
RECEIVEDTECHNOLOGY
receiver=Anybody
technology=76
@THEN
JustOnce
Text
When the secrets of Space Flight have been discovered you can build the
Shuttle unit which is capable of rising to orbit on its own power,
carrying certain units with it.
EndText
@ENDIF

; when the first shuttle is built, notify
; the player of its intermap capability

@IF
CityProduction
builder=anybody
unit=Shuttle
@THEN
JustOnce
Text
No Broadcast
The newly built Shuttle unit is capable of rising to orbit
on its own power, carrying certain units with it.
Use the Teleport order to move it into orbit around Earth,
and to return it to the surface.
EndText
@ENDIF

;
; Give Key Technology in Orbit (Map 3)
; ------------------------------------

; when the first shuttle is built,
; give the builder Fusion Power and
; notify the player

@IF
CityProduction
builder=anybody
unit=Shuttle
@THEN
JustOnce
GiveTechnology
technology=33
receiver=triggerdefender
Text
No Broadcast
On a test flight of the new Shuttle, explorers in orbit
around Earth have stumbled onto an ancient artifact of
immeasurable importance. The radio reports describe
a compact plasma containment unit. The original use of this
device remains unknown, but it shows great promise as a
safe containment field that will finally allow the realisation of
effective Fusion Power.
EndText
@ENDIF

; when each tribe builds its first shuttle,
; enable Fusion Power (33) for research
; with no notification

@IF
CityProduction
builder=anybody
unit=Shuttle
@THEN
EnableTechnology
whom=triggerdefender
technology=33
value=0
@ENDIF



; When Aliens discover Ultrastring Theory
; - Allow Alien Feephis to build Transporters to Orbit and to Earth

;
;  @IF
;  ReceivedTechnology
;  receiver=anybody
;  technology=63
;  @THEN
;  JustOnce
;  Transport
;  Unit=Feephi
;  State=On
;  Mode=Build
;  Type=1
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=anybody
;  technology=63
;  @THEN
;  JustOnce
;  Transport
;  unit=Feephi
;  state=On
;  mode=Build
;  type=2
;  @ENDIF
;

@IF
ReceivedTechnology
receiver=Gazpichi
technology=63
@THEN
JustOnce
Transport
Unit=Feephi
State=On
Mode=Build
Type=1
TEXT
^^Gazpichi discover Ultra String Theory !
^^They immediately seize upon the strategic implications of their discovery.
ENDTEXT
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
technology=63
@THEN
JustOnce
Transport
unit=Feephi
state=On
mode=Build
type=2
@ENDIF

;
; Scenario 1 - 
; Open up the South-East continent to the Gazpichi
;

@IF
ReceivedTechnology
Receiver=Gazpichi
technology=63
@THEN
JUSTONCE
CHANGETERRAIN
Map=1
terraintype=00
maprect
84,62,86,62,86,64,84,64
@ENDIF

;
; One turn later if possible,
;

@IF
TURN
turn=450
@THEN
JUSTONCE
Text
Strange Rumblings !
EndText
CHANGETERRAIN
Map=1
terraintype=00
maprect
82,64,84,64,84,66,82,66
@ENDIF


;
; Create some Gazpichi units.
;

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Feephi
veteran=No
homecity=none
randomize
locations
80,50,3
75,50,3
80,45,3
75,45,3
70,40,3
70,45,3
75,40,3
65,35,3
65,40,3
70,35,3
55,35,3
60,35,3
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=No
homecity=none
randomize
locations
78,48,0
73,43,0
68,38,0
77,43,0
72,38,0
68,47,0
73,48,0
68,43,0
77,38,0
72,47,0
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spy
veteran=Yes
homecity=none
randomize
locations
78,48,0
73,43,0
68,38,0
77,43,0
72,38,0
68,47,0
73,48,0
68,43,0
77,38,0
72,47,0
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=No
homecity=none
randomize
locations
79,50,3
74,50,3
79,45,3
74,45,3
69,40,3
69,45,3
74,40,3
64,35,3
64,40,3
69,35,3
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=No
homecity=none
randomize
locations
77,47,3
72,42,3
67,37,3
76,42,3
71,37,3
67,46,3
72,49,3
67,42,3
76,37,3
71,46,3
endlocations
@ENDIF


@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=No
homecity=none
randomize
locations
79,50,0
74,50,0
79,45,0
74,45,0
69,40,0
69,45,0
74,40,0
64,35,0
64,40,0
69,35,0
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=No
homecity=none
randomize
locations
77,47,0
72,42,0
67,37,0
76,42,0
71,37,0
67,46,0
72,49,0
67,42,0
76,37,0
71,46,0
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=Yes
homecity=none
randomize
locations
77,47,3
72,42,3
67,37,3
76,42,3
71,37,3
67,46,3
72,49,3
67,42,3
76,37,3
71,46,3
endlocations
@ENDIF


@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Feephi
veteran=No
homecity=none
randomize
locations
69,20,3
53,25,3
48,40,3
46,13,3
40,31,3
40,45,3
31,39,3
55,41,3
38,18,3
47,24,3
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=Yes
homecity=none
randomize
locations
70,20,3
54,25,3
49,40,3
47,13,3
41,31,3
41,45,3
32,39,3
56,41,3
39,18,3
48,24,3
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Diplomat
veteran=Yes
homecity=none
randomize
locations
69,20,3
53,25,3
48,40,3
46,13,3
40,31,3
40,45,3
31,39,3
55,41,3
38,18,3
47,24,3
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=No
homecity=none
randomize
locations
70,20,3
54,25,3
49,40,3
47,13,3
41,31,3
41,45,3
32,39,3
56,41,3
39,18,3
48,24,3
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=Yes
homecity=none
randomize
locations
70,20,3
54,25,3
49,40,3
47,13,3
41,31,3
41,45,3
32,39,3
56,41,3
39,18,3
48,24,3
endlocations
@ENDIF


@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Spithre
veteran=No
homecity=none
randomize
locations
74,36,0
68,35,0
70,48,0
79,40,0
73,40,0
65,45,0
66,49,0
63,37,0
60,45,0
60,17,0
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Diplomat
veteran=Yes
homecity=none
randomize
locations
74,36,0
68,35,0
70,48,0
79,40,0
73,40,0
65,45,0
66,49,0
63,37,0
60,45,0
60,17,0
endlocations
@ENDIF


@IF
ReceivedTechnology
Receiver=Gazpichi
Technology=63
@THEN
JustOnce
CreateUnit
owner=Gazpichi
unit=Diplomat
veteran=Yes
homecity=none
randomize
locations
74,36,3
68,35,3
70,48,3
79,40,3
73,40,3
65,45,3
66,49,3
63,37,3
60,45,3
60,17,3
endlocations
@ENDIF

; Treg
;
; Note that the Treg & Brr'til specific events do not seem to
; work once the Game has selected the 7 of 21 nations, and picked
; the Gazpichi as Aliens.
;
; So the Treg and the Brr'til events have been commeneted out.
;

; When Aliens discover Ultrastring Theory
; - Allow Alien Feephis to build Transporters to Orbit and to Earth
;

;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  technology=63
;  @THEN
;  JustOnce
;  Transport
;  unit=Feephi
;  state=On
;  mode=Build
;  type=1
;  TEXT
;  ^^Shocked Aliens discover there is a habitable planet circling Sol !
;  ENDTEXT
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  technology=63
;  @THEN
;  JustOnce
;  Transport
;  unit=Feephi
;  state=On
;  mode=Build
;  type=2
;  @ENDIF
;
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  TEXT
;  ^^Treg discover Ultra String Theory !
;  ENDTEXT
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Feephi
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  80,50,0
;  75,50,0
;  80,45,0
;  75,45,0
;  70,40,0
;  70,45,0
;  75,40,0
;  65,35,0
;  65,40,0
;  70,35,0
;  55,35,0
;  60,35,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  78,48,0
;  73,43,0
;  68,38,0
;  77,43,0
;  72,38,0
;  68,47,0
;  73,48,0
;  68,43,0
;  77,38,0
;  72,47,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  78,48,3
;  73,43,3
;  68,38,3
;  77,43,3
;  72,38,3
;  68,47,3
;  73,48,3
;  68,43,3
;  77,38,3
;  72,47,3
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  79,50,0
;  74,50,0
;  79,45,0
;  74,45,0
;  69,40,0
;  69,45,0
;  74,40,0
;  64,35,0
;  64,40,0
;  69,35,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  77,47,0
;  72,42,0
;  67,37,0
;  76,42,0
;  71,37,0
;  67,46,0
;  72,49,0
;  67,42,0
;  76,37,0
;  71,46,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Feephi
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  77,47,0
;  72,42,0
;  67,37,0
;  76,42,0
;  71,37,0
;  67,46,0
;  72,49,0
;  67,42,0
;  76,37,0
;  71,46,0
;  endlocations
;  @ENDIF
;
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Feephi
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  69,20,0
;  53,25,0
;  48,40,0
;  46,13,0
;  40,31,0
;  40,45,0
;  31,39,0
;  55,41,0
;  38,18,0
;  47,24,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  70,20,0
;  54,25,0
;  49,40,0
;  47,13,0
;  41,31,0
;  41,45,0
;  32,39,0
;  56,41,0
;  39,18,0
;  48,24,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Diplomat
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  69,20,0
;  53,25,0
;  48,40,0
;  46,13,0
;  40,31,0
;  40,45,0
;  31,39,0
;  55,41,0
;  38,18,0
;  47,24,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  70,20,0
;  54,25,0
;  49,40,0
;  47,13,0
;  41,31,0
;  41,45,0
;  32,39,0
;  56,41,0
;  39,18,0
;  48,24,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Feephi
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  70,20,0
;  54,25,0
;  49,40,0
;  47,13,0
;  41,31,0
;  41,45,0
;  32,39,0
;  56,41,0
;  39,18,0
;  48,24,0
;  endlocations
;  @ENDIF
;
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  74,36,0
;  68,35,0
;  70,48,0
;  79,40,0
;  73,40,0
;  65,45,0
;  66,49,0
;  63,37,0
;  60,45,0
;  60,17,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Treg
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Diplomat
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  74,36,0
;  68,35,0
;  70,48,0
;  79,40,0
;  73,40,0
;  65,45,0
;  66,49,0
;  63,37,0
;  60,45,0
;  60,17,0
;  endlocations
;  @ENDIF
;
;
;  ;
;  ; Brr'til
;  ;
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  TEXT
;  ^^Brr'til discover Ultra String Theory !
;  ENDTEXT
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Feephi
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  80,50,3
;  75,50,3
;  80,45,3
;  75,45,3
;  70,40,3
;  70,45,3
;  75,40,3
;  65,35,3
;  65,40,3
;  70,35,3
;  55,35,3
;  60,35,3
;  endlocations
;  @ENDIF
;
;
;  ; When Aliens discover Ultrastring Theory
;  ; - Allow Alien Feephis to build Transporters to Orbit and to Earth
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  technology=63
;  @THEN
;  JustOnce
;  Transport
;  unit=Feephi
;  state=On
;  mode=Build
;  type=1
;  TEXT
;  ^^Shocked Aliens discover there is a habitable planet circling Sol !
;  ENDTEXT
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  technology=63
;  @THEN
;  JustOnce
;  Transport
;  unit=Feephi
;  state=On
;  mode=Build
;  type=2
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  78,48,0
;  73,43,0
;  68,38,0
;  77,43,0
;  72,38,0
;  68,47,0
;  73,48,0
;  68,43,0
;  77,38,0
;  72,47,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Diplomat
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  78,48,0
;  73,43,0
;  68,38,0
;  77,43,0
;  72,38,0
;  68,47,0
;  73,48,0
;  68,43,0
;  77,38,0
;  72,47,0
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  79,50,3
;  74,50,3
;  79,45,3
;  74,45,3
;  69,40,3
;  69,45,3
;  74,40,3
;  64,35,3
;  64,40,3
;  69,35,3
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  77,47,3
;  72,42,3
;  67,37,3
;  76,42,3
;  71,37,3
;  67,46,3
;  72,49,3
;  67,42,3
;  76,37,3
;  71,46,3
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  77,47,3
;  72,42,3
;  67,37,3
;  76,42,3
;  71,37,3
;  67,46,3
;  72,49,3
;  67,42,3
;  76,37,3
;  71,46,3
;  endlocations
;  @ENDIF
;
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Feephi
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  69,20,3
;  53,25,3
;  48,40,3
;  46,13,3
;  40,31,3
;  40,45,3
;  31,39,3
;  55,41,3
;  38,18,3
;  47,24,3
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  70,20,3
;  54,25,3
;  49,40,3
;  47,13,3
;  41,31,3
;  41,45,3
;  32,39,3
;  56,41,3
;  39,18,3
;  48,24,3
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Diplomat
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  69,20,3
;  53,25,3
;  48,40,3
;  46,13,3
;  40,31,3
;  40,45,3
;  31,39,3
;  55,41,3
;  38,18,3
;  47,24,3
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  70,20,3
;  54,25,3
;  49,40,3
;  47,13,3
;  41,31,3
;  41,45,3
;  32,39,3
;  56,41,3
;  39,18,3
;  48,24,3
;  endlocations
;  @ENDIF
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=Yes
;  homecity=none
;  randomize
;  locations
;  70,20,3
;  54,25,3
;  49,40,3
;  47,13,3
;  41,31,3
;  41,45,3
;  32,39,3
;  56,41,3
;  39,18,3
;  48,24,3
;  endlocations
;  @ENDIF
;
;
;  @IF
;  ReceivedTechnology
;  Receiver=Brr'til
;  Technology=63
;  @THEN
;  JustOnce
;  CreateUnit
;  owner=TriggerAttacker
;  unit=Spithre
;  veteran=No
;  homecity=none
;  randomize
;  locations
;  74,36,0
;  68,35,0
;  70,48,0
;  79,40,0
;  73,40,0
;  65,45,0
;  66,49,0
;  63,37,0
;  60,45,0
;  60,17,0
;  endlocations
;  @ENDIF




;
; Create a few Barbarians when Ultrastring theory is discovered.
;

@IF
ReceivedTechnology
Receiver=anybody
Technology=63
@THEN
JustOnce
CreateUnit
owner=Barbarians
unit=Spithre
veteran=No
homecity=none
randomize
locations
79,55,0
74,52,0
79,47,0
74,45,0
69,40,0
69,45,0
74,40,0
64,35,0
64,40,0
69,35,0
59,55,0
54,50,0
59,45,0
54,45,0
endlocations
@ENDIF

@IF
ReceivedTechnology
Receiver=anybody
Technology=63
@THEN
JustOnce
CreateUnit
owner=Barbarians
unit=Spithre
veteran=No
homecity=none
randomize
locations
79,53,1
74,50,1
79,45,1
74,43,1
69,42,1
69,43,1
74,42,1
64,33,1
64,42,1
69,33,1
59,57,1
54,52,1
59,43,1
54,43,1
endlocations
@ENDIF


@IF
ReceivedTechnology
Receiver=anybody
Technology=63
@THEN
JustOnce
CreateUnit
owner=Barbarians
unit=Commandos
veteran=No
homecity=none
randomize
locations
77,55,0
72,50,0
77,45,0
72,45,0
67,40,0
67,45,0
72,40,0
62,35,0
62,40,0
67,35,0
57,55,0
52,50,0
57,45,0
52,45,0
endlocations
@ENDIF


@IF
ReceivedTechnology
Receiver=anybody
Technology=63
@THEN
JustOnce
CreateUnit
owner=Barbarians
unit=Fanatics
veteran=Yes
homecity=none
randomize
locations
69,55,0
64,55,0
69,45,0
64,45,0
59,40,0
59,45,0
64,40,0
54,35,0
54,40,0
59,35,0
49,55,0
44,50,0
49,45,0
44,45,0
endlocations
@ENDIF


@IF
ReceivedTechnology
Receiver=anybody
Technology=63
@THEN
JustOnce
CreateUnit
owner=Barbarians
unit=Fanatics
veteran=Yes
homecity=none
randomize
locations
39,55,0
34,55,0
39,45,0
34,45,0
29,40,0
29,45,0
34,40,0
24,35,0
24,40,0
29,35,0
19,55,0
14,50,0
19,45,0
14,45,0
endlocations
@ENDIF




;
; Non-Conquest, Non AC Arrival Endgame
; ------------------------------------



@IF
RECEIVEDTECHNOLOGY
receiver=anybody
futuretech=9
@AND
RANDOMTURN
denominator=20
@THEN
TEXT
^At the very moment the proof of the Unified Field Theory is to be
^demonstrated, the World Consortium Of Physicists makes an even more
^startling discovery- Why the universe exists at all.
^With this knowledge, life on earth progresses to a higher plane of
^existence where there is no longer any need for competition.
YOU HAVE WON THE GAME!
ENDTEXT
ENDGAME
endscreens=yes
PLAYAVIFILE
Scene6.avi
@ENDIF

@ENDEVENTS


