anchor.diff:    if ShuffleToggled then
       gGameApp.MusicLib.ToggleShuffle(gGameApp.GameSettings.ShuffleOn);
   
  -  TrackBar_Settings_Music.Enabled := not CheckBox_Settings_MusicOff.Checked;
  -  CheckBox_Settings_ShuffleOn.Enabled := not CheckBox_Settings_MusicOff.Checked;
  +  TrackBar_Music.Enabled := not CheckBox_MusicOff.Checked;
  +  CheckBox_ShuffleOn.Enabled := not CheckBox_MusicOff.Checked;
   end;
   
   
  
positive.code: begin
    Top := 15;
    if gGame.IsReplay then
      CheckBox_Settings_Autosave.Hide
    else begin
      CheckBox_Settings_Autosave.Show;
      Inc(Top, 25);
    end;
  
    if gGame.GameMode = gmReplayMulti then
    begin
      CheckBox_Settings_ReplayAutoPause.Top := Top;
      CheckBox_Settings_ReplayAutoPause.Show;
      Inc(Top, 40);
    end else
      CheckBox_Settings_ReplayAutoPause.Hide;
  
    if gGame.GameMode in [gmReplaySingle, gmReplayMulti, gmMultiSpectate] then
    begin
      CheckBox_Settings_ReplaySpecShowBeacons.Top := Top;
      CheckBox_Settings_ReplaySpecShowBeacons.Show;
      Inc(Top, 25);
    end else
      CheckBox_Settings_ReplaySpecShowBeacons.Hide;
  
    TrackBar_Settings_Brightness.Top := Top;
    Inc(Top, 55);
    TrackBar_Settings_ScrollSpeed.Top := Top;
    Inc(Top, 55);
    TrackBar_Settings_SFX.Top := Top;
    Inc(Top, 55);
    TrackBar_Settings_Music.Top := Top;
    Inc(Top, 55);
    CheckBox_Settings_MusicOff.Top := Top;
    Inc(Top, 25);
    CheckBox_Settings_ShuffleOn.Top := Top;
  
    Panel_Settings.Height := CheckBox_Settings_ShuffleOn.Top + CheckBox_Settings_ShuffleOn.Height + 2;
  end;
  
  procedure TKMGameMenuSettings.Menu_Settings_Fill;
  begin
    TrackBar_Settings_Brightness.Position     := gGameApp.GameSettings.Brightness;
    CheckBox_Settings_Autosave.Checked        := gGameApp.GameSettings.Autosave;
    CheckBox_Settings_ReplayAutoPause.Checked := gGameApp.GameSettings.ReplayAutopause;
    TrackBar_Settings_ScrollSpeed.Position    := gGameApp.GameSettings.ScrollSpeed;
    TrackBar_Settings_SFX.Position            := Round(gGameApp.GameSettings.SoundFXVolume * TrackBar_Settings_SFX.MaxValue);
    TrackBar_Settings_Music.Position          := Round(gGameApp.GameSettings.MusicVolume * TrackBar_Settings_Music.MaxValue);
    CheckBox_Settings_MusicOff.Checked        := gGameApp.GameSettings.MusicOff;
    CheckBox_Settings_ShuffleOn.Checked       := gGameApp.GameSettings.ShuffleOn;
  
    if gGame.IsReplay then
      CheckBox_Settings_ReplaySpecShowBeacons.Checked := gGameApp.GameSettings.ReplayShowBeacons
    else if gGame.GameMode = gmMultiSpectate then
      CheckBox_Settings_ReplaySpecShowBeacons.Checked := gGameApp.GameSettings.SpecShowBeacons;
  
    TrackBar_Settings_Music.Enabled           := not CheckBox_Settings_MusicOff.Checked;
    CheckBox_Settings_ShuffleOn.Enabled       := not CheckBox_Settings_MusicOff.Checked;
    CheckBox_Settings_ReplayAutoPause.Enabled := (gGame.GameMode = gmReplayMulti) and gGame.IsPeaceTime;
    UpdateControlsPosition;
  end;
  
  
negative.code: 
    Panel_Settings := TKMPanel.Create(aParent, TB_PAD, 44, TB_WIDTH, 412);
      TopPos := 15;
      CheckBox_Autosave := TKMCheckBox.Create(Panel_Settings,PAD,TopPos,WID,20,gResTexts[TX_MENU_OPTIONS_AUTOSAVE],fnt_Metal);
      CheckBox_Autosave.OnClick := Menu_Settings_Change;
      Inc(TopPos, 25);
      CheckBox_ReplayAutopauseAtPTEnd := TKMCheckBox.Create(Panel_Settings,PAD,TopPos,WID,20,gResTexts[TX_GAME_SETTINGS_REPLAY_AUTOPAUSE],fnt_Metal);
      CheckBox_ReplayAutopauseAtPTEnd.Hint := gResTexts[TX_GAME_SETTINGS_REPLAY_AUTOPAUSE_HINT];
      CheckBox_ReplayAutopauseAtPTEnd.OnClick := Menu_Settings_Change;
      Inc(TopPos, 40);
      CheckBox_ReplaySpecShowBeacons := TKMCheckBox.Create(Panel_Settings,PAD,TopPos,WID,20,gResTexts[TX_GAME_SETTINGS_SHOW_BEACONS],fnt_Metal);
      CheckBox_ReplaySpecShowBeacons.Hint := gResTexts[TX_GAME_SETTINGS_SHOW_BEACONS_HINT];
      CheckBox_ReplaySpecShowBeacons.OnClick := Menu_Settings_Change;
      Inc(TopPos, 25);
      TrackBar_Brightness := TKMTrackBar.Create(Panel_Settings,PAD,TopPos,WID,0,20);
      TrackBar_Brightness.Caption := gResTexts[TX_MENU_OPTIONS_BRIGHTNESS];
      TrackBar_Brightness.OnChange := Menu_Settings_Change;
      Inc(TopPos, 55);
      TrackBar_ScrollSpeed := TKMTrackBar.Create(Panel_Settings,PAD,TopPos,WID,0,20);
      TrackBar_ScrollSpeed.Caption := gResTexts[TX_MENU_OPTIONS_SCROLL_SPEED];
      TrackBar_ScrollSpeed.OnChange := Menu_Settings_Change;
      Inc(TopPos, 55);
      TrackBar_SFX := TKMTrackBar.Create(Panel_Settings,PAD,TopPos,WID,0,20);
      TrackBar_SFX.Caption := gResTexts[TX_MENU_SFX_VOLUME];
      TrackBar_SFX.Hint := gResTexts[TX_MENU_SFX_VOLUME_HINT];
      TrackBar_SFX.OnChange := Menu_Settings_Change;
      Inc(TopPos, 55);
      TrackBar_Music := TKMTrackBar.Create(Panel_Settings,PAD,TopPos,WID,0,20);
      TrackBar_Music.Caption := gResTexts[TX_MENU_MUSIC_VOLUME];
      TrackBar_Music.Hint := gResTexts[TX_MENU_MUSIC_VOLUME_HINT];
      TrackBar_Music.OnChange := Menu_Settings_Change;
      Inc(TopPos, 55);
      CheckBox_MusicOff := TKMCheckBox.Create(Panel_Settings,PAD,TopPos,WID,20,gResTexts[TX_MENU_OPTIONS_MUSIC_DISABLE_SHORT],fnt_Metal);
      CheckBox_MusicOff.Hint := gResTexts[TX_MENU_OPTIONS_MUSIC_DISABLE_HINT];
      CheckBox_MusicOff.OnClick := Menu_Settings_Change;
      Inc(TopPos, 25);
      CheckBox_ShuffleOn := TKMCheckBox.Create(Panel_Settings,PAD,TopPos,WID,20,gResTexts[TX_MENU_OPTIONS_MUSIC_SHUFFLE_SHORT],fnt_Metal);
      CheckBox_ShuffleOn.Hint := gResTexts[TX_MENU_OPTIONS_MUSIC_SHUFFLE_HINT];
      CheckBox_ShuffleOn.OnClick := Menu_Settings_Change;
  end;
  
  
  procedure TKMGameMenuSettings.UpdateView;
  begin
    CheckBox_ReplayAutopauseAtPTEnd.Enabled := (gGame.GameMode = gmReplayMulti) and gGame.IsPeaceTime;
  end;
  
  
  