From: Ketmar Dark 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;