First wave of function

25 files changed, 112 insertions, 2 deletions

diff --git a/Kod/bilbana/yc4/display/continue_line.m b/Kod/bilbana/yc4/display/continue_line.m
new file mode 100644
index 0000000..9734201
--- /dev/null
+++ b/Kod/bilbana/yc4/display/continue_line.m
@@ -0,0 +1,5 @@
+function pkg = continue_line(x2, y2)
+	arg = [get_bytes(x2), get_bytes(y2)];
+	
+	pkg = get_package('GW', arg)
+end
diff --git a/Kod/bilbana/yc4/display/define_flashing_area.m b/Kod/bilbana/yc4/display/define_flashing_area.m
new file mode 100644
index 0000000..11d6cf3
--- /dev/null
+++ b/Kod/bilbana/yc4/display/define_flashing_area.m
@@ -0,0 +1,5 @@
+function pkg = define_flashing_area(x1, y1, x2, y2)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)];
+
+	pkg = get_package('QI', arg);
+end
diff --git a/Kod/bilbana/yc4/display/define_flashing_area_with_pattern.m b/Kod/bilbana/yc4/display/define_flashing_area_with_pattern.m
new file mode 100644
index 0000000..eb13e90
--- /dev/null
+++ b/Kod/bilbana/yc4/display/define_flashing_area_with_pattern.m
@@ -0,0 +1,5 @@
+function pkg = define_flashing_area_with_pattern(x1, y1, x2, y2, n1)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2), n1];
+
+	pkg = get_package('QM', arg);
+end
diff --git a/Kod/bilbana/yc4/display/delete_area.m b/Kod/bilbana/yc4/display/delete_area.m
new file mode 100644
index 0000000..44953b7
--- /dev/null
+++ b/Kod/bilbana/yc4/display/delete_area.m
@@ -0,0 +1,5 @@
+function pkg = delete_area(x1, y1, x2, y2)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)];
+
+	pkg = get_package('RL', arg);
+end
diff --git a/Kod/bilbana/yc4/display/draw_box.m b/Kod/bilbana/yc4/display/draw_box.m
new file mode 100644
index 0000000..b9eb5be
--- /dev/null
+++ b/Kod/bilbana/yc4/display/draw_box.m
@@ -0,0 +1,5 @@
+function pkg = draw_box(x1, y1, x2, y2, n1)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2), n1];
+
+	pkg = get_package('RO', arg);
+end
diff --git a/Kod/bilbana/yc4/display/draw_frame.m b/Kod/bilbana/yc4/display/draw_frame.m
new file mode 100644
index 0000000..7b97adb
--- /dev/null
+++ b/Kod/bilbana/yc4/display/draw_frame.m
@@ -0,0 +1,5 @@
+function pkg = draw_frame(x1, y1, x2, y2, n1)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)];
+
+	pkg = get_package('RR', arg);
+end
diff --git a/Kod/bilbana/yc4/display/draw_frame_box.m b/Kod/bilbana/yc4/display/draw_frame_box.m
new file mode 100644
index 0000000..9b57c7c
--- /dev/null
+++ b/Kod/bilbana/yc4/display/draw_frame_box.m
@@ -0,0 +1,5 @@
+function pkg = draw_frame_box(x1, y1, x2, y2, n1)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2), n1];
+
+	pkg = get_package('RT', arg);
+end
diff --git a/Kod/bilbana/yc4/display/draw_point.m b/Kod/bilbana/yc4/display/draw_point.m
new file mode 100644
index 0000000..b81d8cb
--- /dev/null
+++ b/Kod/bilbana/yc4/display/draw_point.m
@@ -0,0 +1,5 @@
+function pkg = draw_point(x1, y1)
+	arg = [get_bytes(x1), get_bytes(y2)];
+
+	pkg = get_package('GP', arg);
+end
diff --git a/Kod/bilbana/yc4/display/draw_rectangle.m b/Kod/bilbana/yc4/display/draw_rectangle.m
new file mode 100644
index 0000000..9e92cad
--- /dev/null
+++ b/Kod/bilbana/yc4/display/draw_rectangle.m
@@ -0,0 +1,5 @@
+function pkg = draw_rectangle(x1, y1, x2, y2)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)];
+	
+	pkg = get_package('GR', arg);
+end
diff --git a/Kod/bilbana/yc4/display/fill_area.m b/Kod/bilbana/yc4/display/fill_area.m
new file mode 100644
index 0000000..4d64463
--- /dev/null
+++ b/Kod/bilbana/yc4/display/fill_area.m
@@ -0,0 +1,5 @@
+function pkg = fill_area(x1, y1, x2, y2)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)];
+
+	pkg = get_package('RS', arg);
+end
diff --git a/Kod/bilbana/yc4/display/fill_area_with_pattern.m b/Kod/bilbana/yc4/display/fill_area_with_pattern.m
new file mode 100644
index 0000000..4815f5b
--- /dev/null
+++ b/Kod/bilbana/yc4/display/fill_area_with_pattern.m
@@ -0,0 +1,5 @@
+function pkg = fill_area_with_pattern(x1, y1, x2, y2, n1)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2), n1];
+
+	pkg = get_package('RM', arg);
+end
diff --git a/Kod/bilbana/yc4/display/fill_display.m b/Kod/bilbana/yc4/display/fill_display.m
new file mode 100644
index 0000000..e5fc1d2
--- /dev/null
+++ b/Kod/bilbana/yc4/display/fill_display.m
@@ -0,0 +1,3 @@
+function pkg = fill_display()
+	pkg = get_package('DS', []);
+end
diff --git a/Kod/bilbana/yc4/display/get_bytes.m b/Kod/bilbana/yc4/display/get_bytes.m
new file mode 100644
index 0000000..76efc9c
--- /dev/null
+++ b/Kod/bilbana/yc4/display/get_bytes.m
@@ -0,0 +1,3 @@
+function bytes = get_bytes(num):
+	bytes = [mod(num, 256), num ./ 256];
+end
diff --git a/Kod/bilbana/yc4/display/invert_area.m b/Kod/bilbana/yc4/display/invert_area.m
new file mode 100644
index 0000000..39db3c2
--- /dev/null
+++ b/Kod/bilbana/yc4/display/invert_area.m
@@ -0,0 +1,5 @@
+function pkg = invert_area(x1, y1, x2, y2)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)];
+
+	pkg = get_package('RI', arg);
+end
diff --git a/Kod/bilbana/yc4/display/invert_display.m b/Kod/bilbana/yc4/display/invert_display.m
new file mode 100644
index 0000000..ab2ddad
--- /dev/null
+++ b/Kod/bilbana/yc4/display/invert_display.m
@@ -0,0 +1,3 @@
+function pkg = invert_display()
+	pkg = get_package('DI', []);
+end
diff --git a/Kod/bilbana/yc4/display/put_text.m b/Kod/bilbana/yc4/display/put_text.m
index 5b80192..22871e3 100644
--- a/Kod/bilbana/yc4/display/put_text.m
+++ b/Kod/bilbana/yc4/display/put_text.m
@@ -1,7 +1,7 @@
 function [pkg] = put_text(x, y, justification, text)
-	code = double(strjoin({'Z', justification}, ''));
+	code = strjoin({'Z', justification}, '');
 
-	arg1 = [x, 0, y, 0];
+	arg1 = [mod(x, 256), x ./ 256, mod(y, 256), y ./ 256];
 	arg2 = text;
 	arg3 = 0;
 
diff --git a/Kod/bilbana/yc4/display/remove_flashing_area.m b/Kod/bilbana/yc4/display/remove_flashing_area.m
new file mode 100644
index 0000000..701402b
--- /dev/null
+++ b/Kod/bilbana/yc4/display/remove_flashing_area.m
@@ -0,0 +1,5 @@
+function pkg = remove_flashing_area(x1, y1, x2, y2)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)];
+
+	pkg = get_package('QL', arg);
+end
diff --git a/Kod/bilbana/yc4/display/restore_display_from_clipboard.m b/Kod/bilbana/yc4/display/restore_display_from_clipboard.m
new file mode 100644
index 0000000..9542851
--- /dev/null
+++ b/Kod/bilbana/yc4/display/restore_display_from_clipboard.m
@@ -0,0 +1,3 @@
+function pkg = restore_display_from_clipboard()
+	pkg = get_package('CR', []);
+end
diff --git a/Kod/bilbana/yc4/display/save_area_to_clipboard.m b/Kod/bilbana/yc4/display/save_area_to_clipboard.m
new file mode 100644
index 0000000..8098b06
--- /dev/null
+++ b/Kod/bilbana/yc4/display/save_area_to_clipboard.m
@@ -0,0 +1,5 @@
+function pkg = save_area_to_clipboard(x1, y1, x2, y2)
+	arg = [get_bytes(x1), get_bytes(y1), get_bytes(x2), get_bytes(y2)];
+
+	pkg = get_package('CS', arg);
+end
diff --git a/Kod/bilbana/yc4/display/save_display_to_clipboard.m b/Kod/bilbana/yc4/display/save_display_to_clipboard.m
new file mode 100644
index 0000000..f8cd0bd
--- /dev/null
+++ b/Kod/bilbana/yc4/display/save_display_to_clipboard.m
@@ -0,0 +1,3 @@
+function pkg = save_display_to_clipboard()
+	pkg = get_package('CB', []);
+end
diff --git a/Kod/bilbana/yc4/display/set_display_visible.m b/Kod/bilbana/yc4/display/set_display_visible.m
new file mode 100644
index 0000000..12fa3b3
--- /dev/null
+++ b/Kod/bilbana/yc4/display/set_display_visible.m
@@ -0,0 +1,7 @@
+function pkg = set_display_visible(visible)
+	if visible == true
+		pkg = get_package('DE', []);
+	else
+		pkg = get_package('DA', []);
+	end
+end
diff --git a/Kod/bilbana/yc4/display/set_drawing_mode.m b/Kod/bilbana/yc4/display/set_drawing_mode.m
new file mode 100644
index 0000000..c8ecf07
--- /dev/null
+++ b/Kod/bilbana/yc4/display/set_drawing_mode.m
@@ -0,0 +1,5 @@
+function pkg = set_drawing_mode(n1)
+	arg = [n1];
+
+	pkg = get_package('GV', arg);
+end
diff --git a/Kod/bilbana/yc4/display/set_flashing_time.m b/Kod/bilbana/yc4/display/set_flashing_time.m
new file mode 100644
index 0000000..e4f056d
--- /dev/null
+++ b/Kod/bilbana/yc4/display/set_flashing_time.m
@@ -0,0 +1,3 @@
+function pkg = set_flashing_time(n1)
+	pkg = get_package('QZ', [n1]);
+end
diff --git a/Kod/bilbana/yc4/display/set_pattern.m b/Kod/bilbana/yc4/display/set_pattern.m
new file mode 100644
index 0000000..5ec583e
--- /dev/null
+++ b/Kod/bilbana/yc4/display/set_pattern.m
@@ -0,0 +1,5 @@
+function pkg = set_pattern(n1)
+	arg = [n1];
+
+	pkg = get_package('GM', n1);
+end
diff --git a/Kod/bilbana/yc4/display/set_point_size.m b/Kod/bilbana/yc4/display/set_point_size.m
new file mode 100644
index 0000000..750b172
--- /dev/null
+++ b/Kod/bilbana/yc4/display/set_point_size.m
@@ -0,0 +1,5 @@
+function pkg = set_point_size(n1, n2)
+	arg = [n1 n2];
+	
+	pkg = get_package('GZ', arg);
+end