anchor.diff:    Ground := pY + (R.Pivot[ID0].Y + R.Size[ID0].Y) / CELL_SIZE_PX;
   
     if NewInst then
  -    fRenderList.AddSprite(rxUnits, ID, CornerX, CornerY, pX, Ground, FlagColor)
  +    fRenderList.AddSpriteG(rxUnits, ID, CornerX, CornerY, pX, Ground, FlagColor)
     else
       fRenderList.AddSprite(rxUnits, ID, CornerX, CornerY, FlagColor);
   
  
positive.code:     constructor Create;
      destructor Destroy; override;
  
      procedure AddSprite(aRX: TRXType; aID: Word; pX,pY,gX,gY: Single; aTeam: Cardinal = $0; aAlphaStep: Single = -1); overload;
      procedure AddSprite(aRX: TRXType; aID: Word; pX,pY: Single; aTeam: Cardinal = $0; aAlphaStep: Single = -1); overload;
  
      property Stat_Sprites: Integer read fStat_Sprites;
      property Stat_Sprites2: Integer read fStat_Sprites2;
  
negative.code:     else                              Ground := aTilePos.Y - 1; //Nothing?
    end;
  
    fRenderList.AddSpriteG(rxUnits, ID, aRenderPos.X + CornerX, aRenderPos.Y + CornerY, aTilePos.X - 1, Ground);
  end;
  
  
  