anchor.diff:  end;
   
   
  -procedure TKMapEdInterface.Village_ScriptChange(Sender: TObject);
  +procedure TKMapEdInterface.Town_ScriptChange(Sender: TObject);
   begin
     MyPlayer.AI.Setup.AutoBuild := CheckBox_AutoBuild.Checked;
     MyPlayer.AI.Setup.AutoRepair := CheckBox_AutoRepair.Checked;
  
positive.code:     procedure Unit_ArmyChange1(Sender: TObject); overload;
      procedure Unit_ArmyChange2(Sender: TObject; AButton: TMouseButton); overload;
      procedure View_Passability(Sender: TObject);
      procedure Village_ScriptRefresh;
      procedure Village_ScriptChange(Sender: TObject);
  
      procedure SwitchPage(Sender: TObject);
      procedure DisplayPage(aPage: TKMPanel);
  
negative.code:   end else
  
    if aPage = Panel_Build then
      Build_ButtonClick(Button_BuildRoad)
    else
    if aPage = Panel_Units then
      //Unit_ButtonClick(GetSelectedUnit)
    else
    if aPage = Panel_Script then
      Town_ScriptRefresh
    else
    if aPage = Panel_Defence then
    begin
      fGame.MapEditor.VisibleLayers := fGame.MapEditor.VisibleLayers + [mlDefences];
      Town_DefenceRefresh;
    end else
    if aPage = Panel_Offence then
      Attacks_Refresh
    else
  
    if aPage = Panel_Goals then
    begin
  