Split text and save variables

[Start_Learning]

Another method:

Macro 8

Code:

Copy      Help

out
str s =
;221 41
;51 122
;11 10

ARRAY(str) a1 a2
str line
foreach line s
,sub.SplitString line a1 a2

out "Array1:"
out a1
out ""
out "Array2:"
out a2

#sub SplitString
function str&x ARRAY(str)&a1 ARRAY(str)&a2

ARRAY(str) a
int ntok=tok(x a)
a1[]=a[0]
a2[]=a[1]