main:
for b0 = 99 to 120 step 1
sound c.1,(b0,3)
next b0
for b1 = 120 to 99 step -1
sound c.1,(b1,3)
next b1
pause 2000
for b0 = 88 to 127 step 1
sound c.1,(b0,3)
next b0
for b1 = 127 to 88 step -1
for b1 = 127 to 88 step -1
sound c.1,(b1,3)
next b1
pause 5000
goto main
No comments:
Post a Comment