anchor.diff:          fTerrain.SetField(fLoc,GetOwner,ft_Corn);
           SetActionStay(5,ua_Walk);
           fTerrain.RemMarkup(fLoc);
  +        MarkupSet := false;
          end;
       else Result := TaskDone;
     end;
  
positive.code:   TTaskBuildField = class(TUnitTask)
      public
        fLoc:TKMPoint;
        buildID:integer;
        constructor Create(aWorker:TKMUnitWorker; aLoc:TKMPoint; aID:integer);
        constructor Load(LoadStream:TKMemoryStream); override;
        destructor Destroy; override;
  
negative.code:   Inherited Create(aWorker);
    fTaskName := utn_BuildField;
    fLoc      := aLoc;
    BuildID   := aID;
    MarkupSet := false;
  end;
  
  
  