From: Ketmar Dark <ketmar@ketmar.no-ip.org>
Date: Fri, 18 Aug 2017 19:06:05 +0000 (+0300)
Subject: more tree/grid debug commands
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=8b1632a2d2ae5a11acb3ed5e2bd816114d2477ff;p=d2df-sdl.git

more tree/grid debug commands
---

diff --git a/src/game/g_console.pas b/src/game/g_console.pas
index 397d68f..729bf95 100644
--- a/src/game/g_console.pas
+++ b/src/game/g_console.pas
@@ -388,11 +388,13 @@ begin
   AddCommand('d_player', DebugCommands);
   AddCommand('d_joy', DebugCommands);
 
-  AddCommand('dpp', ProfilerCommands);
-  AddCommand('dpu', ProfilerCommands);
-  AddCommand('dpc', ProfilerCommands);
-  AddCommand('r_gridrender', ProfilerCommands);
-  AddCommand('dbg_coldet_grid', ProfilerCommands);
+  AddCommand('pf_draw_frame', ProfilerCommands);
+  AddCommand('pf_update_frame', ProfilerCommands);
+  AddCommand('pf_coldet', ProfilerCommands);
+  AddCommand('r_sq_draw', ProfilerCommands);
+  AddCommand('r_sq_use_grid', ProfilerCommands);
+  AddCommand('r_sq_use_tree', ProfilerCommands);
+  AddCommand('dbg_sq_coldet', ProfilerCommands);
 
   AddCommand('t_dump_node_queries', ProfilerCommands);
 
diff --git a/src/game/g_game.pas b/src/game/g_game.pas
index 2d3fb58..e69bde9 100644
--- a/src/game/g_game.pas
+++ b/src/game/g_game.pas
@@ -5018,50 +5018,57 @@ begin
   //if not gDebugMode then exit;
   cmd := LowerCase(P[0]);
 
-  if cmd = 'dpp' then
+  if cmd = 'pf_draw_frame' then
   begin
     g_profile_frame_draw := not g_profile_frame_draw;
     exit;
   end;
 
-  if cmd = 'dpu' then
+  if cmd = 'pf_update_frame' then
   begin
     g_profile_frame_update := not g_profile_frame_update;
     exit;
   end;
 
-  if cmd = 'dpc' then
+  if cmd = 'pf_coldet' then
   begin
     g_profile_collision := not g_profile_collision;
     exit;
   end;
 
-  if cmd = 'r_gridrender' then
+  if cmd = 'r_sq_draw' then
   begin
     case getBool(1) of
       -1: begin end;
        0: gdbg_map_use_grid_render := false;
        1: gdbg_map_use_grid_render := true;
     end;
-    if gdbg_map_use_grid_render then g_Console_Add('grid rendering: tan') else g_Console_Add('grid rendering: ona');
+    if gdbg_map_use_grid_render then g_Console_Add('accelerated rendering: tan') else g_Console_Add('accelerated rendering: ona');
     exit;
   end;
 
-  if cmd = 'dbg_coldet_grid' then
+  if cmd = 'dbg_sq_coldet' then
   begin
     case getBool(1) of
       -1: begin end;
        0: gdbg_map_use_grid_coldet := false;
        1: gdbg_map_use_grid_coldet := true;
     end;
-    if gdbg_map_use_grid_coldet then g_Console_Add('grid coldet: tan') else g_Console_Add('grid coldet: ona');
+    if gdbg_map_use_grid_coldet then g_Console_Add('accelerated coldet: tan') else g_Console_Add('accelerated coldet: ona');
     exit;
   end;
 
   if (cmd = 'sq_use_grid') or (cmd = 'sq_use_tree') then
   begin
     gdbg_map_use_tree_coldet := (cmd = 'sq_use_tree');
-    if gdbg_map_use_tree_coldet then g_Console_Add('coldet: tree') else g_Console_Add('coldet: grid');
+    if gdbg_map_use_tree_coldet then g_Console_Add('coldet acceleration: tree') else g_Console_Add('coldet acceleration: grid');
+    exit;
+  end;
+
+  if (cmd = 'r_sq_use_grid') or (cmd = 'r_sq_use_tree') then
+  begin
+    gdbg_map_use_tree_draw := (cmd = 'r_sq_use_tree');
+    if gdbg_map_use_tree_draw then g_Console_Add('render acceleration: tree') else g_Console_Add('render acceleration: grid');
     exit;
   end;