GameMode ShTarM GameType QUEST DESTROYOWNTARGETCOUNTER T DESTROYENEMYTARGETCOUNTER T LANDDROPPEDINWATERCOUNTER L LIVESREMAINING02COUNTER M ORANGEBLOCKSONSCREENCOUNTER S Program0123 TEXTBUFFER LEVS ShTarM.wbl ENDBUFFER / shoot targets as they move across the screen Mission Version author pd/ Loop INIT Do SendMessage DEACTIVATESCORE SetParameter Position 0 -175 0 0 SendMessage CHANGEWATERHEIGHT SetParameter TEXT ShTarM.wbw SendMessage LOADWEAPONLIST SetParameter POSITION 0 0 0 0 SetParameter PLAYERNUM 0 SendMessage SETBOATPOSITION SetParameter LIVES 0 SendMessage SETLIVES SetParameter NUMLINES 20 SendMessage SetStartLines SetParameter BACKDROP BACKDROP7 SendMessage SETBACKDROP SetParameter BUFFERNAME LEVS SetParameter NUMLINES 20 SendMessage LOADLEVEL SendMessage PAUSELANDLEFT SendMessage PAUSELANDRIGHT SetParameter MESSAGE_ID TIMER1 SetParameter INTERVAL 0200 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER2 SetParameter INTERVAL 0170 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER3 SetParameter INTERVAL 0125 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER4 SetParameter INTERVAL 11000 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER5 SetParameter INTERVAL 1000 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER6 SetParameter INTERVAL 0180 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER7 SetParameter INTERVAL 0175 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER8 SetParameter INTERVAL 0120 SetParameter REPEAT TRUE SendMessage CREATETIMER SET A TO 0 SET B TO 0 SET C TO 0 SET D TO 0 SET E TO 0 SET G TO 0 SET H TO 0 SET I TO 0 SET K TO 0 SET L TO 0 SET M TO 0 SET N TO 0 Set O To 0 SET R TO 0 SET S TO 0 SET P TO 0 SET Q TO 2 SET T TO 0 SET U TO 60 SET V TO 0 SET X TO 0 SET Y TO 0 SET W TO 0 SET Z TO 0 Randomise A FROM 1 To 25 Set F To 0 Randomise C From -20 To -4 Randomise D From 30 To 45 Randomise E From -23 To -4 Randomise F From 30 To 45 Randomise G From 30 To 45 Randomise H From -23 To -4 SendMessage FIRINGOFF SendMessage StartBriefing 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 The_shooting_range FRE SetParameter TEXT Champ_de_tir ITA SetParameter TEXT Prova_di_tiro SPA SetParameter TEXT El_Campo_de_Tiro GER SetParameter TEXT Der_Schießplatz POL SetParameter TEXT Strzelnica 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.8 SetParameter Scale2 0.8 0.8 0.8 0.8 SetParameter Scale3 0.8 0.8 0.8 0.8 SetParameter Scale4 0.8 0.8 0.8 0.8 SetParameter Scale5 0.8 0.8 0.8 0.8 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_to_complete FRE SetParameter TEXT Détruisez_15_cibles_pour ITA SetParameter TEXT Colpisci_15_bersagli_per SPA SetParameter TEXT Debes_eliminar_15_dianas GER SetParameter TEXT Treffe_15_Ziele,_um_die POL SetParameter TEXT Zestrzel_15_celów SendMessage CREATETEXT SetParameter Position 0.0 80.0 0.0 0.0 SetParameter Text the_mission. ITA SetParameter Text completare_la_missione. FRE SetParameter TEXT terminer_la_mission. SPA SetParameter TEXT para_completar_la_misión. GER SetParameter TEXT Mission_zu_komplettieren. POL SetParameter TEXT aby_ukoñczyæ_misjê. SendMessage CREATETEXT SetParameter Position 0.0 45.0 0.0 0.0 SetParameter Text A_successful_strike_will_extend FRE SetParameter TEXT Si_vous_réussissez_une_attaque, ITA SetParameter TEXT Ogni_volta_che_vai_a_segno,_il SPA SetParameter TEXT Si_lo_haces_bien,_conseguirás GER SetParameter TEXT Ein_erfolgreicher_Treffer_gibt_dir POL SetParameter TEXT Celny_strza³_do_CI SendMessage CREATETEXT SetParameter Position 0.0 10.0 0.0 0.0 SetParameter Text your_time. FRE SetParameter TEXT vous_prolongerez_votre_temps. ITA SetParameter TEXT tempo_a_tua_disposizione_aumenta. SPA SetParameter TEXT más_tiempo. GER SetParameter TEXT mehr_Zeit. POL SetParameter TEXT wiêcej_czasu. SendMessage CREATETEXT SetParameter Position 0.0 -25.0 0.0 0.0 SetParameter Text But_watch_out_for_those_reds! FRE SetParameter TEXT Mais_faites_attention_à_ces_rouges! ITA SetParameter TEXT Stai_attento_ai_rossi! SPA SetParameter TEXT ¡Pero_cuidado_con_los_bloques_rojos! GER SetParameter TEXT Pass_aber_auf_die_Roten_auf! POL SetParameter TEXT Uwa¿aj_jednak_na_czerwone! 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_comincia GER SetParameter TEXT Zum_Starten_Feuer_drücken 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 SetParameter Position 0 -175 0 0 SendMessage CHANGEWATERHEIGHT OnMessage FIREPRESSED Do SendMessage EndBriefing SendMessage FIRINGON GotoLoop MAIN1 EndResponse EndLoop Loop MAIN1 Do 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 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 Lifetime 0.0 0.0 1.0 0.0 SetParameter Justify CENTRE SetParameter FRAME 2 SetParameter Lifetime 0.0 0.0 0.0 0.0 SetParameter Position -245.0 210.0 0.0 0.0 SendMessage CREATEICON SetParameter Scale1 0.8 0.8 0.8 0.8 SetParameter Scale2 0.8 0.8 0.8 0.8 SetParameter Scale3 0.8 0.8 0.8 0.8 SetParameter Scale4 0.8 0.8 0.8 0.8 SetParameter Scale5 0.8 0.8 0.8 0.8 ConvertToText T SetParameter Lifetime 0.0 0.0 0.0 0.0 SetParameter Position -200.0 210.0 0.0 0.0 SendMessage CREATETEXT 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 Position 0 -175 0 0 SendMessage CHANGEWATERHEIGHT / ******************** Moving Bar 1 ********************** / OnMessage TIMER1 Do / Detonate left hand block / SetParameter Position C 3 1 0 SendMessage DETONATEBLOCK / Change second block into anchor / Add 1 To C SetParameter Position C 3 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Change fourth block into bouncy / Add 2 To C SetParameter Position C 3 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK / Add fifth anchor block on the end / Add 1 To C SetParameter Position C 3 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Move C back to point at the new left hand end / Subtract 3 From C SetParameter POSITION 0 3 0 0 SendMessage GETBLOCKCOLOUR ReadFromParameter BLOCKCOLOUR INTO O If O IsEqualTo TARGET Then SetParameter POSITION 0 3 0 0 SetParameter BLOCKCOLOUR ANCHOR SendMessage SPAWNINBLOCK EndIf SetParameter POSITION 24 3 0 0 SendMessage GETBLOCKCOLOUR ReadFromParameter BLOCKCOLOUR INTO O If O IsEqualTo TARGET Then SetParameter POSITION 24 3 0 0 SetParameter BLOCKCOLOUR ANCHOR SendMessage SPAWNINBLOCK EndIf If C IsGreaterThan 30 Then Randomise C From -20 to -4 Endif EndResponse / ********************** Next mOving bar ***************************** / OnMessage TIMER2 Do / Detonate left hand block / SetParameter Position D 7 1 0 SendMessage DETONATEBLOCK / Change second block into anchor / SUBTRACT 1 FROM D SetParameter Position D 7 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Change fourth block into bouncy / SUBTRACT 2 FROM D SetParameter Position D 7 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK / Add fifth anchor block on the end / SUBTRACT 1 FROM D SetParameter Position D 7 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Move D back to point at the new left hand end / ADD 3 TO D SetParameter POSITION 0 7 0 0 SendMessage GETBLOCKCOLOUR ReadFromParameter BLOCKCOLOUR INTO O If O IsEqualTo TARGET Then SetParameter POSITION 0 7 0 0 SetParameter BLOCKCOLOUR ANCHOR SendMessage SPAWNINBLOCK EndIf SetParameter POSITION 24 7 0 0 SendMessage GETBLOCKCOLOUR ReadFromParameter BLOCKCOLOUR INTO O If O IsEqualTo TARGET Then SetParameter POSITION 24 7 0 0 SetParameter BLOCKCOLOUR ANCHOR SendMessage SPAWNINBLOCK EndIf If D IsLessThan -5 Then Randomise D From 30 to 45 Endif EndResponse / ********************** Next mOving bar ***************************** / OnMessage TIMER3 Do / Detonate left hand block / SetParameter Position E 5 1 0 SendMessage DETONATEBLOCK / Change second block into anchor / Add 1 To E SetParameter Position E 5 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Change fourth block into bouncy / Add 2 To E SetParameter Position E 5 0 0 SetParameter BlockColour RED SendMessage SPAWNINBLOCK / Add fifth anchor block on the end / Add 1 To E SetParameter Position E 5 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Move E back to point at the new left hand end / Subtract 3 From E If E IsGreaterThan 30 Then Randomise E From -23 to -4 Endif EndResponse / ********************** Next mOving bar ***************************** / OnMessage TIMER6 Do / Detonate left hand block / SetParameter Position F 9 1 0 SendMessage DETONATEBLOCK / Change second block into anchor / SUBTRACT 1 FROM F SetParameter Position F 9 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Change fourth block into bouncy / SUBTRACT 2 FROM F SetParameter Position F 9 0 0 SetParameter BlockColour RED SendMessage SPAWNINBLOCK / Add fifth anchor block on the end / SUBTRACT 1 FROM F SetParameter Position F 9 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Move F back to point at the new left hand end / ADD 3 TO F If F IsLessThan -5 Then Randomise F From 30 to 45 Endif EndResponse / ********************** Next mOving bar ***************************** / OnMessage TIMER7 Do / Detonate left hand block / SetParameter Position G 11 1 0 SendMessage DETONATEBLOCK / Change second block into anchor / SUBTRACT 1 FROM G SetParameter Position G 11 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Change fourth block into bouncy / SUBTRACT 2 FROM G SetParameter Position G 11 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK / Add fifth anchor block on the end / SUBTRACT 1 FROM G SetParameter Position G 11 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Move G back to point at the new left hand end / ADD 3 TO G SetParameter POSITION 0 11 0 0 SendMessage GETBLOCKCOLOUR ReadFromParameter BLOCKCOLOUR INTO O If O IsEqualTo TARGET Then SetParameter POSITION 0 11 0 0 SetParameter BLOCKCOLOUR ANCHOR SendMessage SPAWNINBLOCK EndIf SetParameter POSITION 24 11 0 0 SendMessage GETBLOCKCOLOUR ReadFromParameter BLOCKCOLOUR INTO O If O IsEqualTo TARGET Then SetParameter POSITION 24 11 0 0 SetParameter BLOCKCOLOUR ANCHOR SendMessage SPAWNINBLOCK EndIf If G IsLessThan -5 Then Randomise G From 30 to 45 Endif EndResponse / ********************** Next mOving bar ***************************** / OnMessage TIMER8 Do / Detonate left hand block / SetParameter Position H 13 1 0 SendMessage DETONATEBLOCK / Change second block into anchor / Add 1 To H SetParameter Position H 13 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Change fourth block into bouncy / Add 2 To H SetParameter Position H 13 0 0 SetParameter BlockColour RED SendMessage SPAWNINBLOCK / Add fifth anchor block on the end / Add 1 To H SetParameter Position H 13 0 0 SetParameter BlockColour ANCHOR SendMessage SPAWNINBLOCK / Move H back to point at the new left hand end / Subtract 3 From H If H IsGreaterThan 30 Then Randomise H From -20 to -4 Endif EndResponse If O IsEqualTo 0 Then If U BecomesEqualTo 45 Then SendMessage MUSIC_GROOVE_MED EndIf Set O To 1 EndIf If O IsEqualTo 1 Then If U BecomesEqualTo 30 Then SendMessage MUSIC_GROOVE_MED_HI EndIf Set O To 2 EndIf If O IsEqualTo 2 Then If U BecomesEqualTo 10 Then SendMessage MUSIC_GROOVE_HIGH EndIf EndIf If T IsGreaterThan R Then Randomise X FROM 1 TO 2 If X 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 SetParameter Position 0.0 75.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text WOW!_You_got_one FRE SetParameter TEXT Wouah!_Bien_visé! ITA SetParameter TEXT WOW!_Ne_hai_preso_uno! SPA SetParameter TEXT ¡Toma,_ya_tienes_una! GER SetParameter TEXT WOW!_Du_hast_eins_erwischt! POL SetParameter TEXT O_trafi³eœ_jednego SendMessage CREATETEXT EndIf If X IsEqualTo 2 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 SetParameter Position 0.0 75.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text Good_shot! FRE SetParameter TEXT Beau_tir! ITA SetParameter TEXT Bel_colpo! SPA SetParameter TEXT ¡Buen_disparo! GER SetParameter TEXT Guter_Schuss! POL SetParameter TEXT Celny_strza³ SendMessage CREATETEXT EndIf SetParameter Position 0.0 25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text Time_bonus FRE SetParameter TEXT Bonus_de_temps ITA SetParameter TEXT Tempo_bonus SPA SetParameter TEXT Tiempo_Extra GER SetParameter TEXT Zeitbonus POL SetParameter TEXT PREMIA_CZASOWA SendMessage CREATETEXT SET R TO T ADD 5 To U Set Q To 0 ADD 50 To K EndIf OnMessage TIMER9 Do Set Z To 0 EndResponse If S BecomesGreaterThan 0 Then If Z IsLessThan 1 Then Randomise X FROM 1 TO 2 If X IsEqualTo 1 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 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 Position 0.0 25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text Disaster! FRE SetParameter TEXT Calamité! ITA SetParameter TEXT Che_disastro! SPA SetParameter TEXT ¡Qué_desastre! GER SetParameter TEXT Desaster! POL SetParameter TEXT katastrofa SendMessage CREATETEXT EndIf If X IsEqualTo 2 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 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 Position 0.0 25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text Watch_it! FRE SetParameter Text Attention! ITA SetParameter TEXT Attento! SPA SetParameter TEXT ¡Cuidado! GER SetParameter TEXT Vorsicht! POL SetParameter TEXT Uwa¿aj SendMessage CREATETEXT EndIf SetParameter Position 0.0 -25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text Time_penalty FRE SetParameter Text Pénalité_de_temps ITA SetParameter TEXT Penalità SPA SetParameter TEXT Penalización GER SetParameter TEXT Zeitstrafe POL SetParameter TEXT Kara SendMessage CREATETEXT SetParameter MESSAGE_ID TIMER9 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER9 SetParameter INTERVAL 0371 SetParameter REPEAT TRUE SendMessage CREATETIMER SET Q To 1 Set Z To 1 SUBTRACT 10 FROM U ADD 1 To L Add 10 To N EndIf EndIf 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 3 SetParameter Lifetime 0.0 0.0 0.0 0.0 SetParameter Position 180.0 210.0 0.0 0.0 SendMessage CREATEICON SetParameter Scale1 0.8 0.8 0.8 0.8 SetParameter Scale2 0.8 0.8 0.8 0.8 SetParameter Scale3 0.8 0.8 0.8 0.8 SetParameter Scale4 0.8 0.8 0.8 0.8 SetParameter Scale5 0.8 0.8 0.8 0.8 OnMessage TIMER5 Do Set S TO 0 If Q IsEqualTo 1 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 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 Velocity 0.0 0.0 0.0 0.0 SetParameter Lifetime 0.0 0.0 1.0 0.0 Set Q To 2 EndIf If Q IsEqualTo 0 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 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 Velocity 0.0 0.0 0.0 0.0 SetParameter Lifetime 0.0 0.0 1.0 0.0 Set Q To 2 EndIf SetParameter Velocity 0.0 0.0 0.0 0.0 If U IsGreaterThan 60 Then Subtract 60 From U Add 1 to I EndIf Subtract 1 from U SetParameter Lifetime 0.0 0.0 1.0 0.0 SetParameter Position 245.0 210.0 0.0 0.0 If U IsLessThan 0 Then Subtract 1 from I Set U To 59 EndIf If I IsEqualTo 0 Then If U 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 U IsLessThan 10 Then SetParameter Text 0 SetParameter Position 245.0 210.0 0.0 0.0 SendMessage CREATETEXT SetParameter Position 260.0 210.0 0.0 0.0 EndIf If U IsEqualTo 60 Then Set U TO 00 ConvertToText U SendMessage CREATETEXT Set U To 60 EndIf If I IsEqualTo -1 Then Set U 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 245.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 260.0 210.0 0.0 0.0 SendMessage CREATETEXT Set I To 0 Set Z To 0 SetParameter BLOCKCOLOUR ALLCOLOURS SendMessage CLEARBLOCKS SendMessage CLEARPROJECTILES SendMessage MUSIC_GROOVE_LOW SendMessage FIRINGOFF GotoLoop FAIL EndIf If U IsEqualTo 0 Then If I IsEqualTo 0 Then SendMessage FIRINGOFF SetParameter BLOCKCOLOUR ALLCOLOURS SendMessage CLEARBLOCKS SendMessage MUSIC_GROOVE_LOW SendMessage CLEARPROJECTILES GotoLoop FAIL EndIf EndIf If U IsLessThan 60 Then ConvertToText U SendMessage CREATETEXT EndIf 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 1.0 0.0 ConvertToText I SetParameter Position 215.0 210.0 0.0 0.0 SendMessage CREATETEXT 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 OnMessage TIMER5 Do Randomise X From 1 To 200 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 X BecomesEqualTo 37 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Some_help! FRE SetParameter Text De_l'aide! ITA SetParameter TEXT Un_aiuto! SPA SetParameter TEXT ¡Ayuda! GER SetParameter TEXT Etwas_Hilfe! POL SetParameter TEXT Potrzebujesz_pomocy SendMessage CREATETEXT EndIf If X IsEqualTo 37 Then SetParameter POSITION 5 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_SPEEDUP SendMessage SPAWNINBLOCK EndIf If X BecomesEqualTo 11 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Gifts! FRE SetParameter TEXT Cadeaux! ITA SetParameter TEXT Regali! SPA SetParameter TEXT ¡Regalos! GER SetParameter TEXT Geschenke! POL SetParameter TEXT Prezenty! SendMessage CREATETEXT EndIf If X IsEqualTo 11 Then SetParameter POSITION 19 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_SPEEDUP SendMessage SPAWNINBLOCK EndIf If X BecomesEqualTo 120 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Gifts! FRE SetParameter TEXT Cadeaux! ITA SetParameter TEXT Regali! SPA SetParameter TEXT ¡Regalos! GER SetParameter TEXT Geschenke! POL SetParameter TEXT Prezenty! SendMessage CREATETEXT EndIf If X IsEqualTo 120 Then SetParameter POSITION 12 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_SPEEDUP SendMessage SPAWNINBLOCK EndIf If X BecomesEqualTo 45 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Gifts! FRE SetParameter TEXT Cadeaux! ITA SetParameter TEXT Regali! SPA SetParameter TEXT ¡Regalos! GER SetParameter TEXT Geschenke! POL SetParameter TEXT Prezenty! SendMessage CREATETEXT EndIf If X IsEqualTo 45 Then SetParameter POSITION 5 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_SHOTGUNORANGE SendMessage SPAWNINBLOCK EndIf If X BecomesEqualTo 91 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Some_help! FRE SetParameter TEXT De_l'aide! ITA SetParameter TEXT Un_aiuto! SPA SetParameter TEXT ¡Ayuda! GER SetParameter TEXT Geschenke! POL SetParameter TEXT Potrzebujesz_pomocy SendMessage CREATETEXT EndIf If X IsEqualTo 91 Then SetParameter POSITION 19 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_SHOTGUNORANGE SendMessage SPAWNINBLOCK EndIf If X BecomesEqualTo 191 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Some_help! FRE SetParameter TEXT De_l'aide! ITA SetParameter TEXT Un_aiuto! SPA SetParameter TEXT ¡Ayuda! GER SetParameter TEXT Geschenke! POL SetParameter TEXT Potrzebujesz_pomocy SendMessage CREATETEXT EndIf If X IsEqualTo 191 Then SetParameter POSITION 12 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_SHOTGUNORANGE SendMessage SPAWNINBLOCK EndIf If X BecomesEqualTo 145 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Gifts! FRE SetParameter Text Cadeaux! ITA SetParameter TEXT Regali! SPA SetParameter TEXT ¡Regalos! GER SetParameter TEXT Geschenke! POL SetParameter TEXT Prezenty! SendMessage CREATETEXT EndIf If X IsEqualTo 145 Then SetParameter POSITION 5 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_LASERBEAM SendMessage SPAWNINBLOCK EndIf If X BecomesEqualTo 31 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Some_help! FRE SetParameter TEXT De_l'aide! ITA SetParameter TEXT Un_aiuto! SPA SetParameter TEXT ¡Ayuda! GER SetParameter TEXT Etwas_Hilfe! POL SetParameter TEXT Potrzebujesz_pomocy SendMessage CREATETEXT EndIf If X IsEqualTo 31 Then SetParameter POSITION 19 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_LASERBEAM SendMessage SPAWNINBLOCK EndIf If X BecomesEqualTo 143 Then SetParameter Colour1 0.1 1.0 0.65 1.0 SetParameter Colour2 0.1 1.0 0.65 1.0 SetParameter Colour3 0.1 1.0 0.65 1.0 SetParameter Position 0.0 -65.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 1.5 3.5 SetParameter Text Some_help! FRE SetParameter TEXT De_l'aide! ITA SetParameter TEXT Un_aiuto! SPA SetParameter TEXT ¡Regalos! GER SetParameter TEXT Etwas_Hilfe! POL SetParameter TEXT Potrzebujesz_pomocy SendMessage CREATETEXT EndIf If X IsEqualTo 143 Then SetParameter POSITION 12 1 0 0 SetParameter BlockColour CRATE SetParameter CRATECONTENTS CRATE_LASERBEAM SendMessage SPAWNINBLOCK EndIf EndResponse If T BecomesEqualTo 8 Then SetParameter Colour1 0.0 0.43 0.74 1.0 SetParameter Colour2 0.0 0.43 0.74 1.0 SetParameter Colour3 0.0 0.43 0.74 1.0 SetParameter Position 0.0 150.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text Faster! FRE SetParameter TEXT Plus_vite! ITA SetParameter TEXT PIÙ_VELOCE! SPA SetParameter TEXT ¡Más_rápido! GER SetParameter TEXT Schneller! POL SetParameter TEXT szybciej SendMessage CREATETEXT SetParameter MESSAGE_ID TIMER2 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER3 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER6 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER7 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER8 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER2 SetParameter INTERVAL 0110 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER3 SetParameter INTERVAL 0100 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER6 SetParameter INTERVAL 0130 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER7 SetParameter INTERVAL 0095 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER8 SetParameter INTERVAL 0085 SetParameter REPEAT TRUE SendMessage CREATETIMER EndIf If T BecomesEqualTo 12 Then SetParameter Colour1 0.0 0.43 0.74 1.0 SetParameter Colour2 0.0 0.43 0.74 1.0 SetParameter Colour3 0.0 0.43 0.74 1.0 SetParameter Position 0.0 150.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text Faster! FRE SetParameter TEXT Plus_vite! ITA SetParameter TEXT PIÙ_VELOCE! SPA SetParameter TEXT ¡Más_rápido! GER SetParameter TEXT Schneller! POL SetParameter TEXT szybciej SendMessage CREATETEXT SetParameter MESSAGE_ID TIMER2 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER3 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER6 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER7 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER8 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER2 SetParameter INTERVAL 0090 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER3 SetParameter INTERVAL 0080 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER6 SetParameter INTERVAL 0070 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER7 SetParameter INTERVAL 0065 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER8 SetParameter INTERVAL 0060 SetParameter REPEAT TRUE SendMessage CREATETIMER EndIf If T BecomesGreaterThan 14 Then SetParameter BLOCKCOLOUR ALLCOLOURS SendMessage CLEARBLOCKS Set Z to 0 SendMessage MUSIC_GROOVE_LOW SendMessage CLEARPROJECTILES SendMessage FIRINGOFF GotoLoop WIN EndIf If M IsEqualTo -1 Then SendMessage FIRINGOFF SetParameter BLOCKCOLOUR ALLCOLOURS SendMessage CLEARBLOCKS SendMessage MUSIC_GROOVE_LOW SendMessage CLEARPROJECTILES Set Z to 0 GotoLoop FAIL EndIf EndLoop Loop FAIL Do SetParameter BLOCKCOLOUR ALLCOLOURS SendMessage CLEARBLOCKS OnMessage TIMER5 Do Add 1 To Z EndResponse If Z 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! ITA SetParameter TEXT HAI_FALLITO! SPA SetParameter TEXT ¡FALLASTE! GER SetParameter TEXT VERLOREN! POL SetParameter TEXT klêska SendMessage CREATETEXT EndIf If Z BecomesEqualTo 5 Then SendMessage LOSECONDITION EndIf EndLoop Loop WIN Do OnMessage TIMER5 Do Add 1 To Z EndResponse If Z BecomesEqualTo 1 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 RÉUSSI! ITA SetParameter TEXT HAI_VINTO! SPA SetParameter TEXT ¡LO_CONSEGUISTE! GER SetParameter TEXT GESCHAFFT! POL SetParameter TEXT SUKCES SendMessage CREATETEXT EndIf If Z BecomesEqualTo 5 Then SetParameter TEXT g2 SendMessage SETNEXTGAMEMODE SendMessage LOSECONDITION EndIf EndLoop EndFile