Hi, I'm making a sound from a memblock. I can play it without a problem, but when i try to save it following error pops up: 'Runtime Error 3008 - Could not save sound at line 28'
I see no reason why it shouldn't work.
length = 1000
mem = 1
size = 32*length + 32
Make Memblock mem, size
Write Memblock DWord mem, 0, 1 : rem wFormat
Write Memblock DWord mem, 4, 1 : rem nChannels
Write Memblock DWord mem, 8, 16000 : rem nSamplesPerSec
Write Memblock DWord mem, 12, 32000 : rem nAvgBytesPerSec
Write Memblock DWord mem, 16, 2 : rem nBlockAlign
Write Memblock DWord mem, 20, 16 : rem wBitsPerSample
Write Memblock DWord mem, 24, 0 : rem cbSize
out_word as word
for pos = 28 to size-1 step 2
curr_freq = 440
inc curr_theta, calc_df(curr_freq, 16000)
curr_volume = 7000
out_word = sin(wrapvalue(curr_theta)) * curr_volume
write memblock word mem, pos, out_word
next pos
make sound from memblock 1, mem
play sound 1
wait key
save sound "sound.wav", 1
wait key : end
function calc_df(frequenzy, samples)
local df as float
`--
df = frequenzy * 360.0 / samples
endfunction df