hedgewars/uGame.pas
changeset 13491 f725701ca529
parent 13039 aed4b25ff242
child 13641 007813b81f1b
equal deleted inserted replaced
13490:4faebbf9c44f 13491:f725701ca529
    84     SoundTimerTicks:= 0;
    84     SoundTimerTicks:= 0;
    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 isAudioMuted and (j<>i) then
    89         if (not cIsSoundEnabled) or (isAudioMuted and (j<>i)) then
    90             AddCaption(trmsg[sidMute], cWhiteColor, capgrpVolume)
    90             AddCaption(trmsg[sidMute], cWhiteColor, 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), cWhiteColor, capgrpVolume)
    94             AddCaption(FormatA(trmsg[sidVolume], s), cWhiteColor, capgrpVolume)