anchor.diff:      Lab := TKMLabel.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), BOX_X, BOX_Y, gResTexts[TX_RESOURCES_STONES], fntMetal, taLeft);
         Lab.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_STONE_HINT];
         TBar_Res_Stone := TKMTrackBar.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), WIDTH_TrackBar-OFFSET_1, 0+200*Byte(aMP), 2000);
  -      TBar_Res_Stone.Position := 1000;
  +      TBar_Res_Stone.Position := fRMG.RMGSettings.Locs.Resource.Stone;
         TBar_Res_Stone.Step := 200;
         TBar_Res_Stone.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_STONE_HINT];
       // Gold
       Lab := TKMLabel.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), BOX_X, BOX_Y, gResTexts[TX_RESOURCES_GOLD], fntMetal, taLeft);
         Lab.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_GOLD_HINT];
         TBar_Res_Gold := TKMTrackBar.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), WIDTH_TrackBar-OFFSET_1, 0, 500);
  -      TBar_Res_Gold.Position := 300;
  +      TBar_Res_Gold.Position := fRMG.RMGSettings.Locs.Resource.Gold;
         TBar_Res_Gold.Step := 50;
         TBar_Res_Gold.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_GOLD_HINT];
       // Iron
       Lab := TKMLabel.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), BOX_X, BOX_Y, gResTexts[TX_RESOURCES_IRON], fntMetal, taLeft);
         Lab.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_IRON_HINT];
         TBar_Res_Iron := TKMTrackBar.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), WIDTH_TrackBar-OFFSET_1, 0, 500);
  -      TBar_Res_Iron.Position := 250;
  +      TBar_Res_Iron.Position := fRMG.RMGSettings.Locs.Resource.Iron;
         TBar_Res_Iron.Step := 50;
         TBar_Res_Iron.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_IRON_HINT];
     // Preselection of initial resources
  
positive.code:       CheckGroup_Grass.ItemIndex := 0;
        CheckGroup_Grass.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_GRASS_HINT];
      Check_Ground := TKMCheckBox.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), BOX_X, BOX_Y, gResTexts[TX_MAPED_RMG_SETTINGS_GROUND], fntMetal);
        Check_Ground.Checked := True;
        Check_Ground.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_GROUND_HINT];
      Check_Snow := TKMCheckBox.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), BOX_X, BOX_Y, gResTexts[TX_MAPED_RMG_SETTINGS_SNOW], fntMetal);
        Check_Snow.Checked := True;
        Check_Snow.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_SNOW_HINT];
      Check_Sand := TKMCheckBox.Create(Panel_Settings, Column_X+OFFSET_1, NextLine(Column_Y), BOX_X, BOX_Y, gResTexts[TX_MAPED_RMG_SETTINGS_SAND], fntMetal);
        Check_Sand.Checked := True;
        Check_Sand.Hint := gResTexts[TX_MAPED_RMG_SETTINGS_SAND_HINT];
    // First Layer
    Lab := TKMLabel.Create(Panel_Settings, Column_X, NextLine(Column_Y,PARAGRAPH_HEIGHT), BOX_X, BOX_Y, gResTexts[TX_MAPED_RMG_SETTINGS_FIRST_LAYER], fntMetal, taLeft);
  
negative.code:       Seed := NumSeed.Value;
  
        {$IFDEF DEBUG_RMG}
          Decomposition := Check_Decomposition.Checked;
          BasicTiles := Check_BasicTiles.Checked;
          CA := Check_CA.Checked;
        {$ELSE}
          Decomposition := False;
          BasicTiles := False;
          CA := True;
        {$ENDIF}
  