// Cactus Tree — Joni Mitchell
// 112 bpm, 4/4, key G major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: metre changes (1/4 at bar 1, 4/4 at bar 1, 3/4 at bar 18, 1/4 at bar 19, ...) are rendered on a constant 4/4 grid of one bar per cycle
// note: ch 2 "Adlib Violin" named as a string part, played on violin (its choir aahs patch is not one); ch 5 "Adlib Marimba" named as a mallet, played on marimba (its sitar patch is not one)
// note: Full arrangement: all 69 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(112/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · "a, b" plays two voices at once · [...]/2 spreads a riff over 2 bars.
// A part's distinct bars are riffs (A, B, C...) played in order, A@4 for four bars: edit a riff to change every repeat.

// chords · piano · "Adlib Piano"
const piano = note(`<
  A B C D E F G@3 H I@2 H J K L M D N B C D E O G@3 H I@2 H J K L M D N B C D E F G@3 H I@2 H J K L M D P K L M D Q R@4
  S@5
>`.pickRestart({
  A: "~@6 d5!2", B: "d5@2 d5@2 d5 ~ d5 ~ d5@2 d5@2 ~ d5!2 ~, [f#4,b4]@15 ~",
  C: "d5@2 d5@2 d5!2 d5@6 ~ d5!2 ~, [g4,c5]@7 ~@9", D: "d5@2 d5@2 d5@2 d5 ~ d5@2 d5@3 d5!2 ~, [f#4,b4]@7 ~ [g4,c5]@7 ~",
  E: "b5@2 b5@2 a5 ~ g5@2 d6@4 c6@2 b5@2, b4@7 ~ [c5,f#5]@7 ~", F: "g5@2 d5 ~ d5@2 d5@2 c5@2 c5@3 b4 ~ g5, b4@7 ~@9",
  G: "[g5@2 d5 ~ d5@2 c5@2 [g4,c5]@11 ~ [g4,c5]@15 ~@2 b4 ~ b4 c5@2 c5@2 c5@2 d5 ~, b4@7 ~@33 g4@7 ~]/3", // C5
  H: "b4@2 ~@2 g4@2 g4@2 g4@2 ~@3 b4!2 ~, g4@4 ~@6 g4@5 ~, ~ b4@5 ~@2",
  I: "[c5@2 c5@2 c5@2 d5@2 b4@2 ~@2 g4 ~ g4@2 g4@2 ~@3 b4!2 ~ c5@2 c5@2 c5 ~ d5@2, g4@7 ~ g4@4 ~@6 g4@5 ~ g4@7 ~, ~@5 b4@5 ~@6]/2",
  J: "c5@2 c5 ~ c5@2 d5@2 [c5,d5]@2 d5@2 ~ g5 a5 ~, g4@7 ~@9", K: "b5@2 d6@4 b5@5 ~ a5@2 g5@2, d5@15 ~",
  L: "~@4 d5@7 ~ b5@4, c5@15 ~", M: "[b4,a5]@6 g5 ~ g5@2 d5@2 d5@2 d5 ~, ~@8 c5@7 ~",
  N: "d5@2 d5@2 d5 ~ d5@2 d5@2 d5@2 d5 ~ d5@2, [f#4,b4]@7 ~ [g4,c5]@4 ~@4", // B5 C5
  O: "g5 ~ d5@2 d5@2 d5@2 c5@2 c5@3 ~ b4 g5, b4@7 ~@9",
  P: "d5@2 d5@2 d5@2 d5 ~ d5@2 d5@2 ~ g5 a5 ~, [f#4,b4]@7 ~ [g4,c5]@4 ~@4", // B5 C5
  Q: "d5@2 d5@2 d5@2 d5@2 d5 ~ d5@2 ~@2 g5@2, [f#4,b4]@7 ~ [g4,c5]@4 ~@4", // B5 C5
  R: "[a5@2 b5@2 ~@2 d6@6 b5@9 ~ a5@2 ~ g5@2 ~@7 d5@12 ~ b5@6 ~ [b4,a5]@9 g5, ~@2 d5@25 ~ c5@25 ~@11]/4", // B7
  S: "[~@2 g5@2 ~@2 d5@2 ~ d5@2 ~ d5@2 ~ d5@2 ~ d5@2 ~@2 d5@2 ~ d5@2 ~ d5@2 ~ d5@4 ~ d5@2 d5@2 ~ d5@2 ~ d5@2 ~ d5@2 ~ d5@2 ~@2 d5@2 ~ d5@22 ~, ~@2 c5@12 ~ [f#4,b4]@12 ~ [g4,c5]@12 ~ [f#4,b4]@12 ~ [g4,c5]@25 ~]/5", // B5 C5 B5 C5
})).s("gm_piano").gain(0.26)

// chords · piano · "Adlib Piano"
const piano_2 = note(`<
  ~ A B A C D E@3 F G@2 F H I J K A L A B A C D E@3 F G@2 F H I J K A L A B A C D E@3 F G@2 F H I J K A M I J K A N@7
  O@3
>`.pickRestart({
  A: "g2@11 ~ g2@3 ~", B: "g2@7 ~ g2@4 g2@3 ~", C: "[g2,d3]@7 ~ [d2,d3]@7 ~", D: "[g2,f#3]@7 ~ [g2,g3]@7 ~",
  E: "[[g2,f#3]@7 ~ [g2,e3]@11 ~ [g2,e3]@4 [g2,e3]@11 ~ [g2,d3]@4 [g2,e3]@7 ~]/3", F: "[g2,d3]@11 ~ [g2,d3]@4",
  G: "[[g2,e3]@7 ~ [g2,d3]@11 ~ [g2,d3]@4 [g2,e3]@7 ~]/2", H: "[g2,e3]@7 ~ [a2,f#3]@3 ~ [d3,c4]@4", I: "[g2,b2]@15 ~",
  J: "[g2,e3,a3]@7 ~ [g2,e3,a3]@7 ~", K: "[g2,f#3]@4 [g2,f#3]@3 ~ [g2,g3]@7 ~", L: "g2@11 ~@5",
  M: "g2@11 ~ [d3,c4]@3 ~", // D7
  N: "[g2@11 ~ [d3,c4]@6 [g2,b2]@25 ~ [g2,e3,a3]@12 ~ [g2,e3,a3]@12 ~ [g2,f#3]@6 [g2,f#3]@6 [g2,g3]@12 ~ g2@17]/7", // D7 G A7 Gmaj7 G
  O: "[~@2 g2@6 ~ g2@38 ~]/3",
})).s("gm_piano").gain(0.26)

// other · marimba · "Adlib Marimba"
const marimba = note("<A B C B D E F@3 G H@2 G I J K L M@2 B C B D E F@3 G H@2 G I J K L N@2 ~@32>".pickRestart({
  A: "~@6 d5!2", B: "d5@2 d5@2 d5 ~ d5 ~ d5@2 d5@2 ~ d5!2 ~", C: "d5@2 d5 ~ d5!2 ~ d5@5 ~ d5!2 ~",
  D: "b5@2 b5@2 a5 ~ g5@2 d6@4 c6@2 b5@2", E: "g5@2 d5 ~ d5@2 d5@2 c5@2 c5 ~@2 b4 ~ g5",
  F: "[g5@2 d5 ~ d5@2 c5@2 [g4,c5]@15 ~ c5@11 ~@2 b4 ~ b4 c5@2 c5@2 c5@2 d5 ~]/3", G: "b4@2 b4@9 ~@2 b4!2 ~",
  H: "[c5@2 c5@2 c5@2 d5@2 b4@2 b4@9 ~@2 b4 ~ b4 c5@2 c5@2 c5@2 d5 ~]/2", I: "c5@2 c5 ~ c5@2 d5@2 d5@2 d5 ~@2 g5 a5 ~",
  J: "b5@2 d6@4 b5@5 ~ a5@2 g5@2", K: "c5@3 ~ d5@7 ~ b5@4", L: "a5@6 g5 ~ g5@2 d5@2 d5@2 d5 ~", M: "[d5@14 d5!2]/2",
  N: "[d5@7 ~]/2",
})).s("gm_marimba").gain(0.26)

// drums · mid tom
const mid_tom = s("mt").struct("<[~@3 x] ~@17 [~@3 x] ~@17 [~@3 x] ~@32>").gain(0.26)

// drums · high tom
const high_tom = s("ht").struct("<~ A@17 B A@17 B A@23 C D E F G H I J ~>".pickRestart({
  A: "x!5 ~ x ~ x ~@3 x ~@3", B: "x!5 ~ x ~ x ~@7", C: "~@2 x ~ x ~ x!2 ~ x ~@2 x ~@3", D: "x ~@5 x ~@5 x ~ x!2",
  E: "~ x ~ x ~@2 x ~@2 x ~@6", F: "x ~@5 x!2 ~ x!2 ~ x ~@3", G: "x ~@2 x ~@5 x ~@5 x",
  H: "~ x!2 ~ x ~ x ~@2 x ~@2 x ~@3", I: "~@3 x ~@5 x!2 ~ x ~ x ~", J: "x ~@2 x ~@2 x ~@5 x ~@3",
})).gain(0.26)

// drums · cowbell
const cowbell = s("cb").struct("<A B@59 C D E F G H I J ~>".pickRestart({
  A: "~@3 x", B: "x!5 ~ x ~ x ~@3 x ~@3", C: "~@2 x ~ x ~ x!2 ~ x ~@2 x ~@3", D: "x ~@5 x ~@5 x ~ x!2",
  E: "~ x ~ x ~@2 x ~@2 x ~@6", F: "x ~@5 x!2 ~ x!2 ~ x ~@3", G: "x ~@2 x ~@5 x ~@5 x",
  H: "~ x!2 ~ x ~ x ~@2 x ~@2 x ~@3", I: "~@3 x ~@5 x!2 ~ x ~ x ~", J: "x ~@2 x ~@2 x ~@5 x ~@3",
})).gain(0.26)

stack(piano, piano_2, marimba, mid_tom, high_tom, cowbell)