anchor.diff:    MakeImagesInterpUnit(aUt, aAction, aDir, dirTeam, ietTeamMask);
   
     StrList := TStringList.Create;
  -
  -  needsMask := False;
  -  for Step := 1 to A.Count do
  -    if fSprites[RT].RXData.HasMask[A.Step[Step]] then
  -      needsMask := True;
   
     //Import and reprocess
     for Step := 1 to 8*A.Count do
  
positive.code:   dirBase, dirShad, dirTeam: string;
    needsMask: Boolean;
  begin
    RT := rxUnits;
    if fSprites[RT] = nil then
    begin
      fSprites[RT] := TKMSpritePackEdit.Create(RT, fPalettes);
      fSprites[RT].LoadFromRXXFile(ExeDir + 'data\Sprites\' + RXInfo[RT].FileName + '_a.rxx');
    end;
  
    if (aDir = dirNA) or not fResUnits[aUT].SupportsAction(aAction) then
      Exit(-1);
  
  
negative.code:           NoShadMaxX := Max(NoShadMaxX, X);
            NoShadMaxY := Max(NoShadMaxY, Y);
          end;
          if (pngTeam[Y*pngWidth + X] and $FF) > 0 then
            needsMask := True;
        end;
      end;
      //Crop
  