do
-- resetCycles
setcps (110/60/4)
let gMask = (midiOn "^41" (mask "t . <f t f <f t>> <t f f <t f>>"))
let gMute1 = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gMute3 = (midiOn "^75" (mask "f*16"))
let gM1 = gMask . gMute1
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 $ gMute2 $ gF1 -- Kick solide
  $ superimpose ((# cut 11) -- Rumble
  -- . (# att 0.2) . (# rel 2)
  . (# gain 2.4)
  . (# delay 0.8) . (# delayt "e") . (# delayfb 0) -- Smear
  . (# room 0.06) . (# sz 0.1) . (# dry 0.82)
  . (# legato 0.25)
  . (# lpf 400) -- Low-pass  show
  )
  $ midiOn "^42" (struct "t t*<1!3 <1!4 2!4>> t <t <t!4 [~ t]!4> t t*2>")
  $ midiOff "^42" (<| "k . ~ k ~ <~!3 k*[4 1]>")
  $ "[techno:1,jazz]"
  -- $ "[hardkick_rha:1]"
  # lpf 400
  # pan 1
  # cut 1
d2 $ gF1 $ gM1 $ "~ . s*<1!3 2 1 2 1 2> ~"
  # "snare:70"
  # note "-14"
  # room 0.14 # dry 1 # gain 1.7
d3 $ gF1 $ gM1
  $ midiOn "^44" (<| "~ h ~ h ~ h*<1 2 2 1> ~ h*<1 1 2 <2 4>>")
  $ midiOff "^44" (<| "h h ~!5 h*<1 2>" )
  $ "h2ogmhh"
  # delay 0.4 # delayt 0.125 # delayfb 0.2
  # gain 1.2
d4 $ gF2 $ gM3 -- TODO REWORK
  $ midiOn "^57" (struct "t([16@3 <16!3 8 16 16 8 4>],8)")
  $ midiOff "^57" (|+| note"0([5 <2!16 <3!16 5!16>>],8,1)")
  $ superimpose (
    (# cut 41)
    . (# crushbus 41 (range 16 1.5 "^53"))
    . (# hpf 200)
    . (# lpf 10000)
  )
  $ note ((scale "phrygian"
    "0 3 <7 6 5 7>"
  )
  - 1 -- Fondamentale: re
  -- + 12 -- Octave: -1
  )
  # "giorgio_syn:6"
  # octerbus 42 (range 0.25 1.2 "^33")
  # cut 4
  # scram (range 0 0.72 "^17")
d7 $ gF3 $ gM3 -- Apollo call
  $ note ((scale "phrygian" "0 2@2 3@3 <2!3 5 6 6 7 [9 9]>@2")
    - 1 -- Fondamentale: re
    - 12 -- Octave: -1
    )
  # "FMRhodes1"
  # gain 2
d5 $ gF3 $ gM3
  $ midiOn "^58" (stut 4 0.9 "e")
  $ note (
    -- "<b <b fs b <d d6 d6>>@7]>"
    "<b [~ . bf ~ ~ <~ bf g g>]>"
    + 4)
  # "jungle_bass:12"
  # room 0.2 # dry 1.2 # sz 0.5
  # lpf 1400
  # lpq 0.4
  # legato 0.5
d8 $ gF1 $ gM1
  $ midiOn "^92" (loopAt 0.5)
  $ loopAt 2
  $ midiOff "^60" (mask "t(8,16,1)" . chop 16)
  $ chop 8
  $ midiOn "^36" (splice 4 "<[0 1 2 3]!3 [0 1]>" . (# n 75)) -- DNB LOVERS
  $ midiOn "^56" (# n 42)
  $ "jungle_breaks:45"
  # gain 1.4
  # hpf 1500
d9 $ gM3 $ gF3 $ slow 2 $ cat [
  "movie_bad_attitude:3", -- chances
  "movie_dawn:2 ~ movie_bad_attitude:10 ~", -- wrong thatsit
  "movie_bad_attitude:8", -- sure
  (slice 3 "[0 0 0 0 0] ~ [0 1 2] ~*3") $ "movie_bad_attitude:8", -- susususuSURE
  "movie_dawn:2" # lpf 3000 # crush 4 # octersub 0.6, -- WRONG
  -- "movie_bad_attitude:10",
  -- "movie_bad_attitude:10", -- thatsit
  -- "movie_bad_attitude:10",
  "movie_dawn:11" -- love
  ]
  # cut 9 # gain 1.2
  # room 0.2

once $ "movie_bad_attitude:3" # gain 1.2 # orbit 8
once $ "movie_bad_attitude:8" # gain 1.2 # orbit 8
once $ "movie_bad_attitude:10" # gain 1.2 # orbit 8
once $ "movie_dawn:2" # gain 1.2 # orbit 8
once $ "movie_dawn:11" # gain 1.2 # orbit 8
  b fs e     d
