-- Jamuary 25 #04
-- Using "giorgio_syn:7" and medieval mostly :P
-- Ce Qu'on Ignore
-- Du danger, c'est ce qu'on tient pour certain
-- qui ne l'est pas
-- MARK TWAIN
do
-- resetCycles
setcps (108/60/4)
d1 $ gF1 $ gM1
  $ midiOn  "^41" (<| "k k k k*2")
  $ midiOff "^41" (<| "k")
  $ fix ((|* gain 0.9) . (# lpf 1000)) "jazz"
  $ fix ((# att 0.02) . (# rel 0.5) . (# lpf 400)) "kick:4"
  $ "[808bd:1,808bd:2,jazz,kick:4]"
d2 $ gF1 $ gM2 $ "~ sn <~ [~ sn]> sn"
  # note "0 0 -1 0" # legato "1 1 0.75 1"
  -- # "[snare:5,snare:19]" -- BIT
  # "<rampleM9:6!6 rampleM9:7 rampleM9:8>" |* gain "<1.3!6 1.7!2>"
  # room 0.4 # sz 0.6 # dry (slow 8 $ range 1 1.24 saw)
  # gain 1.5
d3 $ gF1 $ gM2 -- Hats ouverts legers
  -- FIXME(#94) d3 drives more controls than the grid gives it (BT3 only — BL1-3 are the family mutes). ^76 now belongs to another orbit, so this step STILL FIRES ACROSS COLUMNS — turning ^76 for its new owner also moves this. NOT commented out: this is a `$`-step and something above it is a partial application waiting for it, so removing it would stop the whole block compiling. Fold it onto d3's own control with gSel.
  -- FIXME(#94) d3 drives more controls than the grid gives it (BT3 only — BL1-3 are the family mutes). ^76 now belongs to another orbit, so this step STILL FIRES ACROSS COLUMNS — turning ^76 for its new owner also moves this. NOT commented out: this is a `$`-step and something above it is a partial application waiting for it, so removing it would stop the whole block compiling. Fold it onto d3's own control with gSel.
  $ midiOn "^76" (ply 2)
  $ midiOff "^43" (mask "t(4,8,1)")
  $ "ho:0*8"
  # att 0.25
  # rel 0.05
  # gain (1.5 * "1 0.9 1 0.8 <0.9!3 1.05> 1")
d4 $ gF2 $ gM3
  -- $ superimpose ((# "ikedaBass")
  -- . (|- note 12) . (|* gain 1.4)
  -- )
  $ note ("gs3 [gs3@2 b3]@2 0@2"
  -- + 12
  +  "0 0@2 <gs3 ef3 gs3 ef3 gs3 ef3 gs3 ef3 gs3 cs4 ef4 e4 gs3 cs4 ef4 e4>@2")
  # "bassWarsaw"
-- # room 0.4 # sz 0.8
  # dry 1.4
  # chorus 0.4
  # crushbus 41 (range 16 3.5 "^32")
  # octersubbus 42 (range 0 2.5 "^52")
  # octersubsubbus 43 (range 0 1.5 "^52")
d5 $ gF3 $ gM3
  $ midiOn "^89" (slice 4 "1*[4 <4 8>]")
  $ midiOn "^57" (ply "4 4 <4!3 8> <2 <8!3 16>>")
  $ midiOff "^89" (slice 8 ("<0 1 0 1 0 1 2 3>"))
  $ "medieval:210"
  # cut 5
  # room 0.1 # sz 0.9
  # freezebus 51 "^33"
  # crushbus 52 (range 16 2.5 "^53")
d8 $ gF1 $ gM2
  $ midiOn "^92" (loopAt "0.5 0.5 <0.5!7 0.25> <0.5!3 0.25>" . (# "breaks165"))
  $ midiOn ("^60" - "^92") (mask "t(4,8,1)" . chop 8)
  $ loopAt 2
  $ chop 8
  $ "jungle_breaks:45"
  # cut 8
d10 -- Violoncelle metronomique
  $ note "<~!8 gs5 ~ ef5 ~ gs5 ~ <ef5 [ef6(3,8)]> [[e6 fs6](3,8)]>"
  # "cbow" # n "<0!8 1!8>"
  # cut 10
  # room 0.4 # sz 0.8
  # gain 0.6
