hedgewars/uGame.pas
changeset 13642 3d14950641a4
parent 13641 007813b81f1b
child 13771 f26c9e931f5a
equal deleted inserted replaced
13641:007813b81f1b 13642:3d14950641a4
    85     if cVolumeDelta <> 0 then
    85     if cVolumeDelta <> 0 then
    86         begin
    86         begin
    87         j:= Volume;
    87         j:= Volume;
    88         i:= ChangeVolume(cVolumeDelta);
    88         i:= ChangeVolume(cVolumeDelta);
    89         if (not cIsSoundEnabled) or (isAudioMuted and (j<>i)) then
    89         if (not cIsSoundEnabled) or (isAudioMuted and (j<>i)) then
    90             AddCaption(trmsg[sidMute], cLightGrayColor, capgrpVolume)
    90             AddCaption(trmsg[sidMute], capcolSetting, capgrpVolume)
    91         else if not isAudioMuted then
    91         else if not isAudioMuted then
    92             begin
    92             begin
    93             s:= ansistring(inttostr(i));
    93             s:= ansistring(inttostr(i));
    94             AddCaption(FormatA(trmsg[sidVolume], s), cLightGrayColor, capgrpVolume)
    94             AddCaption(FormatA(trmsg[sidVolume], s), capcolSetting, capgrpVolume)
    95             end
    95             end
    96         end
    96         end
    97     else if cMuteToggle then
    97     else if cMuteToggle then
    98         begin
    98         begin
    99         MuteAudio;
    99         MuteAudio;
   100         if isAudioMuted then
   100         if isAudioMuted then
   101             AddCaption(trmsg[sidMute], cLightGrayColor, capgrpVolume)
   101             AddCaption(trmsg[sidMute], capcolSetting, capgrpVolume)
   102         else
   102         else
   103             begin
   103             begin
   104             s:= ansistring(inttostr(GetVolumePercent()));
   104             s:= ansistring(inttostr(GetVolumePercent()));
   105             AddCaption(FormatA(trmsg[sidVolume], s), cLightGrayColor, capgrpVolume);
   105             AddCaption(FormatA(trmsg[sidVolume], s), capcolSetting, capgrpVolume);
   106             end;
   106             end;
   107         cMuteToggle:= false;
   107         cMuteToggle:= false;
   108         end;
   108         end;
   109     end;
   109     end;
   110 PlayNextVoice;
   110 PlayNextVoice;