sale_piano.tidal 2.79 KB
do
setcps (160/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 gF4 = (# djfbus 3 (range 0.05 0.95 "^29"))
let gM1 = gMask . gMute
let gM2 = gMask . gMute2
let gM3 = gMask . gMute3
d1 $ gF1 $ gMute2
  $ "k k k <k k*2 k [~ k*<1 1 <1 2> <2 4>>]>"
  # "hardkick_rha" # n "<14!3 15 <14 15>>" -- SALE
  # gain 1.2
d2 $ gF1 $ gM1 $ "~ s ~ [s*<1!3 2> ~]"
  # "[cp]"
  # gain 1.4
d3
  $ gF1 $ gM1
  $ "d(3,8) d(<3!3 [8@3 3]>,8)"
  # "h2ogmsn"
  # gain 2 # cut 3 -- Drill that Baby
d5 $ gF3 $ gM3
  $ superimpose (# tremdpbus 51 (range 0 4 "^54"))
  $ superimpose (# tremrbus 52 (range 0 4 "^34"))
  -- $ superimpose (# crushbus 51 (range 16 4 "^54"))
  $ 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>"
  $ n "<<2 3 4 5> ~>"
  # "jane_wang"
  # cut 5
  # pan (slow 16 $ range 0.6 0.45 saw)
  -- # crushbus 51 (range 16 2.5 "^54")
  # gain 1.8
-- d4 $ gF2  $ gM3 -- Cello bass
--   $ midiOn "^89" (|+| note "[0 12 0]")
--   $ midiOn "^57" (|+| note "0 0 <7 [7 9](3,8) 7 [7 9 12 7]> 0")
--   $ juxBy 0.6 (|+| note ("7([3 1],8)"))
--   $ juxBy 0.6 (|+| note ("7([3 1],8)"))
--   $ note ("<[fs@7 <~ bf>] [fs@7 <~ cs>] <bf ef> <cs!3 bf>>")
--   |* gain "<[1@7 0.9] 1 1 1>"
--   # pan (slow 16 $ range 0.45 0.6 saw)
--   # "cpluck"
d12 $ 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>"
    - 24
   )
  # "moogBass"
  # legato 2
  # chorus 1.2
  # cut 12
  -- # tremdp 0.8
  -- # tremr "<2 4 4 <8 16>>"
  # gain 1.2
d7 $ gF1 $ gM1 -- SCRATCH
  $ midiOn "^91" (ply "2 4 <8 8 4 16>")
  $ midiOn "^55" (# n 15)
  $ midiOn "^59" (# n 15)
  $ chop 16
  $ loopAt 4
  $ "scratch_long:12"
  # cut 7
  # pan (slow 16 $ range 0.9 0.6 saw)
  # gain 1.2
d8 $ gF1 $ gM1
  $ midiOn "^92" (ply 4)
  $ loopAt 2
  $ chop 8
  $ midiOn "^56" (>| "jungle_breaks:10")
  $ "jungle_breaks:11"
  # cut 8
  # room 0.4 # dry 1.1
d10 $ gM3 $ gF3
  $ fix (# begin 0.25) "movie_statue:36"
  $ stack [
  -- I'VE GOT YOU SEVERAL TIMES
  mask "<f!24 t!8 f!16 t!16>"
  $ "movie_wine:15*<1 1 2 4>"
  # begin "<0!3 <<0.04 0.1> 0.25>>"
  # room 0.2 # sz 0.1
  # end "<0.45!8 0.5!8>" # cut 101, -- ON MY MIND
  mask "<f!7 t>"
  "<[movie_statue:36 movie_statue:7]>"
  # gain 0.9, -- Young lady from China
  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
  # gain 1.3
  # cut 101