Pl-synth: no-deps sound effects and music

wiz · January 19, 2025, 11:32am

It’s not that featureful as csound etc, but only needs base.

It contains cbits and isn’t a pure-Haskell package. The original is JS/Wasm/C, so you may hook it up directly if you target browsers.

onthestairs · January 25, 2025, 9:52pm

This is great.

I had a play with it and created a little edsl for creating songs which helps me visualise the structure and hide the indexing.

github.com/onthestairs/tunes

src/Songs/Roses.hs

f8eb65cb0


      
          roses :: Song
          roses = build $ do
            bass <- synth Synths.bassDrum
            fourOnTheFloor <- patt bass (replicateL 16 [147, 0])
          
            hihat <- synth Synths.hihat
            hihatSync <- patt hihat (replicateL 16 [0, 147])
          
            lead <- synth leadSynth
            lead0 <- patt lead riff1
            lead1 <- patt lead riff2
          
            pure
              [ [fourOnTheFloor],
                [fourOnTheFloor, hihatSync],
                [fourOnTheFloor, hihatSync, lead0],
                [fourOnTheFloor, hihatSync, lead1],
                [fourOnTheFloor, hihatSync, lead0],
                [fourOnTheFloor, hihatSync, lead1]
              ]

wiz · January 26, 2025, 9:24am

Lovely! This is exactly what I had in mind when doing the bindings.