10 lines
257 B
Text
10 lines
257 B
Text
10 REM Musical scale
|
|
20 LET n=0: REM Start at middle C
|
|
30 LET d=0.2: REM Make each note 0.2 seconds in duration
|
|
40 FOR l=1 TO 8
|
|
50 BEEP d,n
|
|
60 READ i: REM Number of semitones to increment
|
|
70 LET n=n+i
|
|
80 NEXT l
|
|
90 STOP
|
|
9000 DATA 2,2,1,2,2,2,1,2:REM WWHWWWH
|