// I Talk to the Wind — King Crimson
// 83 bpm, 4/4, key E major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Full arrangement: all 80 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(83/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: edit a riff to change every repeat.

// chords · oboe
const oboe = note("<A B C D ~@4 E F G H ~@14 E F G H ~@10 E F G H E F G H I J K L M N O M P M ~@22>".pickRestart({
  A: "b3@13 ~@3", B: "~@4 d4@3 b3@2 ~ g3@4 a3@2", C: "~@3 f#3, b3@7 ~", D: "e3 d#3", E: "[e3,g#3,b3]", F: "[c3,e3,g3]",
  G: "[d3,f#3]", H: "[b2,e3] [b2,d#3]", I: "e3", J: "f#3", K: "g#3", L: "a3", M: "b3", N: "c#4", O: "c4", P: "g4",
})).s("gm_oboe").gain(0.35)

// bass · acoustic bass · "Bass"
const bass = note(`<
  ~@12 A B C D E F G H I J ~@8 A K C L E F I J M J ~@8 A B C D E F I J N J ~@12 O P Q R S T U V W ~
>`.pickRestart({
  A: "~@6 g#1@2 b1@4 e1@3 ~, e1@3 ~", B: "~@3 g#1@3 ~@3 g#1@2 f#1@5, f#1@11 ~@5, ~@6 a1@5 ~@5", C: "~@3 b0 e1@4, e1 ~",
  D: "~@2 d1 ~@2 d1 f#1@2, f#1@3 f#1@3 ~@2", E: "~@3 g#1 b1@2 g#1@2, e1@3 ~", F: "~@2 g#1 a1 ~ g#1 f#1@2, f#1@3 ~",
  G: "a1@3 c2", H: "b1@15 ~", I: "a1", J: "b1", K: "~@9 g#1@2 f#1@5, f#1@11 ~@5", L: "~@5 d1 f#1@2, f#1@3 ~",
  M: "a1@6 ~@2 c2@3 b1@3 a1@2, ~@3 a1@4 ~, ~@7 b1@2 ~@7", N: "a1@6 ~@2 c2@3 b1@5, ~@3 a1@5, ~@7 b1@2 ~@7",
  O: "a3 g#3 b2 b2@2 ~ e3@2", P: "~ g3@2 c4 c4@4, f#3 ~@3", Q: "e4@2 c#4@4 ~@5 e4@2 c#4@3",
  R: "b3@3 ~ f#3@3 ~ b3@4 ~@4", S: "~@2 g#3@2 e3@2 e3@3 ~@3 f#3@3 ~, a3 ~@3", T: "g3@2 b3@3 ~ a3@2 g3@3 ~@3 f#3@2",
  U: "~@2 d3@2 f#3@4 f#3@2 ~@2 d3@3 ~, d3 ~@7, ~ f#3@3 ~@12", V: "~ f#3@3 d3@3 ~ g3@2 d3@2 b2@3 ~, g3@3 ~@13", W: "e3",
})).s("gm_acoustic_bass").gain(0.56).pan(0.7)

// chords · piano
const piano = note(`<
  A B C D A B C D A B C D ~@10 A B C D A B C D ~@10 A B C D A B C D ~@10 A B C D A B C D A B C D A B C D A B C D E ~
>`.pickRestart({
  A: "[e2,g#2,b2]@13 ~@3", B: "[c2,e2,g2]@7 ~", C: "[d2,f#2]@7 ~", D: "[b1,e2]@6 ~@2 [b1,d#2]@7 ~", E: "[e2,g#2,b2]",
})).s("gm_piano").gain(0.56).pan(0.3)

// chords · ocarina · "Harmonics"
const ocarina = note("<~@13 A B A B C D E F G ~@9 A B A B C D E H G ~@9 A B A B C D E H G ~@22>".pickRestart({
  A: "~@3 c5@3 b4@4 a4@2 g#4@2 f#4@2, e5", B: "g#4@15 ~", C: "~@3 f#4@3 b4@4 a4@4 f#4@2, e4", D: "a4@5 ~ e5@2",
  E: "b4@13 ~@3", F: "a4@2 ~@2 g5@2 f#5 a4, ~@7 b4@2 ~@7", G: "b4@7 ~",
  H: "a4@4 ~@2 a4 ~ g5@4 f#5@2 a4@2, ~@7 b4@2 ~@7",
})).s("gm_ocarina").gain(0.56).pan(0.6)

// other · piccolo · "Flute2"
const piccolo = note(`<
  A@2 B C ~@8 D E F G H I J K L M ~@8 D E F G H I J K L M ~@8 D E F G H I J K L M ~@22
>`.pickRestart({
  A: "[b5@10 d6@2 b5 g5@2 a5]/2", B: "f#5@3 d5", C: "b4 d#5", D: "e4", E: "f#4", F: "g#4@15 ~", G: "a4", H: "b4",
  I: "c#5", J: "c5@3 e5", K: "b4@3 d#5", L: "g5@3 e5", M: "b4@15 ~",
})).s("gm_piccolo").gain(0.22).pan(1)

// drums · kick
const kick = s("bd").struct(`<
  ~@12 A@5 B A B A@2 C D C E C D C ~ A@5 B A B A@2 C D C F@2 D C ~ A@5 B A B A@2 G H I J G K I J G L M N J G I J G L M N
  K ~
>`.pickRestart({
  A: "x ~@2 x!2 ~@3", B: "x ~@2 x!2 ~@2 x", C: "x ~@6 x!2 ~ x ~@3 x ~", D: "~@7 x!2 ~ x ~@5", E: "x ~@6 x!2 ~@5 x ~",
  F: "~@7 x!2 ~ x ~@3 x ~", G: "x ~@3 x!2 ~@2", H: "x ~@6 x ~@2 x ~@5", I: "x!2 ~@7 x!2 ~@5", J: "x!2", K: "x",
  L: "~@3 x", M: "~@4 x!2 ~@2", N: "~ x ~@7 x!2 ~@5",
})).gain(0.56)

// drums · kick · soft notes
const kick_soft = s("bd").struct("<~@58 A B C D A ~ C D A ~ A C D A C D A ~ A C ~@2>".pickRestart({
  A: "~@3 x ~@3 x ~@8", B: "~@3 x ~@3 x", C: "~@7 x ~@8", D: "~@7 x ~@6 x ~",
})).gain(0.32)

// drums · snare
const snare = s("sd").struct(`<
  ~@11 A B C@2 D C E C E C D C@3 F C@3 A B C@2 D C E C E C D C@7 A B C@2 D C E C E C D G H I J G K I J G L G M N G I J G
  L G M ~@2
>`.pickRestart({
  A: "~ x", B: "~@4 x ~@7 x ~ x!2", C: "~ x ~ x", D: "~@4 x ~@5 x ~ x!2 ~@2", E: "~@2 x ~@2 x!3", F: "~@2 x ~@2 x!2 ~",
  G: "~@4 x ~@8 x ~@2", H: "~@3 x ~@8 x ~@3", I: "~@3 x ~@7 x ~@4", J: "~@5 x ~@6 x ~@3", K: "~@6 x ~@2 x ~ x ~@4",
  L: "x ~@2 x ~ x!2 ~", M: "~@3 x!2 ~@6 x ~@4", N: "~@5 x ~@6 x!2 ~@2",
})).gain(0.64)

// drums · snare · soft notes
const snare_soft = s("sd").struct(`<
  ~@17 A ~ A ~@15 A ~ A ~@15 A ~ A ~@3 B@2 C ~@2 B C ~@3 D E ~ B C ~@3 D ~@2
>`.pickRestart({
  A: "~@5 x ~@2", B: "~@4 x!2 ~@10", C: "~@6 x ~@6 x!2 ~", D: "~@5 x ~@10", E: "~@3 x ~@3 x",
})).gain(0.24)

// drums · low tom
const low_tom = s("lt").struct("<~@11 A ~@3 B ~@5 B ~@3 A ~@3 A ~@3 B ~@5 B ~@7 A ~@3 B ~@5 B ~@5 A ~@16>".pickRestart({
  A: "~@13 x!2 ~", B: "~@7 x",
})).gain(0.64)

// drums · hihat
const hihat = s("hh").struct(`<
  A ~@10 B C@5 D C D C@9 B C@5 D C D C@6 E C@2 B C@5 D C D C@2 F G H I F ~ H I F J F K I F H I F J F K L ~
>`.pickRestart({
  A: "~ x ~@2", B: "x!2 ~@2", C: "x!8", D: "x!5 ~@3", E: "~ x!7", F: "x ~@3 x ~@2 x!2 ~ x ~ x ~@3",
  G: "x ~@3 x ~@3 x ~@3 x ~ x!2", H: "x!3 ~ x ~ x ~", I: "x ~@3 x ~@3 x ~@3 x ~@2 x", J: "~@13 x ~@2",
  K: "~ x!2 ~ x ~ x ~", L: "x",
})).gain(0.56)

// drums · hihat · soft notes
const hihat_soft = s("hh").struct("<~@58 A B C D A ~ C D A ~ A C D A C D A ~ A C ~@2>".pickRestart({
  A: "~@2 x!2 ~@2 x ~@7 x!2", B: "~@2 x!2 ~@2 x!2 ~@2 x ~ x ~@3", C: "~@3 x ~@2 x ~@3 x!2 ~@2 x!2",
  D: "~@2 x!2 ~@2 x!2 ~@3 x ~@2 x ~",
})).gain(0.32)

// drums · mid tom
const mid_tom = s("mt").struct("<~@11 A ~@13 B ~@3 A ~@17 A ~@19 C ~@7 C ~@4>".pickRestart({
  A: "~@5 x!2 ~", B: "~@15 x", C: "~@3 x ~ x!2 ~",
})).gain(0.72)

// drums · open hat
const open_hat = s("oh").struct("<~@58 A ~ B ~@2 C D ~@2 E ~@4 D ~@2 E ~@4>".pickRestart({
  A: "~ x!2 ~", B: "~@11 x ~@4", C: "~@6 x ~@2 x ~ x ~@4", D: "~@2 x!2", E: "~@3 x ~ x!2 ~",
})).gain(0.72)

// drums · crash
const crash = s("cr").struct(`<
  ~@13 A ~@2 A ~ A ~ A ~ A ~@3 A ~@4 A ~@2 A ~ A ~ A ~ A ~@8 A ~@2 A ~ A ~ A ~ B C D E F A G H I ~ F J K F J H I ~ F J A
  ~
>`.pickRestart({
  A: "x", B: "x ~@3 x ~@7 x ~@2 x", C: "~@3 x!2 ~@7 x ~@3", D: "x ~@3 x ~@3 x ~@3 x ~@2 x", E: "x!2 ~ x",
  F: "~@4 x ~@10 x", G: "x ~@10 x ~@3 x", H: "x ~@2 x", I: "x ~@3 x ~@10 x", J: "~@11 x ~@3 x", K: "~@3 x",
})).gain(0.56)

// drums · high tom
const high_tom = s("ht").struct("<~@66 A ~ A ~@5 A ~ A ~@3>".pickRestart({
  A: "~@11 x ~@4",
})).gain(0.64)

// drums · ride
const ride = s("rd").struct("<A B@2 C D@3 E F D G ~@47 H I J K H ~ J K L ~ M N K O J K L ~ M N ~@2>".pickRestart({
  A: "~@3 x ~@4", B: "~@2 x!3 ~@11", C: "~@2 x!3 ~@2 x!4 ~@5", D: "~ x ~@2", E: "~@2 x ~ x ~@3 x!3 ~@5",
  F: "~@3 x ~@12", G: "~@2 x ~ x ~@2 x!4 ~@5", H: "x ~@3 x ~@3 x!2 ~ x!2 ~@3", I: "x ~@3 x ~@3 x ~@2 x!2 ~@3",
  J: "x ~@3 x ~@3 x!2 ~@2 x!2 ~@2", K: "x ~@3 x ~@3 x ~ x ~ x!2 ~@2", L: "x ~@3 x ~@3 x!2 ~@2 x ~@3",
  M: "~@4 x ~@3 x!2 ~@2 x ~@3", N: "~@4 x ~@3 x!2 ~@2 x!2 ~@2", O: "x ~@3 x ~@3 x!2 ~ x ~ x ~@2",
})).gain(0.56)

// drums · tambourine
const tambourine = s("tb").struct("<~@22 [~ x ~ x]!3 [~@3 x] [~ x ~ x]!3 ~@11 [~ x ~ x]!7 ~@33>").gain(0.72)

// drums · tambourine · soft notes
const tambourine_soft = s("tb").struct("<~@25 [~ x!7 ~@8] ~@54>").gain(0.24)

// drums · triangle
const triangle = s("triangles:30").struct("<~@66 A ~ A B C D ~@2 A ~ A B ~@2>".pickRestart({
  A: "~@2 x!2", B: "~ x!3", C: "x!4", D: "x ~ x!2",
})).gain(4.88)

// drums · triangle
const triangle_2 = s("triangles:35").struct("<~@59 A ~@2 B ~@2 C ~@5 C ~ C ~@6>".pickRestart({
  A: "x", B: "~@2 x!2", C: "~ x ~@2",
})).gain(4.88)

// drums · shaker
const shaker = s("sh").struct("<~@58 A B C D A ~ C D A ~ A C D A C D A ~ A C ~@2>".pickRestart({
  A: "~@4 x ~@8 x ~@2", B: "~@3 x!2 ~@7 x ~@3", C: "~@3 x!2 ~@6 x ~@4", D: "~@5 x ~@6 x!2 ~@2",
})).gain(0.32)

// drums · shaker · soft notes
const shaker_soft = s("sh").struct("<~@59 A@2 B ~@2 A B ~@3 A B ~ A B ~@3 A ~@2>".pickRestart({
  A: "~@5 x ~@10", B: "~@3 x ~@3 x",
})).gain(0.08)

stack(
  oboe, bass, piano, ocarina, piccolo, kick, kick_soft, snare, snare_soft, low_tom, hihat, hihat_soft, mid_tom,
  open_hat, crash, high_tom, ride, tambourine, tambourine_soft, triangle, triangle_2, shaker, shaker_soft
)