// Call It Love — Poco
// 105 bpm, 4/4, key A major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: pitch bends are ignored
// note: sustain pedal (CC 64) lengthens the held notes
// note: Full arrangement: all 101 bars on a 16-step grid, each part at one level; ghost notes are separate "_soft" parts. Source detail keeps the original performance.
setcpm(105/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.

// bass · acoustic bass · "ACOU BASS"
const bass = note(`<
  A@2 B@2 C@2 A@2 D E F G H I J K D E F G H I J K L M N O N P A@2 Q@2 D E F G H I J K L M N O N R S D E F G H T J K L M
  N O N P A@2 U@2 V@2 W@2 X@2 D E F G H I J K D E F G H I J K A@2 U@4 A@2 Y@4
>`.pickRestart({
  A: "[a0@31 ~]/2", B: "[f#0@31 ~]/2", C: "d1/2", D: "a0@4 e1@3 ~", E: "a1@6 ~ a1 e1 ~ a1 ~@3 e1 ~, ~@13 a1@2 ~",
  F: "f#1@6 ~@2 c#1 ~ c#1@5 ~", G: "f#1@3 ~ f#1 f#0@2 f#1", H: "d1@7 a0 d1 ~ d1@4 a0@2", I: "d1@7 ~ d1 ~ d1@4 e1@2",
  J: "a0@7 ~ a0 ~ a0@4 e1@2", K: "a1@7 ~ a1 ~ a1@3 e1 a0@2", L: "e0@2 ~ f#0@2 f#1 f#0@2",
  M: "d1@4 ~@2 d1@3 ~ c#1@2 d1@2 c#1@2", N: "e0@4 ~@2 f#0@4 f#1@3 f#0 f#1 ~", O: "d1@2 ~ d1@2 c#1 d1@2",
  P: "d1@3 ~ d1 ~ e1@4 e1@3 e0 e1@2", Q: "f#0", R: "d1@7 ~", S: "d1@4 f#1@4 e1@7 ~", T: "d1@6 ~@2 d1 ~ d1@4 e1@2",
  U: "[a0@15 ~]/2", V: "[f#0@15 ~]/2", W: "[d1@31 ~]/2", X: "[a0@29 ~@3]/2", Y: "[a0@49 ~@15]/4",
})).s("gm_acoustic_bass").gain(0.51)

// chords · piano · "A.PIANO 1"
const piano = note(`<
  A@2 B@2 C@2 D@2 E F G@2 H@4 E F G@2 H@4 I J K L M N A@2 O@2 E F G@2 H@4 I J M L ~ P Q R@2 S@2 T@2 U V I J K L M N A@2
  W@2 ~@6 E F G@2 H@4 E F G@2 H@4 ~@2 X@2 ~@2 Y@2 Z@3 AA
>`.pickRestart({
  A: "[a2,e3,a3,c#4,e4]/2", B: "[[f#2,f#3,a3,c#4]@31 ~]/2", C: "[[d3,f#3,a3,d4]@15 ~]/2",
  D: "[[a2,e3,a3,c#4,e4]@31 ~]/2", E: "[a2,e3,a3,c#4,e4]", F: "[c#4,e4]@2 e4 [b3,e4], [a2,e3,a4], ~ [a3,c#4]",
  G: "[a4@7 [e4,a4], [c#3,f#3,a3,c#4,f#4]]/2", // A5 F#m
  H: "[[a3,d4]@16 [d3,a3,d4]@15 ~@25 [b3,d4,e4]@6 ~@2, f#4@31 a2@31 ~@2, ~@31 e3@22 ~ e3@8 ~@2, ~@16 [a3,c#4]@15 ~, ~@4 e4@3 ~]/4", // D5 E7 A
  I: "[b3,e4,g#4]@3 [c#3,f#3,a3,c#4,f#4,a4]@5, e3 ~@15", J: "a4@10 [e4,a4]@5 ~, [d3,a3,d4,f#4]@15 ~",
  K: "[e3,b3,e4,g#4,b4]@3 [c#3,f#3,a3,c#4,f#4,a4]@5, g#3 ~@15", L: "~@12 [a3,d4,f#4]@3 ~, [a3,d4,f#4]@3 ~, ~@10 d3@5 ~",
  M: "[e3,b3,e4,g#4,b4]@3 [c#3,f#3,a3,c#4,f#4,a4]@5", N: "[d3,a3,d4,f#4,a4]@3 [e3,b3,e4,g#4,b4]@4 ~",
  O: "[f#2,f#3,a3,c#4]", P: "[d3,a3,d4,f#4,a4]@15 ~",
  Q: "[d3,a3,d4,f#4,a4]@3 ~ [c#3,f#3,a3,c#4,f#4,a4]@4 [e3,g#3,b3,e4,g#4,b4]@7 ~", // D F#m E
  R: "[[e4,e5]@21 ~ [c#4,c#5]@2 [d4,d5]@3 [c#4,c#5]@2 ~ [b3,b4]@2]/2", // E C# D C# B
  S: "[[a3,a4]@4 ~@2 [f#3,f#4]@2 [f#3,f#4]@11 ~@3 [c#4,c#5]@7 ~ [b3,b4] ~]/2", // A F# C# B
  T: "[[a3,a4]@5 ~ [f#3,f#4]@2 [f#3,f#4]@12 ~@4 [b3,b4]@7 ~]/2", U: "[a4,a5]@5 ~ [c#5,c#6]@2 [c#5,c#6]@5 ~ [e5,e6] ~",
  V: "[e5,e6]@5 ~ [a5,a6] ~ [a5,a6]@6 ~@2", W: "[[a2,e3,a3,c#4]@31 ~]/2", X: "[c#4@15 ~]/2", Y: "[c#4@31 ~]/2",
  Z: "[c#3@41 ~@7]/3", AA: "~ [a2,e3,a3]@4 ~@11",
})).s("gm_piano").gain(0.46)

// chords · rock organ · "ORGAN 3"
const rock_organ = note(`<
  A@2 B@2 C@2 D@2 E@2 F@2 G@2 H@2 E@2 F@2 G@2 H@2 I J I K I L M@2 ~@2 E@2 F@2 G@2 H@2 I J I K I N O E@2 F@2 G@2 H@2 I J
  I K I L M@2 ~@8 P@4 Q@2 R@8 H@2 S@8 ~@4
>`.pickRestart({
  A: "[a2@31 ~]/2", B: "[f#2@31 ~]/2", C: "d3/2", D: "[~@20 e6@11 ~, a2@31 ~, ~@16 [e4,e5]@15 ~]/2",
  E: "[[a3,c#4,e4]@31 ~]/2", F: "[[c#4,f#4,a4]@31 ~]/2", G: "[d4,f#4,a4]/2",
  H: "[~@28 e6@3 ~, [a3,c#4,e4]@31 ~, ~@16 [a4,c#5]@9 c#6@5 ~@2, ~@20 a5@11 ~]/2", // A
  I: "[e4,g#4,b4]@5 ~ [f#4,a4,c#5]@9 ~", J: "[f#4,a4,d5]@15 ~", K: "~@4 f#5@4 a5@7 ~, [f#4,a4,d5]@15 ~",
  L: "[f#4,a4,d5]@5 ~ [g#4,b4,e5]@9 ~", M: "a4/2", N: "[a4,a5]@7 ~", O: "[a4,a5]@3 ~ c#6@3 ~ [b4,b5]@6 ~@2",
  P: "[e5 f#5@2 ~@10 c#5 d5@2 ~@23 d5@3 c#5@4 ~ c#5 ~@10 d5@2 e5@4, [a3,c#4,e4]@31 ~ [c#4,f#4,a4]@31 ~, ~@3 e5@12 ~ c#5@24 ~@24]/4", // A F#m
  Q: "[~@5 d6@2 ~@9, [d4,f#4,a4]]/2", // D
  R: "[~@28 e6@3 ~ [a3,c#4,e4]@31 ~ [c#4,f#4,a4]@31 ~ [d4,f#4,a4]@32, [a3,c#4,e4]@31 ~@97, ~@16 [a4,c#5]@9 c#6@43 ~@60, ~@5 a5@27]/8", // A F#m D A
  S: "e3/8",
})).s("gm_rock_organ").gain(0.31)

// chords · rock organ · "ORGAN 3" · soft notes
const rock_organ_soft = note("<~@30 A@2 B@2 ~@14 C ~@14 A@2 ~@8 D@8 ~@8 E@8 ~@4>".pickRestart({
  A: "[e4,c#5]/2", B: "[f#4,a4,c#5]", C: "~@4 c#5@3 ~@9",
  D: "[~@46 b4 ~@2 c#5@9 ~@20 c#6@43 ~@7, a5@29 ~@3, ~@64 f#5@33 ~@31]/8", E: "[a2,a3]/8",
})).s("gm_rock_organ").gain(0.2)

// chords · overdriven guitar · "OVERDRIVE"
const overdriven_guitar = note(`<
  A@2 B@2 C@2 A@2 D@2 E@2 F@2 G@2 D@2 E@2 F@2 G@2 H I H I J K A@2 L@2 D@2 E@2 F@2 G@2 H I H I J M N O@2 P@2 Q@2 R S H I
  H I J K A@2 T@2 ~@4 U@2 D@2 E@2 F@2 G@2 V@2 W X Y Z AA@2 AB@3 ~ AC@4 AD@4
>`.pickRestart({
  A: "[[a2,e3]@15 ~]/2", B: "[[f#2,c#3]@31 ~]/2", C: "[[d3,a3]@31 ~]/2",
  D: "[c3 ~@13 d4@2 c#4@14 b3 ~, [a2,e3]@15 ~]/2", E: "[~@10 a3@2 g#3@2 a3@8 b3@4 c#4@5 ~, [f#2,c#3]@31 ~]/2",
  F: "[~@5 d4@2 c#4@2 e4@2 c#4@2 d4@2 ~, [d3,a3]@31 ~]/2", G: "[~@7 a4@2 e4@2 c#4@2 a4 e4 f#4, [a2,e3]@7 ~]/2",
  H: "[e2,b2]@3 [f#2,c#3]@5", I: "[d3,a3]@15 ~", J: "[e2,b2]@6 [f#2,c#3]@9 ~", K: "[d3,a3]@2 ~ [e3,b3]@4 ~",
  L: "[f#2,c#3]", M: "d3@7 ~", N: "[d3,a3]@4 [f#3,c#4]@4 [e3,b3]@7 ~", O: "[e4@21 ~ c#4@2 d4@3 c#4@2 ~ b3@2]/2",
  P: "[a3@4 ~@2 f#3@2 f#3@11 ~@3 c#4@7 ~ b3 ~]/2", Q: "[a3@5 ~ f#3@2 f#3@12 ~@4 b3@7 ~]/2",
  R: "a4@5 ~ c#5@2 c#5@5 ~ e5 ~", S: "e5@5 ~ a5 ~ a5@6 ~@2", T: "[[a2,e3,a3,b3,c#4]@31 ~]/2", U: "[[a2,e3]@31 ~]/2",
  V: "[a4@5 ~ a4@14 ~@2 b4@4 d5@2 b4@3 ~]/2", W: "b4@15 ~", X: "~@2 a5@3 a5@2 ~ a5@7 ~", Y: "a5@6 f#5@7 ~ d5 ~",
  Z: "d5@12 ~@2 a4 ~", AA: "[[f#4,b4]@5 ~ [e4,a4]@5 ~ [c#4,f#4]@6 [b3,e4]@5 ~ a3@7 ~]/2", AB: "[[a2,e3]@15 ~]/3",
  AC: "[[a2,e3]@49 ~@15]/4", AD: "[[a2,e3]@51 ~@13]/4",
})).s("gm_overdriven_guitar").gain(0.46)

// chords · electric guitar clean · "CLEAN GTR"
const electric_guitar_clean = note(`<
  A B C D E@2 F G H I H I H I H I H I H I H I H I J K L M N O A B C D H I H I H I H I J K L M N P Q H I H I H I H I J K
  L M N O A B A B C D E@2 F G H I H I H I H I H I H I H I H I H I H I H I H I ~@4
>`.pickRestart({
  A: "[c#5,e5]!3 [a4,c#5] ~ [a4,c#5] ~ [a4,c#5] [g#4,b4]@2 [g#4,b4]@2 [a4,c#5]!2 [a4,c#5]@2", // C#m A G#m A
  B: "[c#5,e5]!2 ~ [a4,c#5] ~ [a4,c#5] ~ [a4,c#5] [g#4,b4]@2 ~@2 [a4,c#5]@2 [a4,c#5]@2, ~ [c#5,e5] ~@3 [g#4,b4]@3", // C#m A G#m A C#m G#m
  C: "[c#5,e5]!3 [a4,c#5] ~ [a4,c#5] ~ [a4,c#5] [g#4,b4]@2 ~@2 [a4,c#5]!2 [a4,c#5]@2, ~@5 [g#4,b4]@3", // C#m A G#m A G#m
  D: "[c#5,e5]!2 ~ [a4,c#5] ~ [a4,c#5] ~ [a4,c#5] [g#4,b4]@2 ~@2 [a4,c#5]@2 [a4,c#5] ~, ~@2 [c#5,e5]@2 ~@6 [g#4,b4]@5 ~", // C#m A G#m A C#m G#m
  E: "[[f#4,a4,e5]!2 [f#4,a4] [f#4,a4,d5] ~ [f#4,a4,d5] ~ [f#4,a4] [f#4,a4,c#5]@2 [f#4,a4,c#5]@2 [f#4,a4,d5] ~ [f#4,a4]@2 [f#4,a4,e5]!3 [f#4,a4,d5] ~ [f#4,a4,d5] ~ [f#4,a4,d5] [a4,c#5] ~ [a4,c#5] ~ [f#4,a4,d5]@2 [f#4,a4,d5] ~, ~@7 d5@5 ~@2 d5@5 ~@13]/2", // F#m7 F#m D F#m D F#m F#m7 D …
  F: "[c#5,e5] ~ c#5 [a4,c#5] ~ [a4,c#5] ~ [a4,c#5] [g#4,b4]@2 [g#4,b4]@2 [a4,c#5] ~ [a4,c#5] ~, ~ [c#5,e5]@2 ~@13", // C#m A G#m A C#m
  G: "[c#5,e5]!3 [a4,c#5] ~ [a4,c#5] ~ [a4,c#5] [g#4,b4] ~ b4 ~ [a4,c#5]@2 [a4,c#5] ~, ~@10 g#4@5 ~", // C#m A G#m A
  H: "[c#5,e5]!3 [a4,c#5] ~ [a4,c#5] ~ [a4,c#5] [g#4,b4]@2 ~@2 [a4,c#5]!4, ~@5 [g#4,b4]@3", // C#m A G#m A G#m
  I: "[c#5,e5] c#5 [c#5,e5] [a4,c#5] ~ [a4,c#5]@2 [a4,c#5] [g#4,b4] ~ [g#4,b4]@2 [a4,c#5]@2 [a4,c#5] ~", // C#m A G#m A
  J: "[e3,g#3,b3]@6 [f#3,a3,c#4]@3 [f#3,a3,c#4] [f#3,a3,c#4]@2 [f#3,a3,c#4]@2 [f#3,a3,c#4]@2", // E F#m
  K: "[f#3,a3,d4]@3 [f#3,a3,d4] [f#3,a3,d4]@2 [a3,d4]@2 [a3,d4]@2 [f#3,a3,d4]@2 [f#3,a3,d4]@2 [f#3,a3,d4]@2, ~@3 f#3@2 ~@3", // D D5 D
  L: "[e3,g#3,b3]!3 [f#3,a3,c#4]@2 [f#3,a3,c#4]!3", // E F#m
  M: "[f#3,a3,d4]@3 [f#3,a3,d4] [f#3,a3,d4]@2 [f#3,a3,d4]@2 [f#3,a3,d4]@2 [f#3,a3,d4]@2 [f#3,a3,d4]@2 [f#3,a3,d4]@2", // D
  N: "[e3,g#3,b3]@2 [e3,g#3,b3] [f#3,a3,c#4]@2 [f#3,a3,c#4]!3", // E F#m
  O: "[f#3,a3,d4]@3 [f#3,a3,d4] [f#3,a3,d4]@2 [g#3,b3,e4]@4 [g#3,b3,e4]@2 [g#3,b3,e4]@2 [g#3,b3,e4] ~", // D E
  P: "[d3,a3,d4,f#4]@13 ~@3", Q: "[d3,f#3,a3,d4,f#4] ~@3 [c#3,f#3,a3,c#4,f#4,a4]@2 ~@2 [e3,g#3,b3]@5 ~@3",
})).s("gm_electric_guitar_clean").gain(0.36)

// drums · kick
const kick = s("bd").struct(`<
  A ~ A ~ A ~ A B C D C D C D C D C D C D C D C D@6 E C D C D C D C D C D C D@6 A F D@7 E D@5 E C D A ~ A ~ A ~ A ~ D@7
  E D@7 E C G C G C G C G A ~@3
>`.pickRestart({
  A: "x", B: "~@11 x ~@4", C: "x!2", D: "x ~@3 x!2 ~ x", E: "x ~@2 x!3 ~ x", F: "x!3 ~", G: "x ~@3 x!2 ~@2",
})).gain(0.51)

// drums · snare
const snare = s("sd").struct(`<
  ~@7 A B@7 C B@7 C B@5 D B@3 E B@7 C B@5 ~ F B@7 D B@5 D B@2 ~@7 G B@7 D B@7 D ~@7 A ~@4
>`.pickRestart({
  A: "~@14 x!2", B: "~ x ~ x", C: "~@4 x ~@7 x ~ x!2", D: "~@4 x ~@9 x!2", E: "~@4 x ~@4 x ~@2 x ~ x!2",
  F: "~@10 x ~@3 x!2", G: "~@12 x!4",
})).gain(0.51)

// drums · snare · soft notes
const snare_soft = s("sd").struct("<~@7 A ~@21 A ~@18 A ~@7 A ~@5 A ~@9 B ~@7 A ~@7 A ~@7 A ~@4>".pickRestart({
  A: "~@12 x!2 ~@2", B: "~@4 x!8 ~@4",
})).gain(0.15)

// drums · low tom
const low_tom = s("lt").struct("<~@7 [~ x] ~@40 [~@10 x ~@3 x!2] ~@47 [~@2 x!2] ~@4>").gain(0.51)

// drums · hihat
const hihat = s("hh").struct(`<
  A@8 B C B C B C B C B C B C B C B C D@5 E B C B C B C B C B C B C D@5 A ~ D@7 E D@5 E B C F D F D F D F D@8 E D@7 E F
  D F D F D F D ~@4
>`.pickRestart({
  A: "~ x ~ x", B: "x!8", C: "x!7 ~", D: "x!16", E: "x!6 ~ x!9", F: "~ x!15",
})).gain(0.15)

// drums · mid tom
const mid_tom = s("mt").struct("<~@7 [~@5 x ~@10] ~@40 [~@12 x!2 ~@2] ~@47 [~@5 x ~@3 x ~@6] ~@4>").gain(0.51)

// drums · open hat
const open_hat = s("oh").struct(`<
  ~@9 A ~ A ~ A ~ A ~ A ~ A ~ A ~ A ~@5 B ~ A ~ A ~ A ~ A ~ A ~ A ~@5 C ~@8 B ~@5 B ~ A C ~ C ~ C ~ C ~@8 B ~@7 B C ~ C
  ~ C ~ C ~@5
>`.pickRestart({
  A: "~@7 x", B: "~@3 x ~@4", C: "x",
})).gain(0.51)

// drums · high tom
const high_tom = s("ht").struct("<~@7 [~ x ~@6] ~@88 [~ x ~@6] ~@4>").gain(0.51)

// drums · crash
const crash = s("cr").struct(`<
  A ~ A ~ A ~ A ~@22 B A ~@17 C A ~@6 B ~@5 B A ~@9 A ~@6 B A ~@6 B A ~ A ~ A ~ A ~ A ~@3
>`.pickRestart({
  A: "x", B: "~@3 x ~@4", C: "x!3 ~",
})).gain(0.51)

// drums · ride
const ride = s("rd").struct("<~@24 A@6 ~@12 A@5 B ~ A@14 ~@2 B ~ B ~ B ~ B ~ A@16 B ~ B ~ B ~ B ~ B ~@3>".pickRestart({
  A: "x!4", B: "x",
})).gain(0.51)

stack(
  bass, piano, rock_organ, rock_organ_soft, overdriven_guitar, electric_guitar_clean, kick, snare, snare_soft, low_tom,
  hihat, mid_tom, open_hat, high_tom, crash, ride
)