Skip to content

T
Tidal
Commit ca6dbd73 by PLN (Algolia)
Options

VAL23

parent d008a31a
Showing with 644 additions and 0 deletions
live/collab/raph/dernier_dimanche.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 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
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let modIndex = pF "modIndex"
d1 $ gM2 $ gF1 -- Kick solide
-- $ fast 2
$ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
$ fix ((# att 0.02) . (# rel 0.5) . (# lpf 5000)) "kick:4"
$ midiOn "^42" (struct "t t t t*<1!6 2 2>")
$ midiOff "^42" (<| "k . ~ <~!3 k> ~ ~")
$ "[jazz,kick:4]"
d2
$ gM1 $ gF1 -- snare contretemps variable
$ fix ((|* gain 0.8) . (# legato 0.05)) "cp"
$ midiOn "^43" (<| "~ cp ~ cp*<1 1 2 <1 2>>")
$ midiOff "^43" (<| "~ cp")
$ "[cp,snare:24]"
# pan 0.65
# legato 0.22
-- # midiG' "^79" 0 1.6
d3 $ gM1 $ gF1
$ "~ d ~ d ~ d ~ <d!12 [~ d]!3 [d d]>"
# "snare:34"
# hpf 7000
-- # midiG' "^80" 0 1.5
d4 $ gF2
$ midiOn "^89" (ply "<2 4> <2 4 4 8>")
$ arp "up"
$ note ("<g f ef d>" + "[0 12 0 12*<1 2>]")
# "giorgio_syn:23"
# room 0.5 # sz 0.6
# crushbus 42 (range 16 1.4 "^53")
# relbus 43 (range 2 0.02 "^33")
# octerbus 44 (range 0 1.4 "^17")
# att 0.22
# gain 0.8
-- # cut 4
d5 $ gF3 $ gM3
$ note ("<g d ef d>" + "0(3,8)")
# "trance_blips:12"
# room 0.5 # sz 0.6
# crushbus 52 (range 12 1.4 "^54")
# relbus 53 (range 2 0.02 "^34")
# octerbus 54 (range 0 1.4 "^18")
# att 0.22
# cut 5
d6 $ gF2
$ chop 8
$ loopAt 4
$ "meth_bass:14"
# cut 6
d7
$ gM2 $ gF3 -- High carillon!
$ midiOn "^59" ( -- Basse reponse
superimpose ((0.125 <~) . (|* gain 1.2) . (# note "<c4!4 cs4!4>") . (# pan 0.45))
)
$ (0.125 ~>)
$ note ("<c!4 ef!2 f g> <c!4 ef!2 f g> <c!4 ef!2 f g> <ef!4 f f g d6>"
- 7 -- Calage
)
# "808hc:2"
# pan 0.85
-- # midiG' "^83" 0 1.5
-- # gain 0.8
d8 $ gF1 $ gM1
$ midiOn "^92" (ply "1 <2!3 4>")
$ midiOff ("^56" + "^36") (mask "t(4,8,1)")
$ chop 16
$ loopAt 2
$ midiOn "^36" ((|* gain 0.7) .(# "jungle_breaks:42"))
$ midiOn "^56" (# "jungle_breaks:43")
$ "jungle_breaks:45"
# cut 8
-- # midiG' "^84" 0 1.5
d9 $ gF3 -- Pads atmospheriques
$ off 0.25 ((# pan 0.8) . (# cut 91))
$ note ("<bf a bf <c d>>"
+ "[0 12 0 12*<1 2>]"
- 12
-9 -- calage
)
# "trance_pads:7"
# cut 9 # legato 2
-- # midiG' "^20" 0 1.4
# pan 0.4
# gain 1
# room 0.4
-- trance_bass:5
-- TRAVAUX
d4 -- Basse convaincante
$ gM3 $ gF2
$ whenmod 64 32 (# drybus 41 (slow 32 $ range 1.9 1 saw))
-- $ midiOn "^89" (ply "<[4@5 2 4 2] 1>")
$ midiOn "^57" (segment "<4 [4 <8 8 16 16>]>")
$ someCyclesBy (1 - "^17") (struct "<t [t t]>")
$ rarely (ply "1@5 1 <1!3 2> [<1 2> <1 1 1 2>]")
$ note "<c3 c3 c3 c3 gs2 gs2 b2 b2>@5 ef3 d3 <ef3!4 c3!3 b2>"
# "bassWarsaw"
# room 0.2 # sz 0.1
-- # midiG' "^81" 0 1.5
# pan 0.4
|* gain ("1@5 0.95 0.98 0.95" * 1.1 )
d5 $ gF3 -- Appel oiseau joyeux oiseau joyaux
$ midiOn "^58" ( -- Oiseau de nuit
rev . (|+ note "<<0 0 [0 -7] [0 -7]>!3 [0!3 -12]>")
)
$ mask "<[[t <f!4 t!4>] <f!8 t!8>]!8 t!24 t!96>"
-- g c ef g / g c ef f / gs c ef f / gs c ef g
-- g c ef g / g c ef f / gs c ef gs / gs c ef g
-- g c ef g / g c ef f / gs c ef f / gs c ef g
-- g c ef g / gsc ef f / gs c g f / gs c f ef
$ note ("<[<g4 <g4!3 gs4> gs4 gs4>@3 <c!13 gs4 c c>@2 <ef!14 g f>@3] <g f <f gs f f> <g g g ef>>>")
# "FMRhodes1"
# modIndex (range 0 50 "^54")
# delaybus 51 (range 0 0.8 "^34")
# delayt "<h>"
# delayfb 0.25
# pan 0.7
-- # midiG' "^82" 0 1.5
d6 $ gF1 -- HAWKS
-- $ mask "<f!16 t!16>"
$ "~ [s s*2] ~ [s <~!3 s>]"
# "armora:1"
# legato "<0.5>"
# note "<c10!3 d10 d10 d10 e10 [e10!3 c10]>"
# pan 0.9
# hpf (slow 8 $ range 5000 "<8000!32 800!32>" saw)
# room 1.0
# sz 0.01
# dry 1.025
-- # room 0
-- # midiG' "^31" 0 1.5
d10
$ mask "<f!16 t!16 t!96>"
$ gF1 $ "<~!12 <risers:2!3 ~> ~ ~ ~>"
# end 0.85
# cut 10
-- # midiG' "^13" 0 1.3
-- # gain (1.3 * "^77")
# gain 1
d11
$ mask "<f!24 t!8>"
$ note ("~ <c5!4 ef5 ef5 f5 g5>" + 4)
# "~ cy"
# "808cy:8"
-- # gain ("^77" * 1.1 * (slow 8 $ range 0.75 1 saw))
# gain (1.1 * (slow 8 $ range 0.75 1 saw))
live/collab/raph/permanence.tidal 0 → 100644
do
setcps (150/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
$ superimpose ((|* gain (1.3 * "^30")) . (# "hardkick:2"))
$ midiOn "^42" (<| "k k k <k <k*2 [~ k*<1 [4 2]>]>>")
$ "kick:5"
-- # lpf 200
d2 $ gF1 $ gM1
$ midiOn "^75" (ply 4)
$ midiOn "^43" (<| "~ s*<1!7 2> ~ s*<1!3 2>")
$ midiOff "^43" (<| "~ s")
$ whenmod 4 3 (superimpose (("<e s>" <~) . (|* gain 0.9)))
$ "[snare:2,snare:10]"
# octer 0
# octersub 0
# octersubsub 0
# pan 0.25
-- # lpf 3000
d3 $ gF1 $ gM1
$ sometimesBy "0 <0.5!3 2>" (mask "t(<12!3 2>,16)")
$ midiOff "^44" ((mask "t(<8!3 [8!3 4]>,16,2)"))
$ "hh:8*16"
|* gain "1 1 0.95 1 0.96 1 0.975 1.1"
# gain 1.8
# pan 0.2
# cut 3
d4 $ gF2
$ midiOn "^89" (ply "1 1 1 <4!3 1>" . slice 4 ("0*<4!4 8!4 16!4 32!4>" + "<0 1 2 3>"))
$ midiOn "^57" ((# freeze 0.2) . ply 4)
$ loopAt 4
$ "bass_nes:1"
# cut 4
# pan 0.3
# octersubbus 42 (range 0 1.5 "^17")
# squizbus 42 (range 0 1.5 "^33")
# crushbus 41 (range 16 2.5 "^53")
d5 $ gF3 $ gM3
$ midiOff "^58" (slice 4 "<0 0 0 0 1 1 1 <1 2>>*<4!7 8>")
$ midiOn "^58" (
slice 4 "<0 1 2 3> <0 1 0 3>*<1 2 1 4>" .
(# n "41")
)
$ "fguitar:40"
-- # crush 3.5
-- # note "-24"
# gain (1 - 0.24 * "^34")
# crushbus 51 (range 16 2.5 "^54")
# distortbus 52 (range 0 1.5 "^34")
# lpfbus 53 (range 3000 200 "^34")
# cut 5
# pan 0.66
d7 $ gM3 $ gF3
$ n ("<0 0 0 ~>" + "<41!10 42 42>") # "fsynth"
-- # crushbus 71 (range 16 2.5 "^55")
# octersubbus 71 (range 0 2.5 "^55")
# cut 7
d8 $ gF1 $ gM1
$ midiOn "^20" (loopAt 4)
$ loopAt 2
$ chop 8
$ midiOn "^92" (ply "<2!3 [4!3 8]>")
$ midiOn "^36" (# "jungle_breaks:55")
$ midiOn "^56" (# "jungle_breaks:45")
$ "jungle_breaks:1"
# cut 8
# pan "0.8 0.2 0.8 [0.2 0.8]*2"
live/jam/val23.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 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
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let modIndex = pF "modIndex"
d1 $ gF1 $ gM2
-- $ midiOn "^42" (<| "k*2 k k <k <k*2 [~ k*<1 [4 2]>]>>") -- PERMANENCE
$ midiOn "^42" (<| "k k k <k k*2 k [~ k]>" )
$ midiOff "^42" (<| "k . ~ k ~ ~")
$ "[jazz,kick:5]"
d2 $ gF1 $ gM1
$ midiOn "^43" (<| "~ c ~ c*<1 <2 2 1>>")
$ midiOff "^43" (<| "~ <c!3 [c*2]>")
$ "[snare:40,sn:31]"
d3 $ gF3 $ gM1
$ midiOn "^76" (ply 4)
$ midiOn "^44" (<| "~ h ~ h ~ h ~ h*<1 2>")
$ midiOff "^44" (<| "h(<3!4 8!8>,8) h(<3 3 5 <5 [5 8]>>,8)" )
$ "hh:7"
|* gain (range 0.8 1.2 perlin * 2)
# gain 0.7
# cut 3
d4
$ loopAt 2 $ "meth_bass"
d8 $ gM1 $ gF1
$ midiOn "^60" (("e" <~) . mask "<t(4,8)>")
$ chop 16
$ midiOn "^20" (# "break:5")
$ midiOn "^92" (
(# delay 0.3)
. (# delayt "q") . (#delayfb 0.5)
)
$ midiOn "^36" (loopAt 1 . (# n "46"))
$ midiOn "^56" (loopAt 0.5 . (# n "19"))
-- $ slice 2 "0 1*<1!3 4>"
$ loopAt 4
$ "jungle_breaks:45"
d1 $ gM2 $ gF1 -- Kick solide
$ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
$ fix ((# att 0.02) . (# rel 0.5) . (# lpf 5000)) "kick:4"
$ midiOn "^42" (struct "t t t t*<1!6 2 2>")
$ midiOff "^42" (<| "k . ~ <~!3 k> ~ ~")
$ "[jazz,kick:4]"
-- # midiG' "^78" 0 1.5
d2
$ gM1 $ gF1 -- snare contretemps variable
$ fix ((|* gain 0.8) . (# legato 0.05)) "cp"
$ midiOn "^43" (<| "~ cp ~ cp*<1 1 2 <1 2>>")
$ midiOff "^43" (<| "~ cp")
$ "[cp,snare:24]"
# pan 0.65
# legato 0.22
-- # midiG' "^79" 0 1.6
d3 $ gM1 $ gF1
$ "~ d ~ d ~ d ~ <d!12 [~ d]!3 [d d]>"
# "snare:34"
# hpf 7000
-- # midiG' "^80" 0 1.5
d4 -- Basse convaincante
$ gM3 $ gF2
$ whenmod 64 32 (# drybus 41 (slow 32 $ range 1.9 1 saw))
-- $ midiOn "^89" (ply "<[4@5 2 4 2] 1>")
$ midiOn "^57" (segment "<4 [4 <8 8 16 16>]>")
$ someCyclesBy (1 - "^17") (struct "<t [t t]>")
$ rarely (ply "1@5 1 <1!3 2> [<1 2> <1 1 1 2>]")
$ note "<c3 c3 c3 c3 gs2 gs2 b2 b2>@5 ef3 d3 <ef3!4 c3!3 b2>"
# "bassWarsaw"
# room 0.2 # sz 0.1
# crushbus 42 (range 16 4 "^53")
# relbus 43 (range 2 0.02 "^33") # att 0.22
-- # midiG' "^81" 0 1.5
# pan 0.4
|* gain ("1@5 0.95 0.98 0.95" * 1.1 )
d5 $ gF3 -- Appel oiseau joyeux oiseau joyaux
$ midiOn "^58" ( -- Oiseau de nuit
rev . (|+ note "<<0 0 [0 -7] [0 -7]>!3 [0!3 -12]>")
)
$ mask "<[[t <f!4 t!4>] <f!8 t!8>]!8 t!24 t!96>"
-- g c ef g / g c ef f / gs c ef f / gs c ef g
-- g c ef g / g c ef f / gs c ef gs / gs c ef g
-- g c ef g / g c ef f / gs c ef f / gs c ef g
-- g c ef g / gsc ef f / gs c g f / gs c f ef
$ note ("<[<g4 <g4!3 gs4> gs4 gs4>@3 <c!13 gs4 c c>@2 <ef!14 g f>@3] <g f <f gs f f> <g g g ef>>>")
# "FMRhodes1"
# modIndex (range 0 50 "^54")
# delaybus 51 (range 0 0.8 "^34")
# delayt "<h>"
# delayfb 0.25
# pan 0.7
-- # midiG' "^82" 0 1.5
d8 $ gF1 $ gM1
$ midiOn "^92" (ply "1 <2!3 4>")
$ midiOff "^60" (mask "t(4,8,1)")
$ chop 16
$ loopAt 2
$ "jungle_breaks:45"
# cut 8
-- # midiG' "^84" 0 1.5
d6 $ gF1 -- HAWKS
-- $ mask "<f!16 t!16>"
$ "~ [s s*2] ~ [s <~!3 s>]"
# "armora:1"
# legato "<0.5>"
# note "<c10!3 d10 d10 d10 e10 [e10!3 c10]>"
# pan 0.9
# hpf (slow 8 $ range 5000 "<8000!32 800!32>" saw)
# room 1.0
# sz 0.01
# dry 1.025
-- # room 0
-- # midiG' "^31" 0 1.5
d7
$ gM2 $ gF3 -- High carillon!
$ midiOn "^59" ( -- Basse reponse
superimpose ((0.125 <~) . (|* gain 1.2) . (# note "<c4!4 cs4!4>") . (# pan 0.45))
)
$ (0.125 ~>)
$ note ("<c!4 ef!2 f g> <c!4 ef!2 f g> <c!4 ef!2 f g> <ef!4 f f g c6>"
- 7 -- Calage
)
# "808hc:2"
# pan 0.85
-- # midiG' "^83" 0 1.5
# gain 0.8
d9 $ gF3 -- Pads atmospheriques
$ off 0.25 ((# pan 0.8) . (# cut 91))
$ note ("<c4 c4 c4 c4 gs3 gs3 b3 b3>"
-9 -- calage
)
# "trance_pads:7"
# cut 9 # legato 2
-- # midiG' "^20" 0 1.4
# pan 0.4
# gain 1
# room 0.4
d10
$ mask "<f!16 t!16 t!96>"
$ gF1 $ "<~!12 <risers:2!3 ~> ~ ~ ~>"
# end 0.85
# cut 10
-- # midiG' "^13" 0 1.3
-- # gain (1.3 * "^77")
# gain 1
d11
$ mask "<f!24 t!8>"
$ note ("~ <c5!4 ef5 ef5 f5 g5>" + 4)
# "~ cy"
# "808cy:8"
-- # gain ("^77" * 1.1 * (slow 8 $ range 0.75 1 saw))
# gain (1.1 * (slow 8 $ range 0.75 1 saw))
d8
$ gF1
$ midiOn "^92" (ply 8)
-- $ slice 2 "0 1*<1!3 4>"
$ chop 8
$ loopAt 2
$ "break:11"
once $ arp "up" $ note ("c4'maj'4")
# "808cy:8"
# gain 1
d11 -- What is the effect?
$ fix ((# "weird_dialogs:39") . (# begin 0.81)) "answer"
$ fix ((# "weird_dialogs:39") . (# begin 0.45). (# end 0.81)) "variations"
$ fix ((# "weird_dialogs:39") . (# begin 0.2). (# end 0.45)) "almost"
$ fix ((# "weird_dialogs:39") . (# end 0.2)) "effects"
$ whenmod 32 28 (# "~ <answer!3 [variations answer]>")
$ "~ <<effects!4 almost!4> <almost variations>>"
-- $ "~ <variations>"
# midiG' "^20" 0 1.4
# cut 11
# speed 1
once $ "weird_dialogs:39"
# begin 0.45
# end 1
# cut 11
d2
$ "~ cp"
live/midi/nova/breaks/nuit_agitee.tidal 0 → 100644
-- BASS GAMEBOY
d f Arc
do
-- resetCycles
setcps (160/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
let gF1 = (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
let gF3 = (# djfbus 3 (range 0.05 0.95 "^51"))
let scale = getScale (scaleTable ++ [("gameboy", [1,2,4,5,7,9,11])])
-- once $ note (scale "gameboy" (run 8)) # "superpiano" # gain 2
d1 $ gM2 $ gF1
-- $ midiOff "^42" (<| "k . ~ <~!8 k!56> ~ <~!6 <~ k>!54>") -- Attente
$ midiOff "^42" (<| "<k ~>") -- TRAP
$ midiOn "^42" (<| "k k k*[1 <1 <2 4>>] k*<1 2>")
$ "[jazz,kick:4]"
d2 $ gM1 $ gF1
$ "~ <~!8 s!56> <s!8 ~!56> <~!8 s!56>"
# "[sn:20,snare:8]" # rel 0.4 # note "-12" # gain 1.3
d3 $ gM1 $ gF1
$ midiOff "^44" (mask "[~ [t . <~!3 t> ~!3 ]]*4")
$ n ("~ 0*<1 1 2 1> ~ 0*<1 2 <1 2> 2> ~ <0!32 0*<1!4 2 4!3>!32> ~ <1!16 1*<1 1 2 1 4 1 2 <4 8>>!16>")
# "amencutup"
# cut 3
# panbus 31 "^52"
d6 $ gF1 $ gM1
$ someCyclesBy "<f!3 t f f t t>" (superimpose ((|- note 1) . (|* gain 0.9) . (0.125 <~)))
$ "<~ cp>"
# drumFrom "rolandtr909" "cp:1"
# room 0.4 # dry 1.1 # sz 0.5
# lpf 2000
# gain 1.1
d4 $ gF2
$ midiOn "^89" (slow "<4!12 8!4>" . striate "<4!12 8!4>")
$ midiOn "^57" (slow "<1!12 [1 2]!3 [2 4]>" . mask "<t!6 [<t f> [<t f> f]] [t f]>" . (stut "<4!12 2 2 4 8>" 0.7 "<e!12 e e s s>") . mask "t(2,16)")
$ midiOn "^17" (mask "t(4,16)")
$ loopAt 8
$ chop 64
$ "bass_commodore:7"
# cut 4
# crushbus 41 (range 8 0.81 "^53")
# octersubbus 42 (range 0 7 "^33")
# lesliebus 43 (range 0 2 "^29")
# lsize 2.2
# lrate (slow 4 $ range 0.2 0.8 sine)
-- # distortbus 41 (range 0 5 "^53")
# gain (0.8 - 0.1 * "^33" - 0.1 * "^29")
# room "<0.3!12 0.35 0.4 0.48 0.6>"
d5 $ gF3 $ gM3
$ midiOn "^58" (superimpose (
(|- note 12) . (# cut 51) . (# pan 0.2))
)
$ whenmod 32 24 (off "e" ((|* gain 1.1) . (|+ pan 0.12) . (|+ note "<12!3 24>")))
$ note (scale "gameboy" (
"<1(3,8) [1(3,8), <~ [~!7 2]>] 0(3,8) <0!3 -2>(3,8)>"
+ "<<0 0 2 2> <0 0 2 2> <0 7 7 9> <0 0 9 9>>"
))
# "harpsichord2"
# distortbus 51 (range 0 0.5 "^54")
# room 0.4 # dry 0.9 # sz 0.5
# pan 0.85
# modIndex 0.3
# legato 2
# gain 1.5
d9 $ gF2 $ arp "up"
$ note (
"<a a g5 g5> ~ <~!24 d6!7 d5> <a a g g> ~ <~!12 d6!4> <a a g g> <~!16 d6!16>"
- 2.5 -- "calage"
)
# att 0.05
# rel 2
# "jungbass:1" # cut 9
# room 0.8 # dry 1.4 # sz 0.9
d10 $ gF3 $ note (slow 2 $ ("<[a5, d6] [g5, <e6 <cs6 [cs6 a5]>>]>"))
# "moogBass"
# room 0.2
# pan 0.7
d11 $ gF3 $ gM3
$ note ("<d d e cs d d e cs f f g e f f g a>"
+ "0(<3!3 [3 <5 6>]>,8)"
+ 12
)
# "cpluck:3"
# room 0.8
# gain 0.65
# cut 11
d8 $ gM1 $ gF1
$ midiOn "^92" (ply "1 <2 4 8> 2 <2 [4 8]>")
$ midiOff "^60" (mask (slow 4 "t(<2 4 [4 8 4] 8>,16)"))
-- $ slice 8 "<~!7 0> 1 <~!6 2 2> 3 <~!4 4!4> 5 <~ 6 ~ ~ 6 ~ 6 6> 7"
$ midiOn "^36" ((# n "8"))
$ midiOn "^56" ((# n "6"))
$ loopAt 2 $ chop 32
$ "jungle_breaks:1"
# lpf 5000
# cut 8
live/midi/nova/grime/bogdan_arrive.tidal 0 → 100644
do
let gF1 = (# djfbus 1 (range 0.05 0.95 "^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
setcps (140/60/4)
d1 $ gF1 $ gM2
$ midiOn "^42" (<| "k*4")
$ midiOff "^42" (<| "<<k!3 k(<3 6 12>,8)> [~ !7 <~ k>]>")
$ "[jazz,kick:5,808bd:5]"
d2 $ gF1 $ gM1
$ fix (|* gain 0.8) "sn"
$ midiOn "^43" (<| "<~ [s*<1!3 3> ~]>")
$ midiOff "^43" (<| "~ s ~ s*<1!6 3 3>")
$ "[snare:13,sn:2]"
d3 $ gF1 $ gM1 -- My grimest hat
$ midiOn "^76" (fast "[2]")
$ "h(3,8) h([<3 5 5 3> <3 5>],8)"
# drumFrom "rolandtr909" "hh"
# cut 3
|* gain "[0.75 1.1]*8"
d5 $ gF3 $ gM3
$ chop 8
$ loopAt 8
$ "synth_commodore:3"
# cut 5
# pan 0.7
# gain 0.8
d7 $ gF2 $ gM3
$ chop 4
$ loopAt 4
$ "meth_bass:17"
-- # octer 1
# octersubbus 63 (range 0 1.5 "^19")
# squizbus 62 (range 0 1.5 "^35")
# crushbus 61 (range 16 2.5 "^55")
# octersub 0
# octersubsub 0
# gain 0.9
d4 $ gM3 $ gF3
$ midiOn "^91" (ply "2 <4 8>" . chop 8)
$ slow 2
$ midiOn "^57" (>| note ("<ef bf fs gs>"))
$ midiOff "^57" (>| note ("[ef, <~ [~!15 e] [~!15 cs] [~!7 [e*2 cs]]>]"))
$ "giorgio_syn:23"
# cut 4
# room 0.4
# legato 2
# octersubbus 43 (range 0 5 "^17")
# squizbus 42 (range 0 1.5 "^33")
# crushbus 41 (range 16 2.5 "^53")
d8 $ gF1 $ gM1
$ chop 8
$ midiOn "^36" (loopAt 2 . (# n "<60!3 61>"))
$ midiOn "^92" (ply 4)
$ midiOff "^60" (mask "t(4,8)")
$ loopAt 2
$ "jungle_breaks:26"
# cut 8
d9 $ gF3
$ "<~!7 bogdan_grime>"
# n (slow 8 "<3!3 <2 0>>")
# crushbus 91 (range 4 8 perlin * 4)
# lpf 4000
# gain (0.7 + "<0.1!3 0>")
-- $ midiOn "^91" (ply "2 <4 8>" . chop 8)
-- d10
-- $ "~ ~ ~ s"
-- # "glitch:2"
-- # speed (slow 8 $ range 0.15 2 perlin)
-- # cut 3
-- # gain 2
d11 $ gF3
$ n (stack [
"<~!7 <82 83 84 91 92 93>>",
-- "42/4"
""
])
# "90s_megafx"
# gain 0.8
# lpf 5000
d10 $ gF3 $ gM3
$ chop 8
$ loopAt 4
$ "jungle_riffs:21"
# cut 4
# gain 0.6
# pan 0.4
once $ "dr"
# gain 2.5 # cut 1
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