Pixel-Composer/scripts/textArea/textArea.gml
2022-12-12 15:08:03 +07:00

460 lines
No EOL
12 KiB
Text

function textArea(_input, _onModify) constructor {
active = false;
hover = false;
font = f_p0;
hide = false;
line_width = 1000;
auto_update = false;
input = _input;
onModify = _onModify;
_input_text_line = [];
_input_text = "";
_prev_text = "";
_last_value = "";
_prev_width = 0;
cursor = 0;
cursor_pos_x = 0;
cursor_pos_x_to = 0;
cursor_pos_y = 0;
cursor_pos_y_to = 0;
cursor_line = 0;
cursor_select = -1;
click_block = 0;
static deselect = function() {
apply();
TEXTBOX_ACTIVE = noone;
UNDO_HOLDING = false;
}
static apply = function() {
if(onModify) onModify(_input_text);
UNDO_HOLDING = true;
}
static move_cursor = function(delta) {
var ll = string_length(_input_text);
cursor = clamp(cursor + delta, 0, ll);
}
static cut_line = function() {
_input_text_line = [];
var ch, i = 1, ss = "", _txt = _prev_text;
var len = string_length(_prev_text);
draw_set_font(font);
while(string_length(_txt) > 0) {
var sp = string_pos(" ", _txt);
if(sp == 0) sp = string_length(_txt);
var _ps = string_copy(_txt, 1, sp);
_txt = string_copy(_txt, sp + 1, string_length(_txt) - sp);
if(string_width(ss + _ps) >= line_width) {
array_push(_input_text_line, ss);
ss = _ps;
} else if(string_length(_txt) <= 0) {
array_push(_input_text_line, ss + _ps);
ss = "";
} else {
ss += _ps;
}
}
if(ss != "")
array_push(_input_text_line, ss);
}
static editText = function() {
#region text editor
if(keyboard_check(vk_control) && keyboard_check_pressed(ord("A"))) {
cursor_select = 0;
cursor = string_length(_input_text);
} else if(keyboard_check(vk_control) && (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(keyboard_check(vk_control) && keyboard_check_pressed(ord("V")))
KEYBOARD_STRING = clipboard_get_text();
if(keyboard_check_pressed(vk_escape) || keyboard_check_pressed(vk_enter)) {
} else if(keyboard_check_pressed(vk_backspace)) {
if(cursor_select == -1) {
var str_before = string_copy(_input_text, 1, cursor - 1);
var 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);
} else if(keyboard_check_pressed(vk_delete) || (keyboard_check_pressed(ord("X")) && keyboard_check(vk_control) && 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;
} else if(KEYBOARD_STRING != "") {
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;
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;
}
}
KEYBOARD_STRING = "";
keyboard_lastkey = -1;
#endregion
if(auto_update && keyboard_check_pressed(vk_anykey))
apply();
if(keyboard_check_pressed(vk_escape)) {
_input_text = _last_value;
cut_line();
deselect();
} else if(keyboard_check_pressed(vk_enter)) {
deselect();
}
}
static display_text = function(_x, _y, _text, _w, _mx = -1, _my = -1) {
if(_w != _prev_width) {
_prev_width = _w;
cut_line();
}
var _xx = _x, _ch, _chw;
var target = -999;
draw_set_text(font, fa_left, fa_top, COLORS._main_text);
var ch_x = _x;
var ch_y = _y;
var _str;
if(_prev_text != _text) {
_prev_text = _text;
cut_line();
}
for( var i = 0; i < array_length(_input_text_line); i++ ) {
_str = _input_text_line[i];
draw_text(ch_x, ch_y, _str);
ch_y += string_height(_str);
}
//draw_text_ext(_x, _y, _text, -1, _w - 16);
if(_mx != -1 && _my != -1) {
var char_run = 0, _l, _ch_w, _ch_h, _str, _chr;
var ch_x = _x;
var ch_cxo = _x, ch_cxn = _x;
var ch_y = _y;
for( var i = 0; i < array_length(_input_text_line); i++ ) {
_str = _input_text_line[i];
_l = string_length(_str);
_ch_h = string_height(_str);
if(ch_y <= _my && ch_y + _ch_h >= _my) {
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 && ch_cxn >= _mx) {
target = char_run + j;
break;
}
ch_x += _ch_w;
ch_cxo = ch_cxn;
}
if(target == -999)
target = string_length(_prev_text);
break;
}
char_run += _l;
ch_y += _ch_h;
}
}
if(target != -999) {
if(mouse_press(mb_left, active) || click_block == 1) {
cursor_select = -1;
cursor = target;
click_block = 0;
} else if(mouse_click(mb_left, active) && cursor != target) {
cursor_select = target;
}
}
}
static draw = function(_x, _y, _w, _h, _text, _m) {
var tx = _x + ui(8);
var hh = _h;
line_width = _w - ui(16);
draw_set_font(font);
var c_h = string_height("l");
hh = max(_h, ui(14) + c_h * array_length(_input_text_line));
if(self == TEXTBOX_ACTIVE) {
draw_sprite_stretched(THEME.textbox, 2, _x, _y, _w, hh);
editText();
#region cursor
if(keyboard_check_pressed(vk_left)) {
if(keyboard_check(vk_shift)) {
if(cursor_select == -1)
cursor_select = cursor;
} else
cursor_select = -1;
move_cursor(-1);
if(keyboard_check(vk_control)) {
while(cursor > 0) {
var ch = string_char_at(_prev_text, cursor);
if(ch == " ") break
cursor--;
}
}
}
if(keyboard_check_pressed(vk_right)) {
if(keyboard_check(vk_shift)) {
if(cursor_select == -1)
cursor_select = cursor;
} else
cursor_select = -1;
move_cursor(1);
if(keyboard_check(vk_control)) {
while(cursor < string_length(_prev_text)) {
var ch = string_char_at(_prev_text, cursor);
if(ch == " ") break
cursor++;
}
}
}
if(keyboard_check_pressed(vk_up)) {
var _target;
if(cursor_line == 0)
_target = 0;
else {
var _l = cursor_line - 1;
var _str = _input_text_line[_l];
var _run = 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(keyboard_check(vk_shift)) {
if(cursor_select == -1)
cursor_select = cursor;
} else
cursor_select = -1;
cursor = _target;
}
if(keyboard_check_pressed(vk_down)) {
var _target;
if(cursor_line == array_length(_input_text_line) - 1)
_target = string_length(_prev_text);
else {
var _l = cursor_line + 1;
var _str = _input_text_line[_l];
var _run = 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(keyboard_check(vk_shift)) {
if(cursor_select == -1)
cursor_select = cursor;
} else
cursor_select = -1;
cursor = _target;
}
#endregion
#region draw
draw_set_text(font, fa_left, fa_top, COLORS._main_text);
#region draw cursor highlight
var char_run = 0, _l, _str;
var ch_x = tx;
var ch_y = _y + ui(7);
var ch_sel_min = -1;
var ch_sel_max = -1;
if(cursor_select != -1) {
ch_sel_min = min(cursor_select, cursor);
ch_sel_max = max(cursor_select, cursor);
}
for( var i = 0; i < array_length(_input_text_line); i++ ) {
_str = _input_text_line[i];
_l = string_length(_str);
if(cursor_select != -1) {
draw_set_color(COLORS.widget_text_highlight);
if(char_run <= ch_sel_min && char_run + _l > ch_sel_min) {
var x1 = tx + string_width(string_copy(_str, 1, ch_sel_min - char_run));
var x2 = tx + string_width(string_copy(_str, 1, ch_sel_max - char_run));
draw_roundrect_ext(x1, ch_y, x2, ch_y + c_h, ui(8), ui(8), 0);
} else if(char_run >= ch_sel_min && char_run + _l < ch_sel_max) {
var x2 = tx + string_width(_str);
draw_roundrect_ext(tx, ch_y, x2, ch_y + c_h, ui(8), ui(8), 0);
} else if(char_run > ch_sel_min && char_run <= ch_sel_max && char_run + _l >= ch_sel_max) {
var x2 = tx + string_width(string_copy(_str, 1, ch_sel_max - char_run));
draw_roundrect_ext(tx, ch_y, x2, ch_y + c_h, ui(8), ui(8), 0);
}
}
if(char_run <= cursor && char_run + _l >= cursor) {
cursor_pos_x_to = ch_x + string_width(string_copy(_str, 1, cursor - char_run));
cursor_pos_y_to = ch_y;
cursor_line = i;
}
char_run += _l;
ch_y += string_height(_str);
}
cursor_pos_x = cursor_pos_x == 0? cursor_pos_x_to : lerp_float(cursor_pos_x, cursor_pos_x_to, 4);
cursor_pos_y = cursor_pos_y == 0? cursor_pos_y_to : lerp_float(cursor_pos_y, cursor_pos_y_to, 4);
#endregion
var _mx = -1;
var _my = -1;
if(mouse_press(mb_any, active) && hover && point_in_rectangle(_m[0], _m[1], _x, _y, _x + _w, _y + hh)) {
_mx = _m[0];
_my = _m[1];
}
display_text(tx, _y + ui(7), _input_text, _w - ui(4), _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);
}
#endregion
if(!point_in_rectangle(_m[0], _m[1], _x, _y, _x + _w, _y + hh) && mouse_press(mb_left)) {
deselect();
}
} else {
if(hover && point_in_rectangle(_m[0], _m[1], _x, _y, _x + _w, _y + hh)) {
if(hide)
draw_sprite_stretched_ext(THEME.textbox, 1, _x, _y, _w, hh, c_white, 0.5);
else
draw_sprite_stretched(THEME.textbox, 1, _x, _y, _w, hh);
if(mouse_press(mb_left, active)) {
TEXTBOX_ACTIVE = self;
click_block = 1;
KEYBOARD_STRING = "";
keyboard_lastkey = -1;
_input_text = _text;
_last_value = _text;
cut_line();
}
} else if(!hide) {
draw_sprite_stretched(THEME.textbox, 0, _x, _y, _w, hh);
}
display_text(tx, _y + ui(7), string(_text), _w - ui(4));
}
hover = false;
active = false;
return hh;
}
}