anchor.diff:    // Reset last object on RMB click
     if gCursor.Mode = cmBrush then
     begin
  -    fLastShape := hsCircle;
  -    fLastBrush := -1;
  -    fLastMagicBrush := False;
  +    ResetLastBrushes;
       aHandled := True;
     end;
   end;
  
positive.code:     procedure BrushRefresh;
      procedure BrushFixTerrain_Click(Sender: TObject);
      procedure FixTerrainBrushes(Sender: TObject);
    protected
      Panel_Brushes: TKMScrollPanel;
        BrushSize: TKMTrackBar;
  
negative.code:   BTN_TKIND_S = 34;
    BTN_TKIND_S_SP_X = 36;
    BTN_TKIND_S_SP_Y = 40;
    SURF_ROW_LEN = 5;
  
    SURFACES: array [0..5, 0..SURF_ROW_LEN-1] of TKMTerrainKind = (
      (tkGrass,       tkMoss,         tkPaleGrass,    tkGrassDirt,    tkDirt),
  