supercollider-midi 0.2 → 0.2.1
raw patch · 3 files changed
+15/−13 lines, 3 filesdep ~alsa-seqdep ~arraydep ~midi
Dependency ranges changed: alsa-seq, array, midi, midi-alsa, transformers
Files
- src/Sound/SC3/MIDI/Keyboard.hs +5/−3
- src/Sound/SC3/MIDI/Utility.hs +1/−1
- supercollider-midi.cabal +9/−9
src/Sound/SC3/MIDI/Keyboard.hs view
@@ -52,7 +52,7 @@ soundPing = sinOsc AR (2*frequency) 0 * xLine KR 1 0.1 1 PauseSynth *- 0.15 * 4 ** control KR "Velocity" 0+ control KR "Volume" 1 * 0.15 * 4 ** control KR "Velocity" 0 programPing :: ProgramSound programPing = ProgramSound "Ping" soundPing 2@@ -66,7 +66,9 @@ soundString :: UGen soundString = let n = 5- volume = 0.2 * 4 ** control KR "Velocity" 0 / sqrt (fromIntegral n)+ volume =+ control KR "Volume" 1 * 0.2 *+ 4 ** control KR "Velocity" 0 / sqrt (fromIntegral n) detunes = normalizeLevel 1 $ take (2*n) $ randomRs (0,0.03) $ mkStdGen 912@@ -350,7 +352,7 @@ fromMaybe (return ()) $ lookup ctrl $ (VoiceMsg.mainVolume,- controlChange chan "Volume" id value) :+ controlChange chan "Volume" ((/4) . (16**)) value) : (VoiceMsg.modulation, controlChange chan "Modulation" (*0.03) value) : []
src/Sound/SC3/MIDI/Utility.hs view
@@ -35,4 +35,4 @@ startMessage :: String startMessage = "use 'aconnect -i' to find out the ports from where note messages can be received\n" ++- "and connect the source with this program using 'aconnect' or 'patchage' or 'alsa-patch-bay'\n"+ "and connect the source with this program using 'aconnect', 'kaconnect', 'patchage' or 'alsa-patch-bay'\n"
supercollider-midi.cabal view
@@ -1,5 +1,5 @@ Name: supercollider-midi-Version: 0.2+Version: 0.2.1 License: GPL License-File: LICENSE Author: Henning Thielemann <haskell@henning-thielemann.de>@@ -31,20 +31,20 @@ opensoundcontrol-ht >=0.1 && <0.2, hsc3 >=0.8 && <0.9, hosc >=0.8 && <0.9,- alsa-seq >=0.5 && <0.6,+ alsa-seq >=0.5 && <0.7, data-accessor >=0.2.1 && <0.3,- midi-alsa >=0.1.1 && <0.2,- midi >=0.1.4 && <0.2,+ midi-alsa >=0.1.1 && <0.3,+ midi >=0.1.4 && <0.3, event-list >=0.0.6 && <0.2, non-negative >=0.0.1 && <0.2, data-accessor-transformers >=0.2 && <0.3, data-accessor >=0.2 && <0.3,- transformers >=0.2 && <0.3,+ transformers >=0.2 && <0.4, utility-ht >=0.0.5 && <0.1 If flag(splitBase) Build-Depends:- array >=0.1 && <0.4,+ array >=0.1 && <0.5, containers >=0.1 && <0.5, random >=1.0 && <2.0, base >=2 && <5@@ -61,10 +61,10 @@ Build-Depends: hsc3 >=0.8 && <0.9, hosc >=0.8 && <0.9,- alsa-seq >=0.5 && <0.6,+ alsa-seq >=0.5 && <0.7, data-accessor >=0.2.1 && <0.3,- midi-alsa >=0.1.1 && <0.2,- midi >=0.1.4 && <0.2,+ midi-alsa >=0.1.1 && <0.3,+ midi >=0.1.4 && <0.3, event-list >=0.0.6 && <0.2, non-negative >=0.0.1 && <0.2