Skip to content

T
Tidal
Commit ac853b0c by PLN (Algolia)
Options

I should commit more often dang

parent 6e4f0060
Showing with 1973 additions and 225 deletions
live/ambient/wild_coffee.tidal
......@@ -17,7 +17,7 @@ let sus = pF "sus"
let cutoff = pF "cutoff"
d1 $ gF1 $ gMute -- la Conviction
$ midiOn "^41" (<| "k k k <k!3 k*2>")
$ midiOn ("^42" - "^41") (<| "<k k(<3!3 [3 5]>,8)>")
$ midiOn ("^42" - "^41") (<| "<k k(<3!3 [3 5]>,8)>")
$ midiOff ("^41" + "^42") (<| "<k ~>")
$ "[techno:0,808bd:2,909,kick:4]"
# lpf 200
......
live/bdmania.tidal
......@@ -16,6 +16,7 @@ $ every 16 (# gain 0)
$ s "bd(5,8)"
# note "<50 <55 <60 65>>>"
# pan 0.8
# gain 1.3
d3 -- vibration montante!
$ sometimesBy 0.01 (# crush 4)
......
live/boeuf/_clock.tidal
......@@ -14,4 +14,4 @@ p "midictl" $ silence
let hush = mapM_ ($ silence) [d1,d2,d3,d4,d5,d6,d7,d8,d9,d10,d11,d12,d13,d14,d15,d16]
-- You will probably find that the downbeats for SuperDirt and your MIDI devices don't align. As a starting point, set MIDI latency in supercollider to 0:
~midiOut.latency = 0;
~midiOut.latency = 0.32;
live/boeuf/biarritz/21nuit.tidal 0 → 100644
do
-- resetCycles
let gF1 = (# djfbus 1 (range 0.1 0.9 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d8 $ gF1 $ gM1
$ loopAt 1
$ chop 8
$ midiOn "^56" (# n 45)
$ "jungle_breaks:22"
# cut 8
# gain 1.1
live/boeuf/biarritz/blues_debranche.tidal 0 → 100644
-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
do
setcps (60/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [f <t f>]>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (fast 2 . (<| "k k k <k [~ k] k k*[4 2]>"))
$ midiOff "^42" (<| "k . k(3,8)")
-- $ "[techno:0,808bd:2,909,kick:4]"
$ "jazz"
# midiG' "^78" 0 1.5
d2 $ gF1 $ gM1
$ fast 2
$ "~ s ~ s*<1!3 2>"
# "snare:24"
# midiG' "^79" 0 1.5
d3 $ gF1 $ gM1
$ midiOn "^76" (fast "<2 2 2 4>")
$ midiOn "^42" (fast 2)
$ "hh(3,8)"
# midiG' "^80" 0 2
d4 $ gF2 $ gM3
-- $ superimpose ((# cut 41) .struct "[t(3,8)]")
$ note ("<e4 [e4@7 g4] [e4@7 ef4] <[e4@3 [g4 f4]] [e4 g4 a4 g4]>>" - 12)
# "bassWarsaw"
# midiG' "^81" 0 1.5
# crushbus 41 (range 16 2.5 "^53")
# octersubbus 42 (range 0 2.5 "^33")
# cut 4
# room 0.4 # sz 0.7
d5 $ gF2 $ gM3
$ midiOn "^57" (chop 8)
$ midiOn "^89" (chop 8)
$ "blues_guitar_bluesky_60:6/2"
# gain 0.76 # cut 4
# midiG' "^80" 0 1.5
# crushbus 51 (range 16 2.5 "^54")
# octersubbus 52 (range 0 2.5 "^34")
d7 $ gF1 $ gM1
$ loopAt 2
-- $ chop 16
$ slice 4 "0 <~!4 1!4> <~!8 2!8> 3"
$ "break:3" # cut 7
# pan 0.2
# midiG' "^83" 0 1.6
d11 $ gF3 $ gM3
$ "blues_guitar_birdy_120:7/2"
# cut 5
# midiG' "^14" 0 1.5
d8 $ gF1 $ gM1
-- $ slice 4 "0 1 2 3"
$ loopAt 1
$ chop 4
$ "jungle_breaks:45"
# pan 0.8
# cut 8 # gain 1.2
# midiG' "^84" 0 1.5
once $ "blip"
live/boeuf/biarritz/cloud.tidal 0 → 100644
-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
do
setcps (138/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [f <t f>]>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k k")
$ midiOff "^42" (<| "k . k(<3!3 [5 5 8 5]>,8)")
$ "[techno:0,808bd:2,909,kick:4]"
-- $ "jazz"
d2 $ gM1 -- Clap timer
$ midiOn "^43" ((|* gain "0 1 0.8 1") . (<| "~ c <~!3 [~ c]> c"))
$ midiOff "^43" ((|* gain "1 0.8") . (<| "c . ~ ~ ~ <~!3 c>"))
$ drumFrom "[sakatadpm48,rolandr8]" "cp"
# lpf 2000
# gain 1.2
d4 $ "90s_matrix:0/4" # cut 4
d7 $ "90s_synatm:0" # cut 7
live/collab/baba/sept1.tidal
-- /home/pln/Downloads/PerfectSunriseLoop.gif
-- url: "/home/pln/Downloads/PerfectSunriseLoop.gif"
-- À Mon Amour
-- <3
do
-- resetCycles
setcps (120/60/4)
......@@ -26,8 +29,7 @@ d1 $ gF1 $ gM2
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "[snare:22]"
-- # note "-2"
$ "[snare:24]"
# gain 1.4
d3 $ gF1 $ gM1 -- Cymbales sol
$ midiOn "^44" (<| "~ cy ~ cy ~ cy ~ <cy [~ cy]>")
......@@ -35,28 +37,35 @@ d3 $ gF1 $ gM1 -- Cymbales sol
$ "cy" # "<cy:1!6 cy:2!2>" # "h2ogmcy"
|* gain (range 1.1 0.8 perlin)
|* legato (range 0.5 2 (fast 2 perlin))
d4 $ gF2 $ gM3
d4 $ gF2 $ gM3 -- Bassline faite main avec un violoncelle californien
$ midiOn "^89" (struct "t*16")
$ midiOn "^57" (struct "t(<3 5 5 7>,8)")
$ note ("<<[b3@5 a3 b3 a3] <[b3@7 a3] [b3@5 d4@2 a3]>> [e3@7 b3]>")
# stack [
"bass" # lpf 500,
"bass" # cut 41 # crushbus 41 (range 16 4.5 "^53") # bandf 500 # gain 1.2,
""]
# "cpluck" |+ note 12
# octerbus 42 (range 0 0.8 "^33")
-- # octersubbus 43 (range 0 2.5 "^33")
# cut 41
# lpf 20000
d5 $ gF3 $ gM3 -- Piano nostalgique, temps inexorable
-- $ midiOn "^"
$ stack [
midiOn "^58" (# silence) $ slow 2 "<begin ~ begin ~ begin ~ ~ ~>/2" # cut 51 # begin 0 # end 0.2 # pan 0.4, -- Main piano
midiOn "^58" (# silence) $ slow 2 "<~ mid ~ mid ~ mid ~ ~>/2" # cut 52 # begin 0.25 # end 0.6 # pan 0.4, -- side piano
"<~!24 end!8>" # begin 0.75 # end 1 # cut 53 # gain 0.8 # pan 0.9, -- ENDING <3
midiOff "^58" (# silence) $ (0.25 ~>) $ (# hpf 1200) ("<p1 ~>") # cut 54, -- Filtered delayed echoes
-- midiOff "^58" (# silence) $ (0.25 ~>) $ (# hpf 1200) ("<p1 ~>") # cut 54, -- Filtered delayed echoes
""
]
# "rhadamanthe_melo:1"
# crushbus 51 (range 16 2.7 "^54")
# room 0.4
d6 $ gF1 $ gM1 $ chop 8
# gain 1.3
d6 $ gF1 $ gM1 $ chop 8 -- Je t'avais oublie toi <3
$ loopAt 1
-- Je t'oublie trop souvent :(
$ "breaks165"
# cut 6
d8 $ gF1 $ gM1 -- Break multi-facette, assez complexe, comme chacun d'entre nous
......@@ -67,6 +76,7 @@ d8 $ gF1 $ gM1 -- Break multi-facette, assez complexe, comme chacun d'entre nous
$ chop 16
$ loopAt 2
$ "jungle_breaks:1" # cut 8
# gain 0.8
d9 $ gF3 $ gM3
$ note ("<e e c b4>/2" - "e")
# "rhadamanthe_melo:4"
......@@ -76,7 +86,7 @@ d9 $ gF3 $ gM3
# room 0.4 # lpf 2000
d11 $ gM3 $ gF3-- Intro doux piano
$ gF3
$ (slice 2 "0*2")
$ whenmod 8 6 (slice 2 "0*2")
-- . (# att 0.02) . (# sus 2) . (# rel 4) . (# legato 4)
$ chop 8
$ "nujazz_keys120:35/4"
......@@ -86,3 +96,4 @@ d11 $ gM3 $ gF3-- Intro doux piano
# delayt ("<2!3 3>"/3)
# delayfb 0.5
# gain 1.3
d12 $ "hh(3,8) hh(3,8)" # "h2ogmhh"
live/collab/ccc/ghosts_in_the_toilets.tidal
......@@ -18,9 +18,8 @@ d1 $ gMute2 $ gF1 -- Kick solide
$ midiOn "^42" (struct "t t t t*<1!6 2 2>")
$ midiOff "^42" (<| "k . ~ k ~ <~!3 <k ~>>")
$ "[jazz,kick:4]"
# gain 1.2
-- # midiG' "^78" 0 1.5
d2$ gMute1 $ gF1 -- snare contretemps variable
# gain 1.5
d2 $ gMute1 $ gF1 -- snare contretemps variable
$ fix ((|* gain 0.8) . (# legato 0.05)) "cp"
$ midiOn "^43" (<| "~ cp [~!3 <~!3 cp>] cp*<1 1 2 <1 2>>")
$ midiOff "^43" (<| "~ [cp*<1!3 <2 <4 [4 2]>>> ~]")
......@@ -28,6 +27,7 @@ d2$ gMute1 $ gF1 -- snare contretemps variable
# pan 0.65
-- # legato 0.22
d3 $ gM1 $ gF1
$ midiOn "^44" (ply "1 1 2 <1 2>")
$ "~ d ~ d ~ d ~ <d!12 [~ d]!3 [d d]>"
# "snare:34"
# hpf 7000
......@@ -59,12 +59,12 @@ d4 $ gF2 $ gM3 -- BASSLINE
# dry 1 # sz 0.8
d7 $ gF2 $ gM3 -- ACID BASS TODO REWORK WITH RAPH
$ slow 2 $ midiOff "^59" (
-- (|+ note "<0 12>") .
(|+ note "<0 12>") .
mask "<[t f]!0 t(<1!3 [1 4]>,4)!0 t([<8!3 <4 16>> <8!3 16>],16)>")
$ stack [
-- n "<30!16 31!16>" # "vec2_synth_acid" # gain (range 1.1 0 ("^55" + "^35")),
-- "vec1_acid:40" # hpf 200 # gain (range 0.6 1.1 "^55"),
"vec1_acid:39" # hpf 200 # gain (range 0 1.4 "^35"), -- TODO BONUS ACID
"vec1_acid:40" # hpf 200 # gain (range 0.6 1.1 "^55"),
-- "vec1_acid:39" # hpf 200 # gain (range 0 1.4 "^35"), -- TODO BONUS ACID
-- # octer 1.1
-- ,
""
......
live/collab/jane/drifting_soul.tidal
do
setcps (80/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [f <t f>]>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
......@@ -10,26 +9,20 @@ let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gMute2
$ superimpose (
(# lpf 20)
. (# octer 0.5)
-- . (# smear 0.2)
)
$ fix (# lpf 150) "jazz"
$ "k . ~ k ~ <k k*[4 2]>"
# "[808bd:6,jazz]" -- Doux
# gain 1.2
# "[808bd:2,jazz,techno]" -- Doux
# gain 1.5
d2 $ gF1 $ gM1 $ "~ s ~ [s*<1!3 2> ~]"
# "[snare:70,sn:24]"
# gain 1.4
# lpf 4000
d3 $ gF1 $ gM1 $ "d(3,8) d(3,8)"
# "drum:2" # gain 2 # cut 3 -- Drill that Baby
d5 $ gF3 $ gM3
d3 $ gF1 $ gM1 $ "d(3,8) d(<3!3 5>,8)"
# "drum:2" # "h2ogmhh:1" # gain 1.2 # cut 3 -- Drill that Baby
d5 $ gF3 $ gM3 -- Jane's Piano
$ midiOn "^90" (ply "<4 2 1 2> <2 [1 8]>")
$ midiOn "^58" (slice 4 "<0 1 2 <3 <2 1>>>*4")
$ gF2 $ gM2
$ n "<0!8 1!3 0 1!3 1*4>" -- FIXME: I'd like to let her develop more
$ n "<0!8 1!3 0 1!3 1*4>" -- TODO: I'd like to let her develop more
-- $ n "<0 ~>"
# "jane_wang"
# cut 5
......@@ -43,7 +36,8 @@ d4 $ gF2 $ gM3 -- Cello bass
|* gain "<[1@7 0.9] 1 1 1>"
# pan (slow 16 $ range 0.45 0.6 saw)
# "cpluck"
d12 $ gM3 $ gF3
# gain 1.2
d11 $ gM3 $ gF3
$ note (
"<[~ cs ~ cs] [~ fs ~ fs] [~ bf ~ bf] [~ gs@3 ~ cs@2 [gs fs]]>"
+ "<0 0 0 [0 <0 12>]>" + "<0!14!8 12!8>"
......@@ -58,8 +52,8 @@ d12 $ gM3 $ gF3
# gain 1.2
d7 $ gF1 $ gM1 -- SCRATCH
$ midiOn "^91" (ply "2 4 <8 8 4 16>")
$ midiOn "^55" (# n 15)
$ midiOn "^59" (# n 15)
$ midiOn "^55" (# n 13)
$ midiOn "^59"(# n 15)
$ chop 16
$ loopAt 4
$ "scratch_long:12"
......@@ -71,6 +65,7 @@ d8 $ gF1 $ gM1
$ midiOn "^92" (ply 4)
$ loopAt 2
$ chop 16
$ midiOn "^36" (loopAt 2 .(>| "jungle_breaks:45"))
$ midiOn "^56" (>| "jungle_breaks:10")
$ "jungle_breaks:11"
# cut 8
......@@ -86,8 +81,13 @@ d9 $ gF3 $ gM3
# end 0.8
# cut 9
d10 $ gM3 $ gF3
$ fix (# gain 0.9) "movie_wine"
$ fix (# begin 0.25) "movie_statue:36"
$ stack [
-- just a drift --
mask "<t!8 f!8>"
$ "[movie_vitality:4]" # end "<0.1!2 0.05!2>" # gain 0.9 # room 0, -- Just a drift
"<~!3 [movie_vitality:4]>" # end "<0.25>" # begin "<0.1>", -- WITHOUT CONTROL
-- I'VE GOT YOU SEVERAL TIMES
mask "<f!24 t!8 f!16 t!16>"
$ "movie_wine:15*<1 1 2 4>"
......@@ -100,12 +100,8 @@ d10 $ gM3 $ gF3
mask "<t!32 f!8 t!8 f!8>" $
mask "<f!3 t f!4>" $
"[movie_dead:0 movie_vitality:4]" # end "<0 0.25>",
-- just a drift --
mask "<t!8 f!8>"
$ "[movie_vitality:4]" # end "<0.1!2 0.05!2>" # gain 0.9 # room 0, -- Just a drift
"<~!3 [movie_vitality:4]>" # end "<0.25>" # begin "<0.1>", -- WITHOUT CONTROL
""
]
-- # rel 2 # att 0.1
# rel 2 # att 0.1
# gain 1.3
# cut 101
live/collab/mousquetaires/blue_gold.tidal
-- BLUE GOLD - SUNS OF GOLD LIVECODING REMIX
-- Original by Leifur James :pray:
do
resetCycles
-- resetCycles
setcps(124/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
......@@ -51,7 +51,7 @@ d4 $ gF2 $ gMute3 -- BASSLINE VIOLENTE PAR VALENTIN <3
$ fast (4/3) -- Le fameux
$ midiOff "^57" -- L'attente
(sometimesBy "<1!3 [0 <0 1>]>" (mask "t(<5!3 <5 8>>,8) t(<5!3 5>,8)"))
$ ("e" ~>) -- Decalagelue
$ ("e" ~>) -- Decalage
$ note ("<[fs4 <a5!2 gs!4 fs5!4 <[a6 gs6 fs6]!3 [fs6 gs6 a6]>>@3]*4>")
# "bassWarsaw" |- note 24
# pan 0.4
......
live/collab/nass/sogood.tidal
......@@ -91,8 +91,8 @@ d5 $ gF2 $ gM3 -- Keys
d7 $ gF3 $ gM3 -- VOICES TODO Refine loops
-- $ midiOn "^91" (ply "<2>" . off 1 id . off 2 id . chop "<1!3 4>" . (# cut 7))
$ midiOn "^91" (ply "8 4" . chop "<1 2>". (# cut 7))
$ midiOn "^19" ( -- FIXME Intro
(slice 2 "<~!3 [~ 0 ~]>") . (|> n "11"))
$ midiOn "^19" ( -- Intro: Your love
(>| n "<~!3 [~ 11]>") . (# end "<0.2!3 0.45>"))
$ midiOn ("^59"-"^19") ((>| n "<<7 8 9 10> ~ <~!7 11> ~>") . (|* gain 1.1)) -- CHORUS
$ midiOff ("^59"+"^19") (>| n "<<4 5 <5 6> 6> ~ ~ <~!3 11> ~>") -- LEAD
$ "sogood"
......
live/collab/raph/8_blues.tidal 0 → 100644
-- do
-- resetCycles
setcps (110/60/4)
let gMask = (midiOn "^41" (mask "<t f>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let modIndex = pF "modIndex"
d1 $ gF1 $ gMute2
-- $ midiOn "^30" (# "hardkick_rha")
$ midiOn "^42" (struct "t*<1!4 2 1!3> t t*<1!6 2 1> t*<1!7 2>")
$ midiOff "^42" (struct "t . ~ t*<1!3 2> ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>")
$ stack [
"kick" # lpf 10000 # cut 1,
"rumble" |* gain 1.3
# lpf 200
# cut 11,
""
]
# "[techno:1,jazz]"
# gain 1.4
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "[vec1_snare:5]"
# note "<-0!12 -2 -2 -3 0>"
# gain 1.3
# lpf 4000
# sustain 0.8
d3
$ "~ h ~ h ~ h <~ h> h"
# "h2ogmhh" # gain 1.1
# delay 0.2 # delayt "s" # delayfb 0.4
d6 $ gF1 $ gM1
$ "~ clap:2"
d4 $ gF2 $ gM3
$ midiOn "^89" (ply 4)
$ chop 4
$ loopAt 2
$ "blues_guitar_rock_110" # n "<9 <9 13> 11 12>"
# cut 4
# room 0.3
# crushbus 41 (range 16 2.5 "^53")
# octersubbus 42 (range 0 4 "^33")
# tremdpbus 43 "^17"
# tremrbus 44 (range 0.2 8 "^18")
d5 $ gF3 $ gM3 -- YOUR VALUES ARE WRONG
$ midiOff "^58" (mask "t(4,8,1)")
$ midiOn "^90" (ply 2)
$ note ("[ef f gs ef f gs ef f]*2"
- 12
+ "<0!4 12!4>"
)
# "FMRhodes1"
# squizbus 51 (range 0 4 "^54")
# modIndex "<2 4 8 16>"
# gain 1.5
d7 $ gF3 $ gM3
$ slow 2
$ note ("<[ef ef ef f] [gs(5,8) <f!3 c>]>"
)
# "FMRhodes2"
# gain 1.4
# room 0.3 # sz 0.4 # dry 1.4
d11 $ gF3 $ gM3 -- EVENTS OF BLUE LOVE
$ stack ["",
n "<~ ~ ~ ~ 9 ~ ~ ~>" # "blues_guitar_riff2_120",
n "<~!4 <~ ~ 9 ~> ~ ~ 14>" # "blues_guitar_riff_120",
""
]
# cut 11
d12 $ gF3 $ gM3
$ note ("<f f ef c>")
# "meth_bass:3/4" |- note 5
# cut 12
d8 $ gF1 $ gM1 -- DRUM N BASS AS A SERVICE
$ chop 8
$ midiOn "^60" (mask "t(8,16,1)" . chop 16)
$ midiOn "^56" (
-- slice 8 "0 <1 <~ 1*2>> 2 3? 4 5? <6 6?> <7 7*2>" .
loopAt 2 .
(# "jungle_breaks:63"))
$ midiOn "^36" ( -- Bouton Nassim <3
(loopAt 2) . (# "jungle_breaks:45")
)
$ loopAt 1 $ "breaks165"
# cut 8
# gain 1.4
once $ arp "up" $ note "a3'maj'4" # "superpiano"
once $ "h:6"
do
setcps (120/60/4)
d1 $ "k k k k*<1 2>"
# "h:6" # end 0.1 # note (-24) # speed 0.5
# room 0.5 # lpf 3000
d2 $ "~ h ~ h" # "h:6" # squiz 4
d3 $ "[~ h:6]*8" # hpf 5000 # end 0.05
d7 $ gF3 $ gM3
-- $ superimpose ((|* gain (slow 16 $ range 0.5 1 saw)) . (# n 15) . (# pan 0.3))
$ chop 8
$ loopAt 4
$ "90s_synatm:14"
# gain 1.4
-- # delay 0.4
# room 0.3
d8 $ loopAt 4 $ "break:5" # cut 8
d3 $ gF1 $ gM1
$ (0.125 ~>)
$ slow 2
$ midiOn "^76" (ply "1 <2!3 4>")
$ midiOn "^44" (
(# delay "<0 0.2 0.3 0.5 0.6 0.7 0.8 0.9>") .
(# delayt "s") .
(# delayfb 0.5)
)
$ chop 8
$ n "<1 2 3>"
# "orage"
# cut 3
# gain 1.4
d5 $ gF3 $ gM3 -- Orage base riff
$ slow 4
$ n "<6 6 7 7 8 8 8 9 6 7 8 9 6 8 7 9 10 11 12 13 14 15 14 16>"
# "orage"
# hpf 300
# gain 1.4
# cut 5
# room 0.2
d12
$ "wind:4"
# speed ("<0.2!3 0.5>")
# gain 1.4
# cut 12
d8 $ gF1 $ gM1 -- Break discret face à une telle idole
-- $ midiOn "^60" (mask "t(4,8,<1!3 0>)" . chop 8)
-- $ midiOn "^36" (id . (loopAt 0.5 . (# "jungle_breaks:130")))
$ midiOn "^92" (mask "t(16,32)" . ply "2 2 <4 8 16 16> 2")
$ midiOn "^36" (loopAt 0.5 . (# n 45) . (|* gain 1.1)) -- Orleanaise
$ midiOn "^56" (loopAt 2 . (# n 12))
$ chop 16
$ loopAt 4
$ "jungle_breaks:12" # cut 8
# gain 1.4
d4 $ gF2 $ gM2
-- $ mask "t(4,8)"
$ note "ef <ef gs ds <c f>> <af <g!3 gf>> f*<1!3 2> gs ef bf <ef!3 <ef f>>"
# s "bassWarsaw" |- note "[12,24]"
# pan 0.2
# room 0.2
# octersub 0.5
# sz 0.8
# crushbus 41 (range 15 4 "^53")
-- d5 $ n "e fs g a b g a e" # s "FMRhodes1"
-- d3 $ n "d cs c b a g fs e" # s "superpiano"
d9 $ gF3 $ gM3 -- CHOEUR INTRO TODO ALIGNER MELODIQUEMENT
$ slow 8 $ slice 8 (run "8!3 <4 8 8 16>")
$ "medieval:216"
# room 0.4
# note "-2"
d6 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "clap:2"
# hpf 2500
# room (slow 16 $ range 0 0.8 saw)
# dry 1.1
d8 $ gF1 $ gM1 $ "jungle_breaks:22" # cut 8
-- # note "<-0!12 -2 -2 -3 0>"
-- # gain 1.3
-- d3 $ gF1 $ gM1 -- Cymbales sol
-- $ midiOn "^44" (<| "~ cy ~ cy ~ cy ~ <cy [~ cy]>")
-- $ midiOff "^44" (<| "~!7 <~ <cy ~> ~ cy>")
-- $ "cy" # "<cy:1!6 cy:2!2>" # "h2ogmcy"
-- |* gain (range 1.1 0.8 perlin)
-- |* legato (range 0.5 2 (fast 2 perlin))
d4 $ gF2 $ gM3 -- BASS <3
$ juxBy 2 (# cut 41)
$ "orage"
# cut 4
# gain 1.1
# room 0.3 # sz 0.3 # dry 1.3
# crushbus 41 (range 16 4 "^53")
# octerbus 42 (range 0 0.93 "^33")
d5 $ gF3 $ gM3 -- Rain piano <3
$ midiOn "^58" ((>| n "5/2"))
$ slow 4 $ ply "4 . 2 0" -- Slowly, loop 4 times each
$ n "<5 6 7 8 8 8 7 8 9 10 11 12 13 14 13 12 17 18 19 20 17 18 20 20 17 18 19 20 21 23 22 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 37 37 38 37 38 39 ~ 37 ~ ~ 38 38 38 39 ~>" # "orage"
# cut 5
-- # octersubbus 51 (range 0 2 "^18")
-- # octerbus 52 "^34"
# crushbus 53 (range 16 5 "^54")
# room 0.3 # sz 0.4
# gain (slow 32 $ range 0.6 1.2 saw)
d7 $ gF2 $ gM3
$ midiOn "^59" (struct "~ t ~ t ~ t <~ t t ~> t*<1!3 2>")
$ fix ((|+ note 12). ((|* gain "^35"))) "vec1_acid:30"
$ fix ((|+ note 12)) "vec1_acid:27"
$ note ("<[c3@3 d3]!3 [d3!3 [ds3 d3 ds3]]>" + 12)
# "[vec1_acid:27,vec1_acid:30]"
# gain 1.5
d10
$ loopAt 8
$ "risers"
# room 0.4
d11 $ gF3 $ gM3
$ n "[f4 c5 gs4 c5 f4 bf4 d5 bf4]"
# s "FMRhodes1"
# modIndex (range 0 8 "^30")
# room 0.4
# att 0.04 # rel 2
# gain 1.3
live/collab/raph/8bit_delicat.tidal 0 → 100644
do
-- resetCycles
setcps (80/60/4)
let gMask = (midiOn "^41" (mask "<t f>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let modIndex = pF "modIndex"
d1 $ gF1 $ gMute2
-- $ midiOn "^30" (# "hardkick_rha")
$ midiOn "^42" (fast 2 . struct "t*<1!4 2 1!3> t t*<1!6 2 1> t*<1!7 2>")
$ midiOff "^42" (struct "t . ~ t*<1!3 2> ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>")
$ stack [
"kick" # lpf 10000 # cut 1,
"rumble" |* gain 1.3
# lpf 200
# cut 11,
""
]
# "[techno:1,jazz]"
# gain 1.4
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "[vec1_snare:5]"
# note "<-0!12 -2 -2 -3 0>"
# gain 1.3
# lpf 4000
# sustain 0.8
d3
$ fast 2
$ "~ h ~ h ~ h <~ h> h"
# "h2ogmhh" # gain 1.1
# delay 0.2 # delayt "s" # delayfb 0.4
d6 $ gF1 $ gM1
$ "~ clap:2"
d4 $ gF2 $ gM3
$ midiOn "^89" (ply 4)
$ chop 4
$ loopAt 4
$ "bass_commodore:8"
# cut 4
# room 0.3
# crushbus 41 (range 16 2.5 "^53")
# octersubbus 42 (range 0 4 "^33")
# tremdpbus 43 "^17"
# tremrbus 44 (range 0.2 8 "^18")
d5 $ gF3 $ gM3 -- YOUR VALUES ARE WRONG
$ midiOff "^58" (mask "t(4,8,1)")
$ midiOn "^90" (ply 2)
$ note ("[c ef f c ef f c <ef <gs c5> <gs b5> ef>]*2"
- 12
+ "<0!4 12!4>"
)
# "FMRhodes1"
# squizbus 51 (range 0 4 "^54")
# modIndex "<2 4 8 16>"
# gain 1.5
d7 $ gF3 $ gM3
$ slow 2 $ note "<[ef ef ef f] [gs(5,8) f]>"
# "FMRhodes2"
# gain 1.4
# room 0.3 # sz 0.4 # dry 1.4
d11 $ gF3 $ gM3 -- EVENTS OF BLUE LOVE
$ stack ["",
n "<~ ~ ~ ~ 9 ~ ~ ~>" # "blues_guitar_riff2_120",
n "<~!4 <~ ~ 9 ~> ~ ~ 14>" # "blues_guitar_riff_120",
""
]
# cut 11
d12 $ gF3 $ gM3
$ note ("<f f ef c>")
# "meth_bass:3/4" |- note 5
# cut 12
d8 $ gF1 $ gM1 -- DRUM N BASS AS A SERVICE
$ chop 8
$ midiOn "^60" (mask "t(8,16,1)" . chop 16)
$ midiOn "^56" (
slice 8 "0 <1 <~ 1*2>> 2 3? 4 5? <6 6?> <7 7*2>"
. loopAt 2 . (# "jungle_breaks:63"))
$ midiOn "^36" ( -- Bouton Nassim <3
(loopAt 2) . (# "jungle_breaks:45")
)
$ loopAt 0.5 $ "breaks165"
# cut 8
# gain 1.4
once $ arp "up" $ note "a3'maj'4" # "superpiano"
once $ "h:6"
do
setcps (120/60/4)
d1 $ "k k k k*<1 2>"
# "h:6" # end 0.1 # note (-24) # speed 0.5
# room 0.5 # lpf 3000
d2 $ "~ h ~ h" # "h:6" # squiz 4
d3 $ "[~ h:6]*8" # hpf 5000 # end 0.05
d7 $ gF3 $ gM3
-- $ superimpose ((|* gain (slow 16 $ range 0.5 1 saw)) . (# n 15) . (# pan 0.3))
$ chop 8
$ loopAt 4
$ "90s_synatm:14"
# gain 1.4
-- # delay 0.4
# room 0.3
d8 $ loopAt 4 $ "break:5" # cut 8
d3 $ gF1 $ gM1
$ (0.125 ~>)
$ slow 2
$ midiOn "^76" (ply "1 <2!3 4>")
$ midiOn "^44" (
(# delay "<0 0.2 0.3 0.5 0.6 0.7 0.8 0.9>") .
(# delayt "s") .
(# delayfb 0.5)
)
$ chop 8
$ n "<1 2 3>"
# "orage"
# cut 3
# gain 1.4
d5 $ gF3 $ gM3 -- Orage base riff
$ slow 4
$ n "<6 6 7 7 8 8 8 9 6 7 8 9 6 8 7 9 10 11 12 13 14 15 14 16>"
# "orage"
# hpf 300
# gain 1.4
# cut 5
# room 0.2
d12
$ "wind:4"
# speed ("<0.2!3 0.5>")
# gain 1.4
# cut 12
d8 $ gF1 $ gM1 -- Break discret face à une telle idole
-- $ midiOn "^60" (mask "t(4,8,<1!3 0>)" . chop 8)
-- $ midiOn "^36" (id . (loopAt 0.5 . (# "jungle_breaks:130")))
$ midiOn "^92" (mask "t(16,32)" . ply "2 2 <4 8 16 16> 2")
$ midiOn "^36" (loopAt 0.5 . (# n 45) . (|* gain 1.1)) -- Orleanaise
$ midiOn "^56" (loopAt 2 . (# n 12))
$ chop 16
$ loopAt 4
$ "jungle_breaks:12" # cut 8
# gain 1.4
d4 $ gF2 $ gM2
-- $ mask "t(4,8)"
$ note "ef <ef gs ds <c f>> <af <g!3 gf>> f*<1!3 2> gs ef bf <ef!3 <ef f>>"
# s "bassWarsaw" |- note "[12,24]"
# pan 0.2
# room 0.2
# octersub 0.5
# sz 0.8
# crushbus 41 (range 15 4 "^53")
-- d5 $ n "e fs g a b g a e" # s "FMRhodes1"
-- d3 $ n "d cs c b a g fs e" # s "superpiano"
d9 $ gF3 $ gM3 -- CHOEUR INTRO TODO ALIGNER MELODIQUEMENT
$ slow 8 $ slice 8 (run "8!3 <4 8 8 16>")
$ "medieval:216"
# room 0.4
# note "-2"
d6 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "clap:2"
# hpf 2500
# room (slow 16 $ range 0 0.8 saw)
# dry 1.1
d8 $ gF1 $ gM1 $ "jungle_breaks:22" # cut 8
-- # note "<-0!12 -2 -2 -3 0>"
-- # gain 1.3
-- d3 $ gF1 $ gM1 -- Cymbales sol
-- $ midiOn "^44" (<| "~ cy ~ cy ~ cy ~ <cy [~ cy]>")
-- $ midiOff "^44" (<| "~!7 <~ <cy ~> ~ cy>")
-- $ "cy" # "<cy:1!6 cy:2!2>" # "h2ogmcy"
-- |* gain (range 1.1 0.8 perlin)
-- |* legato (range 0.5 2 (fast 2 perlin))
d4 $ gF2 $ gM3 -- BASS <3
$ juxBy 2 (# cut 41)
$ "orage"
# cut 4
# gain 1.1
# room 0.3 # sz 0.3 # dry 1.3
# crushbus 41 (range 16 4 "^53")
# octerbus 42 (range 0 0.93 "^33")
d5 $ gF3 $ gM3 -- Rain piano <3
$ midiOn "^58" ((>| n "5/2"))
$ slow 4 $ ply "4 . 2 0" -- Slowly, loop 4 times each
$ n "<5 6 7 8 8 8 7 8 9 10 11 12 13 14 13 12 17 18 19 20 17 18 20 20 17 18 19 20 21 23 22 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 37 37 38 37 38 39 ~ 37 ~ ~ 38 38 38 39 ~>" # "orage"
# cut 5
-- # octersubbus 51 (range 0 2 "^18")
-- # octerbus 52 "^34"
# crushbus 53 (range 16 5 "^54")
# room 0.3 # sz 0.4
# gain (slow 32 $ range 0.6 1.2 saw)
d7 $ gF2 $ gM3
$ midiOn "^59" (struct "~ t ~ t ~ t <~ t t ~> t*<1!3 2>")
$ fix ((|+ note 12). ((|* gain "^35"))) "vec1_acid:30"
$ fix ((|+ note 12)) "vec1_acid:27"
$ note ("<[c3@3 d3]!3 [d3!3 [ds3 d3 ds3]]>" + 12)
# "[vec1_acid:27,vec1_acid:30]"
# gain 1.5
d10
$ loopAt 8
$ "risers"
# room 0.4
d11 $ gF3 $ gM3
$ n "[f4 c5 gs4 c5 f4 bf4 d5 bf4]"
# s "FMRhodes1"
# modIndex (range 0 8 "^30")
# room 0.4
# att 0.04 # rel 2
# gain 1.3
live/collab/raph/acidule.tidal
-- Released as "l'ACID d'abord"
do
resetCycles
-- resetCycles
setcps (135/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
......@@ -34,6 +34,7 @@ d2 $ gF1 $ gM1 -- Basic clap ma gueule
$ "cp"
# note "0!3 -1"
# lpf 4000
# gain 1.3
# room 0.4 # sz 0.4 # dry 1.1
d3 $ gF1 $ gM1
-- $ jux (rev)
......@@ -46,14 +47,15 @@ d3 $ gF1 $ gM1
d10 $ gF3 -- Self-destruction riser
$ (stack [
n "<<55!8 ~!54> ~!3>"
# end "<0.5 1 0.5 1 0.5 0.5 0.5 1 0.5!5 1!3>"
# begin "<0 0.5 0 0.5 0 0 0 0.5 0!5 0.5!3>",
# begin "<0 0.55 0 0.55 0 0 0 0.55 0!5 0.55!3>"
# end "<0.55 1 0.55 1 0.55 0.55 0.55 1 0.55!5 1!3>",
n "<<~!3 56>!32 ~!28 ~ 56 ~ ~>" # begin 0.5, -- Activated
n "<~!32 <~ <54!3 53 53!3 54>!16 ~!16>>" -- Systems
# crushbus 101 (slow 15 $ range 12 5 perlin),
""
])
# "rhadamanthe_vocal"
# gain 1.3
d6 $ gF1 $ gM1 $ "~ ~ ~ 808cy:1"
d9 $ gF3
$ mask "<<t!4 f!4> t t f>"
......@@ -132,7 +134,7 @@ d8 $ gF1 $ gM1
$ chop 8
$ loopAt 2
$ "jungle_breaks:45"
# cut 8
# cut 83
# gain 1.4
d11 $ gF2 $ gM3 -- Synthetique violon
$ note (stack ["<b6!3 [b6 a6@7]>", -- Low basis
......
live/collab/raph/hardorage.tidal 0 → 100644
-- /home/pln/Downloads/PerfectSunriseLoop.gif
-- Absolutely! Here’s how you can express the core "Riders on the Storm" elements in TidalCycles using named notes instead of MIDI numbers.
-- ## **Bass Line (E Dorian)**
-- A classic modal bass pattern, alternating E and A, with passing notes for groove:
d1 $ note "e e a e g e b e" # s "bassWarsaw" |- note 24
d5 $ n "e fs g a b g a e" # s "FMRhodes1"
d3 $ n "d cs c b a g fs e" # s "superpiano"
-- ## **Melodic/Lead Lines**
-- **Dorian/pentatonic flavor for solos or riffs:**
d4 $ n "e g a b d b a g" # s "cs80leadMH"
d4 $ note "e fs g a b d" # s "cs80leadMH" |- note 12
-- ## **Tips**
-- - Use `# gain` or `# cutoff` for filter modulation.
-- - Layer rain or vocal samples for atmosphere.
-- - Try syncopating the bass or keys for a more techno feel.
-- **Summary:**
-- - **Bass:** `d1 $ n "e e a e g e b e"`
-- - **Piano:** `d2 $ n ""`
-- - **Descending line:** `d3 $ n "d cs c b a g fs e"`
-- - **Lead:** `d4 $ n "e g a b d b a g"`
do
-- resetCycles
setcps (205/60/4)
let gMask = (midiOn "^41" (mask "<t f>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let modIndex = pF "modIndex"
d1 $ gF1 $ gMute2
$ midiOn "^30" (# "hardkick_rha")
$ midiOn "^42" (struct "t t t*<1!6 2 1> t*<1!7 2>")
$ midiOff "^42" (struct "t . ~ t*<1!3 2> ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>")
$ stack [
"kick" # lpf 10000 # cut 1,
"rumble" |* gain 1.3
# lpf 200
# cut 11,
""
]
# "[techno:1,jazz]"
# gain 1.4
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "[vec1_snare:5]"
# note "<-0!12 -2 -2 -3 0>"
# gain 1.3
# lpf 4000
# sustain 0.8
d3 $ gF1 $ gM1
$ (0.125 ~>)
$ slow 2
$ midiOn "^76" (ply "1 <2!3 4>")
$ midiOn "^44" (
(# delay "<0 0.2 0.3 0.5 0.6 0.7 0.8 0.9>") .
(# delayt "s") .
(# delayfb 0.5)
)
$ chop 8
$ n "<1 2 3>"
# "orage"
# cut 3
# gain 1.4
d5 $ gF3 $ gM3 -- Orage base riff
$ slow 4
$ n "<6 6 7 7 8 8 8 9 6 7 8 9 6 8 7 9 10 11 12 13 14 15 14 16>"
# "orage"
# hpf 300
# gain 1.4
# cut 5
# room 0.2
d12
$ "wind:4"
# speed ("<0.2!3 0.5>")
# gain 1.4
# cut 12
d8 $ gF1 $ gM1 -- Break discret face à une telle idole
-- $ midiOn "^60" (mask "t(4,8,<1!3 0>)" . chop 8)
-- $ midiOn "^36" (id . (loopAt 0.5 . (# "jungle_breaks:130")))
$ midiOn "^92" (mask "t(16,32)" . ply "2 2 <4 8 16 16> 2")
$ midiOn "^36" (loopAt 0.5 . (# n 45) . (|* gain 1.1)) -- Orleanaise
$ midiOn "^56" (loopAt 2 . (# n 12))
$ chop 16
$ loopAt 4
$ "jungle_breaks:12" # cut 8
# gain 1.4
d4 $ gF2 $ gM2
-- $ mask "t(4,8)"
$ note "ef <ef gs ds <c f>> <af <g!3 gf>> f*<1!3 2> gs ef bf <ef!3 <ef f>>"
# s "bassWarsaw" |- note "[12,24]"
# pan 0.2
# room 0.2
# octersub 0.5
# sz 0.8
# crushbus 41 (range 15 4 "^53")
-- d5 $ n "e fs g a b g a e" # s "FMRhodes1"
-- d3 $ n "d cs c b a g fs e" # s "superpiano"
d9 $ gF3 $ gM3 -- CHOEUR INTRO TODO ALIGNER MELODIQUEMENT
$ slow 8 $ slice 8 (run "8!3 <4 8 8 16>")
$ "medieval:216"
# room 0.4
# note "-2"
d6 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "clap:2"
# hpf 2500
# room (slow 16 $ range 0 0.8 saw)
# dry 1.1
d8 $ gF1 $ gM1 $ "jungle_breaks:22" # cut 8
-- # note "<-0!12 -2 -2 -3 0>"
-- # gain 1.3
-- d3 $ gF1 $ gM1 -- Cymbales sol
-- $ midiOn "^44" (<| "~ cy ~ cy ~ cy ~ <cy [~ cy]>")
-- $ midiOff "^44" (<| "~!7 <~ <cy ~> ~ cy>")
-- $ "cy" # "<cy:1!6 cy:2!2>" # "h2ogmcy"
-- |* gain (range 1.1 0.8 perlin)
-- |* legato (range 0.5 2 (fast 2 perlin))
d4 $ gF2 $ gM3 -- BASS <3
$ juxBy 2 (# cut 41)
$ "orage"
# cut 4
# gain 1.1
# room 0.3 # sz 0.3 # dry 1.3
# crushbus 41 (range 16 4 "^53")
# octerbus 42 (range 0 0.93 "^33")
d5 $ gF3 $ gM3 -- Rain piano <3
$ midiOn "^58" ((>| n "5/2"))
$ slow 4 $ ply "4 . 2 0" -- Slowly, loop 4 times each
$ n "<5 6 7 8 8 8 7 8 9 10 11 12 13 14 13 12 17 18 19 20 17 18 20 20 17 18 19 20 21 23 22 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 37 37 38 37 38 39 ~ 37 ~ ~ 38 38 38 39 ~>" # "orage"
# cut 5
-- # octersubbus 51 (range 0 2 "^18")
-- # octerbus 52 "^34"
# crushbus 53 (range 16 5 "^54")
# room 0.3 # sz 0.4
# gain (slow 32 $ range 0.6 1.2 saw)
d7 $ gF2 $ gM3
$ midiOn "^59" (struct "~ t ~ t ~ t <~ t t ~> t*<1!3 2>")
$ fix ((|+ note 12). ((|* gain "^35"))) "vec1_acid:30"
$ fix ((|+ note 12)) "vec1_acid:27"
$ note ("<[c3@3 d3]!3 [d3!3 [ds3 d3 ds3]]>" + 12)
# "[vec1_acid:27,vec1_acid:30]"
# gain 1.5
d10
$ loopAt 8
$ "risers"
# room 0.4
d11 $ gF3 $ gM3
$ n "[f4 c5 gs4 c5 f4 bf4 d5 bf4]"
# s "FMRhodes1"
# modIndex (range 0 8 "^30")
# room 0.4
# att 0.04 # rel 2
# gain 1.3
live/collab/raph/jeudrill.tidal
do
-- resetCycles
let gF1 = (# djfbus 1 (range 0.1 0.9 "^49"))
......@@ -16,7 +15,8 @@ setcps (140/60/4)
-- d1 $ gF1 $ gM2
d1 $ gF1 $ gMute2
$ midiOff "^42" (<| "<k [~!7 k*<1 2>]>")
$ midiOn "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>")
-- $ midiOn "^42" (<| "k . ~ k*<1 2> ~ <~ k k <~ k*4>>")
$ midiOn "^42" (<| "k k . k <k [~ k] k k*2>")
$ "[kick:5,clubkick]"
# room 0.2 # dry 1.1
# lpf 3000 -- TODO Sound design this kick <3
......@@ -26,11 +26,15 @@ d2 $ gF1 $ gM1
$ someCyclesBy "<0!16 1!16>" (<| "~ s ~ s*<1!4 1!3 2 1!3 2 2!4>")
$ someCyclesBy "<1!16 0!16>" (<| "~ <~ [<s s*2 s [s*2 ~]>]>")
$ "[snare:24,snare:51]"
# gain "<[1]!16 [1 <1 <1 [1 0.93] 1 [0.9]>>]!16>"
# gain (1.5 * "<[1]!16 [1 <1 <1 [1 0.93] 1 [0.9]>>]!16>")
# room 0.5 # dry 1.1
# delay "<0!12 0.6!4>"
# delayt 0.25
d3 $ gF1 $ gM1
-- $ "h(3,8) h(<3 <5 [5 <1 <8 [8 16]>>]>>,8)"
$ "h(3,8) h(3,8)" # pan "0.2 0.8"
# drumFrom "rolandtr909" "hh" # cut 3
$ "h(3,8) h(<3 <5 [5 <1 <8 [8 16]>>]>>,8)"
-- $ "h(3,8) h(3,8)"
# pan "0.2 0.8"
# drumFrom "rolandtr909" "hh:2" # cut 3
# gain 1.2
# legato (range 0.05 0.9 "^32")
d9 -- Bogdan the Grime sample provider
......@@ -46,7 +50,7 @@ d9 -- Bogdan the Grime sample provider
# delayfb 0
# speed 0.92
-- # room 0.4
# gain 1.2
# gain 1.6
d8 $ gF1 $ gM1 -- Come on breaks!
$ chop 8
$ midiOn "^60" (mask "t(4,8,1)" . chop 4)
......@@ -58,9 +62,9 @@ d8 $ gF1 $ gM1 -- Come on breaks!
$ loopAt 2
$ "jungle_breaks:26"
# cut 8
# gain 0.9
# gain 1.4
d4 $ gF2 $ gMute3 -- Bassline aqualgorithmique
$ midiOn "^57" ((# tremdp 1) . (# tremrbus 43 "<[8 4] [<4 8> <2 16>]>"))
-- $ midiOn "^57" ((# tremdp 1) . (# tremrbus 43 "<[8 4] [<4 8> <2 16>]>"))
$ slow 2 $ note (
-- "<0!8 0(3,8)!8> 0" + "<d4!3 a3> <fs4 e4 d4 b3>"
"<<fs <[fs@15 e] [fs@14 cs e]>> b4>"
......@@ -82,12 +86,12 @@ d5 $ gM3 $ gF3 -- Marimba fondamental
$ juxBy 0.4 rev
$ note ("<[b4 [~ d5]. [fs5@3 fs5]] [e5 fs5 e5 fs5. [d5@3 fs5]]>")
# "marimba1"
# att (range 0.8 0.2 "^34")
-- # att (range 0.8 0.2 "^34")
# rel 1
# squizbus 51 (range 0 2.5 "^54")
-- # squizbus 51 (range 0 2.5 "^54")
-- # delay 0 # delayfb 0.8 # delayt 0.25
# pan 0.9
# gain 3
# gain 1.4
# room 0.3
d10 $ gF3 $ gM3 -- Menace
$ someCyclesBy "<1!16 1!32 0!16>" (>| note "<b3 ~ ~ <[~!7 c4] [~!5 c4 ef4 <c4 fs4>]>>")
......@@ -104,8 +108,9 @@ d10 $ gF3 $ gM3 -- Menace
# rel 10
# crushbus 101 (range 16 3.5 "^14")
# legato 2
# octersub 1
# cut 9
d7 $ gM2 $ gF2
d7 $ gM3 $ gF2
-- $ ply 2
$ midiOn "^59" (# speed "-0.25")
$ midiOn "^91" (struct "t*<8!3 [8 4]>")
......@@ -118,9 +123,30 @@ d7 $ gM2 $ gF2
# crushbus 71 (range 16 1.7 "^55")
# panbus 72 (range 0.2 0.8 (fast "<2!4 4!4>" sine))
# gain 1.3
d8 $ gF1 $ gM1
$ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
$ midiOn "^36" (loopAt 2 . (# "jungle_breaks:22")) -- Raise COMEON!
$ midiOn "^56" (loopAt 2 . (# "jungle_breaks:23")) -- Raise COMEON!
$ midiOn "^92" ( -- Bouton Nassim <3
slice 16 "[0 .. 7] . <[0 .. 7]!3 [0 1 . [2 3]]>"
. loopAt 1 . (# "breaks165")
-- . (# octer 0.4) . ( octersubsub 4)
. (# lpf 2500)
. (# room 0)
)
$ chop 16
$ "breaks165"
# cut 8
# octersub 0.5
# gain 1.2
once $ "bogdan:3" # cut 9 # orbit 8 # gain 1.7 -- HEY BRO
once $ "bogdan:5" # cut 9 # orbit 8 # gain 1.7 -- THAT's Right
once $ "bogdan_grime:1" # cut 9
once $ "bogdan:4" # cut 9 # orbit 8 # gain 1.7 -- Moneyyyy
once $ "bogdan:6" # cut 9 # orbit 8 # gain 1.7 -- ETA
......
live/collab/raph/le_blues_du_mic.tidal
-- 1. Choeurs
-- 2. 10 + d3
-- 3. Beat1
-- 4. Snare
-- 5. Drop your number
-- 6. Drop the breaks
-- 7. Mask the breaks!
-- 8. Drop the bass
-- 9. Enjoy the vibe
-- 10. Drop second kick
-- 11. AirDrop the choir
-- 12. Bring back breaks
-- 13. Bring back bass!
-- 14. Drop d7 scatman
-- 15. Hide him as choir leave
-- 16. Drop d11 and d12 scatters
-- 17. Enjoy the vibe
-- 18. Drop the bass friends
-- 19. Slice the Number
-- 20. Combine that with Drums funsies
-- 21. Mask the Number until next choir
-- 22. Hold choir
-- 22. kill scats
-- 23. Fade out on choir
do
......
live/collab/raph/ratus.tidal 0 → 100644
do
-- resetCycles
setcps (120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let modIndex = pF "modIndex"
d1 $ gF1 $ gM2
$ midiOn "^42" (struct "t t t*<1!6 2 1> t*<1!7 2>")
$ midiOff "^42" (struct "t . ~ t ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>")
$ stack [
"kick" # lpf 10000 # cut 1,
"rumble" |* gain 1.3
# lpf 200
# cut 11,
""
]
# "[techno:1,jazz]"
# gain 1.4
# cps ((range 75 165 "^29")/60/4)
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "[snare:24]"
# gain 1.4
d3 $ gF1 $ gM1
$ "hh(3,8) hh(3,8)" # "h2ogmsn" # n "<0!6 1 2>"
# legato "<1!16 0.5!16>"
d4 $ gF2 $ gM3 $ loopAt 4
$ "bass_nes:6" # cut 4
# room 0.4
# bandf 400
# lpf 1200
# gain 2
# crushbus 41 (range 16 3.5 "^53")
# octerbus 42 (range 0 1.5 "^33")
d5 $ gF3 $ gM3
$ note ("a4" - "[0,12]" + (scale "aeolian"
-- "<0!3 [0 1 2 <3 [3 4]>]>" -- Exploration
"~ 0 ~ <0 1 0 1 0 1 2 3>" -- reggaeton!
+ "<0!8 12!8 24!8 -12!8>"
))
# "FMRhodes1"
# roombus 51 (range 0 2 "^34")
# modIndex (range 0 32 "^54")
# gain 1.7
# delay 0.4 # delayfb 0.5 # delayt 0.125
d7 $ gM1 $ gF1
-- $ midiOn rev
$ chop 16
-- $ loopAt 4
$ "trance_loops:2" # cut 8
# speed (range "-8" 8
"^55")
# gain 1.5
# squizbus 71 (range 0 4 "^35")
# room 0.4
d8 $ gF1 $ gM1
$ chop 4 $ loopAt 2
$ slice 8 "0 1 2 3 4 5 6 <7 6 7*2 7*4>"
$ "jungle_breaks:62"
# cut 8
d9 $ "ai_raise:5"
# gain 1.8
# begin 0.52
# end 0.66
-- # room 0.4
# cut 9 # orbit 8
live/collab/raph/wet_hard_pussy.tidal 0 → 100644
do
setcps (133/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [f <t f>]>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2 -- Kick
$ midiOn "^42" (<| "k k k <k <[~ k] k*<2 [4 2]>>>")
$ midiOff "^42" (<| "k . ~ k ~ ~ ")
$ midiOn "^30" (|> "hardkick_rha:4")
$ "kick:5"
# gain 1.6
# lpf 400
# cps ((range 100 166 "^29")/60/4)
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ s ~ s ~ s ~ s")
$ midiOff "^43" (<| "~ s ~ s*<1 2 [2 1] [4 <2 8>]>" )
$ "vec1_snare:24"
# gain 1.3
d3 $ gF1 $ gM1$ "hh(3,8) hh(3,8,1)" # "vec1_snare:11"
-- d4 $ gF2 $ gM3 -- WAP BASS
-- $ midiOn "^57" (# n 1)
-- $ loopAt 2
-- $ "wap"
-- # bandf 400 # cut 4
-- # gain 1.9
-- # room 0.4
-- # octersubsubbus 42 (range 0 1.4 "^53")
-- # octerbus 41 (range 0 1.4 "^53")
d4 $ gM3 $ gF2 -- BASSLINE 8BIT <3
$ chop 8 $ slow 4 $ "bass_commodore:13"
# crushbus 41 (range 16 2.5 "^53")
-- # octerbus 41 (range 0 1.4 "^53")
# room 0.4
d5 $ gF3 $ gM3 -- WAP HOES
$ midiOn "^18" (# 7) -- FORCE INTRO
$ midiOff ("^18"+"^90") (slow 4)
$ stut 4 1 1 -- Four repeats each
$ slow 4
$ midiOn "^58" (stut "4" 0.9 (fast 4 "e"))
$ midiOn "^90" (ply "[1!3 4]*4" . chop 4 . stut "4" 0.9 (fast 4 "s") . (# att 0.08) . (# rel 10))
$ loopAt 4
$ "wap:0"
# n ("<8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31>") -- Rotation complete
# cut 5
# room 0
# sz 0
# gain 1.7
d6 $ gF3 $ gM3
$ jux rev
$ striate 16
$ slice 32 ("0 .. 32")
$ "fx_gameboy:1"
# note "<0 1 6 12>"
# gain 0.8
d7 $ gF1 $ gM1 --Les WAP DRUMS
$ midiOff "^60" (mask "t(4,8,1)" . chop 8)
$ midiOn "^91" (ply "2 <2 4>")
$ loopAt 2 $ chop 8
$ "wap" # n "<3!4 4!4 5!4 6!4>"
# cut 7 # gain 1.8
d8 $ gF1 $ gM1 -- La stack de breaks
$ midiOff "^60" (mask "t(4,8,1)" . chop 8 ) -- BREAK JUNGLE
$ midiOn "^92" (ply 2) -- BREAK JUNGLE
$ midiOn "^36" (# 45) -- BREAK ORLEANS
$ midiOn "^56" (# 7) -- BREAK JUNGLE
$ loopAt 2 $ chop 8
$ "jungle_breaks:84" # cut 8
# gain 1.6
d9 $ gF2 $ gM3 $ slow 2
-- $ fast 2 $ off 1 (|+ note 12)
$ note "[b@3 ~@2 c@3 <cs <[cs@2 ~ g e] [cs@2 ~ g e g e]>>@5]"
# "bassWarsaw" |- note "[36,24]"
-- # "acidOto3091"
# crushbus 91 (range 16 6.5 "^19")
# room 0.4
# gain 1.4
live/midi/nova/ambient/ambient_chaos.tidal
......@@ -16,7 +16,6 @@ let prog2 = "<b2 d3 e3 <cf3 a2 cf3 <f3 fs3>>>"
let prog = "<b3 fs3 a3 e3 b3 fs3 a3 e3 b3 fs3 a3 e3 b3 fs3 a3 e3 b2 d3 e3 cf3 b2 d3 e3 a2 b2 d3 e3 cf3 b2 d3 e3 <f3 fs3>>"
let prog = prog2
let prog = prog1
do
setcps(125/60/4)
d12 $ gM3 $ gF3 -- PIANO DE DEBUGGING
$ struct "<t(3,8)!11 t>"
......@@ -28,10 +27,11 @@ d12 $ gM3 $ gF3 -- PIANO DE DEBUGGING
d1 $ gF1 $ gMute2 -- KICK PLEIN
-- $ fix ((# att 0.05) . (# lpf 4500) . (# gain 0.9)) "rampleR1:0"
$ midiOn "^42" (<| "k k k <k!3 <k*2 [k*2 k] [k ~ k] [k*4]>>")
$ midiOff "^42" (<| "k")
$ midiOff "^42" (<| "k <~!4 k ~ ~ k*2> . ~ ~ [~ <~ k>] k")
$ "[rampleR1:0]"
# gain 1.4
d2 $ gF1 $ gM1
$ midiOn "^42" (whenmod 64 8 (<| "~ s ~ s"))
$ midiOn "^42" (<| "~ s ~ <s s s [s*<1 2> s]>")
$ midiOff "^42" (<| "~ s")
$ "snare:36"
# lpf 4000
......@@ -50,9 +50,10 @@ d4 $ gF2 $ gM3 -- La gravite, inevitable
+ 0
)
# "bassWarsaw"
# octersubbus 41 (range 0 1.4 "^53")
# octersubbus 41 (range 0 3 "^53")
# cut 4
# pan 0.3
# gain 1.7
d5 $ gF3 $ gM3 -- La lumiere, partout
$ midiOn "^58" (chop 8)
$ midiOff "^58" (chop 2)
......@@ -67,7 +68,7 @@ d7 $ gF1 $ gM1 -- Les inevitables trolls
$ fix (# "rampleR0:2") "r0bd"
$ fix ((# "90s_megafx") . (# cut 81) . (|* gain 1.1)) "fx"
$ stack ["r0bd@7 <~!0 r0bd1!8>","~ fx:78"]
# gain 0.5
# gain 0.8
d8 $ gF1 $ gM1
-- $ ply "1 2"
$ midiOn "^56" (# n "4")
......@@ -76,7 +77,7 @@ d8 $ gF1 $ gM1
$ chop 16
$ loopAt 2
$ "jungle_breaks:30"
# gain 0.6
# gain 1.3
once $ note "b4"
# "bassWarsaw"
......
live/midi/nova/ambient/quand_on_decolle.tidal
-- url: "/home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif"
-- /home/pln/Work/Web/www/next/public/images/parvagues/bg_live.gif
-- url: "/home/pln/Work/Art/GLITCHWAVE/outputs/decolle.gif"
do
-- resetCycles
setcps (120/60/4)
......@@ -11,8 +11,8 @@ let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k k*2")
$ midiOff "^42" (<| "k . ~ k ~ ~")
$ midiOn "^42" (<| "k k . k(<2 2 [2 4] <3 4 3 5>>,8)")
$ midiOff "^42" (<| "k . ~ k ~ <~!3 k*2>")
$ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
-- $ fix ((# att 0.02) . (# rel 0.5) . (# lpf 400)) "kick:4"
$ "[jazz,kick:4]"
......@@ -26,6 +26,7 @@ d2 $ gF1 $ gM1
# gain 1.1
# cut 2
d3 $ gF1 $ gM1
$ midiOn "^44" (ply "2 <2!3 4>")
$ "~ h ~ h ~ h*<1 2 1 <1 [4 2]>> ~ h*<1 <1 1 0 2> 1 <2 4>>"
# "hh"
# att (slow 32 $ range 0.4 0.04 saw)
......@@ -48,6 +49,7 @@ d4 $ gF2 $ gM3
# pan 0.3
# cut 4
d5 $ gF3 $ gM3
$ midiOn "^58" (striate "4 <8 <16 32>>")
$ midiOn "^90" (ply 2)
$ slow 16 $ chop 16
$ "airports" # cut 5
......
live/midi/nova/ambient/raise.tidal 0 → 100644
-- url: "/home/pln/Work/Art/GLITCHWAVE/outputs/decolle.gif"
once $ "ai_welcome:12" # cut 9 # orbit 8
# gain 1.6
-- Feature
once $ "ai_raise:5"
# gain 1.8
# begin 0.52
# end 0.66
-- # room 0.4
# cut 9 # orbit 8
-- Revolution
once $ "ai_raise:3" # cut 9 # orbit 8
# gain 1.8
# begin 0.8
# room 0.4
-- The 4th
once
$ "ai_raise"
# n 4
-- # begin 0.5 -- 0.8
# cut 9 # orbit 8
# gain 1.5
-- # room 0.24
once
$ slice 2 "1" "ai_raise:2" -- UNDERHYPed
# gain 2 # cut 9 # orbit 8
d9
$ struct "t(8,16)"
$ chop 8 $ "ai_raise:1"
-- Welcome.
once $ "ai_welcome:3" # orbit 8 # cut 9
# gain 1.8 # delay 0 # delayfb 0
# end 0.58 -- Welcome
-- # speed 0.82
-- # crush 3.4
-- # hpf (slow 8 $ range 1200 0 sine)
-- OOOOH
once $ "ai_welcome:3" # orbit 8 # cut 9
# end 0.5
# gain 2
d3
-- $ struct "t(4,8)"
$ "ai_welcome:3"
# orbit 8 # cut 9
# begin 0
-- # octave 4
-- # begin 0.1 # end 0.6
once $ "ai_welcome:2" # orbit 8 # cut 9
-- # begin 0.1 # end 0.6
d1
$ whenmod 4 3 (slice 4 "<0(3,8) 1>")
$ "ai_welcome:3/2" # cut 1 # gain 1.4
do
-- resetCycles
setcps (120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k k k k*2")
$ midiOff "^42" (<| "k . ~ k ~ ~")
$ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
-- $ fix ((# att 0.02) . (# rel 0.5) . (# lpf 400)) "kick:4"
$ "[jazz,kick:4]"
# gain 1
d2 $ gF1 $ gM1
$ midiOff "^43" (<| "~ . s@3 <~ s*<1 <2 [4 2]>>>")
$ midiOn "^43" (<| "~ s ~ <s!3 s*<2 [4 2]>>")
$ fix (# lpf 4000) "snare:30"
$ "[snare:30]"
# lpf 2800
# gain 1.1
# cut 2
d3 $ gF1 $ gM1
$ "~ h ~ h ~ h*<1 2 1 <1 [4 2]>> ~ h*<1 <1 1 0 2> 1 <2 4>>"
# "hh"
# att (slow 32 $ range 0.4 0.04 saw)
# rel 2
# room 0.2 # dry 1.3
# gain 1.4
d4 $ gF2 $ gM3
$ midiOn "^57" (sometimesBy 0.5 ((|- note 12) . (# cut 41)))
$ midiOn "^89" (ply 2)
-- $ note ("d3" + scale "mixolydian" ("[<0!12 3!4> <4!12 6!4>]*4")) -- ORIGINAL.
$ note ("d3" + scale "mixolydian" ( -- NICE VARIATIONS
"[0 4 <0 [0 <5 6>] 0> 4 <0!3 2> 4 <0 2> 4]" + "<0!3 [4 6]*2!1>")
)
# "bassWarsaw"
-- # "bass3:3" |+ note 24
# octersubbus 41 (range 0 2.5 "^33")
# crushbus 42 (range 16 2.5 "^53")
# roombus 43 (range 0 0.5 "^33")
# gain 1.3
# pan 0.3
# cut 4
d5 $ gF3 $ gM3
$ midiOn "^90" (ply 2)
$ slow 16 $ chop 16
$ "airports" # cut 5
# pan 0.3
# delaybus 51 (range 0 0.8 "^54")
# delaytime "^34"
# room 0.4 # sz 0.8 # dry 1.1
-- # crushbus 51 (range 16 3.5 "^54")
d7 $ gF3 $ gM3
$ midiOn "^91" (ply "<2 4 <8 [16 8]>>")
$ slow 4
$ midiOn "^55" (slow 4)
$ slice 16 (run 6)
$ chop 16
$ "airports" # cut 5 # speed 0.5
# gain 1.2
# room 0.4
# att 0.02
# rel 2
# freezebus 71 "^55"
# pan 0.8
d8 $ gF1 $ gM1 -- BROKEN BEAT | BREAKS STACK
$ loopAt 2 $ chop 16
$ midiOn "^92" (ply 2)
$ midiOn "^60" ( -- Broken Beat!
whenmod 8 "<7 7 7 3>" rev
. splice 8 "0 3 2 7 . [1 5]*<1!3 2> [4 6]*<1 2>")
$ midiOn "^36" (# n "29")
$ midiOn "^56" (# n "25")
$ "jungle_breaks:24"
d11 $ gM3 $ gF3 $ slice 4 (slow 4 $ run 4) $ "airports:1"
# cut 11
# pan (slow 16 $ range 0 0.4 saw)
# lpf ("<6000 4500 3000 2000>")
d12 $ gM3 $ gF3 -- DRINK ME <3
-- $ slice 16 (slow 8 $ rev $ run 16)
$ (note "<d3 d3 <g3!3 fs3> <fs3!3 a4>>")
# "moogBass"
# cut 12
# pan (slow 16 $ range 1 0.6 saw)
# room 0.8 # dry 0.4
d10 -- FIXME Other RISER
$ chop 4
-- $ mask "<f!24 t!8>"
$ loopAt 8
$ "risers:8"
# cut 10
# hpf 2000
-- # octer 0.5
live/midi/nova/boombap/creme.tidal
-- url: "/home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif"
-- /home/pln/Work/Web/www/next/public/images/parvagues/bg_live.gif
do
-- resetCycles
setcps (93/60/4)
......@@ -37,16 +40,28 @@ d4 $ gF2 $ gM3
# octerbus 42 (range 0 0.93 "^33")
# octersubbus 43 (range 0 1.93 "^33")
# "bassWarsaw"
# pan 0.4
# room 0.3
d5 $ gF3 $ gM3
$ note ("<[f4 [~ g4] [gs4 ~] as4 c5@4] [f5 [~ f5] . ef5 df5 c5@2] [bf4@3 bf4 . gs4 g4 f4@2] f4>" + 12)
# "superfork"
$ note ("[0,12]"
- 24
+ "<[f4 [~ g4] [gs4 ~] as4 c5@4] [f5 [~ f5] . ef5 df5 c5@2] [bf4@3 bf4 . gs4 g4 f4@2] f4>" + 12)
# "superfork seewe r5"
# room 0.3
# pan "0.2 0.8 0.8 0.2"
# octersubbus 52 (range 0 16 "^54")
# crushbus 51 (range 16 2 "^54")
d7 $ gF3 $ gM3
$ struct "t*[8 . <8!3 16>]"
$ midiOn "^59" (struct "t*[8 . <8!3 16>]")
$ midiOff "^59" (struct "<[t(3,8)]!3 [t(3,8) . t(3,8)]>")
$ note (
"<[f4@3 g4 . gs4 as4 c5@2] [f5@3 f5 . ef5 df5 c5] [bf4@3 bf4 gs4 g4 f4] f4>"
+"[0,12]" )
# "pluck"
# delaybus 71 "^55"
# delaytbus 72 (range "s" ("h"+"q") "^35")
# delayfbbus 73 "^19"
# room 0.3 # pan 0.66
d8 $ gF1 $ gM1
$ chop 8
$ loopAt 1
......@@ -62,75 +77,6 @@ d8 $ gF1 $ gM1
)
$ "break:8" # cut 8
-- -- # midiG' "^80" 0 1
-- # room 0.2 # sz 0.1 # dry (slow 4 $ range 0.9 0.6 saw)
-- d4 $ gF2 $ gM3
-- $ midiOn "^89" (ply 2)
-- $ slow 2
-- $ note (
-- struct "t(3,8) t(3,8)" $
-- arp "converge" $
-- cat [
-- "[bf3, d4, f4, a4]", -- Bbmaj7
-- "[a3, c4, e4, g4]", -- Am7
-- "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
-- "[g3, b4, d5, <f5 ~>]" -- <G7 G>
-- ] - 12)
-- # "bassWarsaw"
-- # crushbus 41 (range 16 4 "^53")
-- # room 0.2
-- # legato 0.5
-- # gain 1.4
-- d7 $ gF2 $ gM3
-- $ midiOn "^89" (ply 2)
-- $ slow 2
-- $ note (
-- struct "t(3,8) [t(<3!3 5>,8)|t|t*2]" $
-- arp "up" $
-- cat [
-- "[bf3, d4, f4, a4]", -- Bbmaj7
-- "[a3, c4, e4, g4]", -- Am7
-- "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
-- "[g3, b4, d5, <f5 ~>]" -- <G7 G>
-- ])
-- # "moogBass"
-- # cut 7
-- # room 0.2
-- # legato 0.5
-- # delay 0.7
-- # delayt 0.125
-- # delayfb 0.5
-- d5 $ gF2 $ gM3 $ slow 2 -- V2
-- -- $ superimpose ((arp "up") . (|+ note 12))
-- $ midiOn "^89" (stutWith 4 0.25 ((|* gain 0.85) . (# room 0)))
-- $ note (cat [
-- -- PARTITION ORIGINALE
-- "[bf3, d4, f4, a4]", -- Bbmaj7
-- "[a3, c4, e4, g4]", -- Am7
-- "[d4, f4, a4, c5, <e5 e4>]", -- Dm9
-- "[g3, b4, d5, <f5 ~>]" -- <G7 G>
-- ]
-- - 12
-- )
-- # "FMRhodes2"
-- -- |- note 12
-- |+ note 2 -- Adjust to C
-- # modIndex (range 0 2 "^54")
-- # room 0.4
-- -- # midiG' "^81" 0 1.6
-- d8 $ gF1 $ gM1
-- $ midiOff "^60" (mask "f(4,8)" . chop 8)
-- $ midiOn "^92" (ply 4)
-- $ midiOn "^36" (# "jungle_breaks:45")
-- $ midiOn "^56" (# "jungle_breaks:30")
-- $ iter "1 <1!4 4!4>"
-- $ chop 8
-- $ loopAt 2
-- $ "break:2"
-- -- # n 4
-- # cut 8
-- # gain 0.7
C ASH
R ULES
......
live/midi/nova/breaks/bain_electrique.tidal
......@@ -97,12 +97,12 @@ d8 $ gM1 $ gF1 -- BOOM BOOM THE BREAKS
)
$ fix (|* gain 0.8) ("jungle_breaks:24")
$ whenmod 8 7 (slice 4 "0 3 2*<1 2> 1*<1 2 4 4>")
$ midiOn "^36" ((# n "19") . (|* gain 1.1)) -- Pure COMEON!
$ midiOn "^36" ((# n "24") . (|* gain 1.1)) -- Pure variations!
$ midiOn "^56" ((# n "23") . (|* gain 1.1)) -- Raise COMEON!
-- $ midiOn "^60" (const $ loopAt 2 $ chop 8 $ "jungle_breaks:60" # gain 0.8)
$ chop 16 $ loopAt 2
$ "jungle_breaks:24"
# gain 1.7
# gain 1.4
d10 $ gF3 -- Ambient Pads
$ whenmod 64 32 (ply "1 2 <1 <2 4 8 2>> <<2 1 4 <1 4>> 1>")
$ chop 8
......
live/midi/nova/breaks/lady_perplexity.tidal
......@@ -29,6 +29,7 @@ d3 $ gF1 $ gMute
-- # midiG' "^80" 0 1.6
# gain 1.1
d4 $ gF2 $ gM3-- Basse Magie Noire Meta-Programmation. :sorcerer:
-- FIXME: Si les dieux d'OPAL t'inspirent, remplace moi
$ midiOn "^57" (struct "t(4,8,1)")
$ slow 4
$ midiOff "^89" (mask "t t t f")
......@@ -44,29 +45,40 @@ d4 $ gF2 $ gM3-- Basse Magie Noire Meta-Programmation. :sorcerer:
# room 0.7
# sz 0.3 # dry 1.5
# gain 1.2
d5 $ gF2 $ gM3
d5 $ gF2 $ gM3 -- Giorgio Friendo
$ slow 2
$ stack [
note ("c3(3,8) <d3 <d3*2 d3(3,8)>> e3([3 1 3],8) g3" + "<0!7 -2>" + 24) # "giorgio_syn:7"
note ("c3(3,8) <d3 <d3*2 d3(3,8)>> e3([3 1 3],8) <g3 [g3 <e3 d3>]>"
+ "<0!7 -3>"
+ 24)
# "giorgio_syn:7"
# cut 51
# gain 0.7
# att 0.14 # rel 2
# legato 1.2
,
note "<c3 g2 a2 f2>" # s "FMRhodes1" # gain 1.0 # legato 1.5
note "<c3 g2 a2 f2>"
# "FMRhodes1"
# gain 1.0
# legato 1.5
]
# room 0.3 # size 0.5
# gain 1.2
# room 0.8 # size 0.8
# gain 2
# pan 0.3
# crushbus 51 (range 16 3.5 "^54")
d12 $ gF3 $ gM3
-- $ midiOff "^29" (# delay 0)
$ slow 4 $ ply 2
$ note "<[c4,e4,g4] [c4,f4,a4] [c4,e4,g4] [g3,b3,d4]>"
# "FMRhodes2"
# legato 2
# delaybus 51 (range 0 1 "^29") # delayt 1.125 # delayfb 0.8
# gain 1
# delay (range 0 1 "^29")
# delayt 1.125
# delayfb 0.8
# gain 1.4
# lpf (slow 16 $ range 800 2000 sine)
# room 0.4
d7 $ gF3 $ gM3 -- Lady Perplexity
d7 $ gF3 $ gMute3 -- Lady Perplexity
-- $ whenmod 8 7 (# silence)
$ midiOn "^91" (ply "2 4 <8 8 4 16>")
$ midiOn "^59" (chop 4)
......@@ -75,9 +87,10 @@ d7 $ gF3 $ gM3 -- Lady Perplexity
$ sometimesBy "^55" (rev)
-- $ midiOff "^59" (chop 4)
$ chop 16
$ loopAt 8
$ loopAt 8
$ "rhadamanthe_vocal:1"
# cut 7
# pan 0.6
# room 0.4 # sz 0.5 # dry 1.4
-- # pan (slow 16 $ range 0.9 0.6 saw)
# gain 1.2
......
live/midi/nova/breaks/madeleine_de_paris.tidal 0 → 100644
-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
do
setcps (80/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [f <t f>]>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (fast 2 . (<| "k k k k*2"))
$ midiOff "^42" (<| "k*<1!7 2> ~ . ~ <~!7 [k*2 k]>")
$ fix (# lpf 1200) "kick"
$ "[jazz, kick:3]"
-- # room 0.2 # sz 0.3 # dry 1.4
# gain 1.4
d2 $ gF1 $ gM2
$ midiOn "^42" (fast 2)
$ "~ c ~ c*<1 <4 2 4 [8 4]>>"
# "vec1_claps:2"
-- # lpf 4000
# gain 1.4
d3 $ gF1 $ gM1
$ "hh(3,8) hh(3,8)" # "h2ogmsn:4"
# delay 0.5 # delayt "<0.05 0.1 0.2 0.3 0.4>" # delayfb 0.8
d4 $ gF2 $ gM2
$ note "d4/4"
# "moog:1"
# room 0.2
# sz 0.4
# crushbus 41 (range 12 3 "^53")
# octersubbus 42 (range 0 2 "^33")
d5 $ gF2 $ gM2
$ superimpose ((|* gain (range 0 1.5 "^34")) . (# n 5) . (|+ note 12))
$ midiOn "^58" (fast 2)
$ fast 2
$ note ("d4 a3*<1!12 2!4> d4 <a3!3 <b3 f3>>" + 3)
# n "4"
# "vec2_synth_acid"
# room 0.2
# sz 0.4
d8 $ gF1 $ gM1
$ midiOn "^60" (splice 4 "0*2 1*<2 8 2 <4 3 5 8>> 2(3,8) 4*<1 2 1 8>")
$ chop 8
$ loopAt 2
$ midiOn "^56" (|> "jungle_breaks:10")
$ "jungle_breaks:1"
# cut 8
-- d7 $ gF1 $ gM1
-- $ midiOn "^91" (ply "2 <2!2 <3 4> <4 8>>")
-- $ midiOn "^55" (slice 4 "<[0 1 2 3]!6 3*8 3*[16 . 32 8 8 4]>"
-- . (loopAt 1)
-- . (# "jungle_breaks:19")
-- . (|* gain 1.2)) -- Pure COMEON!
-- $ slice 4 "0 1 <2 ~ ~ 2*<2 4>> 3*<1!3 <2 [2 <4 8>]>>"
-- $ loopAt 1
-- $ "temptation:4"
-- # cut 8
-- # pan 0.3
-- d4 $ gF2 $ gM3 -- TEMPT MY BASS
-- $ superimpose ((|+ note 12) . (# cut 41) . (# pan 0.8))
-- $ midiOn "^89" (ply "2 <2!2 <3 4> <4 8>>")
-- $ midiOn "^57" (# n 3)
-- $ chop 8
-- $ "temptation"
-- # n 2 # cut 4 # room 0.3 # sz 0.4
-- # crushbus 41 (range 12 3 "^53")
-- # octersubbus 42 (range 0 2 "^33")
-- d5 $ gF3 $ gM3
-- $ midiOn "^90" (ply "<4 [4 8]>")
-- $ midiOn "^58" (fast 4)
-- $ slice 8 "<0 0 1 1 2 2 3 3>/2"
-- $ "temptation:0"
-- # cut 5
-- # room 0.4 # sz 0.8
-- # crushbus 51 (range 12 3 "^54")
-- # octerbus 52 (range 0 1 "^34")
-- d8 $ gF1 $ gM1
-- $ chop 8
-- $ midiOn "^60" (off 0.5 id)
-- $ midiOn "^92" (ply "2 <2!2 <3 4> <4 8>>")
-- $ midiOn "^36" (# n 93)
-- $ midiOn "^56" (# n 45)
-- $ loopAt 4
-- $ slice 4 "0 1 2 3*<1!3 8>"
-- $ "jungle_breaks:12" # cut 8
-- # pan 0.8
d7 $ gF3 $ gM3 -- TEMPTATION VOICES
-- $ midiOn "^16" (# n 8)
-- $ midiOn "^17" (chop "8 <16!32 230!32>")
-- $ midiOn "^19" (>| n "8/2")
$ n "7/2"
# end "<0.8!8 1!8>"
# "temptation"
# cut 9
# roombus 91 "^19"
# delaybus 92 (range 0 1.5 "^18") # delayt 0.5 # delayfb ("^75" * 0.7)
live/midi/nova/breaks/the_secret.tidal
......@@ -12,50 +12,94 @@ let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (fast 2 . (<| "k k k k*2"))
$ midiOff "^42" (<| "k*<1!7 2> ~ . ~ <~!7 [k*2 k]>")
$ "[jazz]" # room 0.2 # sz 0.3 # dry 1.4
# gain 1.3
$ fix (# lpf 1200) "kick"
$ "[jazz, kick:3]"
-- # room 0.2 # sz 0.3 # dry 1.4
# gain 1.7
d2 $ gF1 $ gM2
$ midiOn "^42" (fast 2)
$ "~ c ~ c*<1 <4 2 4 [8 4]>>"
# "cp" # lpf 4000
d3 $ gF1 $ gM1
$ "hh(3,8) hh(3,8)" # "h2ogmsn:4"
# delay 0.5 # delayt "<0.05 0.1 0.2 0.3 0.4>" # delayfb 0.8
-- $ "jazz"
$ midiOff "^42" (mask "<f!3 [t <f t>]>")
$ "~ c*<1!4 [4 2] 1 1 2> ~ c*<1 <4 2 4 [8 4]>>"
# "vec1_snare:46"
# lpf 4000
# pan 0.4
# gain 2
# note "-4"
d3 $ gF1 $ gM1
$ "h(3,8) h(<3 <5 [5 <1 <8 [8 16]>>]>>,8)"
# pan "0.2 0.8"
# drumFrom "rolandtr909" "hh:2" # cut 3
# gain 1.8
# legato (range 0.05 0.9 "^32")
d7 $ gF1 $ gM1
$ midiOn "^91" (ply "2 <2!2 <3 4> <4 8>>")
$ midiOn "^55" (slice 4 "<[0 1 2 3]!6 3*8 3 32 8 8 4]>"
. (loopAt 1)
. (# "jungle_breaks:19")
. (|* gain 1.2)) -- Pure COMEON!
$ slice 4 "0 1 <2 ~ ~ 2*<2 4>> 3*<1!3 <2 [2 <4 8>]>>"
$ loopAt 1
$ "temptation:4"
# cut 8
# pan 0.3
d4 $ gF2 $ gM3 -- TEMPT MY BASS
$ midiOff "^57" (superimpose ((|+ note 12) . (# cut 41) . (# pan 0.8)))
$ midiOn "^89" (ply "2 <2!2 <3 4> <4 8>>")
$ midiOn "^57" (# n 3)
$ chop 8
$ loopAt 1
$ "temptation"
# n 2 # cut 4 # room 0.3 # sz 0.4
# crushbus 41 (range 12 3 "^53")
# octersubbus 42 (range 0 2 "^33")
# gain 1.8
d5 $ gF3 $ gM3
$ midiOn "^90" (ply "<4 [4 8]>")
$ midiOn "^58" (fast 4)
$ slice 8 "<0 0 1 1 2 2 3 3>/2"
$ midiOn "^58" (fast 4 . slice 8 "<0 0 1 1 2 2 3 3>/2")
$ "temptation:0"
# cut 5
# room 0.4 # sz 0.8
# crushbus 51 (range 12 3 "^54")
# octerbus 52 (range 0 1 "^34")
# gain 1
d8 $ gF1 $ gM1
$ chop 8
$ midiOn "^60" (off 0.5 id)
$ midiOn "^92" (ply "2 <2!2 <3 4> <4 8>>")
$ midiOn "^36" (loopAt 0.25 . (# n 93)) -- Mon break à moi il parle fort, ouais
$ midiOn "^56" (loopAt 0.25 . (# n 45))
$ loopAt 4
$ slice 4 "0 1 2 3*<1!3 8>"
$ chop 8
$ "jungle_breaks:12" # cut 8
# pan 0.8
# gain 1.4
d9 $ gF3 $ gM3 -- TEMPTATION VOICES
$ n "<7!8 8!8>/2"
# end "<0.8!8 1!8>"
$ midiOn "^16" (# n 8) -- Bring it to your knees
$ midiOn "^17" (chop "8 <16!8 64!8>")
$ midiOn "^19" (rev . chop 4)
$ midiOff "^16" (# end "<0.8!8 1!8>")
$ n "7/2" -- Base: Listen - I'm the one
# "temptation"
# cut 9
# roombus 91 "^19"
-- # delaybus 92 (range 0 1.5 "^18") # delayt 0.5 # delayfb 0.8
# gain 1.4
d10 $ gF3 $ gM3 -- GIMME THAT
$ "~!3 v" # end (range 0.1 0.245 "^29")
# "vocal_bordel"
# cut 10
# gain 1.3 # lpf 3000 # room 0.3 # octersub 0.8
d11 $ gF3 $ gM3 -- ANGELS
$ whenmod 32 16 (whenmod 4 3 (rev))
$ midiOn "^30" (chop 16)
$ n "<5!8 6!8>" # "temptation"
# cut 11
# begin (slow 4 $ "<0 0.5>")
# room 0.4 # sz 0.4
-- # delaybus 110 (range 0 0.5 "^")
d12 $ gF2 $ gM3 -- BASS ACID LINE
$ fast "<1!16 2!48>"
$ note ("a(<3 [5 3]>,8) <c c [ef d] [d fs]>" + 3 - 12)
# "vec2_synth_acid:8"
# gain (slow 16 $ range 0.65 0.9 saw)
# cut 12 # room 0.3
-- # gain 1.3
live/midi/nova/breaks/ton_numero.tidal
......@@ -23,6 +23,8 @@
-- 22. kill scats
-- 23. Fade out on choir
do
-- resetCycles
......@@ -35,7 +37,7 @@ let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k*<1!12 2 1 1 2> <~!4 [~ k]!4> . ~ k ~ <~ k>")
-- $ midiOn "^42" (<| "k*<1!12 2 1 1 2> <~!4 [~ k]!4> . ~ k ~ <~ k>")
$ midiOn "^42" (<| "k k k k*<1 2>")
$ midiOff "^42" (<| "k . ~ k ~ ~")
$ "[808bd:4,808bd:2]"
......@@ -52,6 +54,7 @@ d2 $ gF1 $ gM1
# gain "1 1 0.93 1"
d3 $ gF1 $ gM1
$ whenmod 8 15 (mask "t t t f")
$ midiOn "^44" (struct "t*8")
$ "hh*[8 <16!6 8!2> <8!7 16>]"
# "h2ogmhh:3" # cut 3 # gain (1 * "1 1 0.9 1 0.9 0.85 0.9 1")
# pan "^18"
......@@ -80,7 +83,7 @@ d4 $ gF2 $ gM3
# pan 0.4
# crushbus 41 (range 16 5 "^53")
# octersubbus 42 (range 0 0.8 "^33")
d5 $ gF1 $ gM3 -- Donne moi ton Private Number <3
d5 $ gF3 $ gM3 -- Donne moi ton Private Number <3 FIXME Decalage?
$ fix ((# rel 2) . (# legato 1)) (n 2)
$ midiOn "^34" (# n 2) -- Force chants
$ midiOn "^73" (# lpfbus 55 1200) -- Mask drums in sample
......
live/midi/nova/disco/buena_sera_milano.tidal 0 → 100644
do
setcps (115/60/4)
d1
$ "k k k <k <[~ k] k*2>>" -- 4F
-- $ "k ~ ~ k ~ ~ k ~" -- Habanero
# "jazz"
d2
$ fast 2 $ "~ s*<1!3 2>" -- 4F Friend
-- $ "~ s ~ ~ ~ s ~ ~"
# "clap:2"
# gain 0.77
-- # room 0 # dry 1.23
-- # note "-0"
d3
$ struct "[t t t t]*4"
$ "h2ogmhh:3"
# gain "0.6 0.8 0.9 0.6"
d4 $ note "g5" # "giorgio_syn:2" # cut 4
d5 -- Signorina piano
$ slice 2 "<0 1 1 0>" $ n "<0!12 1!4 0!8 1!8>"
# "buona_sera" # cut 5
d6
$ slow 4 $ n "<20 21>" # "buona_sera"
# cut 6
# room 0.4
d8
$ mask "t(<4!3 [8 <8 <4 [4 2]>>]>,8,1)" $ chop 8
$ loopAt 2 $ chop 8
$ "jungle_breaks:45"
# gain 1.2
# hpf 1500
-- Simple habanera rhythm kick/snare loop for intro
d3 $ stack [
sound "kick" # cut 1 # speed "1" # struct "x--x--x-", -- kick on habanera pulse
sound "snare" # cut 1 # speed "1" # struct "-x---x--" -- snare accents
]
live/midi/nova/dnb/la_bonne_pression.tidal
......@@ -9,18 +9,21 @@ let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gM2 $ gF1
$ midiOn "^42" ((<| "k*4") . (# legato 0.5))
$ midiOn "^42" ((<| "k k k <k <[~ k] k*<2 [4 2]>>>") . (# legato 0.5))
$ midiOff "^42" ((<| "<k ~> . ~ [~ k ~] ~ <~!3 k>") . (# legato 0.5))
$ "[808bd:1,808bd:2,jazz]"
d2 $ gM1 $ gF1
$ midiOn "^43" ((<| "~ s ~ s"))
$ midiOff "^43" ((<| "~ . <~ s*<<1 2 4>>> ~"))
$ "snare:41"
# lpf 5000
# room 0.4
d3 $ gMute1 $ gF1
$ midiOff "^44" (mask "t(2,8,1)")
$ "~ h ~ h ~ <h!6 ~!2> ~ h*<1!4 2!3 <2 <1 4>>>"
$ "~ h ~ h ~ <h!6 ~ h*2> ~ h*<1!4 2!3 <2 <1 4>>>"
# "ho" # n "<0!6 1 1>"
# cut 3
# att 0.04 # rel 2
d4 $ gM3 $ gF2 -- DARK CURSE BASSLINE
$ midiOn "^89" (ply 2)
$ note (
......@@ -61,6 +64,10 @@ d11 $ gM3 $ gF3 -- Bluesky additions
# "blues_guitar_bluesky_60"
# cut 11
# gain 0.8
d12 $ gM3 $ gF3
$ off 0.125 (arp "up" . (|- note 12))
$ note ("<a!4 c!3 a a!6 cs ~>" + "-12" + "c'maj'2")
# "moogBass"
d8 $ gM1 $ gF1 -- BREAKS WITH RULES <3
$ midiOn "^60" (mask "t(4,8,1)" . chop 8)
$ midiOn "^92" (mask "t(4,8,1)" . chop 8)
......@@ -72,9 +79,9 @@ d8 $ gM1 $ gF1 -- BREAKS WITH RULES <3
$ "trance_loops:2"
# cut 8
d10 -- Slow low Riser
$ mask "<f!12 t f f f>"
-- $ mask "<f!16 f!8 t!8>"
$ loopAt 8
$ "risers:7"
# speed 1.7
# begin 0.25
# room 0.4
# cut 10
......
live/midi/nova/dnb/la_foule.tidal
......@@ -28,18 +28,24 @@ d2 $ gMute1 $ gF1 -- snare contretemps variable
# pan 0.65
-- # legato 0.22
d3 $ gM1 $ gF1
$ midiOn "^44" (ply "<2!6 4 8>")
$ "~ d ~ d ~ d ~ <d!12 [~ d]!3 [d d]>"
# "snare:34"
# hpf 7000
-- # midiG' "^80" 0 1.5
# "vec1_snare:34"
d4 $ gF2 $ gM3
$ superimpose (-- LASER CRUSH BASS
(|* gain "^53") . (# room 0.2) . (# lpf 2400) . (# n "29") . (|- note 12) . (# cut 41))
$ note "<[e4@3 e4@2 fs4 e4] b3 [b3@3 b3@2 b3 d3] e4>"
# "vec2_synth_acid:28"
$ midiOn "^89" (ply 2)
$ midiOn "^57" (ply 2)
$ midiOff "^57" (ply "1 1 1 <1!8 <[1|2]!3 2>!8> 1" . degradeBy "0 <0.5!3 0> 0 <0.5!8 0!8> 0")
$ note ("e fs <b e bf a> fs <g!3 g4>" - 24)
# "bassWarsaw"
# crushbus 41 (range 16 4.5 "^53")
# octersubbus 42 (range 0 4.5 "^33")
-- e fs b g bf a
# gain 1.4
-- # room 0.2 # sz 0.3 # dry 1.1
# cut 4
# pan 0.7
d5 $ gF3 $ gM3
$ midiOn "^90" (ply 8)
$ midiOn "^90" (ply "4 <4!3 8>")
-- $ slow 4
$ slice 4 "<0*[4 1] 1 2 3>"
-- $ whenmod 16 12 (>| "<~ ~ foule_keys:5 ~>")
......@@ -50,12 +56,15 @@ d5 $ gF3 $ gM3
# "foule_keys"
# cut 5
# room 0.2 # sz 0.2
# pan 0.42
d9 $ gF2 $ gM3 $ note "<e4 a4 g4 b4>/4" # "moog" # cut 9
d7 $ gF3 $ gM3
$ midiOn "^91" (ply "<2 [4 8]>" . chop 4)
$ midiOn "^59" (("<0.2 0>" <~) . (# n "<<8 9> ~!3>"))
$ n "<0 1 2 3 4 5 6 7>/2"
# "foule_vox"
# cut 7
# cut 71
# pan 0.6
d8 $ gF1 $ gM1
$ midiOff "^60" (mask "t(4,8,1)") -- Techno drum mask
$ midiOn "^36" ((# "jungle_breaks:22")) -- Raise COMEON!
......
live/midi/nova/dnb/lime_tacos.tidal 0 → 100644
-- /home/pln/Downloads/PerfectSunriseLoop.gif
do
-- resetCycles
setcps (110/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let lagTime = pF "lagTime"
let filterRange = pF "filterRange"
let width = pF "width"
let rq = pF "rq"
let modIndex = pF "modIndex"
d1 $ gF1 $ gMute2
$ midiOn "^42" (struct "t t t*<1!6 2 1> t*<1!7 2>")
$ midiOff "^42" (struct "t . ~ t ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>")
$ stack [
"kick" # lpf 10000 # cut 1,
"rumble" |* gain 1.3
# lpf 200
# cut 11,
""
]
# "[techno:1,jazz]"
# gain 1.4
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "[vec1_snare:4]"
# lpf 1800
# gain 1.3
d6 $ gF1 $ gM1 -- Cymbales sol
$ midiOn "^44" (<| "~ cy ~ cy ~ cy ~ <cy [~ cy]>")
$ midiOff "^44" (<| "~!7 <~ <cy ~> ~ cy>")
$ "cy" # "<cy:1!6 cy:2!2>" # "h2ogmcy"
|* gain (range 1.1 0.8 perlin)
|* legato (range 0.5 2 (fast 2 perlin))
d3 $ gF1 $ gM1
$ midiOn "^76" ((# "dr") . (|* gain 1.45))
$ midiOff "^44" (mask "t(4,8,1)")
$ "hh*[16 . <16!3 <[16 8] 8>>]"
# "vec1_claps"
# cut 3
# legato (slow 13 $ range 0.3 2 saw)
# delaybus 31 (range 0 1 "^52") # delayt "e" # delayfbbus 32 "^32"
d4 $ gF2 $ gM3
$ midiOn "^57" (chop 4)
$ midiOn "^17" ((# n 1) . (|* gain 0.8))
$ "molotov:0/2"
# cut 4
# gain 1.8
# room 0.4 # sz 0.9 # dry 1.3
# crushbus 41 (range 16 2.5 "^53")
# octerbus 42 (range 0 0.8 "^33")
d5 $ gF3 $ gM3
$ midiOff "^58" (mask "t(8,16)")
$ note (
"a4!15 <<a4!4 c4!3 d4> <g4 c5>>"
-- + "[0*16]"
-- + "[0,<~!3 12>]"
)
# "acidOto3092"
# gain 1.5
# room 0.3
# filterRange (range 0 7 "^18")
# width (range 0.05 0.5 "^34")
# crushbus 51 (range 16 3.5 "^54")
# rq 0.3 -- TODO EXPLORE <3
d7 $ gF3 $ gM3
$ midiOn "^35" (
-- slice 4 "[0 1 2 3]/2"
chop 8 .
(# n 7)
)
$ midiOn "^91" (
fast 2 . slice 4 "<[0 1 2 3] [0 1 2 3] <[0 1 2 3] [0 2 3 0]> [0*4]>" .
(# n 5)
)
$ midiOff "^91" (
superimpose (mask "<f!3 t>" . (# "molotov:3"))
)
$ "molotov:4/4"
# cut 7
# crushbus 71 (range 16 3.5 "^55")
# gain 1.4# room 0.4 # sz 0.8
d8 $ gF1 $ gM1
$ midiOn "^60" (mask "t(4,8,1)" . chop 4)
$ chop 8
$ midiOn "^56" (loopAt 2 . (# n 16))
$ midiOn "^36" (loopAt 2 . (# n 45))
$ loopAt 1
$ "jungle_breaks:11"
# cut 8
# gain 1.5
d9 $ gF3 $ gF3
$ "molotov:2/2"
# cut 5
# octersub 2
# room 0.4 # sz 0.4 # dry 1.5
# gain 1.5
d11 $ gF2 $ gMute3 -- Menace de retour
$ slow 2
$ whenmod 32 24
(fast 4 . (>| note ("[a3 <d3 e3 f3 g3>]" + "[0,12]")))
$ note "<[a3@15 <as3 as3 c4 d4>]>"
-- $ someCyclesBy "<1!16 1!32 0!16>" (>| note "<b3 ~ ~ <[~!7 c4] [~!5 c4 ef4 <c4 fs4>]>>")
-- Variante Adrianesque
-- $ someCyclesBy "<0!16 1!32 0!16>" (>| note "<b3 ~ ~ [ c4@2 ~ . ef4 fs4 c4]>")
-- Variante Adrianesque Folle
-- $ someCyclesBy "<0!16 1!32 1!12 0!4>" (>| note "<b3 ~ [g4 a4 b4 a4 es4 a4 fs4 a4 c4] [~ ~ as4 ~]>")
-- Variante Adrianesque Folle2
-- $ someCyclesBy "<0!16 1!32 0!12 1!4>" (>| note "<[b3 ~] [as3 bs3 g3 cs4 ~ d4] [~ gs4 ~ ~] [~ ~ [as4 as4] ~]>")
# "90s_synatm:10"
# room 0.3 # sz 0.8
# gain 2
# att 0.10
# rel 10
# crushbus 101 (range 16 3.5 "^14")
# legato 2
# cut 9
live/midi/nova/dnb/something_about_drums.tidal
......@@ -50,6 +50,7 @@ d4 $ gF2 $ gM3
-- # legato 0.5
# gain 1.3
d7 $ gF2 $ gM3
$ midiOn "^59" (struct "t(4,8,1)")
$ midiOn "^89" (ply 2)
$ slow 2
$ note (
......@@ -64,7 +65,7 @@ d7 $ gF2 $ gM3
# "moogBass"
# cut 7
# room 0.2
# legato 0.5
-- # legato 0.5
# delay 0.7
# delayt 0.125
# delayfb 0.5
......
live/midi/nova/dnb/venons_ensemble.tidal
......@@ -38,7 +38,7 @@ d3 $ gF1 $ gMute2
$ midiOn "^44" (ply "1 2")
$ midiOn "^76" (ply "<2 [2 4]>")
$ fix ((|* gain (slow 32 $ range 0.3 1.3 saw))) "oh"
$ "~ h ~ h ~ h*<1!3 2 1 1 2 2> ~ h*<1!7 2>" # drumFrom "sakatadpm48" "[hh,oh]"
$ "~ h ~ h ~ h*<1!3 2> <~!3 h> h*<1!3 2>" # drumFrom "sakatadpm48" "[hh,oh]"
# n "0!3 <0!3 1>"
# pan 0.35
d4 $ gF2 $ gMute3 -- COME WITH THE BASS
......@@ -55,7 +55,8 @@ d4 $ gF2 $ gMute3 -- COME WITH THE BASS
$ slow 2
$ midiOn "^89" (ply "1 <4 2>")
$ midiOn "^57" (ply 2 . chop "8 . <8!3 16> <8 16>")
$ n ("<[0 0]!6 [1 1] <2 [2 2]>>")
$ n ("<[0 0]!6 [1 1] <2 [2 2]>>") -- TODO SYNC WITH OVER ME
-- $ n ("<[0 0]!6 [1 1] <2 [2 2]>>")
# "come_bass"
# cut 4
# crushbus 43 (range 16 3.5 "^53")
......
live/midi/nova/dnb/wap.tidal 0 → 100644
do
setcps (133/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [f <t f>]>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2 -- Kick
$ midiOn "^42" (<| "k k k <k <[~ k] k*2>>")
$ midiOff "^42" (<| "k . ~ k ~ ~ ")
$ "[kick:4]"
# gain 1.2
# lpf 400
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ s ~ s")
$ midiOn "^43" (<| "~ s ~ s*<1 2 [2 1] [4 <2 8>]>" )
$ "cp" # hpf 1400 # gain 1.3
d3 $ gF1 $ gM1$ "hh(3,8) hh(3,8,1)" # "vec1_snare:11"
d4 $ gF2 $ gM3 -- WAP BASS
$ midiOn "^57" (# n 1)
$ "wap/2"
# bandf 400 # cut 4
# gain 1.9
# room 0.4
# octersubsubbus 42 (range 0 1.4 "^53")
# octerbus 41 (range 0 1.4 "^53")
d5 $ gF3 $ gM3 -- WAP HOES
$ midiOn "^34" (# 7) -- FORCE INTRO
$ midiOff ("^34"+"^90") (slow 4)
$ stut 4 1 1 -- Four repeats each
$ slow 4
$ midiOn "^58" (stut "4" 0.9 (fast 4 "e"))
$ midiOn "^90" (ply "[1!3 4]*4" . chop 4 . stut "4" 0.9 (fast 4 "s") . (# att 0.08) . (# rel 10))
$ "wap:0" # n ("<8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31>") -- Rotation complete
# cut 5
# room 0
# sz 0
# gain 1.4
d7 $ gF1 $ gM1 --Les WAP DRUMS
$ midiOff "^60" (mask "t(4,8,1)" . chop 8)
$ midiOn "^91" (ply "2 <2 4>")
$ loopAt 2 $ chop 8
$ "wap" # n "<3!4 4!4 5!4 6!4>"
# cut 7 # gain 1.8
d8 $ gF1 $ gM1 -- La stack de breaks
$ midiOff "^60" (mask "t(4,8,1)" . chop 8 ) -- BREAK JUNGLE
$ midiOn "^92" (ply 2) -- BREAK JUNGLE
$ midiOn "^36" (# 45) -- BREAK ORLEANS
$ midiOn "^56" (# 7) -- BREAK JUNGLE
$ loopAt 2 $ chop 8
$ "jungle_breaks:84" # cut 8
# gain 1.6
d9 $ gF2 $ gM3 $ slow 2
$ fast 2 $ off 1 (|- note "0 12")
$ note "[b@3 ~@2 c@3 <cs <[cs@2 ~ g e] [cs@2 ~ g e g e]>>@5]"
-- # "bassWarsaw" |- note "[36,24]"
# "acidOto3091" -- V1 Bass
# "vec2_synth_acid:25" -- Alternative2
# "vec1_acid:25" -- Alternative
# crushbus 91 (range 16 6.5 "^19")
# room 0.4
# gain 1.4
# cut 9
live/midi/nova/giant.tidal 0 → 100644
-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
do
setcps (80/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t!3 [f <t f>]>"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gM2
$ midiOn "^42" (fast 2 . (<| "k k k k*2"))
$ midiOff "^42" (<| "k*<1!7 2> ~ . ~ <~!7 [k*2 k]>")
$ "[jazz]"
live/midi/nova/lofi/lendemain_divin.tidal
......@@ -14,17 +14,17 @@ setcps (95/60/4)
d1 $ gMute2 $ gF1
$ fix (|* gain 0.9) "kick:6"
$ midiOn "^42" (<| "k <~!8 k!56> . <~!4 k!28> k*<1!3 2>")
$ midiOff "^42" (<| "k . ~ ~ ~ <~ k ~ [~ k]>")
$ midiOff "^42" (<| "k . ~ ~ ~ <~ k*<1!3 2> ~ [~ k*<1 2 1 <1 2>>]>")
-- $ "[techno:0,808bd:2,909,kick:6]"
$ "[jazz,kick:4]"
$ "[jazz,kick:4]" -- TODO REWORK KICK FOR LIGHTER VIBE
# lpf 6000
# gain 1.5
d2 $ gMute $ gF1
$ midiOn "^43" (fast 2)
$ midiOn "^75" (# "cp")
$ fix (# note "-4") "snare"
$ "~ s*<1!3 <2 4>>"
# "[snare:32]"
# note "-4"
# "[vec1_snare:16]"
-- # lpf 2000
# gain 1
d3 $ gF1 $ gMute
......@@ -40,7 +40,7 @@ d3 $ gF1 $ gMute
# rel 0.4
# room 0.2 # dry 0.9
# gain 1.05
d4 $ gF2 -- Basse complainte
d4 $ gF2 $ gMute3 -- Basse complainte
$ midiOn "^89" ((ply "8 <16 [16 8]>")
-- . (# room "0 0.4")
-- . (# sz "1 1.2")
......@@ -55,6 +55,25 @@ d4 $ gF2 -- Basse complainte
)
$ "bassWarsaw"
# crushbus 41 (range 16 2.5 "^53")
# octersubbus 42 (range 0 2.5 "^33")
# room 0.2
# cut "41 42 43 44"
# gain 1.42
d5 $ gF3 $ gM3 -- SIDEKICK LEAD AMI FIABLE DE LA BASSE
$ midiOn "^90" ((ply "4 <8 [8 4]>")
-- . (# room "0 0.4")
-- . (# sz "1 1.2")
. (# cut 4))
-- Bassline habituelle
$ midiOff "^57" (
|+| note "<<d4!6 [d4@7 <f4 g4>]!2> <a3!4 [a3@7 <c4 c3>]!4> [<g3 [g3@7 f3]>] d3>"
)
$ midiOn "^57" (
|+| note "<[d3@6 c3@2] <as3 as3*2> <[f4@6 f4 g4] [f4@5 g4 f4 c4]> d4>"
)
$ note "0 7 <0!3 [0 15]> 12" # "FMRhodes1"
# crushbus 51 (range 16 2.5 "^54")
# modIndex (range 0 2.5 "^34")
# room 0.2
# cut "41 42 43 44"
# gain 1.42
......@@ -65,6 +84,7 @@ d7 $ gMute3 $ gF3
# lpfbus 62 (range 10000 7500 "^55")
# room 0.3
d8 $ gM $ gF3
$ midiOn "^60" (mask "t(4,8,1)" . chop 8)
$ midiOn "^92" (ply "<4 4 8 16>")
$ midiOn "^20" (loopAt 4 . (# n 11)) -- Submarine break
$ midiOn "^36" (# "jungle_breaks:45") -- House Orleanaise
......@@ -76,3 +96,7 @@ d8 $ gM $ gF3
# room 0
# gain 1.2
# cut 8
-- TODO: POTENTIEL INEXPLOITE EN CHACUN
d10 $ silence
d11 $ silence
d12 $ silence
live/midi/nova/lounge/fabuleux.tidal
-- /home/pln/Work/Art/GLITCHWAVE/outputs/decolle.gif
resetCycles
do
......@@ -32,6 +33,7 @@ d3 $ gF1 $ gM1
# gain 1.4
d4 $ gF2 $ gM3
$ midiOn "^89" (struct "t([<8 16> <16 [16 32]>],8)")
-- $ midiOff "^57" (# legato 0.5)
$ note ("[0,7(<3 5 [5 3] <3 [3 5]>>,8,1)]" + "<d b4 g4 fs4>" - 24)
# "bassWarsaw"
# gain 1.3
......
live/midi/nova/lounge/night_sun.tidal
......@@ -38,6 +38,7 @@ d4 $ gF2 $ gM3
# crushbus 41 (range 16 3.5 "^53")
# octersubbus 42 (range 0 2.5 "^33")
# lesliebus 43 (range 0 0.95 "^17") # lrate 2 # lsize 2.2
# bandf 400
# gain 1.5
-- # gain 1.3
-- d5 $ gF3 $ gM3 $ chop 4
......@@ -65,6 +66,7 @@ d9 $ gF2 $ gM3
# octersubbus 92 (range 0 2 "^18")
# bandfbus 93 (range 0 10000 "^17")
# cut 9
# gain 1.2
d8 $ gF1 $ gM1
$ midiOn "^92" (ply 2)
$ midiOff "^60" (mask "t(4,8,1)" . chop 4)
......
live/midi/nova/lounge/sunny_side_up.tidal
......@@ -20,9 +20,6 @@ d1 $ gF1 $ gM2
-- $ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
$ fix ((# att 0.02) . (# rel 0.5) . (# lpf 400)) "kick:4"
$ "[kick:4,jazz]"
-- $ "[jazz]"
-- $ "[kick:4]"
-- $ "[808bd:2,808bd:4]"
# lpf 5000
# gain 1.4
d2 $ gF1 $ gM
......@@ -49,7 +46,6 @@ d6 $ gF1 $ gM -- Hats closed legers
# room 0.3 # sz 0.13 # dry 1.1
# gain 1.2 * ("1 0.9 1 0.8 <0.9!3 1.05> 1")
d4 $ gF2 $ gMute3 $ chop 8 -- La super sunny bass on the other side of the sunny street
-- TODO: Plus sunny?
$ midiOn "^89" (mask "t(8,16)" . ply "<2!3 [2 4]>")
$ midiOff "^57" (mask "t(<4 [4 <2!3 [2 8]>]>,8)")
$ superimpose (
......@@ -69,8 +65,8 @@ d4 $ gF2 $ gMute3 $ chop 8 -- La super sunny bass on the other side of the sunny
# octersubbus 42 (range 0 2.5 "^33")
# octersubsubbus 43 (range 0 2.5 "^33")
d5 $ gF3 $ gM3 -- On the Sunny side of the sample
$ midiOn "^90" (chop 8) -- FIXME NOT SPLITTING?
$ midiOn "^34" (slice 4 "2 2 2 3")
$ midiOn "^90" (struct "t*4")
$ midiOn "^34" (slice 4 "2 2 2 3") -- FORCE END
$ midiOn "^18" (>| n (slow 4 $ "<3 4 5 6>"))
-- $ someCyclesBy "<1!8 0!24>" (>| n "<0 0 1 0>") -- Hey Sunny
-- $ n "0" < <!12 <2 ~ ~ ~>!0>" -- Hey Sunny
......@@ -94,7 +90,7 @@ d10
-- d11 $ gMute3
-- d7 $ gF3 $ gM3 $ note (
d7 $ gM3 $ gF2 -- LA ACID BASS ARE YOU SUNNY NOW ?? <3
$ midiOn "^57" (superimpose ((|* gain 0.8) . (0.125 ~>) . (# note "0 <7!3 12>")))
$ midiOn "^59" (superimpose ((|* gain 0.8) . (0.125 ~>) . (# note "0 <7!3 12>")))
$ midiOn "^91" (mask "t(16,32)" . ply 2)
$ arp "up"
$ note (
......@@ -105,7 +101,7 @@ d7 $ gM3 $ gF2 -- LA ACID BASS ARE YOU SUNNY NOW ?? <3
-- + 1 -- Calage
)
-- # "vec1_acid:21" |+ note 1 -- Option 1: Samples ACIDES
# "acidOto3092" |- note 36
# "acidOto3092" |- note 36 -- Option2 : Le synth acide -- let's go
# width (range 0.5 0.98 "^35")
# crushbus 71 (range 16 3.5 "^55")
-- # filterRange 4
......@@ -114,20 +110,20 @@ d7 $ gM3 $ gF2 -- LA ACID BASS ARE YOU SUNNY NOW ?? <3
# sz 0.5
# gain 1.3
d8 $ gF1 $ gM
$ midiOn ("^60" - "^92") (ply "1!2 <1!3 <2 1 1 2>>!2" . mask "f(4,8)")
$ midiOn ("^60" - "^92") (mask "f(4,8)")
$ midiOn ("^36" - "^92") ((loopAt 2) . (# hpf 1500) . (# "jungle_breaks:45")) -- ORL RPZ
$ midiOn ("^56" - "^92") ((loopAt 2) . (|* gain 1.1) . (# "jungle_breaks:30")) -- Clochettes?
$ midiOn ("^92") ( -- Bouton Nassim <3
slice 16 "[0 .. 7] . <[0 .. 7]!7 [0 1 . [2 3]]>"
. loopAt 1 . (# "breaks165") . (# octersub 2)
. (|* gain 1.28)
. (|* gain 0.9)
)
$ chop 16
$ loopAt 1
-- $ loopAt 2
$ "jungle_breaks:28" -- BREAKS LOVER <3
# room 0
# gain 1
# gain 1.3
d11 $ gM3 $ gF3-- Sunny doux piano c'est cadeau
$ gF3
$ (slice 2 "0*2")
......
live/midi/nova/lounge/suns_of_gold.tidal
once $ "FMRhodes1"
resetCycles
fs ds
do
......
live/midi/nova/nujazz/cafe_glace.tidal
resetCycles
do
resetCycles
setcps(120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute = (midiOn "^73" (mask "f*16"))
......
live/midi/nova/nujazz/cafe_tiede.tidal
......@@ -96,7 +96,7 @@ d8 $ gM1 $ gF1
$ "jungle_breaks:20"
# cut 8
# pan "<0.3!16 0.7!16>"
-- # gain 0.89
# gain 1.3
d10 $ gM3 $ gF3
$ superimpose (
mask "<f!16 t!16>"
......
live/midi/nova/nujazz/chere_mireille.tidal 0 → 100644
-- /home/pln/Downloads/PerfectSunriseLoop.gif
-- Chère Mireille,
-- <3
do
-- resetCycles
setcps (120/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let modIndex = pF "modIndex"
d1 $ gF1 $ gM2
$ midiOn "^42" (struct "t t t*<1!6 2 1> t*<1!7 2>")
$ midiOff "^42" (struct "t . ~ t ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>")
$ stack [
"kick" # lpf 10000 # cut 1,
"rumble" |* gain 1.3
# lpf 200
# cut 11,
""]
# "[techno:1,jazz]"
# gain 1.4
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ <s s*2 s [s s <~ s> <s ~>]>")
$ midiOff "^43" (<| "~ s")
$ "cp"
-- # note "-2"
# gain 1.4
d6 $ gF1 $ gM1 -- Cymbales sol
$ midiOn "^44" (<| "~ cy ~ cy ~ cy ~ <cy [~ cy]>")
$ midiOff "^44" (<| "~!7 <~ <cy ~> ~ cy>")
$ "cy" # "<cy:1!6 cy:2!2>" # "h2ogmcy"
|* gain (range 1.1 0.8 perlin)
|* legato (range 0.5 2 (fast 2 perlin))
d3 $ gF1 $ gM1
$ midiOn "^76" ((# "dr") . (|* gain 1.45))
$ midiOff "^44" (mask "t(4,8,1)")
$ "hh*[16 . <16!3 <[16 8] 8>>]"
# "vec1_claps"
# cut 3
# legato (slow 13 $ range 0.3 2 saw)
# delaybus 31 (range 0 1 "^52") # delayt "e" # delayfbbus 32 "^32"
d4 $ gF2 $ gM3
$ midiOn "^57" (>| n "<3 5 <5 5*2> <5!3 5*4>>")
$ midiOn "^89" (>| n "4*[2 <2 4>]")
$ n ("<3!8 <[3 4]!7 3>!8>")
# "nujazz_bassp120"
# cut 4
# room 0.4
# pan 0.6
# gain 1.5
# delay 0.2
# room 0.5
# crushbus 41 (range 16 2.95 "^53")
# octerbus 42 (range 0 1.5 "^33")
# octersubbus 43 (range 0 1.5 "^33")
d5 $ gF2 $ gM3 -- ACID BASSSSS
$ midiOn "^58" (off 0.125 (|+ note "<0!3 [7!3 5]>"))
$ note ("c3 c3 . [bf2 c3] ~ <ef3 [f3 ef3]>@2" +12)
# "vec1_acid:27" -- BASELINE
-- # "vec1_acid:28" |+ note 12 -- ACID AIGU
# "vec1_acid:41" -- BASSLINE <3
# cut 5
# gain (1.5 * "^33")
# pan 0.2
# cut 5
# gain 1.4
-- # octersubbus 51 (range 0 4 "^54")
# octerbus 52 (range 0 1.8 "^34")
-- # octerbus 51 (range 0 1 "^33")
# crushbus 51 (range 16 2.5 "^54")
d7 $ gF3 $ gM3 -- TODO: DEVELOP THE GUITAR
$ midiOn "^59" (off "h" (# cut 71))
$ slow 2 $ n "<1!4 2 2 [1 2] 2*2 3 3 4 3 5!8>"
# "nujazz_guitar120"
# cut 7
-- # pan 1
# pan "<0.2 0.8>"
# room 0.8
# dry 1.1
# gain 1.8
# sz 0.8
d8 $ gF1 $ gM1
$ midiOff "^60" (mask "t(4,8,1)") -- House d'Orléans <3
$ chop 8
$ loopAt 2
$ midiOn "^36" (loopAt 2 . (|> "jungle_breaks:75")) -- Drums de Paname !
$ midiOn "^56" (|> "jungle_breaks:45") -- House d'Orléans <3
$ slice 4 "0 1 2 <3 3?>"
$ "nujazz_beats120:1"
# gain 1.4
d9 $ gF3 $ gM3 -- Giorgio synth guide souverain
$ note ("<<c4!8 g3!8> <[~!3 ef4] [~ ef4]>>")
# "giorgio_syn:13"
# cut 9
# room 0.3
d12 $ gF3 $ gM3 -- Abeilles du futur quand on les remplacera par des nanobots
$ mask "<t f>"
$ n "~ <1 2 3 4>"
# "nujazz_fx120"
# gain 1.1
# octerbus 101 (slow 13 $ range 0 1.5 saw)
# roombus 102 (slow 12 $ range 0 0.8 saw)
# octersubbus 103 (slow 32 $ range 0 2.5 saw)
# cut 12
# delay (slow 16 $ sine)
# delayt 0.25
# delayfb 0.6
d11 $ gF3 $ gM3
-- $ n ("<3!8 <[3 4]!7 3>!8>")
$ slow 2 $ n "<75 76 77 78>" # "nujazz_keys120"
# cut 11 # room 0.4
# gain 0.9
# pan (slow 4 $ "<0.15 0.85>")
live/midi/nova/techno/techno_orage.tidal 0 → 100644
-- /home/pln/Downloads/PerfectSunriseLoop.gif
do
-- resetCycles
setcps (104/60/4)
let gMask = (midiOn "^41" (mask "<t f>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
let modIndex = pF "modIndex"
d1 $ gF1 $ gMute2
$ midiOn "^42" (struct "t t t*<1!6 2 1> t*<1!7 2>")
$ midiOff "^42" (struct "t . ~ t ~ <~!3 t*<2 [2 1] [4 2] [2 4]>>")
$ stack [
"kick" # lpf 10000 # cut 1,
"rumble" |* gain 1.3
# lpf 200
# cut 11,
""
]
# "[techno:1,jazz]"
# gain 2
# room 0.4 # size 0.4 # dry 0.95
d2 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
-- $ "[vec1_snare:3]"
$ "[snare:33]"
-- # note "<-0!12 -2 -2 -3 0>"
# gain 1.3
d6 $ gF1 $ gM1
$ midiOn "^43" (<|"~ s ~ s*<1 2>")
$ midiOff "^43" (<| "~ s")
$ "clap:2"
-- # note "<-0!12 -2 -2 -3 0>"
-- # gain 1.3
d3 $ gF1 $ gM1
$ midiOn "^76" (ply "1 <2!3 4>")
$ midiOn "^44" (
(# delay "<0 0.2 0.3 0.5 0.6 0.7 0.8 0.9>") .
(# delayt "s") .
(# delayfb 0.5)
)
$ chop 8
$ n "<1 2 3>"
# "orage"
# cut 3
# gain 1.4
d4 $ gF2 $ gM3 -- BASS <3
-- $ midiOff "^57" (struct "t f")
$ loopAt 2
$ "orage"
# cut 4
# bandf 100
# gain 1.8
-- # room 0.4 # sz 0.3 # dry 1.3
# crushbus 41 (range 16 4 "^53")
# octerbus 42 (range 0 0.93 "^33")
d5 $ gF3 $ gM3 -- Rain piano <3
$ midiOn "^41" (mask "<t f>")-- Mask norepeat
$ midiOn "^90" (slice 2 "<0 0 1 1>")
$ midiOn "^34" ((>| n "<<4!4 34 4!3> 4 33 <34 4>>")) -- ORAGE INFINI
$ midiOn "^58" ((>| n "5/2")) -- Pluie infinie!
$ slow 4 $ ply "4 . 2 0" -- Slowly, loop 4 times each
$ n "<~ 6 7 8 8 8 7 8 9 10 11 12 13 14 13 12 17 18 19 20 17 18 20 20 17 18 19 20 21 23 22 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 37 37 38 37 38 39 ~ 37 ~ ~ 38 38 38 39 ~>" # "orage"
-- $ n "<6>"
-- 4 == Loop intro
-- 6 == Loop Orage
# "orage"
# cut 5
# octersubbus 51 (range 0 2 "^18")
# octerbus 52 "^34"
# crushbus 53 (range 16 5 "^54")
# room 0.3 # sz 0.4
# gain 1.6
# lpf 4500
# hpf 300 -- Coupe la basse
d9 $ gF2 $ gM3 -- ACID Doutes TODO Moins criard
$ sometimesBy "^18" (superimpose (off "s" (|+| note "0 12 0 <0 12>")))
$ midiOn "^19" (struct "<~!4 t!4> t ~ t ~ t <~ t t ~> t*<1!3 2>")
$ fix ((|+ note 12) . ((|* gain "^35"))) "vec1_acid:30"
$ fix ((|+ note 24) . (# "vec1_acid:36") . (# delay 0.5) . (# delayt "q")) "acid2"
$ fix ((|+ note 12) . (# "vec1_acid:30")) "acid1"
$ fix ((|+ note 12)) "vec1_acid:27"
$ note ("<[<c3 af2 af2>@3 d3]!3 [d3!3 [ds3 d3 ds3]]>" + 12)
# "[acid1,acid2]"
# room 0.4
# sz 0.4
# gain 1.5
d8 $ gF1 $ gM1 -- Break discret face à une telle idole
$ midiOn "^60" (mask "t(4,8,<1!3 0>)" . chop 8)
-- $ midiOn "^36" (id . (loopAt 0.5 . (# "jungle_breaks:130")))
$ whenmod 64 8 (midiOff ("^56" +"^36") (
slice 4 "0 1 2(<2!8 3!8>,8) 3*<1 1 4 [2 8]>")
)
$ midiOn "^92" (mask "t(16,32)" . ply "2 2 <4 8 16 16> 2")
$ midiOn "^36" (loopAt 0.5 . (# n 45)) -- Orleanaise
$ midiOn "^56" (loopAt "0.5 <0.5!3 <0.25 [1]>>" . (# n 14))
$ chop 16
$ loopAt 4
$ "jungle_breaks:12" # cut 8
# gain 1.3
d7 $ gF3 $ gM3 -- Voices
$ (0.75 ~>)
$ fix (0.25 <~) (n 7)
$ midiOn "^91" (ply "4 [8 1]")
-- $ fix (0.5 <~) (n 6)
-- $ fix (0.5 <~) (n "[4,6]")
-- $ fix (0.25 <~) (n "[2,3]")
-- $ fix (# start 0.1) (n 5)
-- $ n ("<~!0 0 ~ 1 ~ 2 ~ 3 ~ 0 6 ~ ~ 0 6 0 6>"
-- TODO MAKE THE TOP N EXPRESSION FROM BOTTOM ONES
$ slow 4 -- TODO on/off
-- $ (# end "<0.5 0.13 0.5 1>") -- TODO FOR n 11 LOVE IS SOFT
$ n (cat [
-- "<0 ~ 1 ~ 2 ~ 3 ~>" -- Riders 1
-- "<0 ~ ~ ~ 1 ~ ~ ~ 4 ~ ~ 4 5 ~ ~ ~>" -- Riders 2
-- "<<0 6> ~ ~ ~>" -- Road Killer
-- "<~ ~ <0 1 7 ~> ~>" -- Squirming Brain
"<8 8 9 8>" -- Children Holiday
-- "<11!6 12 <~ 13>>" -- Love
-- "11" -- Love
]
+ 45)
# "orage"
# cut 9
# room 0.4
# sz 0.2
# gain 1.5
d10
$ loopAt 8
$ "risers"
# room 0.4
d11 $ gF3 $ gM3
$ note ("[f4 c5 gs4 c5 f4 <bf4!3 f5 bf4 f5 bf4 f5> d5*<1 2 1 4> bf4]")
# "FMRhodes2" |+ note "0" -- #"FMRhodes1"
# modIndex (range 0 8 "^30")
# room 0.4
# att 0.04 # rel 2
# gain 1.3
# lpf 2000
d12 $ gF2 $ gM3
$ superimpose (ply 2 . (|+ note 12)
. (# cut 121)
. (# rel 0.5)
)
$ slow 4
$ note ("<f [f@15 ef]>" - 36 + "[0,12]")
# "FMRhodes1"
-- # cut 12
once $ "orage:45" # cut 13
-- Absolutely! Here’s how you can express the core "Riders on the Storm" elements in TidalCycles using named notes instead of MIDI numbers.
-- ## **Bass Line (E Dorian)**
-- A classic modal bass pattern, alternating E and A, with passing notes for groove:
d1 $ n "e e a e g e b e" # s "bass"
-- Or a more walking/modal version:
d1 $ note "e fs g a b g a e" # s "bassWarsaw" |- note 24
-- ## **Piano/Keys (Comping & Descending Line)**
-- **Comping between E minor and A major:**
d2 $ n "" # s "superpiano"
-- **Iconic descending Dorian line (as in the intro):**
d3 $ n "d cs c b a g fs e" # s "superpiano"
-- ## **Melodic/Lead Lines**
-- **Dorian/pentatonic flavor for solos or riffs:**
d4 $ n "e g a b d b a g" # s "lead"
d4 $ n "e fs g a b d" # s "lead"
-- ## **Tips**
-- - Use `# gain` or `# cutoff` for filter modulation.
-- - Layer rain or vocal samples for atmosphere.
-- - Try syncopating the bass or keys for a more techno feel.
-- **Summary:**
-- - **Bass:** `d1 $ n "e e a e g e b e"`
-- - **Piano:** `d2 $ n ""`
-- - **Descending line:** `d3 $ n "d cs c b a g fs e"`
-- - **Lead:** `d4 $ n "e g a b d b a g"`
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