maquinitas-tidal 0.2.16 → 0.2.17

raw patch · 4 files changed

+115/−1 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• maquinitas-tidal.cabal +4/−1
• src/ChaseBliss/Blooper.hs +49/−0
• src/ChaseBliss/TonalRecall.hs +31/−0
• src/ChaseBliss/WarpedVinylHiFi.hs +31/−0

@@ -1,5 +1,5 @@ name:                maquinitas-tidal-version:             0.2.16+version:             0.2.17 synopsis:            library for MIDI control of hardware description:         maquinitas is a library for MIDI control of hardware homepage:            https://github.com/maquinitas/maquinitas-tidal@@ -21,6 +21,9 @@                       Korg.MR16                       Boss.DR880                       Roland.TB3+                      ChaseBliss.WarpedVinylHiFi+                      ChaseBliss.TonalRecall+                      ChaseBliss.Blooper                       MFBTanzbar                       OtoBam 

@@ -0,0 +1,49 @@+-- maquinitas-tidal+-- parameters for instruments by Korg++module ChaseBliss.Blooper where++  import qualified Sound.Tidal.Params+  import Sound.Tidal.Pattern++  -- ControlChange list++  ccn :: Pattern String -> ControlPattern+  ccn = Sound.Tidal.Params.ccn . (ccnList <$>)+  +  ccnList :: Num a => String -> a+  ccnList m =+    case m of+      "record"              -> 1+      "play"                -> 2+      "overdub"             -> 3+      "stop"                -> 4+      "undo"                -> 5+      "redo"                -> 6+      "erase"               -> 7+      "holdSwitchB"         -> 8++      "multiControl"        -> 11++      "volume"              -> 14+      "layers"              -> 15+      "repeats"             -> 16+      "knobModA"            -> 17+      "stability"           -> 18+      "knobModB"            -> 19+      "ramp"                -> 20++      "switchModA"          -> 21+      "looperMode"          -> 22+      "switchModB"          -> 23+      "previewSaveLoad"     -> 24++      "toogleModA"          -> 30+      "toogleModB"          -> 31++      "midiClockIgnore"     -> 51+      "ramping"             -> 52+      "noteDivisions"       -> 54++      "expression"          -> 100+      _                     -> 0

@@ -0,0 +1,31 @@+-- maquinitas-tidal+-- parameters for instruments by Korg++module ChaseBliss.TonalRecall where++  import qualified Sound.Tidal.Params+  import Sound.Tidal.Pattern++  -- ControlChange list++  ccn :: Pattern String -> ControlPattern+  ccn = Sound.Tidal.Params.ccn . (ccnList <$>)+  +  ccnList :: Num a => String -> a+  ccnList m =+    case m of+      "tone"                -> 14+      "mix"                 -> 15+      "rate"                -> 16+      "time"                -> 17+      "regen"               -> 18+      "depth"               -> 19+      "ramp"                -> 20++      "midiNoteDivisions"   -> 21+      "midiClockIgnore"     -> 51+      "tapSwitch"           -> 93++      "expression"          -> 100+      "bypassSwitch"        -> 102+      _                     -> 0

@@ -0,0 +1,31 @@+-- maquinitas-tidal+-- parameters for instruments by Korg++module ChaseBliss.WarpedVinylHiFi where++  import qualified Sound.Tidal.Params+  import Sound.Tidal.Pattern++  -- ControlChange list++  ccn :: Pattern String -> ControlPattern+  ccn = Sound.Tidal.Params.ccn . (ccnList <$>)+  +  ccnList :: Num a => String -> a+  ccnList m =+    case m of+      "tone"                -> 14+      "lag"                 -> 15+      "mix"                 -> 16+      "rpm"                 -> 17+      "depth"               -> 18+      "warp"                -> 19+      "ramp"                -> 20++      "midiNoteDivisions"   -> 21+      "midiClockIgnore"     -> 51+      "tapSwitch"           -> 93++      "expression"          -> 100+      "bypassSwitch"        -> 102+      _                     -> 0