vivid

Sound synthesis with SuperCollider

Version on this page:	0.2.0.5
LTS Haskell 20.25:	0.5.2.0
Stackage Nightly 2023-06-08:	0.5.2.0
Latest on Hackage:	0.5.2.0

See all snapshots vivid appears in

LicenseRef-GPL licensed and maintained by Tom Murphy

This version can be pinned in stack with:vivid-0.2.0.5@sha256:01c919242c85f2c944f722eee0ec1877c8d52e8af2903e2b80702fde63fc36e8,7657

Module documentation for 0.2.0.5

Vivid

Depends on 16 packages(full list with versions):

base, binary, bytestring, containers, filepath, hashable, MonadRandom, mtl, network, process, random, random-shuffle, split, stm, time, transformers

Music and sound synthesis with SuperCollider.

Example usage:

{-# LANGUAGE DataKinds #-}

import Vivid

theSound = sd (0 ::I "note") $ do
   wobble <- sinOsc (freq_ 5) ? KR ~* 10 ~+ 10
   s <- 0.1 ~* sinOsc (freq_ $ midiCPS (V::V "note") ~+ wobble)
   out 0 [s,s]

playSong = do
   fork $ do
      s0 <- synth theSound (36 ::I "note")
      wait 1
      free s0
   s1 <- synth theSound (60 ::I "note")
   forM_ [62,66,64] $ \note -> do
      wait (1/4)
      set s1 (note ::I "note")
   wait (1/4)
   free s1

main = do
   putStrLn "Simplest:"
   playSong

   putStrLn "With precise timing:"
   doScheduledIn 0.1 playSong
   wait 1

   putStrLn "Written to a file, non-realtime synthesis:"
   putStrLn "(Need to quit the running server for NRT)"
   quitSCServer
   writeNRT "/tmp/song.wav" playSong