anchor.diff:  //        Write(ft, '_.');
       Write(ft, '; DiagonalBlocked = ', gMapElements[I].DiagonalBlocked);
       Write(ft, '; AllBlocked = ', gMapElements[I].AllBlocked);
  -    Write(ft, ' CanBeRemoved = ', gMapElements[I].CanBeRemoved);
  +    Write(ft, '; CanBeRemoved = ', gMapElements[I].CanBeRemoved);
  +    Write(ft, '; Stump = ', IntToStr(gMapElements[I].Stump));
       Writeln(ft);
   
       if (gMapElements[I].Anim.Count > 0) and (gMapElements[I].Anim.Step[1] > 0)
  
positive.code:   Str4 := 'DiagonalBlocked and Can Build: ';
    Str5 := 'DiagonalBlocked and Can not build: ';
    Str6 := 'AllBlocked and and Block Build: ';
    for I := 1 to fCount do
    begin
      Writeln(ft);
      Writeln(ft, inttostr(I) + ' Anim: ' + inttostr(gMapElements[I].Anim.Count));
  //    for K := 1 to 30 do
  //      if gMapElements[I].Anim.Step[K] > 0 then
  //        Write(ft, gMapElements[I].Anim.Step[K], '.')
  
negative.code:   Writeln(ft, Str4);
    Writeln(ft);
    Writeln(ft, Str5);
    Writeln(ft);
    Writeln(ft, Str7);
    CloseFile(ft);
  end;
  
  