anchor.diff:  
     //Texture data
     fAtlasCount := 1;
  -  pX := fTexPadding;
  -  pY := fTexPadding;
  +  pX := 0;
  +  pY := 0;
     SetLength(fAtlases, 0);
     SetLength(fAtlases, fAtlasCount);
     SetLength(fAtlases[fAtlasCount - 1].TexData, fTexSizeX * fTexSizeY);
  
positive.code:           fAtlases[fAtlasCount - 1].TexData[((pY + J) * fTexSizeX + pX + K)] := Cardinal(PByte(scLine + K * 4+1)^ shl 24) or $FFFFFF;
        end;
  
        Inc(pX, chWidth + fTexPadding * 2);
      end;
    finally
      bmp.Free;
  
negative.code: 
        if chWidth = 0 then Continue;
  
        if pX + chWidth + fTexPadding >= fTexSizeX then
        begin
          pX := 0;
          Inc(pY, txtHeight + fTexPadding);
          if pY + txtHeight + fTexPadding > fTexSizeY then
          begin
            //Append new atlas
            Assert((AtlasCount < 255), 'We hit a limit of 256 atlases');
            Inc(fAtlasCount);
            pX := 0;
            pY := 0;
            SetLength(fAtlases, fAtlasCount);
            SetLength(fAtlases[fAtlasCount - 1].TexData, fTexSizeX * fTexSizeY);
          end;
  