Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- module Sound.Tidal.MidiRack3 where
- import Sound.Tidal.Params
- import Sound.Tidal.MIDI.Control
- (perf1, perf1_p) = pF "perf1" (Just 0.5)
- (perf2, perf2_p) = pF "perf2" (Just 0.5)
- (tun, tun_p) = pF "tun" (Just 0.5)
- rackController :: ControllerShape
- rackController = ControllerShape { controls = [
- mCC perf1_p 35,
- mCC perf2_p 36,
- mCC tun_p 16
- ],
- latency = 0.1
- }
- rack = toShape rackController
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement