#!ruby
# 純音のサンプルを作成
freq = 994.77  # 周波数
sr   = 48000 # サンプルレート
dur  = 300    # データの秒数
# ---------------------------
fn = "#{freq}Hz#{dur}s_r#{sr}"
f=open( fn + ".dat","w")
	f.puts "; Sample Rate #{sr}\n; Channels 1"
	for i in 1..(sr*dur) do
		t = i.to_f/sr
		f.printf("%10.11e   %10.11e\n",t,Math.sin(2*Math::PI*t*freq) )
	end
f.close
`sox #{fn}.dat #{fn}.wav`