diff options
| -rw-r--r-- | oscillator.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/oscillator.bqn b/oscillator.bqn index e918072..b6a47df 100644 --- a/oscillator.bqn +++ b/oscillator.bqn @@ -32,5 +32,5 @@ Pink ⇐ {÷⟜(⌈´|) +` 𝕩 ↑ ⥊∘⍉∘≍´⌽ -⟜«∘Rand¨ (1⌈ # Karplus-Stong algorithm for a plucked string Pluck ⇐ { 𝕊 f‿len‿att: # Frequency, length, attenuation p ← ⌊o.freq÷f - ∾ ((÷2×16⋆att÷p)×1⊸⌽⊸+)⍟(↕⌈len÷p) Pink p⥊0 + len ↑ ∾ ((÷2×16⋆att÷p)×1⊸⌽⊸+)⍟(↕⌈len÷p) Pink p⥊0 } |