Skip to content

Instantly share code, notes, and snippets.

@hekras

hekras/cmm2-tones.bas

Created July 3, 2021 08:54
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save hekras/c8c750e9112ac093f646573ec8880528 to your computer and use it in GitHub Desktop.
Save hekras/c8c750e9112ac093f646573ec8880528 to your computer and use it in GitHub Desktop.
Download ZIP
Colour Maximite 2 tones
Raw
cmm2-tones.bas
dim tones(16)
for i=0 to bound(tones())-1
read tones(i)
next i
tempo=50
for i=0 to 20
a% = rnd * bound(tones())
play tone tones(a%), tones(a%), tempo
pause tempo
next i
end
data 105,113,121,131,143,158,175,197,225,263,315,394,525,629,788,1051
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment