-- A LA VOLETTE
setcps 0.5

d1
$ someCycles (degradeBy "0 0.5 1 0" . fast 2)
$ whenmod 8 6 (degradeBy "1 1 1 1 1 1 1 0")
$ s "<k [k*2 ~]> . k ~ <~ k?> <k? k>"
# s "reverbkick"
# lpf 500
# gain 1.5

d2
$ whenmod 8 6 (juxBy 0.2 (# crush 4))
$ someCycles (jux $ hurry 2)
$ sometimes ((# n 3) . stut 4 0.75 0.125)
$ s "~ s? ~ s?*2"
# s "808sd:1"
# gain 0.8
# pan 0.2

d3 -- Drumroll baby!
$ whenmod 16 15 (# gain 0.8)
$ whenmod 16 10 (# gain 0)
$ whenmod 16 0 (# gain 0.8)
$ fix (
  (stut "[2|3]" 0.5 (1/32)
  . (|- gain (slow 8 $ sine * 0.3))
  . (# n "[6|1|[1, 9]]")
  )) (n "1")
$ (# n "0 . 0 0 0 1")
$ whenmod 64 2 (fast "<2 1> <1 2>")
$ whenmod 16 0 (fast 2)
$ fast "8 <1 2 4>"
$ s "dr"
# pan (slow 32 $ sine / 2)

d4
$ someCycles (degrade . (# sustain 0.25))
$ someCycles (slow 2)
$ bite 4 "<[0 1 2 3] [0 1 1 1] [0 3 2 1] [[0|0 0] 2 1*2 <3 3 0 3>]>"
$ note ("5 6 8 ~ 8 [6 5] 6 ~"
- "[24,36]"
)
# s "supersaw"
# voice 0.05
# resonance 0.1
# decay (slow 32 $ range 0 0.5 cosine)
# lfo (slow 16 $ range 0 1.8 sine)
# gain 0.8


-- Apris à - à la volette
d5
$ (|- note 8)
$ whenmod 32 16 (superimpose ((# s "superfork") . (|+ gain 0.2)))
$ degradeBy ("<0.75 0 0 0.5 0 0.9 0 0>")
$ whenmod 8 7 (sometimes (# room 0.3))
$ whenmod 8 6 (
  >| note "1 5 3 ~ . 0 1" -- APRIS À VOLER
)
$ whenmod 8 4 (
  |> note "3 5 6 ~ 6 [5 3] 5 ~" -- A LA VOLETTE!
)
$ note "5 6 8 ~ 8 [6 5] 6 ~ " -- Apris à - à la volette
# s "superfork" # voice 0.25 # accelerate (0.025)
# gain 0.7
# room 0.1
# size 0.1
# pan 0.8

once $ note "0 .. 4"
# s "supersquare" # voice 0.25 # accelerate (-0.02)
# gain 0.7

d4
$ (# n 0)
$ fix ( -- mon petit / mon petit oiseau
  every 4 (
    superimpose ( const -- oiseau scratch
      $ degradeBy "<0 .. 0.5 0.5 .. 0.2 0.2 .. 0.6 0.6 .. 0>"
      $ n "0*16" # s "birds3" # n (choose [0,0,2]) # pan (slow 8 $ sine)
      )
    . (# end 0.08)
    . (stut 2 1 0.25)
  )
  . (# end 0.2)
  ) (n 0)
$ fix (
  (# begin 0.2)
. (# end 0.4)
) (n 1)
$ n "<~ <0 1>>"
# s "kaamelott"
# gain 0.6

once
$ note (scale "major" 1 - (run 4))
# s "kaamelott:1"
# end 0.04 # cut 1
# gain 0.8
