equal
deleted
inserted
replaced
1112 tdx, tdy: Double; |
1112 tdx, tdy: Double; |
1113 s: shortstring; |
1113 s: shortstring; |
1114 highlight: Boolean; |
1114 highlight: Boolean; |
1115 smallScreenOffset, offsetX, offsetY, screenBottom: LongInt; |
1115 smallScreenOffset, offsetX, offsetY, screenBottom: LongInt; |
1116 VertexBuffer: array [0..3] of TVertex2f; |
1116 VertexBuffer: array [0..3] of TVertex2f; |
|
1117 volume: LongInt; |
1117 begin |
1118 begin |
1118 if (cReducedQuality and rqNoBackground) = 0 then |
1119 if (cReducedQuality and rqNoBackground) = 0 then |
1119 begin |
1120 begin |
1120 // Offsets relative to camera - spare them to wimpier cpus, no bg or flakes for them anyway |
1121 // Offsets relative to camera - spare them to wimpier cpus, no bg or flakes for them anyway |
1121 ScreenBottom:= (WorldDy - trunc(cScreenHeight/cScaleFactor) - (cScreenHeight div 2) + cWaterLine); |
1122 ScreenBottom:= (WorldDy - trunc(cScreenHeight/cScaleFactor) - (cScreenHeight div 2) + cWaterLine); |
1524 // lag warning (?) |
1525 // lag warning (?) |
1525 inc(SoundTimerTicks, Lag); |
1526 inc(SoundTimerTicks, Lag); |
1526 end; |
1527 end; |
1527 |
1528 |
1528 if SoundTimerTicks >= 50 then |
1529 if SoundTimerTicks >= 50 then |
1529 begin |
1530 begin |
1530 SoundTimerTicks:= 0; |
1531 SoundTimerTicks:= 0; |
1531 if cVolumeDelta <> 0 then |
1532 if cVolumeDelta <> 0 then |
1532 begin |
1533 begin |
1533 str(ChangeVolume(cVolumeDelta), s); |
1534 str(ChangeVolume(cVolumeDelta), s); |
1534 AddCaption(Format(trmsg[sidVolume], s), cWhiteColor, capgrpVolume) |
1535 AddCaption(Format(trmsg[sidVolume], s), cWhiteColor, capgrpVolume); |
1535 end |
1536 end; |
1536 end; |
1537 if isAudioMuted then |
|
1538 AddCaption(trmsg[sidMute], cWhiteColor, capgrpVolume) |
|
1539 else |
|
1540 FreeTexture(Captions[capgrpVolume].Tex) |
|
1541 end; |
1537 |
1542 |
1538 if GameState = gsConfirm then |
1543 if GameState = gsConfirm then |
1539 DrawTextureCentered(0, (cScreenHeight shr 1), ConfirmTexture); |
1544 DrawTextureCentered(0, (cScreenHeight shr 1), ConfirmTexture); |
1540 |
1545 |
1541 if ScreenFade <> sfNone then |
1546 if ScreenFade <> sfNone then |