GameMode	Clocking_Off


FRE	L'HORLOGE_FOLLE!
ITA	IL_TEMPO__TUTTO!
SPA	CUESTIN_DE_TIEMPO
GER	GEGEN_DIE_UHR
POL	TU_CHODZI_O_CZAS



GameType	TOURNAMENT

HIDDENID	1

COLLECTSTARCOUNTER		S
DESTROYOWNTARGETCOUNTER 	J
DESTROYENEMYTARGETCOUNTER       J
LivesRemaining02Counter		Q


Program0123


TEXTBUFFER      LEVS                    


        time1up.wbl


ENDBUFFER







Loop INIT
Do


	Randomise A From 0 To 12

	If A IsEqualTo 3
	Then

		Randomise A From 4 To 12

	EndIf

	SetParameter	BACKDROP	A
	SendMessage	SETBACKDROP


	SET R TO 1000
	SET A TO 0

	SET B TO 0
	SET C TO 0
	SET D TO 0
	SET E TO 0
	SET F TO 0
	SET G TO 0
	SET S TO 0

	SET H TO 1
	SET I TO 1
	Set L To 1
	Set N To 0
	Set M To 0


	SET J TO 0
	SET V TO 0
	SET P TO 0
	SET O TO 1000
	SET W TO 0
	SET X TO 0
	SET Z TO 30

	SetParameter    TEXT    time1up.wbw
	SendMessage     LOADWEAPONLIST

	SetParameter	NUMLINES	20
	SendMessage	SetStartLines

	SetParameter    BUFFERNAME              LEVS
        SetParameter    NUMLINES                20              
        SendMessage     LOADLEVEL

	SendMessage PAUSELANDLEFT
	SendMessage PAUSELANDRIGHT

	SendMessage     DEACTIVATESCORE
	
	
	SetParameter	LIVES	0
	SendMessage	SETLIVES


	SendMessage MUSIC_GROOVE_LOW

	SetParameter Position	0.0	-175	0.0	0.0
	SendMessage ChangeWaterHeight

	SetParameter	MESSAGE_ID	TIMER6
	SetParameter	INTERVAL	1
	SetParameter	REPEAT		TRUE
	SendMessage	CREATETIMER


	SetParameter	TEXT	clocking_off
	SendMessage	SET_HIGHSCORE_TABLE

	SetParameter	MESSAGE_ID	TIMER9
	SetParameter	INTERVAL	1000
	SetParameter	REPEAT		TRUE
	SendMessage	CREATETIMER

	SendMessage	FIRINGOFF
	SendMessage StartBriefing

	GotoLoop		BRIEF
EndLoop


Loop BRIEF
Do

	SetParameter    Colour1         0.70    0.37    0.92    1.0
        SetParameter    Colour2         0.70    0.37    0.92    1.0
        SetParameter    Colour3         0.70    0.37    0.92    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		Clocking_Off
FRE	SetParameter	Text		TOUT_EST_AFFAIRE_DE_TEMPS!
ITA	SetParameter	TEXT		IL_TEMPO__TUTTO!
SPA	SetParameter	TEXT		CUESTIN_DE_TIEMPO
GER	SetParameter	TEXT		GEGEN_DIE_UHR
POL	SetParameter	TEXT		TU_CHODZI_O_CZAS


	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		Last_as_long_as_possible
FRE	SetParameter	Text		Tenez_le_plus_longtemps_possible
ITA	SetParameter	TEXT		Resisti_il_pi_possibile,
SPA	SetParameter	TEXT		Intenta_sobrevivir
GER	SetParameter	TEXT		Bleib_so_lange_wie_mglich_am_Leben,
POL	SetParameter	TEXT		Wytrzymaj_ja_najduej


	SendMessage 	CREATETEXT

	SetParameter	Position	0.0	80.0	0.0	0.0
	SetParameter	Text		By_hitting_the_targets
FRE	SetParameter	Text		en_dtruisant_les_cibles
ITA	SetParameter	TEXT		colpendo_i_bersagli
SPA	SetParameter	TEXT		destruyendo_las_dianas
GER	SetParameter	TEXT		indem_du_die_Ziele_triffst,
POL	SetParameter	TEXT		strzelajc_do_obiektw_


	SendMessage 	CREATETEXT		

	SetParameter	Position	0.0	45.0	0.0	0.0
	SetParameter	Text		which_appear_around_the_clock
FRE	SetParameter	Text		qui_apparaissent_autour_du_cadran.
ITA	SetParameter	TEXT		che_appaiono_sull'orologio.
SPA	SetParameter	TEXT		que_aparecen_en_torno_al_reloj.
GER	SetParameter	TEXT		die_im_Uhrzeigersinn_erscheinen.
POL	SetParameter	TEXT		na_okoo_zegara.


	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	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!
ITA	SetParameter	TEXT		Premi_fuoco_per_cominciare
GER	SetParameter	TEXT		Zum_Starten_Feuer_drcken
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 EndBriefing
		SendMessage FIRINGON

		SetParameter	MESSAGE_ID	TIMER1
		SetParameter	INTERVAL	2500
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER

		SendMessage MUSIC_GROOVE_MED	
	
		GotoLoop	START

	EndResponse
	

EndLoop


Loop START
Do


	SetParameter Position	0.0	-175	0.0	0.0
	SendMessage ChangeWaterHeight

	OnMessage TIMER9
	Do

			ADD 1 TO S
	EndResponse


	SetParameter	Justify		Centre


	SetParameter	POSITION	-30.0	-210.0	0.0	0.0
	SetParameter	Lifetime	0.0	0.0	0.0	0.0
        SetParameter    FRAME	2
        SendMessage     CREATEICON


	SetParameter	Justify		Centre
	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	-210.0	0.0	0.0
	SetParameter	Lifetime	0.0	0.0	0.0	0.0
        SetParameter    Score   W
        SetParameter    Digits  3
        SendMessage     CREATESCORE


	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	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	Justify		Right
	SetParameter	FRAME		ICON_CLOCK
	SetParameter	Lifetime	0.0	0.0	0.0	0.0
	SetParameter	Position	-20.0	210.0	0.0	0.0
	SendMessage	CREATEICON

	SetParameter	SIDE	CENTRE
	

	OnMessage TIMER9
	Do	

		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


		If I IsEqualTo 0
		Then

			If Z IsLessThan 11
			Then

				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
			
			EndIf
	
		EndIf

		If M IsEqualTo 1
		Then

			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
			
			Set M To 0
	
		EndIf

		If Z IsGreaterThan 60
		Then
			Subtract 60 From Z
			Add 1 to I
			
		EndIf
		SetParameter	Justify		Left

		Subtract 1 from Z

		SetParameter	Lifetime	0.0	0.0	1.0	0.0
		SetParameter	Position	25.0	210.0	0.0	0.0


		If Z IsLessThan 0
		Then

			Subtract 1 from I

			Set Z To 59
			
		EndIf



		If Z IsLessThan 10
		Then

			SetParameter	Text		0
			SetParameter	Position	25.0	210.0	0.0	0.0
			SendMessage	CREATETEXT
			SetParameter	Position	40.0	210.0	0.0	0.0
			
		EndIf

		If Z IsEqualTo 60 
		Then

			Set Z TO 00
			ConvertToText   Z
			SendMessage	CREATETEXT

			Set Z To 60

		EndIf
		
		If I IsEqualTo -1
		Then

			Set Z To 0
			Set I To 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	TEXT	0
			SetParameter	Position	25.0	210.0	0.0	0.0
			SendMessage	CREATETEXT

			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	TEXT	0
			SetParameter	Position	40.0	210.0	0.0	0.0
			SendMessage	CREATETEXT

		EndIf


		If Z IsLessThan 60
		Then

			ConvertToText   Z
			SendMessage	CREATETEXT

		EndIf


		ConvertToText	I
		SetParameter	Position	0.0	210.0	0.0	0.0
		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	Lifetime	0.0	0.0	1.0	0.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	Justify		Centre

		If Z IsEqualTo 0
		Then

			If I IsEqualTo 0
			Then

			SendMessage	FIRINGOFF
			SendMessage	CLEARPROJECTILES 

			SetParameter BLOCKCOLOUR	ALLCOLOURS
			SendMessage CLEARBLOCKS

			SetParameter	Justify		Centre
			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_!
ITA			SetParameter	TEXT		TEMPO_ESAURITO!
SPA			SetParameter	TEXT		TIEMPO!
GER			SetParameter	TEXT		VERLOREN!
POL			SetParameter	TEXT		Czas_upyn



			SendMessage	CREATETEXT


			Set A To 0
			Set D To 0
			Set K To 0
			Set X To 0
			Add S To N

			SendMessage	MUSIC_GROOVE_LOW
		
			GotoLoop	END

			EndIf
		
		EndIf



	EndResponse

	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	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
/

	If Z IsLessThan 20
	Then

		Set H To 1
		Set L To 0

	EndIf


	If Z IsGreaterThan 20
	Then

		Set H To 0
		Set L To 1

	EndIf

/





	OnMessage TIMER1
	Do
	
		SetParameter	BlockColour	BOUNCY
		SendMessage	CLEARBLOCKS
		
		SetParameter	POSITION	7	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	8	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	9	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	10	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	11	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	13	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	14	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	15	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	16	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	17	8	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK



		SetParameter	MESSAGE_ID	TIMER2
		SetParameter	INTERVAL	2700
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER

	EndResponse


	OnMessage TIMER2
	Do
	
		SetParameter	BlockColour	BOUNCY
		SendMessage	CLEARBLOCKS	
		SetParameter	POSITION	9	13	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	10	12	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	10	11	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	11	10	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	11	9	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	12	7	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	13	6	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	13	5	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	14	4	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	14	3	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK

		SetParameter	MESSAGE_ID	TIMER3
		SetParameter	INTERVAL	2700
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER

	EndResponse







	OnMessage TIMER3
	Do
	
		SetParameter	BlockColour	BOUNCY
		SendMessage	CLEARBLOCKS

		SetParameter	POSITION	14	13	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	14	12	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	13	11	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	13	10	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	12	9	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	11	7	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	11	6	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	10	5	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	10	4	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK
		SetParameter	POSITION	9	3	1	0
		SetParameter	BlockColour	BOUNCY
		SendMessage	SPAWNINBLOCK




		SetParameter	MESSAGE_ID	TIMER1
		SetParameter	INTERVAL	2700
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER

	EndResponse

	If B IsEqualTo 0
	Then
		If C IsEqualTo 0
		Then

			If D IsEqualTo 0
			Then

				If E IsEqualTo 0
				Then

					If F IsEqualTo 0
					Then

						If G IsEqualTo 0
						Then

							Randomise A FROM 1 TO 7

						EndIf

					EndIf

				EndIf

			EndIf

		EndIf

	EndIf

	SetParameter	Justify		Centre

	If Q BecomesEqualTo -1
	Then

		SendMessage	FIRINGOFF
		SendMessage	CLEARPROJECTILES

		SetParameter BLOCKCOLOUR	ALLCOLOURS
		SendMessage CLEARBLOCKS

		Set A To 0
		Set D To 0
		Set K To 0
		Set X To 0
		Add S To N

		SendMessage	MUSIC_GROOVE_LOW
		
		GotoLoop	END

	EndIf



	If J BECOMESGREATERTHAN 0
	Then

		ADD 5 TO Z
		ADD 1 TO P


		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	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	1.5	0.5
		SetParameter	Position	0.0	50.0	0.0	0.0
		SetParameter	Text		Got_One!
FRE		SetParameter	Text		Touch_!
ITA		SetParameter	TEXT		Fuori_UNO
SPA		SetParameter	TEXT		Has_destruido_una!
GER		SetParameter	TEXT		Erwischt!
POL		SetParameter	TEXT		Trafie




		SendMessage	CREATETEXT
		SET J TO 0

		Add 1 To W
		Add 1000 To N
		Set M To 1


	EndIf


	If A IsEqualTo 1
	Then

		SetParameter	COLOUR3		1.0	1.0	1.0	1.0
		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	1.5	0.5
		SetParameter	Position	0.0	175.0	0.0	0.0
		SetParameter	Text		2_O_Clock
FRE		SetParameter	Text		2_heures
ITA		SetParameter	TEXT		Sono_le_2
SPA		SetParameter	TEXT		Las_2
GER		SetParameter	TEXT		2_Uhr
POL		SetParameter	TEXT		Na_2-giej



		SendMessage	CREATETEXT
		SetParameter	MESSAGE_ID	TIMER4
		SetParameter	INTERVAL	3000
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER

		Set B To 1
		Set A To 0
			
	EndIf


	OnMessage TIMER4
	Do

		If B IsEqualTo 1
		Then

			SetParameter	POSITION	15	5	0	0
			SetParameter	BlockColour	TARGET
			SendMessage	SPAWNINBLOCK
			
			SetParameter	MESSAGE_ID	TIMER5
			SetParameter	INTERVAL	4500
			SetParameter	REPEAT		FALSE
			SendMessage	CREATETIMER

		EndIf
	
	EndResponse



	OnMessage TIMER5
	Do

		SetParameter	POSITION	15	5	0	0
		SendMessage	DETONATEBLOCK
		Set B To 0
		
	EndResponse


	If A IsEqualTo 2
	Then

		SetParameter	COLOUR3		1.0	1.0	1.0	1.0
		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	1.5	0.5
		SetParameter	Position	0.0	175.0	0.0	0.0
		SetParameter	Text		12_O_Clock
FRE		SetParameter	Text		12_heures
ITA		SetParameter	TEXT		Sono_le_12
SPA		SetParameter	TEXT		Las_12
GER		SetParameter	TEXT		12_Uhr
POL		SetParameter	TEXT		Na_12-tej



		SendMessage	CREATETEXT
		SetParameter	MESSAGE_ID	TIMER4
		SetParameter	INTERVAL	3000
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER
		Set C To 1
		Set A To 0
			
	EndIf


	OnMessage TIMER4
	Do
		If C IsEqualTo 1
		Then
			SetParameter	POSITION	11	3	0	0
			SetParameter	BlockColour	TARGET
			SendMessage	SPAWNINBLOCK
			
			SetParameter	MESSAGE_ID	TIMER5
			SetParameter	INTERVAL	4500
			SetParameter	REPEAT		FALSE
			SendMessage	CREATETIMER

		EndIf	
	EndResponse



	OnMessage TIMER5
	Do

		SetParameter	POSITION	11	3	0	0
		SendMessage	DETONATEBLOCK
		Set C To 0
		
	EndResponse








	If A IsEqualTo 3
	Then

		SetParameter	COLOUR3		1.0	1.0	1.0	1.0
		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	1.5	0.5
		SetParameter	Position	0.0	175.0	0.0	0.0
		SetParameter	Text		10_O_Clock
FRE		SetParameter	TEXT		10_heures
ITA		SetParameter	TEXT		Sono_le_10
SPA		SetParameter	TEXT		Las_10
GER		SetParameter	TEXT		10_Uhr
POL		SetParameter	TEXT		Na_10-tej


		SendMessage	CREATETEXT
		SetParameter	MESSAGE_ID	TIMER4
		SetParameter	INTERVAL	3000
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER
		Set D To 1
		Set A To 0
			
	EndIf


	OnMessage TIMER4
	Do
		If D IsEqualTo 1
		Then
			SetParameter	POSITION	8	5	0	0
			SetParameter	BlockColour	TARGET
			SendMessage	SPAWNINBLOCK
			
			SetParameter	MESSAGE_ID	TIMER5
			SetParameter	INTERVAL	4500
			SetParameter	REPEAT		FALSE
			SendMessage	CREATETIMER

		EndIf	

	EndResponse



	OnMessage TIMER5
	Do

		SetParameter	POSITION	8	5	0	0
		SendMessage	DETONATEBLOCK
		Set D To 0
		
	EndResponse









	If A IsEqualTo 4
	Then


		SetParameter	COLOUR3		1.0	1.0	1.0	1.0
		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	1.5	0.5
		SetParameter	Position	0.0	175.0	0.0	0.0
		SetParameter	Text		8_O_Clock
FRE		SetParameter	Text		8_heures
ITA		SetParameter	TEXT		Sono_le_8
SPA		SetParameter	TEXT		Las_8
GER		SetParameter	TEXT		8_Uhr
POL		SetParameter	TEXT		Na_8-ej


		SendMessage	CREATETEXT
		SetParameter	MESSAGE_ID	TIMER4
		SetParameter	INTERVAL	3000
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER

		Set E To 1
		Set A To 0
			
	EndIf


	OnMessage TIMER4
	Do

		If E IsEqualTo 1
		Then
			SetParameter	POSITION	8	9	0	0
			SetParameter	BlockColour	TARGET
			SendMessage	SPAWNINBLOCK
			
			SetParameter	MESSAGE_ID	TIMER5
			SetParameter	INTERVAL	4500
			SetParameter	REPEAT		FALSE
			SendMessage	CREATETIMER

		EndIf	

	EndResponse



	OnMessage TIMER5
	Do

		SetParameter	POSITION	8	9	0	0
		SendMessage	DETONATEBLOCK
		Set E To 0
		
	EndResponse


	If A IsEqualTo 5
	Then

		SetParameter	COLOUR3		1.0	1.0	1.0	1.0
		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	1.5	0.5
		SetParameter	Position	0.0	175.0	0.0	0.0
		SetParameter	Text		6_O_Clock
FRE		SetParameter	Text		6_heures
ITA		SetParameter	TEXT		Sono_le_6
SPA		SetParameter	TEXT		Las_6
GER		SetParameter	TEXT		6_Uhr
POL		SetParameter	TEXT		Na_6-tej


		SendMessage	CREATETEXT
		SetParameter	MESSAGE_ID	TIMER4
		SetParameter	INTERVAL	3000
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER

		Set F To 1
		Set A To 0
			
	EndIf


	OnMessage TIMER4
	Do
		If F IsEqualTo 1
		Then
			SetParameter	POSITION	11	11	0	0
			SetParameter	BlockColour	TARGET
			SendMessage	SPAWNINBLOCK
			
			SetParameter	MESSAGE_ID	TIMER5
			SetParameter	INTERVAL	4500
			SetParameter	REPEAT		FALSE
			SendMessage	CREATETIMER

		EndIf	

	EndResponse



	OnMessage TIMER5
	Do

		SetParameter	POSITION	11	11	0	0
		SendMessage	DETONATEBLOCK
		Set F To 0
		
	EndResponse






	If A IsEqualTo 6
	Then


		SetParameter	COLOUR3		1.0	1.0	1.0	1.0
		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	1.5	0.5
		SetParameter	Position	0.0	175.0	0.0	0.0
		SetParameter	Text		4_O_Clock
FRE		SetParameter	Text		4_heures
ITA		SetParameter	TEXT		Sono_le_4
SPA		SetParameter	TEXT		Las_4
GER		SetParameter	TEXT		4_Uhr
POL		SetParameter	TEXT		Na_4-tej


		SendMessage	CREATETEXT
		SetParameter	MESSAGE_ID	TIMER4
		SetParameter	INTERVAL	3000
		SetParameter	REPEAT		FALSE
		SendMessage	CREATETIMER
		Set G To 1
		Set A To 0
			
	EndIf


	OnMessage TIMER4
	Do

		If G IsEqualTo 1
		Then
			SetParameter	POSITION	14	9	0	0
			SetParameter	BlockColour	TARGET
			SendMessage	SPAWNINBLOCK
		
			SetParameter	MESSAGE_ID	TIMER5
			SetParameter	INTERVAL	4500
			SetParameter	REPEAT		FALSE
			SendMessage	CREATETIMER

		EndIf
		
	EndResponse



	OnMessage TIMER5
	Do

		SetParameter	POSITION	14	9	0	0
		SendMessage	DETONATEBLOCK
		Set G To 0
		
	EndResponse



	If Z BecomesEqualTo 30
	Then

		If V IsEqualTo 0
		Then
			SendMessage	MUSIC_GROOVE_HIGH
			Set V To 1

		EndIf

	EndIf

EndLoop


Loop END
Do

	OnMessage TIMER9
	Do

		Add 1 To X

	EndResponse
	

	If X IsGreaterThanOrEqualTo 2
	Then	


	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		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	Justify		Centre
	SetParameter	POSITION	0.0	150.0	0.0	0.0
	SetParameter	TEXT		Scores
FRE	SetParameter	TEXT		Scores
ITA	SetParameter	TEXT		Punti
SPA	SetParameter	TEXT		Puntuacin
GER		SetParameter	TEXT	Punkte
POL	SetParameter	TEXT		Wyniki
	
	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		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	LifeTime	0.0	0.0	0.0	0.0

	SetParameter	Justify		Right
	SetParameter	POSITION	-240.0	75.0	0.0	0.0
	SPA SetParameter	POSITION	-260.0	75.0	0.0	0.0
POL 	SetParameter	POSITION	-275.0	75.0	0.0	0.0
	SetParameter	FRAME		2
	SendMessage	CREATEICON
	SetParameter	Side	2

	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	Justify		Right
	SetParameter	POSITION	-70.0	75.0	0.0	0.0
	SetParameter	TEXT		destroyed
FRE	SetParameter	TEXT		dtruit
ITA	SetParameter	TEXT		distrutti
	SPA SetParameter	TEXT	destruidas
GER		SetParameter	TEXT	zerstrt
POL	SetParameter	TEXT		zniszczonych

	SendMessage	CREATETEXT

	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	-20.0	75.0	0.0	0.0
	SetParameter	Lifetime	0.0	0.0	0.0	0.0
       	SetParameter    Score   W
        SetParameter    Digits  8
        SendMessage     CREATESCORE


	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	Justify		Left
	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	POSITION	90.0	75.0	0.0	0.0
	SetParameter	TEXT		x_1000_points
FRE	SetParameter	TEXT		x_1000_points
ITA	SetParameter	TEXT		x1000_punti
	SPA SetParameter	TEXT	x_1000_puntos
GER		SetParameter	TEXT	x_1000_Punkte
POL	SetParameter	TEXT		x_1000_punktw


	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	Justify		Right
	SetParameter	POSITION	-70.0	25.0	0.0	0.0
	SetParameter	TEXT		Time_survived
FRE	SetParameter	TEXT		Temps_de_survie
ITA	SetParameter	TEXT		Tempo_rimasto
	SPA SetParameter	TEXT	Duracin
GER		SetParameter	TEXT	berstandene_Zeit
POL	SetParameter	TEXT		Czas_gry

	SendMessage	CREATETEXT

	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	-20.0	25.0	0.0	0.0
	SetParameter	Lifetime	0.0	0.0	0.0	0.0
       	SetParameter    Score   S
        SetParameter    Digits  8
        SendMessage     CREATESCORE




	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	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	Justify		Left
	SetParameter	POSITION	90.0	25.0	0.0	0.0
	SetParameter	TEXT		Seconds
FRE	SetParameter	TEXT		Secondes
ITA	SetParameter	TEXT		secondi
	SPA SetParameter	TEXT	Segundos
GER		SetParameter	TEXT	Sekunden
POL	SetParameter	TEXT		sekund

	SendMessage	CREATETEXT


	SetParameter	Justify		Right
	SetParameter	POSITION	-70.0	-25.0	0.0	0.0
	SetParameter	TEXT		Total_points
FRE	SetParameter	TEXT		Total_de_points
ITA	SetParameter	TEXT		Punteggio_totale
	SPA SetParameter	TEXT	Puntuacin_Total
GER		SetParameter	TEXT	Gesamtpunkte
POL	SetParameter	TEXT		Razem_punktw


	SendMessage	CREATETEXT

	EndIf

	If X IsGreaterThanOrEqualTo 3
	Then

		If K IsGreaterThan N
		Then
			
			Set D To 1

		EndIf


		If D IsEqualTo 0
		Then

			If K IsLessThan N
			Then

				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	-20.0	-25.0	0.0	0.0
				SetParameter	Lifetime	0.0	0.0	0.0	0.0
       				SetParameter    Score   K
        			SetParameter    Digits  8
        			SendMessage     CREATESCORE

				Set A To K

				Add 100 To K
			
			EndIf

		EndIf

		If D IsEqualTo 1
		Then

			If A IsLessThan N
			Then
			
				Add 1 To A

				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	-20.0	-25.0	0.0	0.0
				SetParameter	Lifetime	0.0	0.0	0.0	0.0
       				SetParameter    Score   A
        			SetParameter    Digits  8
        			SendMessage     CREATESCORE




			EndIf

		EndIf


/
		If A IsEqualTo N
		Then

			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	-20.0	-25.0	0.0	0.0
			SetParameter	Lifetime	0.0	0.0	0.0	0.0
       			SetParameter    Score   N
        		SetParameter    Digits  8
        		SendMessage     CREATESCORE

		EndIf
/
		If A BecomesEqualTo N
		Then

			Set X To 95
			GotoLoop END2

		EndIf


	EndIf


	If X BecomesEqualTo 98
	Then


		SetParameter    SCORE		N
		SendMessage	SET_SCORE
		SendMessage LOSECONDITION

	EndIf


	
	
EndLoop

Loop END2
Do

	OnMessage TIMER9
	Do

		Add 1 To X

	EndResponse
	

	If X IsGreaterThanOrEqualTo 1
	Then	


	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		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	Justify		Centre
	SetParameter	POSITION	0.0	150.0	0.0	0.0
	SetParameter	TEXT		Scores
FRE	SetParameter	TEXT		Scores
ITA	SetParameter	TEXT		Punti
	SPA SetParameter	TEXT	Puntuacin
	GER SetParameter	TEXT	Punkte
POL	SetParameter	TEXT		Wyniki


	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		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	LifeTime	0.0	0.0	0.0	0.0

	SetParameter	Justify		Right
	SetParameter	POSITION	-240.0	75.0	0.0	0.0
	SPA SetParameter	POSITION	-260.0	75.0	0.0	0.0
POL 	SetParameter	POSITION	-275.0	75.0	0.0	0.0
	SetParameter	FRAME		2
	SendMessage	CREATEICON
	SetParameter	Side	2

	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	Justify		Right
	SetParameter	POSITION	-70.0	75.0	0.0	0.0
	SetParameter	TEXT		destroyed
FRE	SetParameter	TEXT		dtruit
ITA	SetParameter	TEXT		distrutti
	SPA SetParameter	TEXT	destruidas
	GER SetParameter	TEXT	zerstrt
POL	SetParameter	TEXT		zniszczonych

	SendMessage	CREATETEXT

	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	-20.0	75.0	0.0	0.0
	SetParameter	Lifetime	0.0	0.0	0.0	0.0
       	SetParameter    Score   W
        SetParameter    Digits  8
        SendMessage     CREATESCORE


	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	Justify		Left
	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	POSITION	90.0	75.0	0.0	0.0
	SetParameter	TEXT		x_1000_points
FRE	SetParameter	TEXT		x_1000_points
ITA	SetParameter	TEXT		x_1000_punti
	SPA SetParameter	TEXT	x_1000_puntos
	GER SetParameter	TEXT	x_1000_Punkte
POL	SetParameter	TEXT		x_1000_punktw

	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	Justify		Right
	SetParameter	POSITION	-70.0	25.0	0.0	0.0
	SetParameter	TEXT		Time_survived
FRE	SetParameter	TEXT		Temps_de_survie
ITA	SetParameter	TEXT		Tempo_rimasto
	SPA SetParameter	TEXT	Duracin
	GER SetParameter	TEXT	berstandene_Zeit
POL	SetParameter	TEXT		Czas_gry

	SendMessage	CREATETEXT

	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	-20.0	25.0	0.0	0.0
	SetParameter	Lifetime	0.0	0.0	0.0	0.0
       	SetParameter    Score   S
        SetParameter    Digits  8
        SendMessage     CREATESCORE




	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	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	Justify		Left
	SetParameter	POSITION	90.0	25.0	0.0	0.0
	SetParameter	TEXT		Seconds
FRE	SetParameter	TEXT		Secondes
ITA	SetParameter	TEXT		secondi
	SPA SetParameter	TEXT	Segundos
	GER SetParameter	TEXT	Sekunden
POL	SetParameter	TEXT		sekund


	SendMessage	CREATETEXT


	SetParameter	Justify		Right
	SetParameter	POSITION	-70.0	-25.0	0.0	0.0
	SetParameter	TEXT		Total_points
FRE	SetParameter	TEXT		Total_de_points
ITA	SetParameter	TEXT		Punteggio_totale
	SPA SetParameter	TEXT	Puntuacin_Total
	GER SetParameter	TEXT	Gesamtpunkte
POL	SetParameter	TEXT		Razem_punktw

	SendMessage	CREATETEXT

	EndIf

	If X IsGreaterThanOrEqualTo 2
	Then

		If K IsGreaterThan N
		Then
			
			Set D To 1

		EndIf


		If D IsEqualTo 0
		Then

			If K IsLessThan N
			Then

				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	-20.0	-25.0	0.0	0.0
				SetParameter	Lifetime	0.0	0.0	0.0	0.0
       				SetParameter    Score   K
        			SetParameter    Digits  8
        			SendMessage     CREATESCORE

				Set A To K

				Add 100 To K
			
			EndIf

		EndIf

		If D IsEqualTo 1
		Then

			If A IsLessThan N
			Then

				Add 1 To A
			
				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	-20.0	-25.0	0.0	0.0
				SetParameter	Lifetime	0.0	0.0	0.0	0.0
       				SetParameter    Score   A
        			SetParameter    Digits  8
        			SendMessage     CREATESCORE


			EndIf

		EndIf



		If A IsEqualTo N
		Then

			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	-20.0	-25.0	0.0	0.0
			SetParameter	Lifetime	0.0	0.0	0.0	0.0
       			SetParameter    Score   N
        		SetParameter    Digits  8
        		SendMessage     CREATESCORE

		EndIf

		If A BecomesEqualTo N
		Then

			Set X To 95

		EndIf

	EndIf


	If X BecomesEqualTo 98
	Then


		SetParameter    SCORE		N
		SendMessage	SET_SCORE
		SendMessage LOSECONDITION

	EndIf

	
EndLoop



Endfile



