From 0d761ebf3811ae20d74bbce8f4988c3a7ab8349d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Gustav=20S=C3=B6rn=C3=A4s?= Date: Sun, 27 Oct 2019 14:26:09 +0100 Subject: Second wave --- Kod/bilbana/yc4/display/define_touch_key.m | 7 +++++++ Kod/bilbana/yc4/display/define_touch_switch.m | 7 +++++++ Kod/bilbana/yc4/display/restore_display_from_clipboard_to_point.m | 5 +++++ Kod/bilbana/yc4/display/set_touch_sound_response.m | 7 +++++++ 4 files changed, 26 insertions(+) create mode 100644 Kod/bilbana/yc4/display/define_touch_key.m create mode 100644 Kod/bilbana/yc4/display/define_touch_switch.m create mode 100644 Kod/bilbana/yc4/display/restore_display_from_clipboard_to_point.m create mode 100644 Kod/bilbana/yc4/display/set_touch_sound_response.m (limited to 'Kod/bilbana') diff --git a/Kod/bilbana/yc4/display/define_touch_key.m b/Kod/bilbana/yc4/display/define_touch_key.m new file mode 100644 index 0000000..14ee5ee --- /dev/null +++ b/Kod/bilbana/yc4/display/define_touch_key.m @@ -0,0 +1,7 @@ +function pkg = define_touch_key(x1, y1, x2, y2, down_code, up_code, just, text) + arg_location = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)]; + arg_text = double(strjoin({just; text}, '')); + arg_null = 0; + + pkg = get_package('AT', [arg_location, down_code, up_code, arg_text, arg_null]); +end diff --git a/Kod/bilbana/yc4/display/define_touch_switch.m b/Kod/bilbana/yc4/display/define_touch_switch.m new file mode 100644 index 0000000..47d3cd9 --- /dev/null +++ b/Kod/bilbana/yc4/display/define_touch_switch.m @@ -0,0 +1,7 @@ +function pkg = define_touch_key(x1, y1, x2, y2, down_code, up_code, just, text) + arg_location = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)]; + arg_text = double(strjoin({just; text}, '')); + arg_null = 0; + + pkg = get_package('AK', [arg_location, down_code, up_code, arg_text, arg_null]); +end diff --git a/Kod/bilbana/yc4/display/restore_display_from_clipboard_to_point.m b/Kod/bilbana/yc4/display/restore_display_from_clipboard_to_point.m new file mode 100644 index 0000000..2c9e1aa --- /dev/null +++ b/Kod/bilbana/yc4/display/restore_display_from_clipboard_to_point.m @@ -0,0 +1,5 @@ +function pkg = restore_display_from_clipboard_to_point(x1, y1) + arg = [get_bytes(x1), get_bytes(y1)]; + + pkg = get_package('CK', arg); +end diff --git a/Kod/bilbana/yc4/display/set_touch_sound_response.m b/Kod/bilbana/yc4/display/set_touch_sound_response.m new file mode 100644 index 0000000..851eaf2 --- /dev/null +++ b/Kod/bilbana/yc4/display/set_touch_sound_response.m @@ -0,0 +1,7 @@ +function pkg = set_touch_sound_response(state) + if state == true + pkg = get_package('AS', [1]); + else + pkg = get_package('AS', [0]); + end +end -- cgit v1.2.1