GameMode	hunt
GameType	QUEST

	WaterHeightCounter		H
	DESTROYOWNTARGETCOUNTER 	Z
	DESTROYENEMYTARGETCOUNTER       Z
	LivesRemaining02Counter		Q

Program0123

TEXTBUFFER      LEVS                  


        hunt.wbl


ENDBUFFER

Loop INIT
Do


    SetParameter GD_FLOAT    30.0 0 0 0
    SetParameter GAMEDATA    WATERMINLEVEL
    SendMessage  SET_GD_FLOAT


	SetParameter	SCALE1	0.0	0.95	0.0	0.0
	SendMessage	SETBLOCKYSCALE

SET A TO 0
SET Z TO 0
SET Q TO 0
SET Y TO 0
Set B To 0
Set C To 0
Set D To 0
Set X To 0
Set E To 0

	SetParameter	NUMLINES	20
	SendMessage	SetStartLines

	SetParameter	BACKDROP	BACKDROP5
	SendMessage	SETBACKDROP

        SetParameter    BUFFERNAME              LEVS
        SetParameter    NUMLINES                20            
        SendMessage     LOADLEVEL

	SendMessage	PAUSELANDLEFT
	SendMessage	PAUSELANDRIGHT
	SetParameter	LIVES	0
	SendMessage	SETLIVES

	SetParameter    TEXT    hunt.wbw
	SendMessage     LOADWEAPONLIST
	SendMessage     MUSIC_GROOVE_LOW

	SetParameter	MESSAGE_ID	TIMER1
	SetParameter	INTERVAL	1000
	SetParameter	REPEAT		TRUE
	SendMessage	CREATETIMER

	SendMessage	FIRINGOFF
	SendMessage StartBriefing

	SendMessage     DEACTIVATESCORE

	GotoLoop		BRIEF

EndLoop





Loop BRIEF
Do


	SetParameter	POSITION	0	-199	0	0
	SendMessage	ChangeWaterHeight

	SetParameter	Colour1		1.0	0.86	0.03	1.0
	SetParameter	Colour2		1.0	0.86	0.03	1.0
	SetParameter	Colour3		1.0	0.86	0.03	1.0
	SetParameter	Colour4		0.0	0.0	0.0	1.0
	SetParameter	Colour5		0.0	0.0	0.0	1.0
	SetParameter	Colour6		0.0	0.0	0.0	1.0
	SetParameter	Scale1		1.3	1.3	1.3	0.0
	SetParameter	Scale2		1.3	1.3	1.3	0.0
	SetParameter	Scale3		1.3	1.3	1.3	0.0
	SetParameter	Scale4		1.3	1.3	1.3	0.0
	SetParameter	Scale5		1.3	1.3	1.3	0.0

	SetParameter	Lifetime	0.0	0.0	0.0	0.0
	SetParameter	Justify		Centre

	SetParameter	Position	0.0	180.0	0.0	0.0
	SetParameter	Text		TARGET_HUNT
FRE	SetParameter	TEXT		Chasse__la_cible
	GER SetParameter	Text	ZIELJAGD
	SPA SetParameter	Text	A_LA_CAZA_DEL_OBJETIVO
	ITA SetParameter	TEXT	CACCIA_AL_BERSAGLIO
	POL SetParameter	TEXT	POLOWANIE

	
	SendMessage 	CREATETEXT

	SetParameter	Colour1	1.0	1.0	1.0	1.0
	SetParameter	Colour2	1.0	1.0	1.0	1.0
	SetParameter	Colour3	1.0	1.0	1.0	1.0
	SetParameter	Colour4	0.0	0.0	0.0	1.0
	SetParameter	Colour5	0.0	0.0	0.0	1.0
	SetParameter	Colour6	0.0	0.0	0.0	1.0
	SetParameter	Scale1		0.8	0.8	0.8	0.0
	SetParameter	Scale2		0.8	0.8	0.8	0.0
	SetParameter	Scale3		0.8	0.8	0.8	0.0
	SetParameter	Scale4		0.8	0.8	0.8	0.0
	SetParameter	Scale5		0.8	0.8	0.8	0.0

	SetParameter	Lifetime	0.0	0.0	0.0	0.0
	SetParameter	Justify		Centre

	SetParameter	Position	0.0	115.0	0.0	0.0
	SetParameter	Text		Hit_15_Targets
FRE	SetParameter	TEXT		Abattez_15_cibles
	GER SetParameter	Text	Treffe_15_Ziele	
	SPA SetParameter	Text	Destruye_15_objetivos	
	ITA SetParameter	TEXT	Colpisci_15_bersagli
	POL SetParameter	TEXT	Traf_15_razy


	SendMessage 	CREATETEXT

	SetParameter	Position	0.0	80.0	0.0	0.0
	SetParameter	Text		In_120_Seconds
FRE	SetParameter	TEXT		en_120_secondes.
	GER SetParameter	Text	in_120_Sekunden.
	SPA SetParameter	Text	en_120_segundos.
	ITA SetParameter	TEXT	in_120_secondi.
	POL SetParameter	TEXT	w_cigu_120_sekund


	SendMessage 	CREATETEXT

	
	SetParameter	Colour1		1.0	0.22	0.07	1.0
	SetParameter	Colour2		1.0	0.22	0.07	1.0
	SetParameter	Colour3		1.0	0.22	0.07	1.0
	SetParameter	Colour4		0.0	0.0	0.0	1.0
	SetParameter	Colour5		0.0	0.0	0.0	1.0
	SetParameter	Colour6		0.0	0.0	0.0	1.0
	SetParameter	Scale1		1.0	1.0	1.0	0.0
	SetParameter	Scale2		1.0	1.0	1.0	0.0
	SetParameter	Scale3		1.0	1.0	1.0	0.0
	SetParameter	Scale4		1.0	1.0	1.0	0.0
	SetParameter	Scale5		1.0	1.0	1.0	0.0

	SetParameter	Position	0.0	-125.0	0.0	0.0
	SetParameter	Text		Press_fire_to_start
FRE	SetParameter	TEXT		Appuyez_sur_Tir_pour_commencer!
	GER SetParameter	Text	Zum_Starten_Feuer_drcken
	ITA SetParameter	TEXT	Premi_fuoco_per_cominciare
	POL SetParameter	TEXT	Nacinij_strza


	SPA	SetParameter	Scale1		0.8	0.8	0.8	0.0
	SPA	SetParameter	Scale2		0.8	0.8	0.8	0.0
	SPA	SetParameter	Scale3		0.8	0.8	0.8	0.0
	SPA	SetParameter	Scale4		0.8	0.8	0.8	0.0
	SPA	SetParameter	Scale5		0.8	0.8	0.8	0.0

	SPA SetParameter	Text	Pulsa_el_disparo_para_empezar
	SendMessage 	CREATETEXT

	SPA	SetParameter	Scale1		1.0	1.0	1.0	0.0
	SPA	SetParameter	Scale2		1.0	1.0	1.0	0.0
	SPA	SetParameter	Scale3		1.0	1.0	1.0	0.0
	SPA	SetParameter	Scale4		1.0	1.0	1.0	0.0
	SPA	SetParameter	Scale5		1.0	1.0	1.0	0.0

	OnMessage FIREPRESSED
	Do
		SendMessage	MUSIC_GROOVE_MED_LOW
		SET A TO 0
		SET Z TO 0
		SET Q TO 0
		SET Y TO 0
		Set B To 0
		Set C To 0
		Set D To 0
		Set X To 0


		Randomise A FROM 1 TO 10


		Set Y TO Z

		SendMessage EndBriefing
		SendMessage FIRINGON	
		GotoLoop MAIN2
		
	EndResponse
EndLoop



Loop MAIN2
Do


	SetParameter	POSITION	0	-199	0	0
	SendMessage	ChangeWaterHeight

	SetParameter	Scale1		1.0	1.0	1.0	1.0
	SetParameter	Scale2		1.0	1.0	1.0	1.0
	SetParameter	Scale3		1.0	1.0	1.0	1.0
	SetParameter	Scale4		1.0	1.0	1.0	1.0
	SetParameter	Scale5		1.0	1.0	1.0	1.0
	SetParameter	FRAME		2
	SetParameter	Lifetime	0.0	0.0	0.0	0.0
	SetParameter	Position	-30.0	-210.0	0.0	0.0
	SendMessage	CREATEICON

	SetParameter	Scale1		0.5	0.5	0.5	0.0
	SetParameter	Scale2		1.5	1.5	1.5	0.0
	ConvertToText Z
	SetParameter	Position	2.0	-210.0	0.0	0.0
	SetParameter    Score   Z
	SetParameter    Digits  2
	SendMessage     CREATESCORE

	OnMessage	TIMER1
	Do
		Add 1 To B
		Add 1 To C
	EndResponse


	If Q BecomesEqualTo -1
	Then

		SendMessage LOSECONDITION
		GotoLoop END

	EndIf



	If Z BECOMESEqualTo 6
	Then
	SendMessage     MUSIC_GROOVE_MED
	EndIf



	If Z BECOMESEqualTo 13
	Then
	SendMessage     MUSIC_GROOVE_HIGH
	EndIf




	If A IsEqualTo 1
	Then

		SetParameter	POSITION	3	2	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0
		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		OVER_HERE!
FRE		SetParameter	TEXT		PAR_ICI!
		GER SetParameter	Text	HIER_DRBEN!
		SPA SetParameter	Text	POR_AQU!
		ITA SetParameter	TEXT	DI_QUA!
	POL SetParameter	TEXT	TUTAJ!


		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 1

	EndIf


	If D IsEqualTo 1
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	3	2	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10

			Set D To 0

		EndIf

	EndIf

	
/************************************************************************************/


	If A IsEqualTo 2
	Then
		SetParameter	POSITION	3	8	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0

		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		NO_HERE!
FRE		SetParameter	TEXT		NON,_ICI!
		GER SetParameter	Text	NEIN,_HIER!
		SPA SetParameter	Text	NO,_POR_AQU!
		ITA SetParameter	TEXT	NO,_DI_QUA!
	POL SetParameter	TEXT	NIE,_TUTAJ!


		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 2

	EndIf


	If D IsEqualTo 2
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	3	8	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0


		EndIf

	EndIf
	

/***********************************************************************************/


	If A IsEqualTo 3
	Then
		SetParameter	POSITION	1	15	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0
			
		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		HERE!
FRE		SetParameter	TEXT		ICI!
		GER SetParameter	Text	HIER!
		SPA SetParameter	Text	EO!
		ITA SetParameter	TEXT	QUA!
	POL SetParameter	TEXT	TUTAJ!


		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 3

	EndIf


	If D IsEqualTo 3
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	1	15	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0


		EndIf

	EndIf


/*********************************************************************************/


	If A IsEqualTo 4
	Then
		SetParameter	POSITION	6	12	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0
		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		HERE_MATEY!
FRE		SetParameter	TEXT		ICI,_L'AMI!
		GER SetParameter	Text	HIER_KUMPEL!
		SPA SetParameter	Text	OYE,_T!
		ITA SetParameter	TEXT	DI_QUA,_AMICO!
	POL SetParameter	TEXT	TUTAJ!

		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 4

	EndIf

	If D IsEqualTo 4
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	6	12	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0


		EndIf

	EndIf


/***********************************************************************************/


	If A IsEqualTo 5
	Then
		SetParameter	POSITION	9	4	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0

		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		THIS_ONE!
FRE		SetParameter	TEXT		CELLE-L!
		GER SetParameter	Text	DIESER_HIER!
		SPA SetParameter	Text	STE!
		ITA SetParameter	TEXT	QUESTO!
	POL SetParameter	TEXT	TEN!


		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 5

	EndIf

	If D IsEqualTo 5
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	9	4	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0


		EndIf

	EndIf


/*********************************************************************************/


	If A IsEqualTo 6
	Then
		SetParameter	POSITION	13	9	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0
		
		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		QUICK!
FRE		SetParameter	TEXT		VITE!
		GER SetParameter	Text	SCHNELL!
		SPA SetParameter	Text	RPIDO!
		ITA SetParameter	TEXT	RAPIDO!
 	POL SetParameter	TEXT	SZYBCIEJ!


		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 6
	EndIf


	If D IsEqualTo 6
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	13	9	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0


		EndIf

	EndIf


/*********************************************************************************/



	If A IsEqualTo 7
	Then
		SetParameter	POSITION	12	15	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK


		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0

		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		HIT_ME!
FRE		SetParameter	TEXT		ABATTEZ-MOI!
		GER SetParameter	Text	TRIFF_MICH!
		SPA SetParameter	Text	DISPARA!
		ITA SetParameter	TEXT	COLPISCIMI!
 	POL SetParameter	TEXT	TRAF_MNIE!


		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 7

	EndIf

	If D IsEqualTo 7
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	12	15	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0


		EndIf

	EndIf


/***********************************************************************************/



	If A IsEqualTo 8
	Then
		SetParameter	POSITION	16	3	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0

		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		OI_NUTTER!
FRE		SetParameter	TEXT		C'EST_DINGUE!
		GER SetParameter	Text	MIR_NACH!
		SPA SetParameter	Text	HEY,_LOCO!
		ITA SetParameter	TEXt	CHE_IDIOTA!
 	POL SetParameter	TEXT	ZEZULEC!


		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 8

	EndIf

	If D IsEqualTo 8
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	16	3	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0

		EndIf

	EndIf


/*************************************************************************************/



	If A IsEqualTo 9
	Then
		SetParameter	POSITION	21	7	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0

		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		HURRY!
FRE		SetParameter	TEXT		PLUS_VITE!
		GER SetParameter	Text	SCHNELL!
		SPA SetParameter	Text	DEPRISA!
		ITA SetParameter	TEXT	SBRIGATI!
		POL SetParameter	TEXT	SZYBCIEJ!


		SendMessage	CREATETEXT
			
		Set A To 1000
		Set C To 0
		Set D To 9

	EndIf


	If D IsEqualTo 9
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	21	7	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0

		EndIf

	EndIf


/**************************************************************************************/




	If A IsEqualTo 10
	Then
		SetParameter	POSITION	21	15	0	0
		SetParameter	BlockColour	TARGET
		SendMessage	SPAWNINBLOCK

		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0
		SetParameter	Lifetime	0.1	0.5	0.5	0.5
		SendMessage	getblockposition
		SetParameter	Text		OI_NUTTER!
FRE		SetParameter	TEXT		C'EST_DINGUE!
		GER SetParameter	Text	MIR_NACH!
		SPA SetParameter	Text	HEY,_LOCO!
		ITA SetParameter	TEXT	CHE_IDIOTA!
		POL SetParameter	TEXT	ZEZULEC!


		SendMessage	CREATETEXT

		Set A To 1000
		Set C To 0
		Set D To 10

	EndIf


	If D IsEqualTo 10
	Then
		If C BecomesEqualTo 6
		Then

			SetParameter	POSITION	21	15	0	0
			SendMessage	DETONATEBLOCK
		
			Randomise A From 1 To 10
			Set D To 0


		EndIf

	EndIf


/*************************************************************************************/



	If B BecomesEqualTo 60
	Then

		SetParameter	Position	340.0	0.0	0.0	0.0
		SetParameter	Lifetime	0.2	0.5	2.5	0.5
		SetParameter	Velocity	-0.4	0.0	0.0	0.0
		SetParameter	Scale1		2.0	2.0	2.0	0.0
		SetParameter	Scale2		3.0	3.0	3.0	0.0
		SetParameter	Colour1		1.0	0.22	0.07	1.0
		SetParameter	Colour2		1.0	0.22	0.07	1.0
		SetParameter	Colour3		1.0	0.22	0.07	1.0
		SetParameter	Colour4		0.0	0.0	0.0	1.0
		SetParameter	Colour5		0.0	0.0	0.0	1.0
		SetParameter	Colour6		0.0	0.0	0.0	1.0
		SetParameter	Text		60_SECONDS_LEFT!!
FRE		SetParameter	TEXT		IL_RESTE_60_SECONDES!!
		GER SetParameter	Text	NOCH_60_SEKUNDEN!
		SPA SetParameter	Text	QUEDAN_60_SEGUNDOS!
		ITA SetParameter	TEXT	ANCORA_60_SECONDI!
		POL SetParameter	TEXT	Pozostao_60_sekund


		SendMessage	CREATETEXT


	EndIf



	If B BecomesEqualTo 120
	Then

		SetParameter	Position	0.0	0.0	0.0	0.0
		SetParameter	Scale1		8.0	8.0	8.0	1.0
		SetParameter	Scale2		5.0	5.0	5.0	1.0
		SetParameter	Scale4		3.0	3.0	3.0	1.0
		SetParameter	Colour1		1.0	0.22	0.07	1.0
		SetParameter	Colour2		1.0	0.22	0.07	1.0
		SetParameter	Colour3		1.0	0.22	0.07	1.0
		SetParameter	Colour4		0.0	0.0	0.0	1.0
		SetParameter	Colour5		0.0	0.0	0.0	1.0
		SetParameter	Colour6		0.0	0.0	0.0	1.0
		SetParameter	Lifetime	0.2	0.7	3.2	4.2
		SetParameter	Text		TIME'S_UP!
FRE		SetParameter	TEXT		TEMPS_COUL!
		GER SetParameter	Text	ENDE!
		SPA SetParameter	Text	TIEMPO!
		ITA SetParameter	TEXT	TEMPO_ESAURITO!
		POL SetParameter	TEXT	Czas_upyn


		SendMessage	CREATETEXT
			

		SendMessage	LOSECONDITION
		GotoLoop		END


	EndIf



	If Z BecomesGreaterThan Y
	Then

		SetParameter	Position	0.0	0.0	0.0	0.0
		SetParameter	Velocity	0.0	0.01	0.0	0.0
		SetParameter	Gravity		0.0	0.0	0.0	0.0
		SetParameter	Scale1		0.5	0.5	0.5	0.0
		SetParameter	Scale2		1.5	1.5	1.5	0.0
	
		SetParameter	Colour1		1.0	0.86	0.03	1.0
		SetParameter	Colour2		1.0	0.86	0.03	1.0
		SetParameter	Colour3		1.0	0.86	0.03	1.0
		SetParameter	Colour4		0.0	0.0	0.0	1.0
		SetParameter	Colour5		0.0	0.0	0.0	1.0
		SetParameter	Colour6		0.0	0.0	0.0	1.0

		SetParameter	Lifetime	0.1	0.5	1.0	1.5
		SetParameter	Justify		Centre
		SetParameter	Text		Got_ONE
FRE		SetParameter	TEXT		Touch!
		GER SetParameter	Text	Treffer
		SPA SetParameter	Text	Ah_va_uno!
		ITA SetParameter	TEXT	Fuori_UNO
		POL SetParameter	TEXT	Trafie


	

		SetParameter	Position	0.0	0.0	0.0	0.0
		SendMessage	CREATETEXT
		
		Randomise A From 1 To 10
		
		Set Y To Z

	EndIf



	If Z BecomesEqualTo 15
	Then

		SetParameter	Position	0.0 	0.0	0.0	0.0
		SetParameter	Lifetime	0.2	0.7	3.2	4.2
		SetParameter	Scale1		0.4	0.4	0.4	0.0
		SetParameter	Scale2		1.4	1.4	1.4	0.0
		SetParameter	Scale3		3.4	3.4	3.4	0.0
		SetParameter	Scale4		2.0	2.0	2.0	0.0
		SetParameter	Scale5		1.8	1.8	1.8	0.0
		SetParameter	Colour1		0.18	0.9	0.1	1.0
		SetParameter	Colour2		0.18	0.9	0.1	1.0
		SetParameter	Colour3		0.18	0.9	0.1	1.0
		SetParameter	Colour4		1.0	1.0	1.0	1.0
		SetParameter	Colour5		0.0	0.0	0.0	1.0
		SetParameter	Colour6		0.0	0.0	0.0	1.0
		SetParameter	Text	SUCCESS!
FRE		SetParameter	TEXT	RUSSI!
		GER SetParameter	Text	Geschafft!
		SPA SetParameter	Text	LO_CONSEGUISTE!
		ITA SetParameter	TEXT	HAI_VINTO!
		POL SetParameter	TEXT	Sukces


		SendMessage	CREATETEXT

		SetParameter	TEXT	gclear
		SendMessage	SETNEXTGAMEMODE
		SendMessage	LOSECONDITION
		GotoLoop		END


	EndIf


EndLoop




Loop END
Do




EndLoop











EndFile	
