diff options
Diffstat (limited to '070display.cc')
-rw-r--r-- | 070display.cc | 40 |
1 files changed, 31 insertions, 9 deletions
diff --git a/070display.cc b/070display.cc index db205d63..477552a0 100644 --- a/070display.cc +++ b/070display.cc @@ -8,6 +8,7 @@ :(before "End Globals") long long int Display_row = 0, Display_column = 0; +bool Autodisplay = true; :(before "End Primitive Recipe Declarations") OPEN_CONSOLE, @@ -57,7 +58,7 @@ case CLEAR_LINE_ON_DISPLAY: { tb_change_cell(x, Display_row, ' ', TB_WHITE, TB_BLACK); } tb_set_cursor(Display_column, Display_row); - tb_present(); + if (Autodisplay) tb_present(); break; } @@ -80,7 +81,7 @@ case PRINT_CHARACTER_TO_DISPLAY: { Display_column = 0; ++Display_row; tb_set_cursor(Display_column, Display_row); - tb_present(); + if (Autodisplay) tb_present(); } break; } @@ -89,7 +90,7 @@ case PRINT_CHARACTER_TO_DISPLAY: { tb_change_cell(Display_column-1, Display_row, ' ', TB_WHITE, TB_BLACK); --Display_column; tb_set_cursor(Display_column, Display_row); - tb_present(); + if (Autodisplay) tb_present(); } break; } @@ -106,7 +107,7 @@ case PRINT_CHARACTER_TO_DISPLAY: { ++Display_column; tb_set_cursor(Display_column, Display_row); } - tb_present(); + if (Autodisplay) tb_present(); break; } @@ -133,7 +134,7 @@ case MOVE_CURSOR_ON_DISPLAY: { assert(scalar(ingredients.at(1))); Display_column = ingredients.at(1).at(0); tb_set_cursor(Display_column, Display_row); - tb_present(); + if (Autodisplay) tb_present(); break; } @@ -148,7 +149,7 @@ case MOVE_CURSOR_DOWN_ON_DISPLAY: { if (Display_row < height-1) { Display_row++; tb_set_cursor(Display_column, Display_row); - tb_present(); + if (Autodisplay) tb_present(); } break; } @@ -162,7 +163,7 @@ case MOVE_CURSOR_UP_ON_DISPLAY: { if (Display_row > 0) { Display_row--; tb_set_cursor(Display_column, Display_row); - tb_present(); + if (Autodisplay) tb_present(); } break; } @@ -178,7 +179,7 @@ case MOVE_CURSOR_RIGHT_ON_DISPLAY: { if (Display_column < width-1) { Display_column++; tb_set_cursor(Display_column, Display_row); - tb_present(); + if (Autodisplay) tb_present(); } break; } @@ -192,7 +193,7 @@ case MOVE_CURSOR_LEFT_ON_DISPLAY: { if (Display_column > 0) { Display_column--; tb_set_cursor(Display_column, Display_row); - tb_present(); + if (Autodisplay) tb_present(); } break; } @@ -239,6 +240,27 @@ case SHOW_CURSOR_ON_DISPLAY: { break; } +:(before "End Primitive Recipe Declarations") +HIDE_DISPLAY, +:(before "End Primitive Recipe Numbers") +Recipe_number["hide-display"] = HIDE_DISPLAY; +:(before "End Primitive Recipe Implementations") +case HIDE_DISPLAY: { + Autodisplay = false; + break; +} + +:(before "End Primitive Recipe Declarations") +SHOW_DISPLAY, +:(before "End Primitive Recipe Numbers") +Recipe_number["show-display"] = SHOW_DISPLAY; +:(before "End Primitive Recipe Implementations") +case SHOW_DISPLAY: { + Autodisplay = true; + tb_present(); + break; +} + //:: Keyboard/mouse management :(before "End Primitive Recipe Declarations") |