551                 t:= 255;

   551                 t:= 255;

   552             c2.r:= t;

   552             c2.r:= t;

   553             c2.g:= t;

   553             c2.g:= t;

   554             c2.b:= t

   554             c2.b:= t

   555             end;

   555             end;

   556         ExplosionBorderColor:= (c2.r shl RShift) or (c2.g shl GShift) or (c2.b shl BShift) or AMask;

   559         ExplosionBorderColor:= (c2.r shl RShift) or (c2.g shl GShift) or (c2.b shl BShift) or AMask;

   557         end

   560         end

   558     else if key = 'water-top' then

   561     else if key = 'water-top' then

   559         begin

   562         begin

   560         i:= Pos(',', s);

   563         i:= Pos(',', s);