simple waveform audio files in supercollider

sines.scd

// function to make a sine
var export_sine = {
	arg hz, dur, amp = 0.5, sr = 48000;
	var sf, path;
	var cycles = dur * hz;
	var samplesPerCycle = sr / hz;


	// specify some other array of harmonics here for richer waveforms
	var signal = Signal.sineFill(samplesPerCycle, [1.0]) * amp;

	// { signal.plot; }.defer;

	path = PathName(Document.current.path).pathOnly ;
	path = path ++ "sine_" ++ hz.asString ++ "hz.wav";
	path.postln;

	sf = SoundFile.new
	.headerFormat_("WAV")
	.sampleFormat_("int16")
	.sampleRate_(sr)
	.numChannels_(1);

	sf.openWrite(path);

	cycles.do({ sf.writeData(signal); });

	sf.close;
};

// make some sines
4.do({ arg i;
	export_sine.value(110 * (i+1), 10.0);
});