comparison semiconginev2/audio/generators.nim @ 1227:4d97cfc4888b

merge
author sam <sam@basx.dev>
date Wed, 17 Jul 2024 23:45:43 +0700
parents 27cd1c21290e
children
comparison
equal deleted inserted replaced
1170:2addc5f6804f 1227:4d97cfc4888b
1 proc sinewave(f: float): proc(x: float): float =
2 proc ret(x: float): float =
3 sin(x * 2 * Pi * f)
4 result = ret
5
6 proc SineSoundData*(f: float, len: float, rate: int, amplitude = 0.5'f32): SoundData =
7 let dt = 1'f / float(rate)
8 var sine = sinewave(f)
9 for i in 0 ..< int(float(rate) * len):
10 let t = dt * float(i)
11 let value = int16(sine(t) * float(high(int16)) * amplitude)
12 result.add [value, value]