-- Une barrière bleue -- couvre l'horizon ici -- Triste ville 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")) let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>")) let gMute = (midiOn "^73" (mask "f*16")) let gM = gMask . gMute setcps (120/60/4) d1 $ g $ gMute -- BOUNCE THAT KICK $ whenmod 16 12 (# legato 0.125) $ whenmod 4 3 (# legato 0.25) $ midiOn "^42" (<| "k*4" ) $ midiOff "^42" (<| "k . k(<3!3 [3 5]>,8)") $ fix (# lpf 200) "kick:4" $ "[jazz,kick:4,kick:9]" # midiG' "^78" 0 1.5 d2 $ g $ gM $ midiOn "^43" (struct "~ t ~ <~!3 t> ~ <~ t> ~ t") $ midiOff "^43" (struct "~ t") $ "cp" # note "<8!3 <-2!3 [-2!3 8]>>" # midiG' "^79" 0 1.8 d3 $ g $ gMask $ midiOn "^76" (ply "<2!3 [2 . 4 8]>") $ midiOff "^44" (mask "t(<8!3 [8 4]>,16)") $ "h h h h h*<1 2 1 <1 2>> h h*<1!7 2> [<h!3 ~> h]" # "hh" # midiG' "^80" 0 1.8 d5 $ g2 -- DAMAGED BASS $ midiOn "^89" (chop 8 . ply "<4 4 <4 4 8 4> 1>") $ note (scale "aeolian" "<0 0 [0@3 -1] <5 6>>") # room (slow 16 $ range 0.2 0.8 saw) # legato "<1!3 2>" # "90s_weird:2" # pan 0.3 # crushbus 51 (range 16 2.5 "^53") # roombus 52 (range 0 0.8 "^53") # midiG' "^81" 0 1 d6 $ g2 -- MY OTHER BASS IS A CAR $ slow 4 $ chop 16 $ "bass_atari:2" # crushbus 61 (range 16 1.5 "^54") # midiG' "^82" 0 1.5 # cut 6 d7 $ g2 $ gMask $ midiOff "^59" (mask "t(1,4) t(1,4)") $ midiOn "^91" (ply "<4 4 [4 2 4] 4> <2 1>") $ whenmod 36 24 (juxBy 0.2 ((# cut 71))) $ note (scale "aeolian" ( "<0 0 0 <5 6>>" -- Theme + ("[0*3 9*3 <5 4>*3 12*3]") )) # "giorgio_syn:5" # cut 7 # pan 0.8 # crushbus 71 (range 16 1.5 "^55") # midiG' "^83" 0 0.8 d8 $ g2 $ gMask $ note (scale "aeolian" ( "<0 0 0 <5 6>>" -- Theme + ("[-4 -3*2 [-2 -3 -2 -1 ~]]" -3) ) + "12" ) # "strings" # cut 8 # pan 0.2 # midiG' "^84" 0 1.3 once $ note (scale "aeolian" ("-2")) # "strings" # gain 0.8 # cut 9 -- $ note "36" $ "strings" # gain 0.8 once $ "moogBass"