From 246cbdc499b2a2e6ed2c0dff7e25cde5b8e2c918 Mon Sep 17 00:00:00 2001 From: Paul-Louis NECH Date: Wed, 6 Jul 2022 10:21:52 +0200 Subject: [PATCH] feat: Rainbow race --- debug.tidal | 26 ++++++++++++++++++++++++++ live/collab/raph/rainbow_race.tidal | 54 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ live/midi/nova/breaks/midnight_breaking.tidal | 154 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ study/samples/chip.tidal | 5 +++++ 4 files changed, 239 insertions(+) create mode 100644 debug.tidal create mode 100644 live/collab/raph/rainbow_race.tidal create mode 100644 live/midi/nova/breaks/midnight_breaking.tidal create mode 100644 study/samples/chip.tidal diff --git a/debug.tidal b/debug.tidal new file mode 100644 index 0000000..29cd34e --- /dev/null +++ b/debug.tidal @@ -0,0 +1,26 @@ +do +setcps (100/60/4) +let g = whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.1 saw)) +d1 $ g + $ fix (# att 0) "909" + $ "k*<2!16 1!16> . ,8)>!16>" + # "[jazz,909]" + # gain 1.2 +d2 $ g $ "~ cp" # gain 0.8 # lpf 2000 +d3 $ g + $ note (scale "aeolian" ("" + arp "up" "c4'min'4")) + # "distortedGuitar" +d4 $ g + $ slice 4 ("0 1 2 <0 1 2 3>") + $ "break:0" + # cut 4 + # gain 0.8 +d5 + $ whenmod 32 16 (off 0.5 ((# cut 52) . (# crush 5))) + $ superimpose ((# cut 51) . (ply 4) . (|+ note 12) . (# pan 0.8)) + $ note (scale "aeolian" ("<0 [3@3 <2!3 4>]>") + - 12) + # "bassWarsaw" # gain 0.6 + # room 0.4 + # pan 0.2 + # sz 0.8 diff --git a/live/collab/raph/rainbow_race.tidal b/live/collab/raph/rainbow_race.tidal new file mode 100644 index 0000000..026d337 --- /dev/null +++ b/live/collab/raph/rainbow_race.tidal @@ -0,0 +1,54 @@ +do +setcps (160/60/4) +let g1 = ( # djfbus 1 (range 0.05 0.95 "^49")) +let g2 = ( # djfbus 2 "^50") +-- let g1 = id +-- let g2 = id +d1 $ g1 + $ superimpose ( + (# att 0.08) . (# rel 0.05) + . (# "drums_atari") . (# cut 1) . (|* gain "^30")) + $ midiOn "^41" (slow 2) + $ midiOn "^42" (<| "k k k ") + $ midiOff "^42" (<| "k ~ <~ k> k . ~ ~ <~ k> ~") + $ "kick:5" + # midiG' "^78" 0 1 +d2 + $ midiOn "^75" (sometimesBy "0!3 <0!3 1>" (fast 2) . fast 2 . (|* speed 2)) + $ g1 $ chop 16 $ loopAt 2 $ "break:15" + # cut 2 + # midiG' "^79" 0 1.5 +d3 $ g2 + $ midiOn "^44" (mask "f(5,8)") + $ midiOn "^76" (ply "2 <2!3 4>") + $ "drum:2*[8 <8 [8!3 16] 8 [16 32]>]" + -- # cut 3 + # pan (slow 16 $ range 0.2 0.8 (sine + perlin)) + # midiG' "^80" 0 1 +d4 $ g2 + $ midiOff "^90" (mask "t(<8!4 8 [8 16] 8 [8c4 . 32 16]>,32)") $ chop 32 + $ slice 8 "<0 1 2 3 4 5 6 7>" + $ "synth_nes:0" + # cut 4 + # gain 0.65 + # room 0.4 + # pan 0.8 + # squizbus 4 (range 0 16 "^54") + # midiG' "^82" 0 1 +d5 $ g2 + $ note ("0(3,8) <7!3 [12 <7 7 7 7>]>*<1!3 2>" + ">") + # "bassWarsaw" + # crushbus 5 (range 16 2 "^53") + # ampbus 52 (range 0 0.94 ("^81" * "^77")) + + + +-- GRAVEYARD +d2 $ g1 + $ midiOn "^43" (ply 2) + $ slice 8 "2" + $ "drums_gameboy" + # n (slow 4 $ "<6 5>") + # pan 0.8 + # cut 2 + # midiG' "^79" 0 1 diff --git a/live/midi/nova/breaks/midnight_breaking.tidal b/live/midi/nova/breaks/midnight_breaking.tidal new file mode 100644 index 0000000..c6c030c --- /dev/null +++ b/live/midi/nova/breaks/midnight_breaking.tidal @@ -0,0 +1,154 @@ +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 - et bim! l'esbrouffe +-- TODO: CBOW Kill melody, reboot alongside rhodes +-- TODO: Bassline Kill riff, reboot alongside rhodes + +do +setcps (110/60/4) +let modIndex = pF "modIndex" +let gDJF = (# djfbus 1 (range 0.15 0.85 "^49")) +let mBreak = (midiOn "^41" (mask "t f . f t")) +let g1 = (# djfbus 1 (range 0.02 0.98 "^49")) +let g2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let m = mBreak +d1 $ g1 -- + $ midiOn "^42" (<| "k k k k]>") + $ midiOff "^42" (<| "k . ~ k*<1!3 2 2 2 1 2> <~ ~ k >") + $ "[jazz,hh:5]" + -- # release "<0.7!3 1>" + # midiG' "^78" 0 1.9 +d3 $ g1 $ m -- Clap contretemps stable + $ superimpose ((# lpf 2000) . (# "cp:0")) + $ "~ clap:1" + # room 0.8 # sz 0.6 # dry 0.9 + # midiG' "^79" 0 1.0 +d2 $ g1 $ m -- BREAK + $ midiOn ("^44" - "^76") (ply 2) + $ midiOn "^76" (striate 2) + $ loopAt 2 + $ whenmod 8 6 (off "h" id . mask "t . f") + $ slice 8 (run 8) + $ "break" # n "<13!12 14!4 15!16>" + # midiG' "^80" 0 2 + # speed (range 0 2 "^52") + # cut 2 +d4 $ g2 $ m -- Basse avec du repondant + -- $ midiOn "^57" (chop "8 1") + -- $ superimpose ((# cut 41) + -- . (|+| note "0*<1!3 2 1!3 4 2!4 4!4> 7(<5 5 3 3>,8)") + -- ) + $ midiOn "^57" (superimpose ((# cut 41) + . (|+| note "[12 7]*4") + )) + $ note (scale "aeolian" ( + "<0 0 -2 <0 -4>>" + ) + - 24 + ) + # "bassWarsaw" + # crushbus 4 (range 16 1.5 "^53") + # cut 4 + # pan 0.2 + # midiG' "^81" 0 1.7 +d5 $ g2 $ m -- Rhodes piano questionnant + -- $ midiOn "^58" (superimpose ( + -- (# cut 51) + -- . (|+| note "~ 12(<1 1 2 1 2 5 2 1 2 2 5 2 2 4 3 8>,8)") + -- . (|* gain 0.9) + -- )) + $ struct "t*4" + $ note (scale "aeolian" (arp "up" ("")) + - 12 + ) + # "FMRhodes1" + # midiG' "^82" 0 2 + # modIndex (range 0.1 32 "^54") + # cut 5 + # pan 0.8 +d5 -- NES arps + $ (# crush 4) + $ midiOn "^58" (struct "t . t(3,8)") + $ g2 + $ slow 2 + $ chop "<8!8 4!8 2!8 1!8>" + $ splice 16 ("<0 1 2 3>" + (slow 8 $ "<0 4 8 12>")) + $ "synth_nes:0" + # cut 5 + -- # speed 0.5 + # midiG' "^83" 0 1.4 + # pan 0.8 +d4 -- Basse frere + $ g1 $ m + $ mask "t . t" + $ chop 4 + $ splice 32 ("<0!8 2!8>" + "<0!4 4!4 8!4 12!4>") + $ "synth_nes:0" + # cut 4 + # pan 0.2 + # room 0.4 + # midiG' "^81" 0 1.7 + + + + +d4 -- NES BASS! + $ chop 16 + $ loopAt 8 + $ "bass_nes" # n "<0!4 1!8 2!4>" + # cut 4 + -- # gain 0.6 + # midiG' "^81" 0 2 + + + +d5 $ "bass_gameboy/2" # gain 0.6 + + +d1 $ loopAt 16 $ "drums_gameboy:0" # cut 1 # gain 0.9 + + +do +setcps (110/60/4) +let modIndex = pF "modIndex" +let gDJF = (# djfbus 1 (range 0.15 0.85 "^49")) +let mBreak = (midiOn "^41" (mask "t f . f t")) +let g1 = (# djfbus 1 (range 0.02 0.98 "^49")) +let g2 = (# djfbus 2 (range 0.05 0.95 "^50")) +let m = mBreak +d1 $ g1 -- + $ midiOn "^42" (<| "k k k k]>") + $ midiOff "^42" (<| "k . ~ k*<1!3 2 2 2 1 2> <~ ~ k >") + $ "[jazz,hh:5]" +d2 $ "~ cp" + # gain 0.9 +d3 $ "drum:2*[4!3 [4 <4 8 16 8>]]" # gain 1.1 +d4 $ g2 + $ slice 4 ("<0 1 2 3>") + $ "synth_gameboy:2" + # cut 4 # gain 0.65 +d5 $ "breaks" + +d8 $ "90s_glassatm:1/2" # cut 8 # gain 0.9 diff --git a/study/samples/chip.tidal b/study/samples/chip.tidal new file mode 100644 index 0000000..90b5e38 --- /dev/null +++ b/study/samples/chip.tidal @@ -0,0 +1,5 @@ +once $ "drums_atari" # gain 0.8 # cut 3 + + + +-- d2 $ "~ cp" # gain 0.8 -- libgit2 0.27.0