enum TEXT_AREA_FORMAT { _default, codeLUA, codeHLSL, delimiter, path_template, node_title, } function textArea(_input, _onModify, _extras = noone) : textInput(_input, _onModify, _extras) constructor { font = f_p0; hide = false; color = COLORS._main_text; boxColor = c_white; auto_update = false; _input_text_line = []; _input_text_line_index = []; _current_text = ""; _input_text = ""; _prev_text = ""; _last_value = ""; _prev_width = 0; _stretch_width = false; min_lines = 0; line_width = 1000; cursor = 0; cursor_tx = 0; cursor_pos_x = 0; cursor_pos_x_to = 0; cursor_pos_y = 0; cursor_pos_y_to = 0; cursor_line = 0; char_run = 0 cursor_select = -1; click_block = 0; format = TEXT_AREA_FORMAT._default; code_line_width = 48; parser_server = noone; use_autocomplete = true; autocomplete_box = instance_create(0, 0, o_dialog_textbox_autocomplete); autocomplete_box.textbox = self; autocomplete_server = noone; autocomplete_object = noone; function_guide_box = instance_create(0, 0, o_dialog_textbox_function_guide); function_guide_box.textbox = self; function_guide_server = noone; shift_new_line = true; show_line_number = true; syntax_highlight = true; _cl = -1; static activate = function() { #region WIDGET_CURRENT = self; WIDGET_CURRENT_SCROLL = parent; parentFocus(); _input_text = _current_text; _last_value = _current_text; cursor_pos_x = 0; cursor_pos_y = 0; click_block = 1; KEYBOARD_STRING = ""; keyboard_lastkey = -1; cut_line(); } #endregion static deactivate = function() { #region if(WIDGET_CURRENT != self) return; apply(); WIDGET_CURRENT = noone; UNDO_HOLDING = false; } #endregion static isCodeFormat = function() { return format == TEXT_AREA_FORMAT.codeLUA || format == TEXT_AREA_FORMAT.codeHLSL } static onModified = function() { #region if(!isCodeFormat()) return; if(autocomplete_server == noone) return; if(!use_autocomplete) { autocomplete_box.active = false; return; } var crop = string_copy(_input_text, 1, cursor); var slp = string_splice(crop, [" ", "(", ",", "\n"]); var pmt = array_safe_get(slp, -1,, ARRAY_OVERFLOW.loop); var params = []; if(parser_server != noone) params = parser_server(crop, autocomplete_object); var data = autocomplete_server(pmt, params); if(array_length(data)) { autocomplete_box.data = data; autocomplete_box.active = true; autocomplete_box.prompt = pmt; autocomplete_box.selecting= 0; } else autocomplete_box.active = false; var _c = cursor; var _v = false; var _fn = ""; var _el = 0; var amo = 0; while(_c > 1) { var cch0 = string_char_at(_input_text, _c - 1); var cch1 = string_char_at(_input_text, _c); if(_el == 0 && cch1 == ",") amo++; if(_el == 0 && cch1 == "(" && string_variable_valid(cch0)) _v = true; else if(cch1 == ")") _el++; else if(cch1 == "(") _el--; if(_v) { if(!string_variable_valid(cch0)) break; _fn = cch0 + _fn; } _c--; } var guide = function_guide_server(_fn); if(guide != "") { function_guide_box.active = true; function_guide_box.dialog_x = rx + cursor_pos_x + 1; function_guide_box.dialog_y = ry + cursor_pos_y - 12; function_guide_box.prompt = guide; function_guide_box.index = amo; } else function_guide_box.active = false; } #endregion static breakCharacter = function(ch) { #region if(isCodeFormat()) return ch == "\n" || array_exists(global.CODE_BREAK_TOKEN, ch); return ch == " " || ch == "\n"; } #endregion static onKey = function(key) { #region if(key == vk_left) { if(key_mod_press(SHIFT)) { if(cursor_select == -1) cursor_select = cursor; } else cursor_select = -1; move_cursor(-1); if(key_mod_press(CTRL)) { while(cursor > 0) { var ch = string_char_at(_input_text, cursor); if(breakCharacter(ch)) break; cursor--; } } } if(key == vk_right) { if(key_mod_press(SHIFT)) { if(cursor_select == -1) cursor_select = cursor; } else cursor_select = -1; move_cursor(1); if(key_mod_press(CTRL)) { while(cursor < string_length(_input_text)) { var ch = string_char_at(_input_text, cursor); if(breakCharacter(ch)) break; cursor++; } } } if(!(isCodeFormat() && autocomplete_box.active)) { if(key == vk_up) { var _target; if(cursor_line == 0) _target = 0; else { var _l = cursor_line - 1; var _str = _input_text_line[_l]; var _run = cursor_tx; var _char = 0; for( var i = 0; i < _l; i++ ) _char += string_length(_input_text_line[i]); for( var i = 1; i < string_length(_str); i++ ) { var _chr = string_char_at(_str, i); _run += string_width(_chr); if(_run > cursor_pos_x_to) break; _char++; } _target = _char; } if(key_mod_press(SHIFT)) { if(cursor_select == -1) cursor_select = cursor; } else cursor_select = -1; cursor = _target; onModified(); } if(key == vk_down) { var _target; if(cursor_line == array_length(_input_text_line) - 1) _target = string_length(_input_text); else { var _l = cursor_line + 1; var _str = _input_text_line[_l]; var _run = cursor_tx; var _char = 0; for( var i = 0; i < _l; i++ ) _char += string_length(_input_text_line[i]); for( var i = 1; i < string_length(_str); i++ ) { var _chr = string_char_at(_str, i); _run += string_width(_chr); if(_run > cursor_pos_x_to) break; _char++; } _target = _char; } if(key_mod_press(SHIFT)) { if(cursor_select == -1) cursor_select = cursor; } else cursor_select = -1; cursor = _target; onModified(); } } } #endregion static apply = function() { #region if(onModify) onModify(_input_text); UNDO_HOLDING = true; } #endregion static move_cursor = function(delta) { #region var ll = string_length(_input_text); cursor = clamp(cursor + delta, 0, ll); onModified(); } #endregion static cut_line = function() { #region _input_text_line = []; _input_text_line_index = []; draw_set_font(font); var _txtLines = string_splice(_input_text, "\n"); var ss = ""; var _code = isCodeFormat(); for( var i = 0, n = array_length(_txtLines); i < n; i++ ) { var _txt = _txtLines[i] + (i < array_length(_txtLines)? "\n" : ""); var words; if(format == TEXT_AREA_FORMAT.codeLUA) words = lua_token_splice(_txt); else if(format == TEXT_AREA_FORMAT.codeHLSL) words = hlsl_token_splice(_txt); else words = string_splice(_txt, " "); var currW = 0; var currL = ""; var cut = true; var len = array_length(words); var _iIndex = i + 1; for( var j = 0; j < len; j++ ) { var word = words[j]; if(!_code && j < len - 1) word = word + " "; if(string_width(word) > line_width) { //the entire word is longer than a line for( var k = 1; k <= string_length(word); k++ ) { var ch = string_char_at(word, k); if(currW + string_width(ch) > line_width) { array_push(_input_text_line, currL); array_push(_input_text_line_index, _iIndex); _iIndex = ""; currW = 0; currL = ""; } currL += ch; currW += string_width(ch); } continue; } if(currW + string_width(word) > line_width) { array_push(_input_text_line, currL); array_push(_input_text_line_index, _iIndex); _iIndex = ""; currW = 0; currL = ""; } cut = true; currW += string_width(word); currL += word; } if(cut) { array_push(_input_text_line, currL); array_push(_input_text_line_index, _iIndex); _iIndex = ""; } } } #endregion static editText = function() { #region var _input_text_pre = _input_text; var modified = false; #region text editor if(key_mod_press(CTRL) && keyboard_check_pressed(ord("A"))) { cursor_select = 0; cursor = string_length(_input_text); } else if(key_mod_press(CTRL) && (keyboard_check_pressed(ord("C")) || keyboard_check_pressed(ord("X")))) { if(cursor_select != -1) { var minc = min(cursor, cursor_select); var maxc = max(cursor, cursor_select); clipboard_set_text(string_copy(_input_text, minc, maxc - minc)); } } else { if(key_mod_press(CTRL) && keyboard_check_pressed(ord("V"))) KEYBOARD_STRING = clipboard_get_text(); if(keyboard_check_pressed(vk_escape)) { } else if(keyboard_check_pressed(vk_tab)) { } else if(( shift_new_line && keyboard_check_pressed(vk_enter) && key_mod_press(SHIFT)) || (!shift_new_line && keyboard_check_pressed(vk_enter) && !key_mod_press(SHIFT))) { var ch = "\n"; if(cursor_select == -1) { var str_before = string_copy(_input_text, 1, cursor); var str_after = string_copy(_input_text, cursor + 1, string_length(_input_text) - cursor); _input_text = str_before + ch + str_after; cut_line(); move_cursor(string_length(ch)); } else { var minc = min(cursor, cursor_select); var maxc = max(cursor, cursor_select); var str_before = string_copy(_input_text, 1, minc); var str_after = string_copy(_input_text, maxc + 1, string_length(_input_text) - maxc); _input_text = str_before + ch + str_after; cut_line(); cursor = minc + string_length(ch); } modified = true; } else if(KEYBOARD_PRESSED == vk_backspace) { if(cursor_select == -1) { var str_before, str_after; if(key_mod_press(CTRL)) { var _c = cursor - 1; while(_c > 0) { var ch = string_char_at(_input_text, _c); if(breakCharacter(ch)) break; _c--; } str_before = string_copy(_input_text, 1, _c); str_after = string_copy(_input_text, cursor + 1, string_length(_input_text) - cursor); cursor = _c + 1; } else { str_before = string_copy(_input_text, 1, cursor - 1); str_after = string_copy(_input_text, cursor + 1, string_length(_input_text) - cursor); } _input_text = str_before + str_after; cut_line(); } else { var minc = min(cursor, cursor_select); var maxc = max(cursor, cursor_select); var str_before = string_copy(_input_text, 1, minc); var str_after = string_copy(_input_text, maxc + 1, string_length(_input_text) - maxc); cursor = minc + 1; _input_text = str_before + str_after; cut_line(); } cursor_select = -1; move_cursor(-1); modified = true; } else if(KEYBOARD_PRESSED == vk_delete || (keyboard_check_pressed(ord("X")) && key_mod_press(CTRL) && cursor_select != -1)) { if(cursor_select == -1) { var str_before = string_copy(_input_text, 1, cursor); var str_after = string_copy(_input_text, cursor + 2, string_length(_input_text) - cursor - 1); _input_text = str_before + str_after; cut_line(); } else { var minc = min(cursor, cursor_select); var maxc = max(cursor, cursor_select); var str_before = string_copy(_input_text, 1, minc); var str_after = string_copy(_input_text, maxc + 1, string_length(_input_text) - maxc); cursor = minc; _input_text = str_before + str_after; cut_line(); } cursor_select = -1; modified = true; } else if(KEYBOARD_STRING != "" && KEYBOARD_STRING != "\b" && KEYBOARD_STRING != "\r") { var ch = KEYBOARD_STRING; if(cursor_select == -1) { var str_before = string_copy(_input_text, 1, cursor); var str_after = string_copy(_input_text, cursor + 1, string_length(_input_text) - cursor); _input_text = str_before + ch + str_after; //print($"{str_before} + {ch} + {str_after}"); cut_line(); move_cursor(string_length(ch)); } else { var minc = min(cursor, cursor_select); var maxc = max(cursor, cursor_select); var str_before = string_copy(_input_text, 1, minc); var str_after = string_copy(_input_text, maxc + 1, string_length(_input_text) - maxc); _input_text = str_before + ch + str_after; cut_line(); cursor = minc + string_length(ch); } cursor_select = -1; modified = true; } } KEYBOARD_STRING = ""; keyboard_lastkey = -1; #endregion if(modified) onModified(); if(auto_update && keyboard_check_pressed(vk_anykey)) apply(); if(keyboard_check_pressed(vk_left)) onKey(vk_left); if(keyboard_check_pressed(vk_right)) onKey(vk_right); if(keyboard_check_pressed(vk_up)) onKey(vk_up); if(keyboard_check_pressed(vk_down)) onKey(vk_down); if(keyboard_check_pressed(vk_home)) { if(key_mod_press(SHIFT)) { if(cursor_select == -1) cursor_select = cursor; } else cursor_select = -1; if(cursor_line == 0) move_cursor(-cursor); else { var _str = _input_text_line[cursor_line]; while(string_char_at(_input_text, cursor) != "\n") { if(cursor <= 0) break; cursor--; } } } else if(keyboard_check_pressed(vk_end)) { if(key_mod_press(SHIFT)) { if(cursor_select == -1) cursor_select = cursor; } else cursor_select = -1; var _str = _input_text_line[cursor_line]; while(string_char_at(_input_text, cursor + 1) != "\n" && cursor < string_length(_input_text)) { cursor++; } } else if(keyboard_check_pressed(vk_escape) && !autocomplete_box.active) { _input_text = _last_value; cut_line(); deactivate(); } else if(( shift_new_line && keyboard_check_pressed(vk_enter) && !key_mod_press(SHIFT)) || (!shift_new_line && keyboard_check_pressed(vk_enter) && key_mod_press(SHIFT))) { deactivate(); } } #endregion static display_text = function(_x, _y, _text, _mx = -1, _my = -1) { #region _text = string_real(_text); if(line_width != _prev_width) { _prev_width = line_width; cut_line(); } var _xx = _x, _ch, _chw; var target = -999; draw_set_text(font, fa_left, fa_top, color); draw_set_alpha(0.5 + 0.5 * interactable) var ch_x = _x; var ch_y = _y; var _str; //print("=========="); //print(_text); //print(">>>>"); //print(_input_text); //print("----"); //print(_input_text_line); //print($"cursor: {cursor}"); if(_input_text != _text) { _input_text = _text; cut_line(); } for( var i = 0, n = array_length(_input_text_line); i < n; i++ ) { _str = _input_text_line[i]; switch(format) { case TEXT_AREA_FORMAT._default : draw_text_add(ch_x, ch_y, _str); break; case TEXT_AREA_FORMAT.delimiter : draw_text_delimiter(ch_x, ch_y, _str); break; case TEXT_AREA_FORMAT.path_template : draw_text_path(ch_x, ch_y, _str); break; case TEXT_AREA_FORMAT.codeLUA : if(syntax_highlight) draw_code_lua(ch_x, ch_y, _str); else draw_text_add(ch_x, ch_y, _str); break; case TEXT_AREA_FORMAT.codeHLSL : if(syntax_highlight) draw_code_hlsl(ch_x, ch_y, _str); else draw_text_add(ch_x, ch_y, _str); break; } ch_y += line_get_height(); } draw_set_alpha(1); if(_mx != -1 && _my != -1) { var char_run = 0, _l, _ch_w, _ch_h, _str, _chr; var sx = _x; var ch_x = sx; var ch_cxo = sx; var ch_cxn = sx; var ch_y = _y; for( var i = 0, n = array_length(_input_text_line); i < n; i++ ) { _str = string_trim_end(_input_text_line[i]); _l = string_length(_str); _ch_h = line_get_height(); ch_cxo = sx; ch_x = sx; if(ch_y <= _my && ch_y + _ch_h >= _my) { target = char_run + _l; for( var j = 0; j < string_length(_str); j++ ) { _chr = string_char_at(_str, j + 1); _ch_w = string_width(_chr); ch_cxn = ch_x + _ch_w / 2; if(ch_cxo <= _mx && _mx <= ch_cxn) { target = char_run + j; break; } ch_x += _ch_w; ch_cxo = ch_cxn; } break; } char_run += string_length(_input_text_line[i]); ch_y += _ch_h; } } if(target != -999) { if(mouse_press(mb_left, active) || click_block == 1) { cursor = target; cursor_select = -1; click_block = 0; autocomplete_box.active = false; } else if(mouse_click(mb_left, active) && cursor != target) { if(cursor_select == -1) cursor_select = cursor; cursor = target; autocomplete_box.active = false; } } } #endregion static drawParam = function(params) { #region rx = params.rx; ry = params.ry; return draw(params.x, params.y, params.w, params.h, params.data, params.m); } #endregion static draw = function(_x, _y, _w, _h, _text, _m) { #region x = _x; y = _y; w = _w; h = _h; _stretch_width = _w < 0; _text = string_real(_text); _current_text = _text; draw_set_font(font); if(_stretch_width) { _w = string_width(self == WIDGET_CURRENT? _input_text : _text) + ui(16); w = _w; } if(extras && instanceof(extras) == "buttonClass") { extras.setFocusHover(active, hover); extras.draw(_x + _w - ui(32), _y + _h / 2 - ui(32 / 2), ui(32), ui(32), _m, THEME.button_hide); _w -= ui(40); } var tx = _x + ui(8); var hh = _h; var pl = line_width; if(format == TEXT_AREA_FORMAT._default) { line_width = _w - ui(16); } else if(isCodeFormat()) { line_width = _w - ui(16 + code_line_width * show_line_number); tx += ui(code_line_width * show_line_number); } if(_stretch_width) line_width = 9999999; cursor_tx = tx; var c_h = line_get_height(); var line_count = max(min_lines, array_length(_input_text_line)); hh = max(_h, ui(14) + c_h * line_count); draw_sprite_stretched_ext(THEME.textbox, 3, _x, _y, _w, hh, boxColor, 1); if(isCodeFormat() && show_line_number) { draw_sprite_stretched_ext(THEME.textbox_code, 0, _x, _y, ui(code_line_width), hh, boxColor, 1); draw_set_text(f_code, fa_right, fa_top, COLORS._main_text_sub); var lx = _x + ui(code_line_width - 8); for( var i = 0; i < array_length(_input_text_line_index); i++ ) { var ly = _y + ui(7) + i * c_h; draw_text_add(lx, ly, _input_text_line_index[i]); } } var hoverRect = point_in_rectangle(_m[0], _m[1], _x, _y, _x + _w, _y + hh); if(self == WIDGET_CURRENT) { WIDGET_TAB_BLOCK = true; draw_set_text(font, fa_left, fa_top, COLORS._main_text); draw_sprite_stretched_ext(THEME.textbox, 2, _x, _y, _w, hh, COLORS._main_accent, 1); editText(); #region draw draw_set_text(font, fa_left, fa_top, COLORS._main_text); #region draw cursor highlight var _l, _str; var ch_x = tx; var ch_y = _y + ui(7); var ch_sel_min = -1; var ch_sel_max = -1; var char_line = 0; var curs_found = false; char_run = 0; if(cursor_select != -1) { ch_sel_min = min(cursor_select, cursor); ch_sel_max = max(cursor_select, cursor); } for( var i = 0, n = array_length(_input_text_line); i < n; i++ ) { _str = _input_text_line[i]; _l = string_length(_str); if(cursor_select != -1) { draw_set_color(COLORS.widget_text_highlight); if(char_line <= ch_sel_min && char_line + _l > ch_sel_min) { var x1 = tx + string_width(string_copy(_str, 1, ch_sel_min - char_line)); var x2 = tx + string_width(string_copy(_str, 1, ch_sel_max - char_line)); draw_roundrect_ext(x1, ch_y, x2, ch_y + c_h, THEME_VALUE.highlight_corner_radius, THEME_VALUE.highlight_corner_radius, 0); } else if(char_line >= ch_sel_min && char_line + _l < ch_sel_max) { var x2 = tx + string_width(_str); draw_roundrect_ext(tx, ch_y, x2, ch_y + c_h, THEME_VALUE.highlight_corner_radius, THEME_VALUE.highlight_corner_radius, 0); } else if(char_line > ch_sel_min && char_line <= ch_sel_max && char_line + _l >= ch_sel_max) { var x2 = tx + string_width(string_copy(_str, 1, ch_sel_max - char_line)); draw_roundrect_ext(tx, ch_y, x2, ch_y + c_h, THEME_VALUE.highlight_corner_radius, THEME_VALUE.highlight_corner_radius, 0); } } if(!curs_found && char_line <= cursor && cursor < char_line + _l) { if(format == TEXT_AREA_FORMAT.delimiter) { var str_cur = string_copy(_str, 1, cursor - char_line); str_cur = string_replace_all(str_cur, " ", ""); cursor_pos_x_to = ch_x + string_width(str_cur); } else cursor_pos_x_to = ch_x + string_width(string_copy(_str, 1, cursor - char_line)); cursor_pos_y_to = ch_y; cursor_line = i; char_run = char_line; curs_found = true; } char_line += _l; ch_y += line_get_height(); } cursor_pos_x = cursor_pos_x == 0? cursor_pos_x_to : lerp_float(cursor_pos_x, cursor_pos_x_to, 2); cursor_pos_y = cursor_pos_y == 0? cursor_pos_y_to : lerp_float(cursor_pos_y, cursor_pos_y_to, 2); #endregion var _mx = -1; var _my = -1; if(hover && hoverRect) { _mx = _m[0]; _my = _m[1]; } display_text(tx, _y + ui(7), _input_text, _mx, _my); if(cursor_pos_y != 0 && cursor_pos_x != 0) { draw_set_color(COLORS._main_text_accent); draw_line_width(cursor_pos_x, cursor_pos_y, cursor_pos_x, cursor_pos_y + c_h, 2); } if(autocomplete_box.active) { autocomplete_box.dialog_x = rx + cursor_pos_x + 1; autocomplete_box.dialog_y = ry + cursor_pos_y + line_get_height() + 1; } #endregion if(!point_in_rectangle(_m[0], _m[1], _x, _y, _x + _w, _y + hh) && mouse_press(mb_left)) { deactivate(); } } else { if(hover && hoverRect) { if(hide) draw_sprite_stretched_ext(THEME.textbox, 1, _x, _y, _w, hh, boxColor, 0.5); else draw_sprite_stretched_ext(THEME.textbox, 1, _x, _y, _w, hh, boxColor, 0.5 + 0.5 * interactable); if(mouse_press(mb_left, active)) activate(); } else if(!hide) draw_sprite_stretched_ext(THEME.textbox, 0, _x, _y, _w, hh, boxColor, 0.5 + 0.5 * interactable); display_text(tx, _y + ui(7), _text); autocomplete_box.active = 0; } if(DRAGGING && (DRAGGING.type == "Text" || DRAGGING.type == "Number") && hover && hoverRect) { draw_sprite_stretched_ext(THEME.ui_panel_active, 0, _x, _y, _w, hh, COLORS._main_value_positive, 1); if(mouse_release(mb_left)) onModify(DRAGGING.data); } resetFocus(); shift_new_line = true; return hh; } #endregion }