GameMode	g2

	RedComboCounter			C
	YellowComboCounter		D
	GreenComboCounter		E
	OrangeComboCounter		F
	PurpleComboCounter		G
	WaterHeightCounter		H
	TOTALBLOCKSONSCREENCOUNTER	T
	LIVESREMAINING02COUNTER		M

TEXTBUFFER      LEVS                    

        g2.wbl

ENDBUFFER

	
Program0123




Loop INIT
Do
	SetParameter    TEXT    g2.wbw
        SendMessage     LOADWEAPONLIST

	Set A to 0

	SetParameter	INTERVAL	999999999
	SendMessage	SetLandSpeed

	SetParameter	NUMLINES	10
	SendMessage	SetStartLines	
	SetParameter	BACKDROP	BACKDROP7
	SendMessage	SETBACKDROP
	SetParameter    BUFFERNAME              LEVS
        SetParameter    NUMLINES                10      
	SendMessage	LOADLEVEL

	
	SendMessage	PAUSELANDRIGHT
	SendMessage	PAUSELANDLEFT	

	SendMessage	DEACTIVATESCORE

	SetParameter 	POSITION   	0	-175	0	0
	SendMessage 	CHANGEWATERHEIGHT

	SetParameter	MESSAGE_ID	TIMER1
	SetParameter	INTERVAL	60000
	SetParameter	REPEAT		TRUE
	SendMessage	CREATETIMER

	SetParameter	MESSAGE_ID	TIMER2
	SetParameter	INTERVAL	90000
	SetParameter	REPEAT		TRUE
	SendMessage	CREATETIMER

	SetParameter	MESSAGE_ID	TIMER3
	SetParameter	INTERVAL	1000
	SetParameter	REPEAT		TRUE
	SendMessage	CREATETIMER

	SetParameter	LIVES	0
	SendMessage	SETLIVES

	Set A To 0
	Set B to 0
	Set X to 59
	Set Z to 1

	SendMessage	Startbriefing

	SendMessage	FIRINGOFF
	
	SendMessage     MUSIC_GROOVE_LOW
	
	GotoLoop MAIN

EndLoop

Loop MAIN
Do
	
	SetParameter	Velocity	0.0	0.0	0.0	0.0
	SetParameter	Gravity		0.0	0.0	0.0	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	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		Block_Problems
FRE	SetParameter	TEXT		Blocs_Embrouille
	GER SetParameter	Text	Steinprobleme
	SPA SetParameter	Text	Problemas_de_Bloques
	ITA SetParameter	TEXT	Problemi_coi_blocchi
	POL SetParameter	TEXT	Pewien_problem


	

	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		Clear_the_coloured_blocks
FRE	SetParameter	TEXT		Déblayez_les_blocs_de_couleur
	GER SetParameter	Text	Räume_alle_farbigen_Steine_
	SPA SetParameter	Text	Destruye_los_bloques_de_colores
	ITA SetParameter	TEXT	Elimina_i_blocchi_colorati
	POL SetParameter	TEXT	Usuń_kolorowe_cegły



	SendMessage 	CREATETEXT

	SetParameter	Position	0.0	80.0	0.0	0.0
	
	SetParameter	Text		in_under_2_minutes.
FRE	SetParameter	TEXT		en_moins_de_2_minutes.
	GER SetParameter	Text	in_unter_2_Minuten_ab.
	SPA SetParameter	Text	en_menos_de_dos_minutos.
	ITA SetParameter	TEXT	in_meno_di_2_minuti.	
	POL SetParameter	TEXT	w_czasie_krótszym_niż_2_minuty.



	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_drücken
	ITA SetParameter	TEXT	Premi_fuoco_per_cominciare
	POL SetParameter	TEXT	Naciśnij_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 	FIRINGON
	SendMessage	Endbriefing
	SendMessage	MUSIC_GROOVE_MED_LOW

	
GotoLoop MAIN1
	EndResponse

EndLoop


Loop MAIN1
Do
	
OnMessage TIMER3
	Do
		Subtract 1 from X
		Add 1 to B
	EndResponse

	SetParameter	FRAME		3
	SetParameter	Lifetime	0.0	0.0	1.0	0.0
	SetParameter	Position	149.0	210.0	0.0	0.0
	SendMessage	CREATEICON


		
			SetParameter	Lifetime	0.0	0.0	0.0	0.0
			SetParameter	Position	230.0	210.0	0.0	0.0


	If Z IsEqualTo 0
		Then

			If X 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 X IsLessThan 10
				Then
					SetParameter	Text		0
					SetParameter	Position	225.0	210.0	0.0	0.0
					SetParameter	Lifetime	0.0	0.0	0.0	0.0
					SendMessage	CREATETEXT
					SetParameter	Position	245.0	210.0	0.0	0.0
				EndIf

	If X IsLessThan	0
	Then

		If Z IsEqualTo 1
		Then

			Set Z To 0
			Set X To 59

		EndIf
			

	EndIf
 

			ConvertToText   X
			SendMessage	CREATETEXT
			ConvertToText	Z
			SetParameter	Lifetime	0.0	0.0	0.0	0.0
			SetParameter	Position	190.0	210.0	0.0	0.0
			SendMessage	CREATETEXT

	If Z IsEqualTo 0
	Then

		If X IsEqualTo 0
		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_upłynął



		SendMessage	CREATETEXT
		SendMessage     LOSECONDITION
			GotoLoop CALM
		EndIf

	EndIf

	OnMessage TIMER1
	Do	
		
		Add 1 To A

	If A BecomesEqualTo 1
	Then
	
	SendMessage     MUSIC_GROOVE_MED
	EndIf
	
	
	EndResponse

	OnMessage TIMER2
	Do
		Add 2 To A

	If A BecomesEqualTo 3
	Then
	
	SendMessage     MUSIC_GROOVE_HIGH
	EndIf
	
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		HURRY_UP!!
FRE SetParameter	TEXT	DÉPĘCHEZ-VOUS!!
GER SetParameter	Text	MACH_SCHNELL!
SPA SetParameter	Text	ˇDEPRISA!
ITA SetParameter	TEXT	SBRIGATI!
POL SetParameter	TEXT	Pośpiesz_się



SendMessage	CREATETEXT
	

	EndResponse	
SetParameter 	POSITION   	0	-175	0	0
SendMessage 	CHANGEWATERHEIGHT



		
	
		If T BecomesEqualTo 6
		Then
		SendMessage WINCONDITION
		GotoLoop CALM
		Endif

	If M BecomesEqualTo -1
	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		FAILED!
FRE SetParameter	TEXT	ÉCHEC!
GER SetParameter	Text	VERLOREN!
SPA SetParameter	Text	ˇFALLASTE!
ITA SetParameter	TEXT	HAI_FALLITO!
POL SetParameter	TEXT	klęska



	SendMessage	CREATETEXT
	SendMessage	LOSECONDITION
	EndIf

	SetParameter 	POSITION   	0	-175	0	0
	SendMessage 	CHANGEWATERHEIGHT


EndLoop 

Loop CALM
DO
EndLoop

EndFile