Split a character string based on change of character: Difference between revisions
Content added Content deleted
Line 254: | Line 254: | ||
DEF FN_split$( s$ ) |
DEF FN_split$( s$ ) |
||
LOCAL c$, d$, i% |
LOCAL c$, split$, d$, i% |
||
c$ = LEFT$( s$, 1 ) |
c$ = LEFT$( s$, 1 ) |
||
split$ = "" |
split$ = "" |
||
Line 268: | Line 268: | ||
{{out}} |
{{out}} |
||
<pre>g, HHH, 5, YY, ++, ///, \</pre> |
<pre>g, HHH, 5, YY, ++, ///, \</pre> |
||
=={{header|ANSI BASIC}}== |
=={{header|ANSI BASIC}}== |
||
<lang ansibasic>REM >split |
<lang ansibasic>REM >split |