Skip to content

T
Tidal
Unverified Commit 0530869a by PLN (Algolia)
Options

tidal: Practice :)

parent 5b27888a
Showing with 39 additions and 45 deletions
live/midi/nova/ambient/contre_visite.tidal
...@@ -2,8 +2,8 @@ ...@@ -2,8 +2,8 @@
-- Un deuxième regard n'est jamais de trop. -- Un deuxième regard n'est jamais de trop.
do do
-- TRIGGER INTRO :) -- TRIGGER INTRO :)
-- resetCycles resetCycles
-- once $ "90s_synatm:8" # gain 0.94 # panbus 41 (range 0.2 0.5 saw) # room 0.4 # sz 0.94 once $ "90s_synatm:8" # gain 0.45 # panbus 41 (range 0.2 0.5 saw) # room 0.4 # sz 0.94
let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine))) let g = (whenmod 64 32 (# djfbus 2 (slow 32 $ range 0.5 0.18 cosine)))
let gF = 1.01 let gF = 1.01
let f1 = (# djfbus 1 (range 0.05 0.95 "^49")) let f1 = (# djfbus 1 (range 0.05 0.95 "^49"))
...@@ -58,7 +58,7 @@ d4 $ f2 -- Atmospheric synth: aerial questions ...@@ -58,7 +58,7 @@ d4 $ f2 -- Atmospheric synth: aerial questions
# pan 0.45 # pan 0.45
# crushbus 42 (range 16 3.4 "^53") # crushbus 42 (range 16 3.4 "^53")
# legato 2 # legato 2
# midiG' "^81" 0 1.7 # midiG' "^81" 0 1.2
d5 $ f2 -- Synth: ELECTRONIC ANSWERS d5 $ f2 -- Synth: ELECTRONIC ANSWERS
-- $ mask "<f!32 t!96>" -- Intro -- $ mask "<f!32 t!96>" -- Intro
$ midiOn "^90" (ply "1 <1!3 [0 1 <2 0> <0 2>]> <2!3 [[2 0] 1]> <1 2>" .slice 16 ("<0 1 2 3>*8" + "<0!4 4!4>")) $ midiOn "^90" (ply "1 <1!3 [0 1 <2 0> <0 2>]> <2!3 [[2 0] 1]> <1 2>" .slice 16 ("<0 1 2 3>*8" + "<0!4 4!4>"))
......
live/midi/nova/breaks/midnight_breaking.tidal
d1 $ ""
do
setcps (95/60/4)
let gDJF1 = (whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.1 0.4 saw)))
let g = gDJF1
d1 $ g
$ "k . k(<3!3 <2 4 8 [5 1]>>,8)" # "[808bd,808bd:2]"
# gain 1.3
d2 $ g $ ply "<1!3 2>" $ "~ cpu:3" # gain 1.4
d4 $ g
$ slice 4 "0 1 2 3"
$ n "<7!3 8>"
# "scratch_short"
# cut 4
# gain 1.1
d3
$ loopAt 1
$ "break:4"
# cut 3
-- LUNAR RESTART -- LUNAR RESTART
-- Lunar - et bim! l'esbrouffe
-- TODO: CBOW Kill melody, reboot alongside rhodes
-- TODO: Bassline Kill riff, reboot alongside rhodes
do do
setcps (110/60/4) setcps (110/60/4)
let modIndex = pF "modIndex" let modIndex = pF "modIndex"
...@@ -56,13 +30,14 @@ d2 $ g1 $ m -- BREAK ...@@ -56,13 +30,14 @@ d2 $ g1 $ m -- BREAK
# speed (range 0 2 "^52") # speed (range 0 2 "^52")
# cut 2 # cut 2
d4 $ g2 $ m -- Basse avec du repondant d4 $ g2 $ m -- Basse avec du repondant
-- $ midiOn "^57" (chop "8 1") $ midiOn "^57" (chop "8 1")
-- $ superimpose ((# cut 41) -- $ superimpose ((# cut 41)
-- . (|+| note "0*<1!3 2 1!3 4 2!4 4!4> 7(<5 5 3 3>,8)") -- . (|+| note "0*<1!3 2 1!3 4 2!4 4!4> 7(<5 5 3 3>,8)")
-- ) -- )
$ midiOn "^57" (superimpose ((# cut 41) $ chop 16
. (|+| note "[12 7]*4") -- $ midiOn "^57" (superimpose ((# cut 41)
)) -- . (|+| note "[12 7]*4")
-- ))
$ note (scale "aeolian" ( $ note (scale "aeolian" (
"<0 0 -2 <0 -4>>" "<0 0 -2 <0 -4>>"
) )
...@@ -73,12 +48,12 @@ d4 $ g2 $ m -- Basse avec du repondant ...@@ -73,12 +48,12 @@ d4 $ g2 $ m -- Basse avec du repondant
# cut 4 # cut 4
# pan 0.2 # pan 0.2
# midiG' "^81" 0 1.7 # midiG' "^81" 0 1.7
d5 $ g2 $ m -- Rhodes piano questionnant d6 $ g2 $ m -- Rhodes piano questionnant
-- $ midiOn "^58" (superimpose ( $ midiOn "^58" (superimpose (
-- (# cut 51) (# cut 51)
-- . (|+| note "~ 12(<1 1 2 1 2 5 2 1 2 2 5 2 2 4 3 8>,8)") . (|+| note "~ 12(<1 1 2 1 2 5 2 1 2 2 5 2 2 4 3 8>,8)")
-- . (|* gain 0.9) . (|* gain 0.9)
-- )) ))
$ struct "t*4" $ struct "t*4"
$ note (scale "aeolian" (arp "up" ("<c'min'4!2 d'min'4 f'min'4>")) $ note (scale "aeolian" (arp "up" ("<c'min'4!2 d'min'4 f'min'4>"))
- 12 - 12
...@@ -90,14 +65,13 @@ d5 $ g2 $ m -- Rhodes piano questionnant ...@@ -90,14 +65,13 @@ d5 $ g2 $ m -- Rhodes piano questionnant
# pan 0.8 # pan 0.8
d5 -- NES arps d5 -- NES arps
$ (# crush 4) $ (# crush 4)
$ midiOn "^58" (struct "t . t(3,8)") $ midiOn "^59" (struct "t . t(3,8)")
$ g2 $ g2
$ slow 2 $ slow 2
$ chop "<8!8 4!8 2!8 1!8>" $ chop "<8!8 4!8 2!8 1!8>"
$ splice 16 ("<0 1 2 3>" + (slow 8 $ "<0 4 8 12>")) $ splice 16 ("<0 1 2 3>" + (slow 8 $ "<0 4 8 12>"))
$ "synth_nes:0" $ "synth_nes:0"
# cut 5 # cut 5
-- # speed 0.5
# midiG' "^83" 0 1.4 # midiG' "^83" 0 1.4
# pan 0.8 # pan 0.8
d4 -- Basse frere d4 -- Basse frere
......
live/midi/nova/fusion/shape_of_foo.tidal
...@@ -50,15 +50,19 @@ d5 $ gF2 ...@@ -50,15 +50,19 @@ d5 $ gF2
# pan 0.33 # pan 0.33
# midiG' "^81" 0 2 # midiG' "^81" 0 2
d4 $ gF2 d4 $ gF2
$ superimpose (|- note 12) $ sometimesBy "^18" ( ( -- FIXME
(|+ note (12 + 2))
. (# "cbow:8") . (# cut 41) . (|* gain 0.8)
))
$ midiOn "^58" (mask "t f f f" . (# room 0.5)) $ midiOn "^58" (mask "t f f f" . (# room 0.5))
$ note ("<cs!3 ds> ~ ~ <e!3 cs> ~ ~ <cs!3 b4> ~" $ note ("<cs!3 ds> ~ ~ <e!3 cs> ~ ~ <cs!3 b4> ~"
-1 -- Drift back to unison -1 -- Drift back to unison
) # "808mc:3" ) # "808mc:3"
# crushbus 41 (range 16 1.2 "^54")
# midiG' "^82" 0 2 # midiG' "^82" 0 2
# dry 0.95 # dry 0.95
# sz 0.9 # sz 0.9
d6 -- CHOIR d6 $ gF2 -- CHOIR
$ midiOn "^59" (superimpose ( $ midiOn "^59" (superimpose (
whenmod 32 24 (ply 4) whenmod 32 24 (ply 4)
. struct ("t@3 t@3 <t [t ~]>@2") -- Longer . struct ("t@3 t@3 <t [t ~]>@2") -- Longer
...@@ -82,7 +86,7 @@ d7 -- Dem Maracas ...@@ -82,7 +86,7 @@ d7 -- Dem Maracas
$ someCyclesBy "<1!16 0!16>" (often $ slow "2!3 1") $ someCyclesBy "<1!16 0!16>" (often $ slow "2!3 1")
$ "hh27*8" $ "hh27*8"
# n "2 <2 <[2|9] [9 <9 ~> <~ 9> 2]>>" # n "2 <2 <[2|9] [9 <9 ~> <~ 9> 2]>>"
# crushbus 51 (range 16 4.2 "^20")
# room "^36" # room "^36"
# note (range "-24" "0" "^20") # note (range "-24" "0" "^56")
# crushbus 51 (range 16 4.2 "^56")
# midiG' "^84" 0 1.3 # midiG' "^84" 0 1.3
live/midi/nova/party/blues_machine.tidal 0 → 100644
do
setcps (100/60/4)
d1 $ "cpu2" # gain 0.9
-- d2 $ "~ s ~ s" # "snare:32" # gain 0.8
d4
$ chop 16
$ "b/4"
# "blues_elmore"
-- # n "<6!8 7!8>"
# n 6
# cut 4
# midiG' "^81" 0 1.2
once $ "blues_elmore:6" # gain 0.8 # cut 4
once $ "break"
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