Initial data commit

Task/Multisplit/Yabasic/multisplit.basic

@@ -0,0 +1,19 @@
+t$ = "a!===b=!=c"
+s$ = "==,!=,="
+
+dim n$(1)
+
+n = token(s$, n$(), ",")
+dim p(n)
+
+do
+    l = len(t$)
+    j = 0
+    for i = 1 to n
+        p(i) = instr(t$, n$(i))
+        if p(i) and p(i) < l then l = p(i) : j = i end if
+    next
+    if not j print t$ : break
+    print left$(t$, l - 1), " with separator ", n$(j)
+    t$ = right$(t$, len(t$) - (l + len(n$(j))) + 1)
+loop