-- Sensation Octale
-- DNB GUITAR
-- Timeline | Intro > Montee > DropFull > PontGuitare > Montee > DropFullGuitar > Outro
-- Measures |  0-7  > 8-31   > 32-63    > 64-71       > 72-95  > 16            > 16
-- 1 Kick   |   ..     ..      XXXXXXX . X . . . . . . . . ...   XXXXXXXXXXXX X . ..X ..
-- 2 drRoll | ...XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
-- 3 Guitar |     .........................xxxxxxxxxxxxxxFFFFFFFxxxxxxxxxxxxxxxx...........
-- 4 Bass   | bbbbbbbbbbbbbbbbbxxxxxxxxxxxxx.......................xxxxxxxxxxxxxxbbbbbbbbb
do
resetCycles
setcps (160/4/60)
d1 -- Poum tchak
  $ mask "<f!8 f!23 [f t] t!32 f!8 f!23 [f t] t!32>" -- Orchestration
  $ fix (
    (# s "[sn:20,snare:8]")
    . (# n (slow 4 $ "<2!3 20>"))
    . (# note 4)
    . (|* gain 1.1)
  ) (s "s")
  $ fix (# s "[bskick,jazz]") (s "b")
  $ s "b? ~ s ~ ~ b s <~ <~ s>>"
  # gain 1.1
d2 -- drumroll
  $ mask "<f!7 [f t] t!120>" -- Orchestration
  $ whenmod 4 3 (jux (fast 2 . rev))
  $ fast "4 <8 16>"
  $ s "[drum:8,dr]"
  # pan (slow 8 $ range 0.1 0.9 sine)
  # gain (slow 16 $ range 0.65 0.95 sine)
d3
  $ mask "<f!8 f!24 f!32 t!8 t!24 t!32>" -- Orchestration
  $ sometimesBy "<f!64 f!8 t!24 f!32>" (|* gain (slow 32 $ range 1 0.75 saw))
  $ slice 8 (iter (slow 8 $ "[4|8]") $ run "<4!8 8!8>")
  $ "fguitar"
  # n ("<8!4 10!4 8 10 10 8>")
  # cut 3
  # gain 1.1
  # room 0.8
  # size 0.9
  # dry 1
  # pan 0.35
d4 -- BASSLINE ELECTRIQUE
  -- $ mask "<t!32 t!32 f!8 t!24 t!32>" -- Orchestration
  $ sometimesBy "<f!8 t!24 f!32>" (|* gain (slow 24 $ range 1 1.2 saw))
  $ slice 8 ("<0!3 4>" + run 8)
  $ "fbass:10"
  # pan 0.8
  # cut 4
  # crush "<16!28 12 10 9 8 5!32 5!32 5!12 8 9 10 12 16!16>"
d10 -- Toys vent
  $ mask "<f!7 [t f!2 <f t?>]!56>"
  $ whenmod 16 12 (jux rev)
  $ every 8 (# gain 0.9)
  $ s "space:3"
  # speed (range 0.15 0.3 perlin)
  # gain (slow 16 $ range 0.25 0.45 saw)
  # pan rand