Wolfram CDF Playerがインストールされていれば動きます。RSS Readerでは何も見えないかもしれません。
With[{functions = {Sin, TriangleWave[#/2/Pi] & -> "Triangle", SawtoothWave[#/2/Pi] & -> "Sawtooth", SquareWave[#/2/Pi] & -> "Square"}}, Manipulate[Play[ volume1 function1[2. Pi frequency1 t] + volume2 function2[2. Pi frequency2 t] + volume3 function3[2. Pi frequency3 t], {t, 0, 3}, SampleRate -> sampleRate], {function1, functions}, {function2, functions}, {function3, functions}, {{frequency1, 440}, 20, 8000}, {{frequency2, 550}, 20, 8000}, {{frequency3, 660}, 20, 8000}, {{volume1, 0.5}, 0, 1}, {{volume2, 0}, 0, 1}, {{volume3, 0}, 0, 1}, {{sampleRate, 8000}, 1000, 44100}, ContinuousAction -> False]]
ボリュームは相対評価です。