. - mu - Soul of a tiny new machine. More thorough tests → More comprehensible and rewrite-friendly software → More resilient society.

diff options

author	Kartik Agaram <vc@akkartik.com>	2021-04-26 09:42:05 -0700
committer	Kartik Agaram <vc@akkartik.com>	2021-04-26 09:42:05 -0700
commit	865f37aa9c970905e6a3046e3d2d432cc68aea57 (patch)
tree	3fc45bd9f820e4222254762a8cc0f991912235f0 /linux/dquotes.subx
parent	606c5681b7915eb929af5bdc99adf5d802c5583c (diff)
download	mu-865f37aa9c970905e6a3046e3d2d432cc68aea57.tar.gz

Diffstat (limited to 'linux/dquotes.subx')

0 files changed, 0 insertions, 0 deletions

//: Take charge of the text-mode display and keyboard. //:: Display management :(before "End Globals") size_t Display_row = 0, Display_column = 0; :(before "End Primitive Recipe Declarations") SWITCH_TO_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["switch-to-display"] = SWITCH_TO_DISPLAY; :(before "End Primitive Recipe Implementations") case SWITCH_TO_DISPLAY: { tb_init(); Display_row = Display_column = 0; break; } :(before "End Primitive Recipe Declarations") RETURN_TO_CONSOLE, :(before "End Primitive Recipe Numbers") Recipe_number["return-to-console"] = RETURN_TO_CONSOLE; :(before "End Primitive Recipe Implementations") case RETURN_TO_CONSOLE: { tb_shutdown(); break; } :(before "End Primitive Recipe Declarations") CLEAR_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["clear-display"] = CLEAR_DISPLAY; :(before "End Primitive Recipe Implementations") case CLEAR_DISPLAY: { tb_clear(); Display_row = Display_column = 0; break; } :(before "End Primitive Recipe Declarations") CLEAR_LINE_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["clear-line-on-display"] = CLEAR_LINE_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case CLEAR_LINE_ON_DISPLAY: { size_t width = tb_width(); for (size_t x = Display_column; x < width; ++x) { tb_change_cell(x, Display_row, ' ', TB_WHITE, TB_DEFAULT); } tb_set_cursor(Display_column, Display_row); tb_present(); break; } :(before "End Primitive Recipe Declarations") PRINT_CHARACTER_TO_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["print-character-to-display"] = PRINT_CHARACTER_TO_DISPLAY; :(before "End Primitive Recipe Implementations") case PRINT_CHARACTER_TO_DISPLAY: { vector<int> arg = read_memory(instructions[pc].ingredients[0]); int h=tb_height(), w=tb_width(); size_t height = (h >= 0) ? h : 0; size_t width = (w >= 0) ? w : 0; if (arg[0] == '\n') { if (Display_row < height) { Display_column = 0; ++Display_row; tb_set_cursor(Display_column, Display_row); tb_present(); } break; } tb_change_cell(Display_column, Display_row, arg[0], TB_WHITE, TB_DEFAULT); if (Display_column < width) { Display_column++; tb_set_cursor(Display_column, Display_row); } tb_present(); break; } :(before "End Primitive Recipe Declarations") CURSOR_POSITION_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["cursor-position-on-display"] = CURSOR_POSITION_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case CURSOR_POSITION_ON_DISPLAY: { vector<int> row; row.push_back(Display_row); write_memory(instructions[pc].products[0], row); vector<int> column; column.push_back(Display_column); write_memory(instructions[pc].products[1], column); break; } :(before "End Primitive Recipe Declarations") MOVE_CURSOR_ON_DISPLAY, :(before "End Primitive Recipe Numbers") Recipe_number["move-cursor-on-display"] = MOVE_CURSOR_ON_DISPLAY; :(before "End Primitive Recipe Implementations") case MOVE_CURSOR_ON_DISPLAY: { vector<int> row = read_memory(instructions[pc].ingredients[0]); vector<int> column = read_memory(instructions[pc].ingredients[1]); Display_row = row[0]; Display_column = column[0]; tb_set_cursor(Display_column, Display_row); tb_present(); break; } //:: Keyboard management :(before "End Primitive Recipe Declarations") WAIT_FOR_KEY_FROM_KEYBOARD, :(before "End Primitive Recipe Numbers") Recipe_number["wait-for-key-from-keyboard"] = WAIT_FOR_KEY_FROM_KEYBOARD; :(before "End Primitive Recipe Implementations") case WAIT_FOR_KEY_FROM_KEYBOARD: { struct tb_event event; tb_poll_event(&event); break; } :(before "End Includes") #include"termbox/termbox.h"


context:
space:
mode: