for(i,-9,2,writeln("C C#D D#E F F#G G#A A#B "slice(a:=(i+9)*2,a+2)," ",(440*2**(i/12))asString(0,3)))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page