anchor.diff:    for i := 1 to fCount do
       fRenderUI.WritePicture(Left + CenterX + OffsetX*((i-1) mod fColumns),
                               Top + CenterY + OffsetY*((i-1) div fColumns),
  -                            fDrawWidth, fDrawHeight, RXid, TexID, Enabled);
  +                            fDrawWidth, fDrawHeight, fRXid, fTexID, Enabled);
   end;
   
   
  
positive.code: {Image stack - for army formation view}
  TKMImageStack = class(TKMControl)
    private
      fCount: integer;
      fColumns: integer;
      fDrawWidth: integer;
      fDrawHeight: integer;
    public
      RXid: integer; //RX library
      TexID: integer;
      constructor Create(aParent:TKMPanel; aLeft,aTop,aWidth,aHeight,aTexID:integer; aRXid:integer=4);
      procedure SetCount(aCount,aColumns:integer);
      procedure Paint; override;
  
negative.code:   OffsetX, OffsetY, CenterX, CenterY:smallint; //variable parameters
  begin
    Inherited;
    if (fTexID=0)or(fRXid=0) then exit; //No picture to draw
  
    OffsetX := Width div fColumns;
    OffsetY := Height div ceil(fCount/fColumns);
  