anchor.diff:  
   procedure TKMMapEdRMG.RMG_Refresh();
   begin
  -
  -  //Radio_1.ItemIndex := Byte(aRMGSettings.GoalType);
  -  //Radio_2.ItemIndex := Byte(aRMGSettings.GoalCondition);
  -  //NumSeed.Value := aRMGSettings.HandIndex + 1;
  -
     //Certain values disable certain controls
     RMG_Change(nil);
   end;
   
  -{
  -function TKMMapEdRMG.KeyDown(Key: Word; Shift: TShiftState): Boolean;
  -begin
  -  Result := False;
  -  case Key of
  -    VK_ESCAPE:  if Button_RMG_Cancel.IsClickable then
  -                begin
  -                  RMG_Close(Button_RMG_Cancel);
  -                  Result := True;
  -                end;
  -    VK_RETURN:  if Button_RMG_Generate.IsClickable then
  -                begin
  -                  RMG_Close(Button_RMG_Generate);
  -                  Result := True;
  -                end;
  -  end;
  -end;
  -//}
   
   procedure TKMMapEdRMG.Show();
   begin
  
positive.code:   Result := Line;
  end;
  
  procedure TKMMapEdRMG.RMG_Change(Sender: TObject);
  begin
    //Settings get saved on close, now we just toggle fields
  
negative.code:   //NumSeed.Enabled := TGoalCondition(Radio_2.ItemIndex) <> gc_Time;
  end;
  
  
  procedure TKMMapEdRMG.RMG_Generate_New_Seed(Sender: TObject);
  begin
    NumSeed.Value := Round(1000*KaMRandom);
    RMG_Generate_Map(Sender);
  end;
  
  
  procedure TKMMapEdRMG.RMG_Generate_Map(Sender: TObject);
  var Tiles: TKMTerrainTileBriefArray;
  