added "dbg_scale_half" experimental deBUG mode

[d2df-sdl.git] / src / game / g_holmes.pas

diff --git a/src/game/g_holmes.pas b/src/game/g_holmes.pas
index ae7c7b49e67e8c629b8fa7a2f28772048e3c5339..6b623f011a154993d94052f35847ec89ca8c7f22 100644 (file)
--- a/src/game/g_holmes.pas
+++ b/src/game/g_holmes.pas
@@ -102,7 +102,7 @@ implementation
 
 uses
   SysUtils, Classes, GL, SDL2,
-  MAPDEF, g_options, utils, hashtable, xparser;
+  MAPDEF, g_main, g_options, utils, hashtable, xparser;
 
 
 var
@@ -927,6 +927,7 @@ begin
   glScissor(0, gWinSizeY-gPlayerScreenSize.Y-1, vpw, vph);
 
   glPushMatrix();
+  if g_dbg_scale_05 then glScalef(0.5, 0.5, 1.0);
   glTranslatef(-vpx, -vpy, 0);
 
   if (showGrid) then drawTileGrid();
@@ -1206,7 +1207,7 @@ begin
 
     // load bindings from file
     try
-      st := openDiskFileRO('holmes.rc');
+      st := openDiskFileRO(GameDir+'holmes.rc');
       pr := TFileTextParser.Create(st);
       conwriteln('parsing "holmes.rc"...');
       while (pr.tokType <> pr.TTEOF) do