"""
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$**$$$$$$$$$**$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$"   ^$$$$$$F    *$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$     z$$$$$$L    ^$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$    e$$$$$$$$$e  J$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$eee$$$$$$$$$$$$$e$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$b$$$$$$$$$$$$$$$$$$*$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$)$$$$P"e^$$$F$r*$$$$F"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$d$$$$  "z$$$$"  $$$$%  $3$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$*"""*$$$  .$$$$$$ z$$$*   ^$e*$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$"     *$$ee$$$$$$$$$$*"     $$$C$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$.      "***$$"*"$$""        $$$$e*$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$b          "$b.$$"          $$$$$b"$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$c.         """            $$$$$$$^$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$e..                     $$$$$$$$^$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$eeee..            J$$$$$$$$b"$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$r          z$$$$$$$$$$r$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"         z$$$$$**$$$$$^$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$*"          z$$$P"   ^*$$$ $$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$*"           .d$$$$       $$$ $$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$"           .e$$$$$F       3$$ $$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$.         .d$$$$$$$         $PJ$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$eeeeeeed$*""""**""         $\$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$                  $d$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$.                 $$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$e.              d$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$eeeeeee$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$AsciiArt$by$Gilo94$$$


do
setcps (120/60/4)
let gF =  (# 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 gMask = (midiOn "^41" (mask "t . [f <t f>] t"))
let gMute = (midiOn "^73" (mask "f*16"))
let gMute2 = (midiOn "^74" (mask "f*16"))
let gM = gMask . gMute
let gM2 = gMask . gMute2
d1 $ gF $ gM2
  -- $ midiOn  "^75" (<| "k ~ ~ <~!3 k>. k ~ <~ k> <k ~>")-- RubADub+adjustements
  $ midiOn  "^42" (<| "k k k <k [<~ k> k]>") -- 4F
  -- $ midiOff "^41" (<| "k . k <~ [<~ k> <k ~>]>")-- RubADub
  $ midiOff "^42" (<| "k . k <~ [<~ k> <k ~>]>")-- RubADub
  -- $ midiOn "^42" (struct "t t t <t [t <~ t*<2 1>> t*<1!3 2>]>")
  $ fix (|* gain 0.9) "jazz"
  $ fix (
    (# att 0.05). (# rel 1) . (# lpf 200)) "kick"
  $ "[kick:3,jazz]"
  # midiG "^78"
d2 $ gF $ gM
  $ whenmod 8 7 (off "e" ((|* gain 0.8) . (# hpf 5000)))
  $ midiOn "^42" (<| "~ s ~ <s [s s*<1 2>]>")
  $ midiOn  ("^43" - "^42") (<| "~ ~ s*<1 1 1 2 2 2 1 2> <~ [~ s*<1 2>]>")
  $ midiOff ("^43" + "^42") (<| "~ <~ s>")
  $ "[snare:42,snare:11]"
  # hpf 500
  # room 0.2 # dry 1 # sz 0.7
  # delay 0.5
  # delayt "s"
  # delayfb 0.05
  # midiG' "^79" 0 0.7
  # pan 0.8
d3 $ gF2 $ gM
  $ midiOn "^76" (ply "[2 1 2] <[4 8 4]!3 [8 16 8]>")
  $ midiOn "^44" (ply "2 1 2 <1 <2 4>>")
  $ "dr*<8!3 [16@3 8]>"
  # midiG' "^80" 0 1.1
d4 $ gF2 $ gMask -- Basic bass
  $ note (scale "aeolian" (fast 2
  "<0!3 <-1 [-2 -3@3] <2 [-1@2 -1 2]> <[4@6 4 5] [5@3 5 4@2 4 6]>>>") - 24)
  # "bassWarsaw"
  # pan 0.2
  # att 0.1
  # legato 2 # cut 4
  # rel 10
  # crushbus 41 (range 16  3.5 "^53")
  # roombus  42 (range 0.2 0.5 "^53") # sz 0.9 # dry 1
  # midiG' "^81" 0 1.2
d5 $ gF3 -- Burning birds
  $ fix (mask "t f") "juno:0"
  $ fix (mask "t(<2 [2 6]>,8,1)") "juno:3"
  $ fix ((# hpf 5000) . (|+ pan 0.2)
    . (# delay 0.4) . (# delayfb 0.4)
  ) "juno:4"
  $ (0.5 ~>)
  $ note (scale "aeolian" ("[0 <1!7 2 -1!7 2> . ~@2 2 <4 6>]"))
  # "[juno:0,juno:4,juno:3]"
  # pan 0.8
  # midiG' "^82" 0 1
d6 $ gF3 -- guitar dub contretemps
  $ note (scale "aeolian" (
    "[~ <1!3 <3 <-1 [-1 0]> 4 <7 [6 7]>>>]*2"
    + 7))
  # "pluck"
  # end 0.5
  # cut 6
  # pan 0.3
  # midiG' "^83" 0 1
d10 -- JUNGLE PEOPLE
  $ n (stack [
    "<~!7 <10!3 12>>", -- SICK
    "~ <~!14 21 21>", -- Drop!
    -- "<~!16 <45!3 [45 46]>!16>" -- Cool
    ""
    ])
  # "jungle_vocals"
  # cut 10
  # midiG' "^20" 0 0.8
  # pan 0.14
d7
  $ note ("<0 0 1 -2>/4")
  # "90s_synatm"
  # cut 7
  # crushbus 71 (slow 32 $ range 16 3 sine)
  # room 0.2 # dry 1.3 # sz 0.7
  # midiG "^19"
d8 $ gF $ gM
  $ midiOff "^60" (mask "t . t(<1 3 5 <3 8>>,8)")
  $ midiOn "^92" (ply 2)
  $ loopAt 2
  $ chop 16
  $ midiOn "^36" (# n "48")
  $ n "<40!3 [40 42]>"
  # "jungle_breaks"
  # cut 8
  # midiG' "^84" 0 0.8
d11 $ gF3 -- bogdan grime
  $ fix (midiOff "^42" $ mask "f") (n "1")
  $ n (stack [
    "<[<~!2 <~ <0 [0] [0 2]>> ~>]>", -- Me Love outsourcing
    "<~!32 [<1!3 ~>]!16 ~!16>", -- From Cardiff!
    "<~!16 [<~!11 3 ~!3>]!16 ~!32>", -- I'll do pints
    "<[<<0!3 2> ~>]!8 ~!24>", -- Me Love Critical Thinking!
    ""
    ])
  # "bogdan_grime"
  # cut 11
  # pan 0.8
  # room 0.4 # sz 0.3
  # dry "<1!6 1.5 2>"
  # midiG' "^18" 0 1.4