GameMode bombs RedComboCounter R LANDLINESCOUNTER L WaterHeightCounter H COLLECTSTARCOUNTER C Program0123 TEXTBUFFER LEVS bombs.wbl ENDBUFFER Loop INIT Do SetParameter NUMLINES 2 SendMessage SetStartLines SetParameter BACKDROP BACKDROP10 SendMessage SETBACKDROP SetParameter BUFFERNAME LEVS SetParameter NUMLINES 20 / height of level / SendMessage LOADLEVEL SetParameter LIVES 0 SendMessage SETLIVES SetParameter TEXT bombs.wbw SendMessage LOADWEAPONLIST SendMessage PAUSELANDLEFT SendMessage PAUSELANDRIGHT SetParameter Position 0 -175 0 0 SendMessage CHANGEWATERHEIGHT SetParameter POSITION 0 0 0 0 SetParameter PLAYERNUM 0 SendMessage SETBOATPOSITION SetParameter MESSAGE_ID TIMER1 SetParameter INTERVAL 500 SetParameter REPEAT TRUE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER2 SetParameter INTERVAL 3500 SetParameter REPEAT FALSE SendMessage CREATETIMER SetParameter MESSAGE_ID TIMER3 SetParameter INTERVAL 1000 SetParameter REPEAT TRUE SendMessage CREATETIMER SendMessage MUSIC_GROOVE_LOW SendMessage DEACTIVATESCORE Set A To 0 Set U To 60 Set I To 0 Set X To 0 SET S To 0 SET T To 0 SET B To 0 SET R To 0 SET C TO 0 SET H TO -175 SET E TO C SendMessage FIRINGOFF SendMessage STARTBRIEFING GotoLoop BRIEF EndLoop Loop BRIEF 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 Bombing_run FRE SetParameter TEXT Bombardement GER SetParameter Text Bombenangriff SPA SetParameter Text Huida_Explosiva ITA SetParameter TEXt Campo_minato POL SetParameter Text Nalot 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 You_have_1_minute_to_hit FRE SetParameter TEXT vous_avez_une_minute_pour GER SetParameter Text Du_hast_1_Minute_um SPA SetParameter Text ¡Dispones_de_un_minuto_para_desactivar ITA SetParameter TEXT Hai_1_minuto_per_colpire POL SetParameter Text Masz_1_minutê,_aby_trafiæ SendMessage CREATETEXT SetParameter Position 0.0 80.0 0.0 0.0 SetParameter Text 20_warheads! FRE SetParameter TEXT désamorcer_20_ogives! GER SetParameter Text 20_Sprengköpfe_zu_treffen! SPA SetParameter Text 20_cabezas_explosivas! ITA SetParameter TEXt 20_testate! POL SetParameter Text 20_g³owic 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 MUSIC_GROOVE_MED_LOW SendMessage UNPAUSELANDLEFT SendMessage UNPAUSELANDRIGHT SetParameter INTERVAL 260 SendMessage SetLandSpeed SendMessage ENDBRIEFING SendMessage FIRINGON GotoLoop MAIN EndResponse EndLoop Loop MAIN 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 Lifetime 0.0 0.0 0.0 0.0 SetParameter Position -170.0 195.0 0.0 0.0 SPA SetParameter Position -170.0 195.0 0.0 0.0 GER SetParameter Scale1 0.7 0.7 0.7 0.0 GER SetParameter Scale2 0.7 0.7 0.7 0.0 GER SetParameter Scale3 0.7 0.7 0.7 0.0 GER SetParameter Scale4 0.7 0.7 0.7 0.0 GER SetParameter Scale5 0.7 0.7 0.7 0.0 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 SetParameter Text Warheads FRE SetParameter TEXT Ogives GER SetParameter Text Sprengköpfe SPA SetParameter Text Cabezas_explosivas ITA SetParameter TEXT Testate POL SetParameter Text G³owice SendMessage CREATETEXT GER SetParameter Scale1 1.0 1.0 1.0 0.0 GER SetParameter Scale2 1.0 1.0 1.0 0.0 GER SetParameter Scale3 1.0 1.0 1.0 0.0 GER SetParameter Scale4 1.0 1.0 1.0 0.0 GER SetParameter Scale5 1.0 1.0 1.0 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 Position 0.0 195.0 0.0 0.0 ConvertToText S 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 TIMER3 Do ADD 1 To T Add 2 To H SetParameter POSITION 0.0 H 0.0 0.0 SendMessage ChangeWaterHeight 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.2 1.2 1.2 1.2 SetParameter Scale2 1.2 1.2 1.2 1.2 SetParameter Scale3 1.2 1.2 1.2 1.2 SetParameter Scale4 1.2 1.2 1.2 1.2 SetParameter Scale5 1.2 1.2 1.2 1.2 SetParameter FRAME 3 SetParameter Lifetime 0.0 0.0 1.0 0.0 SetParameter Position 149.0 195.0 0.0 0.0 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 1.0 SetParameter Scale4 1.0 1.0 1.0 1.0 SetParameter Scale5 1.0 1.0 1.0 1.0 If U IsGreaterThan 60 Then Subtract 60 from X Add 1 to I EndIf Subtract 1 from U /SetParameter Lifetime 0.0 0.0 1.0 0.0/ SetParameter Position 230.0 195.0 0.0 0.0 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 225.0 195.0 0.0 0.0 SendMessage CREATETEXT SetParameter Position 245.0 195.0 0.0 0.0 EndIf ConvertToText U SendMessage CREATETEXT ConvertToText I SetParameter Position 190.0 195.0 0.0 0.0 SendMessage CREATETEXT If U IsEqualTo 0 Then Subtract 1 from I Set U to 60 EndIf If I IsLessThan 0 Then SendMessage PAUSELANDLEFT SendMessage PAUSELANDRIGHT 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 FIRINGOFF SendMessage LOSECONDITION GotoLoop WIN EndIf SetParameter Colour1 1.0 1.0 1.0 1.0 SetParameter Colour2 0.0 1.0 0.0 1.0 SetParameter Colour3 0.0 1.0 0.0 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 Lifetime 0.0 0.0 1.0 0.0 Randomise A From 1 To 5 If L IsGreaterThanOrEqualTo 20 Then If A IsEqualTo 1 Then Randomise B From 1 To 4 If B IsEqualTo 1 Then SetParameter POSITION 7 4 0 0 SetParameter BLOCKCOLOUR STAR SendMessage SPAWNINBLOCK EndIf If B IsEqualTo 2 Then SetParameter POSITION 10 3 0 0 SetParameter BLOCKCOLOUR STAR SendMessage SPAWNINBLOCK EndIf If B IsEqualTo 3 Then SetParameter POSITION 12 10 0 0 SetParameter BLOCKCOLOUR STAR SendMessage SPAWNINBLOCK EndIf If B IsEqualTo 4 Then SetParameter POSITION 19 4 0 0 SetParameter BLOCKCOLOUR STAR SendMessage SPAWNINBLOCK EndIf EndIf If A IsEqualTo 5 Then Randomise B From 1 To 4 If B IsEqualTo 1 Then SetParameter POSITION 7 4 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_SHOTGUNRED SendMessage SPAWNINBLOCK EndIf If B IsEqualTo 2 Then SetParameter POSITION 10 3 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_SHOTGUNRED SendMessage SPAWNINBLOCK EndIf If B IsEqualTo 3 Then SetParameter POSITION 12 10 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_SHOTGUNRED SendMessage SPAWNINBLOCK EndIf If B IsEqualTo 4 Then SetParameter POSITION 19 4 0 0 SetParameter BLOCKCOLOUR CRATE SetParameter CRATECONTENTS CRATE_SHOTGUNRED SendMessage SPAWNINBLOCK EndIf EndIf EndIf EndResponse If R IsGreaterThan 2 Then SetParameter Position 0.0 0.0 0.0 0.0 SetParameter Velocity 0.0 0.01 0.0 0.0 SetParameter Gravity 0.0 0.0 0.0 0.0 SetParameter Scale1 0.5 0.5 0.5 0.0 SetParameter Scale2 1.5 1.5 1.5 0.0 SetParameter Colour1 1.0 0.86 0.03 1.0 SetParameter Colour2 1.0 0.86 0.03 1.0 SetParameter Colour3 1.0 0.86 0.03 1.0 SetParameter Colour4 0.0 0.0 0.0 1.0 SetParameter Colour5 0.0 0.0 0.0 1.0 SetParameter Colour6 0.0 0.0 0.0 1.0 SetParameter Lifetime 0.1 0.5 1.0 1.5 SetParameter Justify Centre SetParameter Position 0.0 75.0 0.0 0.0 SetParameter Text Defused FRE SetParameter TEXT Désamorcée GER SetParameter Text Entschärft SPA SetParameter Text Desactivada ITA SetParameter TEXT Disinnescata POL SetParameter Text Rozbrojono SendMessage CREATETEXT SET B To 0 ADD 1 To S If S BECOMESGREATERTHANOREQUALTO 8 Then SetParameter INTERVAL 200 SendMessage SetLandSpeed SetParameter Lifetime 0.1 0.5 2.2 1.0 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 Colour4 1.0 1.0 1.0 1.0 SetParameter Colour5 1.0 1.0 1.0 1.0 SetParameter Colour6 1.0 1.0 1.0 1.0 SetParameter Position 0.0 125.0 0.0 0.0 SetParameter Text FASTER! FRE SetParameter TEXT Plus_vite! GER SetParameter Text SCHNELLER! SPA SetParameter Text ¡MÁS_RÁPIDO! ITA SetParameter TEXT PIÙ_VELOCE! POL SetParameter Text Szybciej SendMessage CREATETEXT SendMessage MUSIC_GROOVE_MED EndIf If S BECOMESGREATERTHANOREQUALTO 16 Then SetParameter INTERVAL 150 SendMessage SetLandSpeed SetParameter Lifetime 0.1 0.5 2.2 1.0 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 Colour4 1.0 1.0 1.0 1.0 SetParameter Colour5 1.0 1.0 1.0 1.0 SetParameter Colour6 1.0 1.0 1.0 1.0 SetParameter Position 0.0 125.0 0.0 0.0 SetParameter Text FASTER! FRE SetParameter TEXT Plus_vite! GER SetParameter Text SCHNELLER! SPA SetParameter Text ¡MÁS_RÁPIDO! ITA SetParameter TEXT PIÙ_VELOCE! POL SetParameter Text Szybciej SendMessage CREATETEXT SendMessage MUSIC_GROOVE_HIGH EndIf If S 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 Position 0.0 125.0 0.0 0.0 SetParameter Text Halfway! FRE SetParameter TEXT A_moitié_fait! GER SetParameter Text Die_Hälfte! SPA SetParameter Text ¡Ya_queda_menos! ITA SetParameter TEXT Sei_a_metà_strada! POL SetParameter Text Po³owa_drogi SendMessage CREATETEXT EndIf If S BECOMESGREATERTHANOREQUALTO 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 Position 0.0 125.0 0.0 0.0 SetParameter Text One_More! FRE SetParameter TEXT Une_de_plus! GER SetParameter Text Einen_noch! SPA SetParameter Text ¡Una_más! ITA SetParameter TEXT Ancora_una! POL SetParameter Text Jeszcze_jedna SendMessage CREATETEXT EndIf If S BECOMESGREATERTHANOREQUALTO 20 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! GER SetParameter Text GESCHAFFT! SPA SetParameter Text ¡LO_CONSEGUISTE! ITA SetParameter TEXT HAI_VINTO! POL SetParameter Text Sukces SendMessage CREATETEXT SendMessage FIRINGOFF SetParameter HIDDEN_ID 2 SendMessage UNLOCKGAMEMODE SendMessage WINCONDITION GotoLoop WIN EndIf Set R To 0 Endif If C IsGreaterThan E Then Subtract 30 From H SetParameter POSITION 0.0 H 0.0 0.0 SendMessage ChangeWaterHeight SET E TO C EndIf EndLoop Loop WIN Do EndLoop EndFile