hedgewars/uGearsHandlersMess.pas
changeset 10131 4b4a043111f4
parent 10125 7a77a819a94d
child 10135 8fd3e38bd4f2
equal deleted inserted replaced
10130:a9d509848390 10131:4b4a043111f4
   880                             LandPixels[ry, rx]:= (ExplosionBorderColor and (not AMask)) or (p^[px] and AMask)
   880                             LandPixels[ry, rx]:= (ExplosionBorderColor and (not AMask)) or (p^[px] and AMask)
   881                         else LandPixels[ry, rx]:= addBgColor(LandPixels[ry, rx], p^[px]);
   881                         else LandPixels[ry, rx]:= addBgColor(LandPixels[ry, rx], p^[px]);
   882                         end
   882                         end
   883                     else allpx:= false
   883                     else allpx:= false
   884                     end;
   884                     end;
   885                 p:= @(p^[s^.pitch shr 2])
   885                 p:= PLongWordArray(@(p^[s^.pitch shr 2]))
   886                 end;
   886                 end;
   887 
   887 
   888             // Why is this here.  For one thing, there's no test on +1 being safe.
   888             // Why is this here.  For one thing, there's no test on +1 being safe.
   889             //Land[py, px+1]:= lfBasic;
   889             //Land[py, px+1]:= lfBasic;
   890 
   890