GameMode Target_Alley FRE colonnes_et_cibles GER Reihen_und_Ziele SPA Columnas_y_Objetivos ITA Colonne_e_bersagli POL Cele_w_kolumnach GameType TOURNAMENT DestroyOwnTargetCounter T DestroyEnemyTargetCounter T TargetInWaterCounter Y Program0123 / columns and targets author pd/ TEXTBUFFER LEVS ColTarg.wbl ENDBUFFER DATABUFFER RAND 2 1 3 2 3 1 2 1 3 1 2 3 ENDBUFFER DATABUFFER COL1 1 13 1 11 1 9 1 7 1 5 1 3 1 1 -1 -1 ENDBUFFER DATABUFFER COL2 8 13 8 11 8 9 8 7 8 5 8 3 8 1 -1 -1 ENDBUFFER DATABUFFER COL3 15 13 15 11 15 9 15 7 15 5 15 3 15 1 -1 -1 ENDBUFFER DATABUFFER COL4 22 13 22 11 22 9 22 7 22 5 22 3 22 1 -1 -1 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 A 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 R TO 0 SET S TO 0 SET P TO 0 SET Q TO 0 SET T TO 0 Set O To 0 SET U TO 0 SET V TO 0 SET X TO 0 Set Y To 0 SET W TO 0 SetParameter Position 0 -175 0 0 SendMessage CHANGEWATERHEIGHT SetParameter TEXT ColTarg.wbw SendMessage LOADWEAPONLIST SetParameter LIVES 1 SendMessage SETLIVES SetParameter NUMLINES 20 SendMessage SetStartLines SetParameter BUFFERNAME LEVS SetParameter NUMLINES 20 SendMessage LOADLEVEL SendMessage PAUSELANDLEFT SendMessage PAUSELANDRIGHT SetParameter TEXT target_alley SendMessage SET_HIGHSCORE_TABLE SetParameter MESSAGE_ID TIMER1 SetParameter INTERVAL 1000 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER2 SetParameter INTERVAL 913 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER3 SetParameter INTERVAL 752 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER4 SetParameter INTERVAL 684 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER5 SetParameter INTERVAL 1100 SetParameter REPEAT TRUE SendMessage CREATETIMER SendMessage DEACTIVATESCORE SendMessage FIRINGOFF SendMessage StartBriefing ResetBuffer COL1 Randomise A FROM 1 TO 8 Set B To 0 ResetBuffer COL2 Randomise E FROM 1 TO 8 Set F To 0 ResetBuffer COL3 Randomise I FROM 1 TO 8 Set J To 0 ResetBuffer COL4 Randomise M FROM 1 TO 8 Set N To 0 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 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 Target_Alley FRE SetParameter TEXT colonnes_et_cibles GER SetParameter Text Reihen_und_Ziele SPA SetParameter Text Columnas_y_Objetivos ITA SetParameter TEXT Colonne_e_bersagli POL SetParameter TEXT Cele_w_kolumnach 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 Destroy_as_many_targets_as FRE SetParameter TEXT Détruisez_autant_de_cibles_que GER SetParameter Text Das_Ziel_ist_es,_so_viele_Ziele_wie_möglich SPA SetParameter Text Destruye_todos_los_objetivos ITA SetParameter TEXT Distruggi_più_bersagli_possibil POL SetParameter TEXT Zniszcz_tyle_celów_ile SendMessage CREATETEXT SetParameter Position 0.0 80.0 0.0 0.0 SetParameter Text possible_and FRE SetParameter TEXT possible_et_essayez GER SetParameter Text zu_zerstören SPA SetParameter Text que_puedas. ITA SetParameter TEXT per_completare_la_missione. POL SetParameter TEXT potrafisz SendMessage CREATETEXT SetParameter Position 0.0 45.0 0.0 0.0 SetParameter Text Try_not_to_let_any_slip_by. FRE SetParameter TEXT de_n'en_laisser_échapper_aucune. GER SetParameter Text Versuche,_keine_vorbeizulassen. SPA SetParameter Text Intenta_que_no_se_te_escape_ni_uno. ITA SetParameter TEXT Cerca_di_non_farteli_sfuggire: POL SetParameter TEXT Postaraj_siê_¿adnego_nie_przepuœciæ. SendMessage CREATETEXT SetParameter Position 0.0 10.0 0.0 0.0 SetParameter Text Lose_more_than_20_and_it's FRE SetParameter TEXT Si_vous_en_perdez_plus_de_20, GER SetParameter Text Verliere_mehr_als_20_und_es_heißt SPA SetParameter Text ¡Si_se_te_escapan_más_de_20... ITA SetParameter TEXT se_ne_perdi_più_di_20, POL SetParameter TEXT Przepuœcisz_20_i SendMessage CREATETEXT SetParameter Position 0.0 -25.0 0.0 0.0 SetParameter Text Game_over! FRE SetParameter TEXT la_partie_s'arrête. GER SetParameter Text Game_over! SPA SetParameter Text se_acabó_el_juego! ITA SetParameter TEXT hai_perso_la_partita. POL SetParameter TEXT KONIEC 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! 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 EndBriefing SendMessage FIRINGON GotoLoop SCREEN1 EndResponse EndLoop / ******************** SEND TARGETS UP THE COLUMNS ********************** / Loop SCREEN1 Do SetParameter Position 0 -175 0 0 SendMessage CHANGEWATERHEIGHT SetParameter Justify Centre 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 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 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 T SetParameter Digits 3 SendMessage CREATESCORE OnMessage TIMER1 DO Add 1 To O EndResponse OnMessage TIMER5 Do Add 1 To B If B IsEqualTo A Then ReadFromBuffer COL1 Into C ReadFromBuffer COL1 Into D SetParameter POSITION C D 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK Randomise W FROM 1 TO 30 If W IsEqualTo 17 Then SetParameter POSITION 5 4 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_LASERBEAM SendMessage SPAWNINBLOCK EndIf If W IsEqualTo 7 Then SetParameter POSITION 12 4 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_SPEEDUP SendMessage SPAWNINBLOCK EndIf If W IsEqualTo 11 Then SetParameter POSITION 12 4 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_LASERBEAM SendMessage SPAWNINBLOCK EndIf If W IsEqualTo 9 Then SetParameter POSITION 19 4 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_SPEEDUP SendMessage SPAWNINBLOCK EndIf If W IsEqualTo 19 Then SetParameter POSITION 19 4 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_LASERBEAM SendMessage SPAWNINBLOCK EndIf EndIf If B IsGreaterThan A Then SetParameter POSITION C D 1 0 SendMessage DETONATEBLOCK ReadFromBuffer COL1 Into C ReadFromBuffer COL1 Into D If C IsGreaterThanOrEqualTo 0 Then SetParameter POSITION C D 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK Endif If C IsLessThan 0 Then Randomise A FROM 1 TO 8 Set B To 0 ResetBuffer COL1 Randomise C FROM 3 TO 4 SetParameter POSITION C 1 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK Endif EndIf EndResponse / ****************************** column 2 at work ************************************* / OnMessage TIMER2 Do Add 1 To F If F IsEqualTo E Then ReadFromBuffer COL2 Into G ReadFromBuffer COL2 Into H SetParameter POSITION G H 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK EndIf If F IsGreaterThan E Then SetParameter POSITION G H 1 0 SendMessage DETONATEBLOCK ReadFromBuffer COL2 Into G ReadFromBuffer COL2 Into H If G IsGreaterThanOrEqualTo 0 Then SetParameter POSITION G H 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK Endif If G IsLessThan 0 Then Randomise E FROM 1 TO 8 Set F To 0 ResetBuffer COL2 Randomise G FROM 5 TO 7 If G IsLessThan 7 Then SetParameter POSITION G 1 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK EndIf If G IsEqualTo 7 Then Randomise G FROM 10 TO 11 SetParameter POSITION G 1 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK EndIf Endif EndIf EndResponse / ****************************** column 3 at work ************************************* / OnMessage TIMER3 Do Add 1 To J If J IsEqualTo I Then ReadFromBuffer COL3 Into K ReadFromBuffer COL3 Into L SetParameter POSITION K L 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK EndIf If J IsGreaterThan I Then SetParameter POSITION K L 1 0 SendMessage DETONATEBLOCK ReadFromBuffer COL3 Into K ReadFromBuffer COL3 Into L If K IsGreaterThanOrEqualTo 0 Then SetParameter POSITION K L 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK Endif If K IsLessThan 0 Then Randomise I FROM 1 TO 8 Set J To 0 ResetBuffer COL3 Randomise K FROM 12 TO 14 If K IsLessThan 14 Then SetParameter POSITION K 1 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK EndIf If K IsEqualTo 14 Then Randomise K FROM 17 TO 18 SetParameter POSITION K 1 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK EndIf Endif EndIf EndResponse / ****************************** column 4 at work ************************************* / OnMessage TIMER4 Do Add 1 To N If N IsEqualTo M Then ReadFromBuffer COL4 Into R ReadFromBuffer COL4 Into S SetParameter POSITION R S 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK EndIf If N IsGreaterThan M Then SetParameter POSITION R S 1 0 SendMessage DETONATEBLOCK ReadFromBuffer COL4 Into R ReadFromBuffer COL4 Into S If R IsGreaterThanOrEqualTo 0 Then SetParameter POSITION R S 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK Endif If R IsLessThan 0 Then Randomise M FROM 1 TO 8 Set N To 0 ResetBuffer COL4 Randomise R FROM 19 TO 20 SetParameter POSITION R 1 0 0 SetParameter BlockColour TARGET SendMessage SPAWNINBLOCK Endif EndIf EndResponse / ******* Send Acknowledgement messages when the players hits or loses a target ******* / If T IsGreaterThan V 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 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 0.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é! GER SetParameter Text WOW!_Du_hast_eins_erwischt! SPA SetParameter Text ¡Toma,_ahí_va_uno! ITA SetParameter TEXT WOW!_Ne_hai_preso_uno! 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 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 0.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.5 SetParameter Text Good_shot! FRE SetParameter TEXT Beau_tir! GER SetParameter Text Guter_Schuss! SPA SetParameter Text ¡Buen_disparo! ITA SetParameter TEXT Bel_colpo! POL SetParameter TEXT Celny_strza³ SendMessage CREATETEXT EndIf SET V TO T EndIf If Y IsGreaterThan U Then Set Z To 0 / No message printed / If Y BecomesGreaterThanOrEqualTo 10 Then 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 Velocity 0.0 0.05 0.0 0.0 SetParameter Position 0.0 150.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 4.5 SetParameter Text Careful_thats_10_lost_already! FRE SetParameter TEXT Attention:_déjà_10_de_perdues! GER SetParameter Text Sei_vorsichtig,_schon_10_verloren! ITA SetParameter TEXT Attento:_ne_hai_già_persi_10! POL SetParameter TEXT Ostro¿nie._10_ju¿_przepuœci³eœ 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 ¡Te_cuidado,_que_ya_se_te_han_escapado_10! 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 Set Z To 1 SendMessage MUSIC_GROOVE_MED_LOW EndIf If Y BecomesGreaterThanOrEqualTo 15 Then 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 Velocity 0.0 0.05 0.0 0.0 SetParameter Position 0.0 150.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 4.5 SetParameter Text Watch_out_thats_15_targets_lost! FRE SetParameter TEXT Attention:_cela_fait_15_de_perdues! GER SetParameter Text Achtung,_schon_15_Ziele_verloren! ITA SetParameter TEXT Attento:_ne_hai_già_persi_15! POL SetParameter TEXT Uwa¿aj._Straci³eœ_ju¿_15 SPA SetParameter Text ¡Atención,_ya_se_te_han_escapado_15! SendMessage CREATETEXT Set Z To 1 SendMessage MUSIC_GROOVE_MED EndIf If Y BecomesEqualTo 18 Then 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 Velocity 0.0 0.05 0.0 0.0 SetParameter Position 0.0 150.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 2.5 SetParameter Text Only_2_Target_lives_left! FRE SetParameter TEXT Il_ne_reste_que_2_cibles_en_vie! GER SetParameter Text Nur_2_Fehlschüsse_übrig! SPA SetParameter Text ¡Dos_más_y_estás_muerto! ITA SetParameter TEXT Puoi_perdere_ancora_ POL SetParameter TEXT Pozosta³y_tylko_2_cele SendMessage CREATETEXT ITA SetParameter Position 0.0 115.0 0.0 0.0 ITA SetParameter TEXT solo_2_bersagli! ITA SendMessage CREATETEXT Set Z to 1 SendMessage MUSIC_GROOVE_MED_HI EndIf If Y BecomesEqualTo 19 Then 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 Velocity 0.0 0.05 0.0 0.0 SetParameter Position 0.0 120.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Last_life! FRE SetParameter TEXT Dernière_vie! GER SetParameter Text Letztes_Leben! SPA SetParameter Text ¡La_última_oportunidad! ITA SetParameter TEXT L'ultimo! POL SetParameter TEXT Ostatnie_¿ycie SendMessage CREATETEXT Set Z To 1 SendMessage MUSIC_GROOVE_HIGH EndIf If Y BecomesGreaterThanOrEqualTo 20 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.05 0.0 0.0 SetParameter Position 0.0 150.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 4.0 SetParameter Text Oh_dear_its_all_over! FRE SetParameter TEXT Tout_est_fini,_dommage! GER SetParameter Text Oh_nein,_es_ist_alles_aus! SPA SetParameter Text ¡Oh,_qué_pena,_se_acabó! ITA SetParameter TEXT Santo_cielo,_è_finita! POL SetParameter TEXT O_Niee,_wszystko_stracone SendMessage CREATETEXT SET B TO 0 Set A To 0 Set D To 0 SET K To 0 Set U To 0 Set V To 0 Set Z TO 0 SendMessage MUSIC_GROOVE_LOW SetParameter BLOCKCOLOUR ALLCOLOURS SendMessage CLEARBLOCKS SendMessage CLEARPROJECTILES SendMessage FIRINGOFF GotoLoop FAIL EndIf If Z IsEqualTo 0 Then Set Z To 0 / No message printed / READFROMBUFFER RAND Into Q If Y IsGreaterThan 0 Then If Y IsLessThan 10 Then 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 Velocity 0.0 0.1 0.0 0.0 SetParameter Position 0.0 -25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Missed_one! FRE SetParameter TEXT Loupé! GER SetParameter Text Eins_verfehlt! SPA SetParameter Text ¡Se_te_ha_escapado_uno! ITA SetParameter TEXT Ne_hai_perso_uno! POL SetParameter TEXT Spud³owa³eœ SendMessage CREATETEXT Set Z To 1 EndIf If Q 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 Position 0.0 -60.0 0.0 0.0 SetParameter Velocity 0.0 0.1 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Target_lost! FRE SetParameter TEXT Cible_perdue! GER SetParameter Text Ziel_verloren! SPA SetParameter Text ¡Objetivo_perdido! ITA SetParameter TEXT Bersaglio_perso! POL SetParameter TEXT Cel_stracony SendMessage CREATETEXT Set Z To 1 EndIf If Q IsEqualTo 3 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 Velocity 0.0 0.1 0.0 0.0 SetParameter Position 0.0 -105.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Disaster! FRE SetParameter TEXT Calamité! GER SetParameter Text Desaster! SPA SetParameter Text ¡Qué_desastre! ITA SetParameter TEXT Che_disastro! POL SetParameter TEXT Katastrofa SendMessage CREATETEXT Set Z To 1 EndIf EndIf EndIf EndIf If Z IsEqualTo 0 Then If Y IsGreaterThan 10 Then If Y IsLessThan 15 Then 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 Velocity 0.0 0.1 0.0 0.0 SetParameter Position 0.0 -25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Missed_one! FRE SetParameter TEXT Loupé! GER SetParameter Text Eins_verfehlt! SPA SetParameter Text ¡Se_te_ha_escapado_uno! ITA SetParameter TEXT Ne_hai_perso_uno! POL SetParameter TEXT Spud³owa³eœ SendMessage CREATETEXT Set Z To 1 EndIf If Q 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 Position 0.0 -25.0 0.0 0.0 SetParameter Velocity 0.0 0.1 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Target_lost! FRE SetParameter TEXT Cible_perdue! GER SetParameter Text Ziel_verloren! SPA SetParameter Text ¡Objetivo_perdido! ITA SetParameter TEXT Bersaglio_perso! POL SetParameter TEXT Cel_stracony SendMessage CREATETEXT Set Z To 1 EndIf If Q IsEqualTo 3 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 Velocity 0.0 0.1 0.0 0.0 SetParameter Position 0.0 -25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Disaster! FRE SetParameter TEXT Calamité! GER SetParameter Text Desaster! SPA SetParameter Text ¡Qué_desastre! ITA SetParameter TEXT Che_disastro! POL SetParameter TEXT Katastrofa SendMessage CREATETEXT Set Z To 1 EndIf EndIf EndIf EndIf If Z IsEqualTo 0 Then If Y IsGreaterThan 15 Then If Y IsLessThan 18 Then 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 Velocity 0.0 0.1 0.0 0.0 SetParameter Position 0.0 -25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Missed_one! FRE SetParameter TEXT Calamité! GER SetParameter Text Eins_verfehlt! SPA SetParameter Text ¡Se_te_ha_escapado_uno! ITA SetParameter TEXT Ne_hai_perso_uno! POL SetParameter TEXT Spud³owa³eœ SendMessage CREATETEXT Set Z To 1 EndIf If Q 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 Position 0.0 -25.0 0.0 0.0 SetParameter Velocity 0.0 0.1 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Target_lost! FRE SetParameter TEXT Cible_perdue! GER SetParameter Text Ziel_verloren! SPA SetParameter Text ¡Objetivo_perdido! ITA SetParameter TEXT Bersaglio_perso! POL SetParameter TEXT Cel_stracony SendMessage CREATETEXT Set Z To 1 EndIf If Q IsEqualTo 3 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 Velocity 0.0 0.1 0.0 0.0 SetParameter Position 0.0 -25.0 0.0 0.0 SetParameter Lifetime 0.2 0.6 0.7 1.0 SetParameter Text Disaster! FRE SetParameter TEXT Calamité! GER SetParameter Text Desaster! SPA SetParameter Text ¡Qué_desastre! ITA SetParameter TEXT Che_disastro! POL SetParameter TEXT Katastrofa SendMessage CREATETEXT Set Z To 1 EndIf EndIf EndIf Endif Set U To Y EndIf If O BecomesEqualTo 120 Then SetParameter Justify Centre 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 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 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 TIMER4 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER5 SendMessage DELETETIMER SetParameter MESSAGE_ID TIMER2 SetParameter INTERVAL 0610 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER3 SetParameter INTERVAL 0556 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER4 SetParameter INTERVAL 0351 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER5 SetParameter INTERVAL 0453 SetParameter REPEAT TRUE SendMessage CREATETIMER EndIf EndLoop Loop FAIL Do OnMessage TIMER1 Do Add 1 To B EndResponse If B BecomesEqualTo 0 Then While Z IsLessThan T Do Add 1000 To U Add 1 To Z EndWhile Add O TO U Subtract 20 From U Set A To 0 Set K To 0 Set D To 0 EndIf If B 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 GER SetParameter TEXT Punkte SPA SetParameter TEXT Puntuación ITA SetParameter TEXT Punti 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 détruit GER SetParameter TEXT zerstört SPA SetParameter TEXT Destruidos ITA SetParameter TEXT distrutti 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 T 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 GER SetParameter TEXT x_1000_Punkte SPA SetParameter TEXT x_1000_puntos ITA SetParameter TEXT x_1000_punti POL SetParameter TEXT x_1000_punktów 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 GER SetParameter TEXT Überstandene_Zeit SPA SetParameter TEXT Duración ITA SetParameter TEXT Tempo_rimasto 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 O 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 GER SetParameter TEXT Sekunden SPA SetParameter TEXT Segundos ITA SetParameter TEXT Secondi 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 GER SetParameter TEXT Gesamtpunkte SPA SetParameter TEXT Puntuación_Total ITA SetParameter TEXT Punteggio_totale POL SetParameter TEXT Razem_punktów SendMessage CREATETEXT EndIf If B IsGreaterThanOrEqualTo 2 Then If K IsGreaterThan U Then Set D To 1 EndIf If D IsEqualTo 0 Then If K IsLessThan U 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 U 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 U 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 U SetParameter Digits 8 SendMessage CREATESCORE EndIf / If A BecomesEqualTo U Then Set B To 95 GotoLoop FAIL2 EndIf EndIf If B BecomesEqualTo 98 Then SetParameter SCORE U SendMessage SET_SCORE SendMessage LOSECONDITION EndIf EndLoop Loop FAIL2 Do OnMessage TIMER1 Do Add 1 To B EndResponse If B BecomesEqualTo 0 Then While Z IsLessThan T Do Add 1000 To U Add 1 To Z EndWhile Add O TO U Subtract 20 From U Set A To 0 Set K To 0 Set D To 0 EndIf If B 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 GER SetParameter TEXT Punkte SPA SetParameter TEXT Puntuación ITA SetParameter TEXT Punti 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 détruit GER SetParameter TEXT zerstört SPA SetParameter TEXT Destruidos ITA SetParameter TEXT distrutti 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 T 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 GER SetParameter TEXT x_1000_Punkte SPA SetParameter TEXT x_1000_puntos ITA SetParameter TEXT x_1000_punti POL SetParameter TEXT x_1000_punktów 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 GER SetParameter TEXT Überstandene_Zeit SPA SetParameter TEXT Duración ITA SetParameter TEXT Tempo_rimasto 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 O 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 GER SetParameter TEXT Sekunden SPA SetParameter TEXT Segundos ITA SetParameter TEXT Secondi 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 GER SetParameter TEXT Gesamtpunkte SPA SetParameter TEXT Puntuación_Total ITA SetParameter TEXT Punteggio_totale POL SetParameter TEXT Razem_punktów SendMessage CREATETEXT EndIf If B IsGreaterThanOrEqualTo 2 Then If K IsGreaterThan U Then Set D To 1 EndIf If D IsEqualTo 0 Then If K IsLessThan U 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 U 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 U 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 U SetParameter Digits 8 SendMessage CREATESCORE EndIf If A BecomesEqualTo U Then Set B To 95 EndIf EndIf If B BecomesEqualTo 99 Then SetParameter SCORE U SendMessage SET_SCORE SendMessage LOSECONDITION EndIf EndLoop EndFile