Anonymous user
Rosetta Code/Run examples: Difference between revisions
→{{header|Run BASIC}}
Line 58:
a$ = word$(a$,2,"-")
a$ = word$(a$,1,"""")
cls ' clear screen
'print a$ ' this is the program number used in the [RC] editor
Line 98:
WEND
END FUNCTION</lang>
=={{header|Tcl}}==
| |||