do
setcps (120/60/4)
-- resetCycles
let gMask = (midiOn "^41" (mask "t!3 <t [[f <f t>] <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
  $ midiOn "^42" (<| "k <k!6 ~ ~> <k!7 ~> <k k*2>")
  $ midiOff "^42" (<| "<k <~ [~!7 k]>>")
  $ "[reverbkick,808bd:4]" -- Profond
  # gain 1.8
  # lpf 400
  # octersub 2
  # cut 1
d2 $ gF1 $ gM1
  $ midiOn  "^43" (<| "~ s ~ s*<1!3 2>")
  $ midiOff "^43" (<| "~ . <~ <s [s*2 . ~ <~ s>]>>")
  $ "[snare:70]"
  # note "-5"
  # gain 1.4
d3 $ gF1 $ gM1 -- Soft drumroll
  $ fix (|* gain (slow 16 $ range 1.2 0.6 perlin))
    "h2ogmsn:1"
  $ "d*[8 <16 12 [16 12] [6 12]> <8!3 <12 16>>]"
  # "[h2ogmsn:1,h2ogmhh]"
  |* gain (range 1.1 0.95 (slow 4 perlin))
-- d4 $ "wobble" # cut 4
d6 $ gF1 $ gM1
  $ "~ cy ~ cy*<<1!4 2!4> <1!4 2!4> 2 2> ~ cy ~ cy*<1!3 2>"
  # "h2ogmcy"
  # n (slow 4 "<0 1 2 3>") # cut 6
d4 $ gF2 $ gM2 -- BASSLINE SYNTH
  $ chop 2
  $ superimpose (
    (
      # crushbus 41 (range 10 4.5 "^53")
    ) . (# hpf 500) . (# lpf 10000)
    )
  $ slow 2
  $ note ("<<ef [ef@7 <ef gs>]> <fs [fs@7 f]>>"
  - 12
  )
  # "giorgio_syn:0"
  # cut 4
  # lpf 1500
  # gain 1.4
  # room 0.4 # sz 0.8
  # octersub 2 # octersubsub 1
d5 $ gF3 $ gM3
  $ midiOn "^58" (superimpose ( -- Echoes
    (# pan 0.8)
    . (0.25 ~>)
    . (|* gain "<0 1> 0.9 0.8 0.8")
    . (chop 4)
    . (|+ note 12)
    . (# cut 51)))
  $ n "<<2!4 3!4 4!6 5 5> ~ ~ ~>"
  # "jane_wang"
  # cut 5
  # pan (slow 16 $ range 0.6 0.45 saw)
  # gain 1.5
  # room 0.1 # sz 0.4 # dry 1.1
d7
  $ note ("<ef ef <fs b5> bf5>" + "0 <7 7 9 12> 0" + 3
   -- - 12
  )
  # "vec1_acid:0"
  # lpf 5000
  # octersub 1.3
  # octerbus 72 (range 0 1.8 "^35")
  # squizbus 71 (range 0 2 "^55")
  # cut 7
  # room 0.4
  # dry 1.1
d8 $ gF1 $ gM1
  $ midiOn "^92" ( -- BREAK ME
    splice 4 "<0!3 [0 1] 0 0 [0 1] [0 1]*2> 1 2 3*<4 <2 8>>")
  $ midiOn "^56" (loopAt 0.5 . (# "break:15"))
  $ loopAt 2
  $ chop 8
  $ "jungle_breaks:101"
  # gain 1.2


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)"))
  $ 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