From: DeaDDooMER <deaddoomer@deadsoftware.ru>
Date: Mon, 13 Feb 2023 00:53:19 +0000 (+0300)
Subject: gl: fix particle size with r_scale_resolution>1
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=a40ccefc0daf17edf117f5ff143842b398e2c6e5;p=d2df-sdl.git

gl: fix particle size with r_scale_resolution>1
---

diff --git a/src/game/renders/opengl/r_map.pas b/src/game/renders/opengl/r_map.pas
index c9a4d33..eb69057 100644
--- a/src/game/renders/opengl/r_map.pas
+++ b/src/game/renders/opengl/r_map.pas
@@ -1110,15 +1110,16 @@ implementation
   end;
 
   procedure r_Map_DrawParticles (x, y, w, h: Integer);
-    var i, fx, fy: Integer;
+    var i, fx, fy: Integer; factor: Single;
   begin
     if gpart_dbg_enabled and (Particles <> nil) then
     begin
       r_Draw_EnableTexture2D(false);
-      if (g_dbg_scale < 0.6) then
+      factor := r_pixel_scale * g_dbg_scale;
+      if factor < 0.6 then
         glPointSize(1)
-      else if (g_dbg_scale > 1.3) then
-        glPointSize(g_dbg_scale + 1)
+      else if factor > 1.3 then
+        glPointSize(factor + 1)
       else
         glPointSize(2);
       glDisable(GL_POINT_SMOOTH);