From 3b4ca35c5460c064b7a4c2fd7f738ff51857e8c1 Mon Sep 17 00:00:00 2001 From: "Kirill Lipatov (Leency)" Date: Wed, 2 Apr 2014 23:30:01 +0000 Subject: [PATCH] mtdbg: fix terrible redraw that made me crazy for a long time git-svn-id: svn://kolibrios.org@4738 a494cfbc-eb01-0410-851d-a64ba20cac60 --- programs/develop/mtdbg/gui.inc | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) diff --git a/programs/develop/mtdbg/gui.inc b/programs/develop/mtdbg/gui.inc index 79a4dc0206..59b9087b30 100644 --- a/programs/develop/mtdbg/gui.inc +++ b/programs/develop/mtdbg/gui.inc @@ -2,6 +2,14 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; GUI ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +macro DrawRectangle x, y, w, h, color +{ + mcall 13, x shl 16 + w, y shl 16 + 1, color ; top + mcall , x shl 16 + 1, y shl 16 + h, color ; left + mcall , (x+w) shl 16 +1, y shl 16 + (h+1), color ; right + mcall , x shl 16 + w, (y+h) shl 16 + 1, color ; bottom +} + ;----------------------------------------------------------------------------- ; Color scheme @@ -1601,8 +1609,9 @@ draw_window: mcall ; registers frame - mov ebx, (registers_x_pos-2)*10000h + (registers_x_size+4) - mov ecx, (registers_y_pos-2)*10000h + (registers_y_size+4) + ; mov ebx, (registers_x_pos-2)*10000h + (registers_x_size+4) + ; mov ecx, (registers_y_pos-2)*10000h + (registers_y_size+4) + DrawRectangle (registers_x_pos-2), (registers_y_pos-2), (registers_x_size+3), (registers_y_size+3), COLOR_LINE ; draw container rectangle/box for registers information window region mcall 13