8 lines
194 B
Text
8 lines
194 B
Text
INSTALL @lib$+"STRINGLIB"
|
|
|
|
text$ = "Hello,How,Are,You,Today"
|
|
n% = FN_split(text$, ",", array$())
|
|
FOR i% = 0 TO n%-1
|
|
PRINT array$(i%) "." ;
|
|
NEXT
|
|
PRINT
|