Skip to content

T
Tidal
Commit 8bb6e59b by PLN (Algolia)
Options

solar: Practice

parent 154ca23d
Showing with 18 additions and 14 deletions
live/midi/nova/breaks/solar.tidal
...@@ -5,24 +5,26 @@ once $ "dr" # gain 1 ...@@ -5,24 +5,26 @@ once $ "dr" # gain 1
do do
setcps (110/60/4) setcps (110/60/4)
let modIndex = pF "modIndex" let modIndex = pF "modIndex"
let gDJF1 = (# djfbus 1 (range 0.15 0.85 "^49")) let gDJF1 = (# djfbus 1 (range 0.10 0.80 "^49"))
let gDJF2 = (# djfbus 2 (range 0.15 0.85 "^29")) let gDJF2 = (# djfbus 2 (range 0.05 0.95 "^29"))
let mBreak = (midiOn "^41" (mask "t f . f <f!4 t!4> <f!2 t!6> t")) let mBreak = (midiOn "^41" (mask "t f . f <f!4 t!4> <f!2 t!6> t"))
let g1 = (gDJF1) let g1 = (gDJF1)
let g2 = (gDJF2) let g2 = (gDJF2)
let m = mBreak let mDegrade = (midiOn "^73" (chop 4))
let m = mBreak . mDegrade
d1 $ g1 $ m -- d1 $ g1 $ m --
$ mask "<f!4 t!12>" $ mask "<f!4 t!12>"
$ fix (# cut 1) ("808bd")
$ midiOn "^42" (<| "k k k <k [<~ k> k]>") $ midiOn "^42" (<| "k k k <k [<~ k> k]>")
$ midiOff "^42" (<| "k . ~ <k k ~ ~> k*<1!3 2 2 2 1 2> <~ ~ k <k ~>>") $ midiOff "^42" (<| "k . ~ <k k ~ ~> k*<1!3 2 2 2 1 2> <~ ~ k <k ~>>")
-- $ "[jazz,super808]" $ "[jazz,<808bd:2!6 <808bd:2 808bd:1> 808bd:1>,hh:5]"
$ "[reverbkick]"
# midiG' "^78" 0 1.3 # midiG' "^78" 0 1.3
d3 $ g1 $ m -- Snare d3 $ g1 $ m -- Snare
$ mask "<f!3 [f t] t!8 [t f]!4>" $ mask "<f!3 [f t] t!8 [t f]!4>"
-- $ fast "<1!4 2!10 4 [4 8]>" -- $ fast "<1!4 2!10 4 [4 8]>"
$ s "~ s ~ s" $ s "~ s ~ s"
# "sn" # "sn"
# speed (range 0 2 "^51")
# n "[14,20]" # n "[14,20]"
# note "<0!7 -4>" # note "<0!7 -4>"
# midiG' "^79" 0 1.4 # midiG' "^79" 0 1.4
...@@ -33,16 +35,21 @@ d2 $ g1 $ m -- BREAK ...@@ -33,16 +35,21 @@ d2 $ g1 $ m -- BREAK
$ whenmod 8 6 (off "h" id . mask "t . f") $ whenmod 8 6 (off "h" id . mask "t . f")
$ slice 8 (run 8) $ slice 8 (run 8)
$ "break:11" $ "break:11"
# octerbus 20 (range 0 1.5 "^52") # hpf 500
# octersubbus 21 (range 0 1.82 "^52") # octerbus 20 (range 0 0.25 "^52")
# midiG' "^80" 0 1.2 # octersubbus 21 (range 0 1.2 "^52")
# octersubsubbus 22 (range 0 1.2 "^52")
# midiG' "^80" 0 1
# cut 2 # cut 2
d4 $ g1 $ m -- Drum/hh roll! d4 $ g1 $ m -- Drum/hh roll!
$ sometimesBy 0.2 (fast "1 <1 2>") $ midiOn "^57" (# "drum:2")
$ "d*[8!3 <<8 [8 [8|16]]>!6 [8 4]!2>]" # "[drum:2,db:2,db:7?]" $ midiOn "^89" (fast "2 . <2!3 4>")
$ "d <d!3 d*2> d*<1 2> [d . <d ~> d]"
# "hh:8"
# room "^53" # room "^53"
# dry 0.99 # dry 0.99
# midiG' "^81" 0 1.4 # cut 4
# midiG' "^81" 0 1
d5 $ g2 d5 $ g2
$ midiOn "^58" (superimpose ( $ midiOn "^58" (superimpose (
(|+| note ( (|+| note (
...@@ -79,9 +86,6 @@ d9 $ g1 $ m ...@@ -79,9 +86,6 @@ d9 $ g1 $ m
# midiG' "^84" 0 1.7 # midiG' "^84" 0 1.7
once $ "cbow:3" # gain 0.57 # cut 21
-- TODO MOVE OR REMOVE -- TODO MOVE OR REMOVE
d7 $ g2 -- Back bows: dissonant now, not the best angels I ever saw d7 $ g2 -- Back bows: dissonant now, not the best angels I ever saw
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment