Skip to content

T
Tidal
Unverified Commit a9a67985 by PLN (Algolia)
Options

Practice: ORBIT.love

parent 0530869a
Showing with 282 additions and 45 deletions
live/boeuf/algorythm/sweet_dreams.tidal 0 → 100644
do
setcps (125/60/4)
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF1min = (# djfbus 3 (range 0.2 0.8 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
d1 $ gF1 $ "jazz*4"
# midiG' "^78" 0 2
d2 $ gF1 $ ply "4 <4!3 2 4!3 2 [4 <8!3 2>]!4 [4 <8!3 [16 8]>]!4>" $ "~ electro1" # gain 0.8
# midiG' "^79" 0 1.2
d3 $ gF2
$ superimpose (# crushbus 31 (range 16 4 "^53"))
$ note (slow 2 $
-- FIX TUNE https://musescore.com/user/1858001/scores/6283390
"c3 c3 c4 c4 ef4 ef4 c4 c4 . af3!3 c4 f3!3 g3"
) # "bassWarsaw"
# midiG' "^81" 0 1.2
once $ note "e4" # cut 3 # "bassWarsaw" # gain 0.7
live/chip/ataright.tidal
......@@ -41,14 +41,14 @@ d4 -- THE THUNDER
# roombus 42 (range 0.05 0.6 "^33")
# sz 0.9
# pan "<0.8!3 0.5>"
# midiG' "^81" 0 1.5
# midiG' "^81" 0 1.8
# room 0.4
d5 -- THE RAIN TODO BETTER RHYTHMS
d5 -- THE RAIN
$ g2
$ midiOn "^58" (swing 3)
$ midiOn "^90" (striate "<2!3 4>" . ply 2)
$ struct "t(<3!7 [3 8]>,8,<0!3 3>)"
$ note (
arp "<<up down up <updown!3 downup>>!16 <converge!7 disconverge pinkyup!3 pinkyupdown thumbup!3 thumbup>!16>"
arp "down"
("<c'maj'4!2 <c'maj'4!3 ef'maj'4> g'min'4>" |+| "ef3"))
# "FMRhodes2"
# modIndex (range 0 128 "^54")
......@@ -57,13 +57,3 @@ d5 -- THE RAIN TODO BETTER RHYTHMS
# sz 0.5
# pan 0.8
# midiG' "^82" 0 1.5
-- GRAVEYARD
d5
-- $ superimpose ((|- note 12) . (# cut 51))
$ mask "t(<1 3 <1!3 <4 16>> <4 8>>,16,<0!3 3>)"
$ chop 16
$ "synth_atari:0"
# note "-4"
# midiG' "^82" 0 1
# cut 5
live/collab/raph/han.tidal 0 → 100644
do
setcps (85/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
d1 $ gF
$ superimpose ((# "kick:5") . (|* gain 0.8))
$ midiOn "^42" (struct "t*<1!3 2> . t(3,8)")
$ midiOff "^42" (struct "t t t <t t*2 t [~ t]>")
$ "[jazz,808bd:2]"
# midiG' "^78" 0 1.2
d2 $ gF
$ midiOn "^43" (fast 2)
$ "~ [cpu:2,cpu:3]"
# midiG' "^79" 0 1.2
d3 $ gF
-- $ someCyclesBy 2 (fast "1 2")
-- $ struct "t([12 . <16!3 8> 16],16)"
$ midiOn "^76" (ply 2)
$ struct "t*4 t*8"
$ "drum:2"
# midiG' "^80" 0 2
d4 $ gF2 -- La base
$ superimpose (
(|+ note 24)
. (fast 2)
. (# cut 41)
. (|* gain 1.2)
)
$ (# crushbus 41 (range 16 4 "^54"))
$ midiOn "^58" (mask "t f <f!3 f> <f!8 [t f]!7 t>")
$ chop 16
$ loopAt 1
$ "han" # n "<0!4 1!4>"
# midiG' "^82" 0 2
# cut 4
d6 $ gF2 -- La basse
$ loopAt 2
$ slice 8 (run 8)
-- $ superimpose (# crushbus 41 (range 16 4 "^53"))
-- $ struct "t . t t"
-- $ slice 4 ("0 <0!4 2!4> 0(<1!4 5!4>,8) <0 2>")
$ "han" # n "<0!4 1!4>"
# cut 6
# pan 0.3
# room 0.4
# midiG' "^81" 0 2
d8 $ gF
$ loopAt 4
$ midiOn "^60" (fast 4)
$ sometimesBy ("^56*8") (shuffle 16)
$ slice 8 (run 8)
$ "drums_commodore" # n "0"
# cut 8
# midiG' "^84" 0 2
d9 $ gF2 -- La trompette
$ midiOn "^59" (superimpose ((# cut 91) . (|+ note 12) . ( |* gain 0.9)))
$ slice 4 ("<0!4 2!3 1>" + "0 0 0 <1!3 3>")
$ "han/4" # n "3"
# cut 9
# midiG' "^83" 0 1.6
# pan (0.8 + (slow 8 $ range 0 1 perlin))
d8 $ loopAt 2 $ "break:1" # cut 8
# midiG' "^84" 0 2
once $ "dr*4"
once
$ scale "aeolian" ("3 3 . 1")
# "bassWarsaw"
# cut 4
# pan 0.1
# gain 0.9
once $ "han:2"
# gain 1
# cut 3
# gain 1.4
# cut 4
live/midi/nova/breaks/its_about_time.tidal 0 → 100644
once
$ "90s_weird:0"
# speed 0.8 -- TODO Slowly move to 0.5
# gain 0.68 # cut 13 -- Spooky intro!
# gain 0
-- (ParVagues ------ live)
-- T""""""""""""""""""""T
-- |.;....,..........;..|
-- |;;:: . . . |
-- l;;;:. : . .. ;
-- `;;:::.: . . .'
-- l;;:. .. . .: ;
-- `;;::.. . . ; .'
-- l;;:: . . / ;
-- \;;:. . .,' /
-- `\;:.. ..' .'
-- `\;:.. ..'
-- \;:. /
-- l; f
-- `;f'
-- ||
-- ;l.
-- ;: l
-- / ; \
-- ,/ : `.
-- ./' . : `.
-- /' ,' : \
-- f / . : i
-- ,' ; . : `.
-- f ; . : . i
-- .' : : . `.
-- f , . ; : i
-- | : ,/`. : |
-- | ;,/;:. `. . |
-- |___,/;;:. . .`._____|
-- (For 0rbit.l0ve <3)
-- """"""""""""""""""""""
do
setcps (110/60/4)
let gF = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
d10 -- Ready player two
$ mask "<f!3 t f!3 t f!3 t t!4>"
$ slice 8 "0 <0!3 1>"
$ loopAt 4
$ "fx_gameboy:5"
# crushbus 101 (slow 32 $ range 1.8 0.61 saw)
# midiG' "^20" 0 0.85
d1 $ gF -- Tradition never disappoints: 4 on the fl00r...
$ midiOn "^42" (<| "k k k <k k*2 k <~ [<~ k> k]>>")
$ midiOff "^42" (<| "k(<1!3 <3 5>>,8) . <k!3 [~ <~ k>]>") -- ..or not?
$ "[kick:5,808bd:4]"
# midiG' "^78" 0 1.1
d2 $ gF -- Break "80s' Apocalypse in a Box™"
$ midiOn "^44" (fast "1 2")
$ midiOn "^76" -- L'Esprit de Nassim
(
whenmod 8 7 (ply "1 . 2") .
slice 8 ("0 1 2 3 4 5 <6!3 4> <7!3 [5 4]>") .
(loopAt "q") .
(# "breaks165") . (# cut 2)
. (|* gain 1.1)
)
$ loopAt 4
$ chop 4
$ "drums_atari" # n "[29 29 <29 [29 28 29]> 28]"
# cut 2
# gain 0.77
# midiG' "^80" 0 1.1
# pan 0.4
d3 $ gF -- Un peu d'encouragement?
$ midiOn "^43" ((# "cp") . (|- note 2) . (# lpf 5000))
$ "~ clap"
# midiG' "^79" 0 1.1
-- # gain 0.8
d4 $ gF2 -- BURN THE BASS WITCH
$ midiOn "^89" (chop (slow 4 $ "[16 32 64 128]"))
$ "synth/4"
# "90s_synatm:9"
# crushbus 41 (range 10 2.5 "^53")
# room 0.3
# sz "<0.4!7 0.8>"
# dry 1
# cut 4
# midiG' "^81" 0 1.1
d5 $ gF2 -- Ghosts from an easier time
$ midiOn "^58" (struct "t*<2 1 1 <2 1>> t(<3 <<5 3> 1>>,8)" . arp "converge")
$ note ("c'maj'4" + "<c!3 g g g [g, [~ c]] c>" - 12)
# "90s_synatm:8/4" # cut 5
# midiG' "^82" 0 1.1
d6 $ gF2 -- Jump aboard the BASIC BUS
$ midiOn "^59" ( struct "t . t(<1 2 1 <1 [4 8]>>,8,1)")
$ loopAt 8
$ chop 16
$ "synth_commodore" # n "1"
# crushbus 61 (range 20 2.25 "^55")
# squizbus 62 (range 0 1.5 "^35")
# roombus 63 (range 0 0.5 "^19")
# midiG' "^83" 0 1.45
# cut 6
d7 -- Break from the past
$ midiOn "^92" (slice 8 "0 ~ ~ 3 . 4 <~ 5> 6 <~ 7*<1 2>>" . loopAt 2)
$ loopAt 1
$ midiOff "^92" (splice 8 "0 <0 1 2*<1 2> 3*<1 2>>")
$ "fbreak100" # n "<0!3 [0 4]>"
# cut 7
# pan 0.8
# room 0.3
# dry 1
# midiG' "^84" 0 1.45
live/midi/nova/breaks/lunar.tidal
......@@ -14,21 +14,21 @@ d1 $ g1 --
$ midiOn "^42" (<| "k k k <k [<~ k> k]>")
$ midiOff "^42" (<| "k . ~ <k k ~ ~> k*<1!3 2 2 2 1 2> <~ ~ k <k ~>>")
$ "[jazz,hh:5]"
-- # release "<0.7!3 1>"
# midiG' "^78" 0 1.9
# midiG' "^78" 0 1.6
d3 $ g1 $ m -- Clap contretemps stable
$ midiOn "^43" (fast 2)
$ 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
d2 $ g1 $ m -- BREAKs divers
$ 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
$ "break" # n "<13!12 14!4 15!12 14!4>"
# midiG' "^80" 0 1.9
# speed (range 0 2 "^52")
# cut 2
d4 $ g2 $ m -- Basse avec du repondant
......
live/midi/nova/breaks/nova_bossa.tidal
resetCycles
-- LA NOVA BOSSERA
-- breakbeat X bossa nova <3
d10 $ "drum:2*8" # gain 0.9
once $ "dr"
once $ "reverbkick" # gain 0.7
do
let gDJFManuel1 = someCyclesBy "<1!24 0!8>" (# djfbus 1 (range 0.05 0.95 "^49"))
let gDJFManuel2 = someCyclesBy "<1!24 0!8>" (# djfbus 2 (range 0.05 0.95 "^50"))
-- let gDJFPont = (midiOn "^41" (whenmod 32 24 (# djfbus 3 (slow 8 $ range 0.15 0.45 saw))))
let mBreak = ((mask "f . t f!3"))
let mBreak = (midiOn "^42" (mask "t f . f <f!4 t!4> <f!2 t!6> t"))
let mBreak = (midiOn "^41" (mask "t f . f <f!4 t!4> <f!2 t!6> t"))
let g1 = gDJFManuel1
let g2 = gDJFManuel2
let modIndex = pF "modIndex"
......@@ -23,9 +15,9 @@ let m = mBreak
setcps (60/60/4)
d1 $ g1 $ m
-- $ "k(<3!3 5>,8)"
$ midiOn "^41" (fast 2) -- Cooldown :')
$ "k . <~ [k . <k k(<3 [5 3]>,8)>]>" # "[808bd:3,cpu2]"
-- $ fast 2 $ "k k k <k [<~ k> k]>" # "[909,jazz]" -- TECHNOOOO
$ midiOn "^42" (fast 2) -- Cooldown :')
$ "k . <~ [k . <k k(<3 [5 3]>,8)>]>" # "[808bd:3,cpu2]" -- Bumpy kick
-- $ fast 2 $ "k k k <k [<~ k> k]>" # "[jazz,kick:5]" -- TECHNOOOO
# midiG' "^78" 0 1.4
d2 $ g1 $ m
$ fast 2
......
live/midi/nova/breaks/solar.tidal
......@@ -38,7 +38,7 @@ d2 $ g1 $ m -- BREAK
# octerbus 20 (range 0 0.5 "^32")
# octersubbus 21 (range 0 1.2 "^32")
# octersubsubbus 22 (range 0 1.2 "^32")
# midiG' "^80" 0 1.85
# midiG' "^80" 0 1.9
# cut 2
d4
$ whenmod 4 3 (off "q" id)
......@@ -54,7 +54,7 @@ d4
$ note "e3'maj"
# "bassWarsaw"
# crushbus 51 (range 16 4.6 "^53")
# midiG' "^81" 0 1.5
# midiG' "^81" 0 1.25
# pan 0.2
d5 $ g2
$ midiOn "^58" (superimpose (
......
live/midi/nova/dnb/lucy_rode.tidal
......@@ -11,13 +11,12 @@ do
let mix = pF "mix"
let modIndex = pF "modIndex" -- 0.2
let vibrato = pF "vibrato"
let gDJF = (# djfbus 1 (range 0.1 0.9 "^49"))
let g = gDJF
let g = (# djfbus 1 (range 0.02 0.98 "^49"))
let g2 = (# djfbus 2 (range 0.1 0.9 "^50"))
setcps (60/60/4)
d1
$ g -- Beat
d1 $ g -- Beat
$ fast 2
$ midiOn "^41" (<| "k k k k")
$ midiOn "^41" (<| "k k k <k!3 k?>")
$ midiOn "^42" (<| "k . k <~ [<~ k> <k ~>]>")-- RubADub
$ midiNo "^41" "^42" (<| "<k <k*2 k(3,8)>>")
$ "[jazz,kick:5]"
......@@ -44,7 +43,7 @@ do
$ "[drum:2,dr]"
# pan 0.7
# midiG' "^80" 0 1.8
d4 $ g -- Bassline pompée
d4 $ g2 -- Bassline pompée
$ midiOn "^89" (chop 2)
$ midiOn "^57" (ply 2)
$ note (scale "aeolian" (
......@@ -58,7 +57,7 @@ do
# room 0.4
# pan 0.2
# midiG' "^81" 0 1.8
d6 $ g --Rhodes arps
d6 $ g2 --Rhodes arps
$ midiOn "^58" (+| note (arp "converge up" "[0,12,0,12]*8"))
$ juxBy 0.8 (
(# modIndex 15)
......@@ -74,7 +73,7 @@ do
# room 0.2 # dry 2 # sz 0.8
# crush (range 10 3.7 "^54")
# modIndex (range 0 4.19 "^34")
d7 $ g -- Hope's Hammond
d7 $ g2 -- Hope's Hammond
$ ("0.125" ~>)
$ fast 2
$ midiOn "^59" (
......
live/midi/nova/lounge/michael.tidal
......@@ -97,5 +97,5 @@ d8 $ g
$ "fbreak120"
# pan 0.7
# speed (range 0 2 "^56")
# midiG' "^84" 0 1.5
# midiG' "^84" 0 1.35
# cut 6
live/techno/nightly_repair.tidal
-- Le jour te fatigue
-- La nuit te répare
do
......@@ -17,7 +16,7 @@ d1 $ g1
$ midiOff "^42" (<| "k . k(3,8)")
$ fix (|* gain 1) "808bd"
$ fix ((|* gain 0.8)) "909"
$ "[jazz,909,808bd:4]"
$ "[jazz,909,808bd:4,kick:5]"
# midiG' "^78" 0 1
d2
$ g1
......@@ -27,7 +26,8 @@ d2
)
$ midiOn "^43" (fast 2)
$ "~ cp"
# midiG' "^79" 0 1.8
# note (-2)
# midiG' "^79" 0 1.1
d3 $ g1
$ midiOn "^44" (fast "1 2")
$ sometimesBy "^52" (ply "1 2 1 2")
......
live/techno/noir/burn_this_book.tidal 0 → 100644
do
let modIndex = pF "modIndex"
let g = (# djfbus 1 (range 0.1 0.9 "^49"))
let g2 = (# djfbus 2 (range 0.05 0.95 "^50"))
setcps (120/60/4)
d1 $ g
$ midiOn "^42" (<| "kick*4" )
$ midiOff "^42" (<| "k . k(3,8)" )
$ "jazz"
# midiG' "^78" 0 1.8
d2 $ g $ "~ cp" # note "<8!3 -2>" # lpf 4000
# midiG' "^79" 0 1.8
d5 $ g
$ midiOn "^76" (off "e" id) -- TODO Validate
$ midiOn "^44" (ply 2)
$ "~ t*<1!8 2 1!6 2> ~ t ~ <t!3 t*<2!3 1>> ~ <t!7 t*2>" # "cpu2:3"
# midiG' "^80" 0 1.65
d3
$ midiOn "^92" ((iter 4))
$ midiOn "^60" (
(# delay 0.85)
. (# delayfb "<0.25!3 <0.5 0.9>>")
. (# delayt 0.125))
$ (|* speed (range 0.25 1.75 "^56"))
$ chop 16
$ loopAt 4
$ "drums_nes:3"
# midiG' "^84" 0 1.3
# pan 0.2
d4 $ g2
$ note (scale "aeolian" (
"<0 [0, <<7 7 8 9>!3 <8 8 8 7>>]>"
))
# "cpluck:0"
# crushbus 41 (range 16 1.4 ("^53" - 0.12 * (fast 2 perlin)))
# midiG' "^81" 0 1.65
d6 $ g2
$ note (scale "aeolian" (arp "up" ("<0!2 3 [0 3]>" |+| "c'maj'4")))
# "cpluck:1"
# crushbus 61 (range 16 1.4 ("^54"))
# cut 6 # gain 0.9
# midiG' "^82" 0 1.65
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