// @title INSPIRITUS WORKSHOP NIGHTS
// @by John Oestmann
// @license CC0 / Public Domain

setcpm(120/4)

$KICK: note("<36>")
  .s("linnlm2_bd")
.beat("0", 16)
  .seg(32)
  .mask(arrange([4,"0"],
               [24,"1"]))
  .delay(0.2)
  .room(0.5)
  ._pianoroll()
  .postgain(0.5)
.orbit(1)

$KICK2: note("<36>")
  .s("dr550_bd")
.beat("0", 16)
  .mask(arrange([4,"0"],
               [24,"1"]))
  ._pianoroll()
  .postgain(0.8)
.orbit(1)


$RIM1: note("<36>")
  .s("akaimpc60_rim")
.beat("3,6,12,14", 16)
  ._pianoroll()
  .delay(0.1)
  .room(0.5)
  .postgain(0.3)
.orbit(2)

$FROGS: note("<32 28>".fast(2))
  .s("ace_perc")
.beat("4,14", 16)
  .delay("<0.7>").delaysync("<0.02>").delayfeedback(0.8)
  ._pianoroll()
  .pan("<0.2 0.8 0.35 0.65>".fast(2))
  .decay(0.005)
  .hpf(1200)
  .room(0.5)
  .postgain(arrange([4,"0"],
                   [4,"0.16"])
            )
.orbit(3)

$LOWHATS: note("<28>")
  .s("akaixr10_tb")
.beat("6,14", 16)
  .pan("<0.3 0.7 0.4 0.5>".fast(2))
  ._pianoroll()
  .delay("<0.4 0>".fast(2))
  .room(0.5)
  .postgain(0.08)
.orbit(4)

$MASKEDHATS: note("<36>")
  .s("akaixr10_tb")
.euclid("<5 7>",16).late(2/8)
  .pan("<0.3 0.7 0.4 0.5>".fast(4))
  .delay("<0.2 0>".fast(2))
  .mask("<1 ~ 1 1 ~ ~ ~>".fast(5))
  ._pianoroll()
  .lpf(1400)
  .room(0.7)
  .postgain(0.2)
.orbit(5)

$CHORDS: note("<[0, 5, 12, 14, 17]@2 [0, 7, 14, 15, 17] [0, 7, 14, 15, 17]@0.5 ~@0.5 >"
       .add("<48!4 46!2>").fast(2)).late(2/8)
.sound("gm_pad_halo")
  .mask(arrange([8,"0"],
               [30,"1"]))
  ._pianoroll()
  .decay(2)
.room(0.5)
  .postgain(0.3)
.orbit(6)


$MELODY: note("<<5 2 3> 7 12>"
       .add("<48!4 46!2>").fast(2)).late(2/8)
  .euclid(7,16)
.sound("gm_lead_5_charang")
  .mask(arrange([8,"0"],
               [30,"1"]))
  ._pianoroll()
  .pan("<0.6 0.4 0.5 0.65 0.35>".fast(4))
  .delay(0.2).delayfeedback(0.85)
.room("0.9:16")
  .postgain(0.4)
.orbit(7)

$SNARE: note("<34 35>")
.beat("4, <~ 5 ~!3>,  <7 ~!5>, 12, <~ 13 ~!5>, <14 ~!3>, <~!3 15>", 16)
.s(stack("ajkpercusyn_sd",
        "compurhythm1000_sd",
        "korgkpr77_sd"))
    .mask(arrange([8,"0"],
               [20,"1"]))
.gain("<0.2 0.2 [0.9 0.3] 0.1 0.1 0.2 [1 0.6] 0.2>".fast(8))
  //.delay(0.08)
  .hpf(380)
  //.lpf(12000)
  .pan("<0.48 0.52>")
  .decay("<0.14 0.1!3>".fast(3))
  .room(0.7)
  ._pianoroll()
  .postgain(0.4)
.orbit(8)