maquinitas-tidal 0.2.9 → 0.2.10
raw patch · 2 files changed
+23/−23 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Korg.VolcaBeats: ccn :: Pattern String -> ControlPattern
- Korg.VolcaBeats: ccnList :: Num a => String -> a
+ Korg.VolcaBeats: midiCC :: Pattern String -> ControlPattern
+ Korg.VolcaBeats: volcaBeatsControlChange :: Num a => String -> a
Files
- maquinitas-tidal.cabal +1/−1
- src/Korg/VolcaBeats.hs +22/−22
maquinitas-tidal.cabal view
@@ -1,5 +1,5 @@ name: maquinitas-tidal-version: 0.2.9+version: 0.2.10 synopsis: library for MIDI control of hardware description: maquinitas is a library for MIDI control of hardware homepage: https://github.com/maquinitas/maquinitas-tidal
src/Korg/VolcaBeats.hs view
@@ -60,30 +60,30 @@ -- ControlChange list - ccn :: Pattern String -> ControlPattern- ccn = Sound.Tidal.Params.n . ( ccnList <$>)+ midiCC :: Pattern String -> ControlPattern+ midiCC = Sound.Tidal.Params.n . (subtract 60 . volcaBeatsControlChange <$>) - ccnList :: Num a => String -> a- ccnList m =+ volcaBeatsControlChange :: Num a => String -> a+ volcaBeatsControlChange m = case m of- "kickLevel" -> 40- "snareLevel" -> 41- "loTomLevel" -> 42- "hiTomLevel" -> 43- "clHatLevel" -> 44- "opHatLevel" -> 45- "clapLevel" -> 46- "clavesLevel" -> 47- "agogoLevel" -> 48- "crashLevel" -> 49- "clapSpeed" -> 50- "clavesSpeed" -> 51- "agogoSpeed" -> 52- "crashSpeed" -> 53- "stutterTime" -> 54- "stutterDepth"-> 55- "tomDecay" -> 56+ "kickLevel" -> 40+ "snareLevel" -> 41+ "loTomLevel" -> 42+ "hiTomLevel" -> 43+ "clHatLevel" -> 44+ "opHatLevel" -> 45+ "clapLevel" -> 46+ "clavesLevel" -> 47+ "agogoLevel" -> 48+ "crashLevel" -> 49+ "clapSpeed" -> 50+ "clavesSpeed" -> 51+ "agogoSpeed" -> 52+ "crashSpeed" -> 53+ "stutterTime" -> 54+ "stutterDepth" -> 55+ "tomDecay" -> 56 "closedHatDecay" -> 57 "openHatDecay" -> 58 "hatGrain" -> 59- _ -> 0+ _ -> 0