FNEND Example10 CLEAR SCREEN
20 PRINT "5 + 8 =";FNAdd(5,8)
30 PRINT FNMessage$("Hello")
40 END
50 DEF FNAdd(A,B)
60 RETURN A+B
70 FNEND
80 DEF FNMessage$(OPTIONAL String$)
90 IF NPAR=0 THEN RETURN "You didn't use the OPTIONAL parameter."
100 RETURN String$&" was a good choice."
110 FNEND
|