X-Git-Url: https://deadsoftware.ru/gitweb?p=dsw-obn.git;a=blobdiff_plain;f=rtl%2FSYSTEM.java;h=68f82bd0983c3ee348507e7903023dc63318cf8c;hp=44e1cc321a594c4adb723c82b35c58b07dbe6e33;hb=75d0fd92a5342358f37ed9369ccce9355273e51a;hpb=d25fb653bfe19a696d3f53abd784d32ba2d3ee03

diff --git a/rtl/SYSTEM.java b/rtl/SYSTEM.java
index 44e1cc3..68f82bd 100644
--- a/rtl/SYSTEM.java
+++ b/rtl/SYSTEM.java
@@ -21,14 +21,26 @@ public class SYSTEM
 	{
 		int len_x = LEN(x);
 		int len_v = v.length - 1;
+
 		int len = (len_x < len_v) ? (len_x) : (len_v);
 		for(int i = 0; i < len; i++)
 		{
 			v[i] = x[i];
 		}
+
 		v[len] = 0;
 	}
 
+	public static int STRCMP(byte[] a, byte[] b)
+	{
+		int i = 0;
+		while(a[i] != 0 && a[i] == b[i])
+		{
+			i += 1;
+		}
+		return a[i] - b[i];
+	}
+
 	public static void HALT(long n)
 	{
 		System.exit((int) n);