10 ! TEST OF LOADABLE ROUTINE
20 DIM A$[60]V,B$[60]V
30 LOAD "REVSTR.ATK"
40 INPUT "STRING ";A$
50 CALL "REVSTR"(A$,B$)
60 PRINT B$
70 GOTO 40