diff options
| -rw-r--r-- | scripts/noisegen.lua | 18 |
1 files changed, 13 insertions, 5 deletions
diff --git a/scripts/noisegen.lua b/scripts/noisegen.lua index 684f421364..a4a5df8ff8 100644 --- a/scripts/noisegen.lua +++ b/scripts/noisegen.lua @@ -19,7 +19,14 @@ function dsp_ioconfig () return { [1] = { audio_in = -1, audio_out = -1}, } end +local rate = 0 + +function dsp_init (rate) + sr = rate +end + local ao = 0 +local draw = 0 function dsp_run (ins, outs, n_samples) @@ -57,15 +64,16 @@ function dsp_run (ins, outs, n_samples) end end + if (draw > (sr/15)) then + self:queue_draw() + draw = 0 + end + -- passes array a {} into buffer for c = 1,#outs do outs[c]:set_table(a, n_samples) end - - if (a ~= ao) then - self:queue_draw() - end - ao = amplitude + draw = draw + n_samples end function render_inline (ctx, w, max_h) --inline display |