anchor.diff:    {$IFDEF WDC}, ZLib {$ENDIF};
   
   type
  -  TInterpExportType = (ietNormal, ietBase, ietShadows, ietTeamMask);
  +  TInterpExportType = (ietNormal, ietBase, ietBaseAlpha, ietBaseBlack, ietBaseWhite, ietShadows, ietTeamMask);
   
     //Class with additional editing properties
     TKMSpritePackEdit = class(TKMSpritePack)
  
positive.code: 
    SetLength(pngData, dstWidth * dstHeight);
  
    if EXPORT_SPRITES_NO_ALPHA then
      for I := Low(pngData) to High(pngData) do
        pngData[I] := $FFAF6B6B;
  
    //Shadow export uses a black background
    if aExportType in [ietShadows, ietTeamMask] then
      for I := Low(pngData) to High(pngData) do
        pngData[I] := $FF000000;
  
  
negative.code:     else
        pngData[dstY*dstWidth + dstX] := fRXData.RGBA[aIndex, I*srcWidth + K] and $FFFFFF;
  
      //Apply alpha
      if (aExportType = ietBaseWhite) or (aExportType = ietBaseBlack) then
        pngData[dstY*dstWidth + dstX] := pngData[dstY*dstWidth + dstX] or $FF000000
      else if (aExportType = ietBase) or (aExportType = ietNormal) then
        pngData[dstY*dstWidth + dstX] := pngData[dstY*dstWidth + dstX] or (fRXData.RGBA[aIndex, I*srcWidth + K] and $FF000000);
  
      //Is this a background pixel?
      if isShadow or ((fRXData.RGBA[aIndex, I*srcWidth + K] shr 24) = 0) then
      begin
        if aExportType = ietBase then
          pngData[dstY*dstWidth + dstX] := 0
        else if aExportType = ietBaseWhite then
          pngData[dstY*dstWidth + dstX] := $FFFFFFFF
        else if aExportType = ietBaseBlack then
          pngData[dstY*dstWidth + dstX] := $FF000000;
      end;
  
      pngData[dstY*dstWidth + dstX] := pngData[dstY*dstWidth + dstX] or $FF000000;
    end;
  
    //Mark pivot location with a dot
  