Bang: A Drum Machine DSL for Haskell

[ library, mit, sound ] [ Propose Tags ]

This library consists of a DSL for piecing together drum compositions. It uses a MIDI backend and is only currently available for use on Mac OSX. Much of the library was inspired by previous work done by Yale's Euterpea project and Paul Hudak's paper.

[Skip to Readme]

Modules

[Index]

Bang
- Bang.Interface
  - Bang.Interface.Base
  - Bang.Interface.Drum
- Bang.Music

Downloads

Bang-0.1.0.4.tar.gz [browse] (Cabal source package)
Package description (as included in the package)

Maintainer's Corner

Package maintainers

5outh

For package maintainers and hackage trustees

edit package information

Candidates

0.1.0.4, 0.1.0.5

Versions [RSS]	0.1.0.0, 0.1.0.1, 0.1.0.2, 0.1.0.3, 0.1.0.4, 0.1.0.6, 0.1.1.0, 0.1.1.1
Dependencies	base (>=4.6 && <5), bifunctors (>=4 && <5), mtl (>=2.1 && <3), stm (>=2.4 && <5), transformers (>=0.3 && <0.4) [details]
License	MIT
Author	Benjamin Kovach
Maintainer	bkovach13@gmail.com
Category	Sound
Home page	https://github.com/5outh/Bang/
Uploaded	by 5outh at 2014-06-08T14:04:41Z
Distributions
Reverse Dependencies	1 direct, 0 indirect [details]
Downloads	7808 total (16 in the last 30 days)
Rating	(no votes yet) [estimated by Bayesian average]
Your Rating	λ λ λ
Status	Docs uploaded by user [build log] All reported builds failed as of 2015-12-05 [all 1 reports]

Readme for Bang-0.1.0.4

[back to package description]

Bang

An Embedded Domain Specific Language for writing drum machine patterns in Haskell.

Bang interfaces with your system MIDI device in order to play drum compositions, directly written in and interpreted by the Haskell programming language.

Example:

-- | The first few measures of 'Toxicity' by System of a Down.
toxicityIntro =
  let sh = sn >< hc -- snare and closed hi-hat combo
      bc = bd >< hc -- bass and closed hi-hat combo
      cd = bd >< cc -- bass and crash cymbal combo
  in bang $ 
     double $ -- play at double tempo
       bd <>
       ( double $ 
         mconcat [ -- concatenate into a single sequential composition
           mconcat [sh, bd, qr, bd, sh, qr, bd, qr, sh, qr]
         , mconcat [ 
             (2 #>) >>~ [sn, t1, t2] -- play each element of the list twice
           , double $ 4 #> sn
           , (2 #>) >>~ [sn, t1, t2] 
           , m4 cd qr hc sn -- groups of measures with 4 beats  
           , m4 hc bd sh qr
           , m4 hc sn bc qr
           , m4 bc qr hc sh
           , m4 hc bd sh qr
           , m4 bd qr sh qr 
           ] 
         ] )