anchor.diff:      {mkSimple}     (_1 or _3 or _5 or _7) * $0101,
       {mkDiagonal}   $FF * $0101,
       {mkDiagonalEx} $FF * $0101,
  -    {mkHexagonal}  (_0 or _1 or _3 or _5 or _6 or _7) +
  -                   (_1 or _2 or _3 or _4 or _5 or _7) * $0100
  +    {mkHexagonal}  (_0 or _1 or _3 or _5 or _6 or _7) * $0100 +
  +                   (_1 or _2 or _3 or _4 or _5 or _7)
     );
   
     POINT_OFFSETS: array[0..7] of TYXSmallPoint = (
  
positive.code:   LookupLine(S);
  end;
  
  procedure GenerateLookups;
  const
    MIN_WEIGHT_VALUE: Single = 0.1;
  
negative.code: 
  procedure TTileMap.UpdateCellMasks(const ChangedArea: TRect);
  label
    clearbit, fillmask, nextcell;
  var
    MaxI, MaxJ: Integer;
    X, Y, Left, Top, Right, Bottom: Integer;
    Rounded: Boolean;
    CellOffsets: PCPFOffsets;
    Cell: PCPFCell;
    FlagHexagonal: Integer;
    CellLineOffset: NativeUInt;
  
  