Anonymous user
99 bottles of beer: Difference between revisions
m
→Sound: Added comments, made loop less dumb
m (Shortened some lines for smaller screens) |
m (→Sound: Added comments, made loop less dumb) |
||
Line 32:
This version plays the tune 100 times while printing out the number of beers on the wall.
<qbasic>PLAY "<"
FOR i =
PRINT i
PLAY "e-8e-8e-8<b8b8b8>e-8e-8e-8e-4"'X bottles of beer on the wall
PLAY "f8f8f8c8c8c8f4"'X bottles of beer
PLAY "d4d8d8 N0 d8d8d8d4"'take one down, pass it around
PLAY "<a+8a+8a+8>c8c8d8d+8d+8d+8d+4"'X-1 bottles of beer on the wall
NEXT i</qbasic>
| |||