projects
/
qbasicapps.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
5f7a62c9355fda4183cd099e9abc051941128f80
[qbasicapps.git]
/
tutorial
/
group1
/
08.bas
1
CLS
\r
2
\r
3
FOR i = 100 TO 1000 STEP 50
\r
4
PRINT "current:"; i
\r
5
SOUND i, 1 ' makes sound <frequency, length>
\r
6
NEXT i
\r
7
\r