projects
/
qbasicapps.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
f384526dcc90bf09880c2136f34f3e2b1e53de26
[qbasicapps.git]
/
modules
/
tostr.bas
1
DECLARE FUNCTION toStr$ (a!)
\r
2
\r
3
FUNCTION toStr$ (a)
\r
4
\r
5
b$ = STR$(a)
\r
6
IF LEFT$(b$, 1) = " " THEN b$ = RIGHT$(b$, LEN(b$) - 1)
\r
7
toStr$ = b$
\r
8
\r
9
END FUNCTION
\r
10
\r