FNEND
PURPOSE:
Ends the definition of a multi line user defined function.
STATEMENT SYNTAX:
{stno} FNEND
EXAMPLE:
10 BEGIN
20 DEF FNML$(MIN_X$)
30 LET MX_X$=MIN_X$
40 LET P=POS("["=MX_X$);IF P=0 THEN RETURN ""
50 LET MX_X$=MX_X$(P+1)
60 LET MX_X$=CVS(MX_X$,#cvs_rev_string)
70 LET P=POS("]"=MX_X$);IF P=0 THEN RETURN ""
80 LET MX_X$=MX_X$(P+1)
90 LET MX_X$=CVS(MX_X$,#cvs_rev_string)
100 RETURN MX_X$
110 FNEND
120 LET X$="ABC [25,789 [123,876]] ->def"
130 PRINT FNML$(X$)
>RUN
25,789 [123,876]
SEE:
DEF FNx and FNx