180     WorldDy: LongInt;

   180     WorldDy: LongInt;

   181 

   181 

   182     hiTicks: Word;

   182     hiTicks: Word;

   183 

   183 

   184     LuaGoals        : shortstring;

   184     LuaGoals        : shortstring;

   185 

   187 

   186     VoiceList : array[0..7] of TVoice =  (

   188     VoiceList : array[0..7] of TVoice =  (

   187                     ( snd: sndNone; voicepack: nil),

   189                     ( snd: sndNone; voicepack: nil),

   188                     ( snd: sndNone; voicepack: nil),

   190                     ( snd: sndNone; voicepack: nil),

   189                     ( snd: sndNone; voicepack: nil),

   191                     ( snd: sndNone; voicepack: nil),

  2621     ExplosionBorderColor:= $FF808080;

  2623     ExplosionBorderColor:= $FF808080;

  2622     WaterOpacity:= $80;

  2624     WaterOpacity:= $80;

  2623     SDWaterOpacity:= $80;

  2625     SDWaterOpacity:= $80;

  2624 

  2626 

  2625     LuaGoals:= '';

  2627     LuaGoals:= '';

  2626 end;

  2630 end;

  2627 

  2631 

  2628 procedure freeModule;

  2632 procedure freeModule;

  2629 begin

  2633 begin

  2630     // re-init flags so they will always contain safe values

  2634     // re-init flags so they will always contain safe values