; Events file 12/18/98
; Original Game
; 


@BEGINEVENTS
@INITFLAG

@IF
CheckFlag
who=Romans
flag=30
state=on
@THEN
Text
Roman Flag 30 on
EndText
@ENDIF

@IF
CheckFlag
who=Romans
flag=30
state=off
@THEN
Text
Roman Flag 30 off
EndText
@ENDIF

@IF
CheckFlag
who=Mongols
flag=30
state=on
@THEN
Text
Mongol Flag 30 on
EndText
@ENDIF

@IF
CheckFlag
who=Mongols
flag=30
state=off
@THEN
Text
Mongol Flag 30 off
EndText
@ENDIF

@IF
CheckFlag
who=Japanese
flag=30
state=on
@THEN
Text
Jap Flag 30 on
EndText
@ENDIF

@IF
CheckFlag
who=Japanese
flag=30
state=off
@THEN
Text
Jap Flag 30 off
EndText
@ENDIF

@IF
UnitKilled
unit=Warriors
attacker=Romans
defender=Barbarians
@THEN
Flag
continuous
who=Romans
state=on
flag=30
@ENDIF

@IF
UnitKilled
unit=Warriors
attacker=Romans
defender=Barbarians
@THEN
Flag
continuous
who=Mongols
state=on
flag=30
@ENDIF

@IF
UnitKilled
unit=Warriors
attacker=Romans
defender=Barbarians
@THEN
Flag
continuous
who=Japanese
state=on
flag=30
@ENDIF

; This event not only switches Roman flag 30 off, it also clears the continuous
; state for flag 30 for all civilizations, which will cause them to switch off
; too the next turn:
@IF
UnitKilled
unit=Archers
attacker=Romans
defender=Barbarians
@THEN
Flag
who=Romans
state=off
flag=30
@ENDIF

; This event switches Barbarian flag 30 on, which seems useless since you can't
; test for it. But by setting it, it sets the continuous state for flag 30
; again, saving the other civilizations' flags from certain doom:
@IF
UnitKilled
unit=Archers
attacker=Romans
defender=Barbarians
@THEN
Flag
continuous
who=Barbarians
state=on
flag=30
@ENDIF

@ENDEVENTS